|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦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 0318 | | .CONST 0x0318 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00ad | | .CONST 0x00ad ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0031 | 1 | .CONST 0x0031 ; Number of locals 000b INIT_0008: 000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 000c 00e3 | | Load_Encached Natural_Cache 000d 0266 | f | Execute Discrete,Bounds 000e 00da | | Load_Top At_Offset_2 000f 02a0 | | Declare_Subprogram Null_Subprogram 0010 4801 |H | Short_Literal 0x1 0011 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0012 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 0013 00c4 | | Action Make_Default 0014 e001 | | Load 0x0,0x1 0015 0129 | ) | Execute Any,Make_Visible 0016 e002 | | Load 0x0,0x2 0017 0129 | ) | Execute Any,Make_Visible 0018 e003 | | Load 0x0,0x3 0019 0129 | ) | Execute Any,Make_Visible 001a 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated 001c 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated 001e 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated 0020 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0022 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0024 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0026 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0028 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 002a 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 002c 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 002e 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 0030 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0032 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 0034 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0036 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 0038 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 003a 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 003c 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 003e 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0040 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 0042 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 0044 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 0046 00e9 | | Load_Encached String_Cache 0047 02a0 | | Declare_Subprogram Null_Subprogram 0048 03ad | | Declare_Type Heap_Access,Defined 0049 00e2 | | Load_Encached Integer_Cache 004a 00e9 | | Load_Encached String_Cache 004b 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 004d 4800 |H | Short_Literal 0x0 004e 4801 |H | Short_Literal 0x1 004f 4800 |H | Short_Literal 0x0 0050 4800 |H | Short_Literal 0x0 0051 4801 |H | Short_Literal 0x1 0052 4801 |H | Short_Literal 0x1 0053 031d | | Declare_Type Variant_Record,Defined 0054 00d8 | | Load_Top At_Offset_0 0055 02a0 | | Declare_Subprogram Null_Subprogram 0056 e20d | | Load 0x1,0xd 0057 03a3 | | Complete_Type Heap_Access,By_Defining 0058 e20d | | Load 0x1,0xd 0059 0007 | | Action Break_Optional 005a e20e | | Load 0x1,0xe 005b 02a0 | | Declare_Subprogram Null_Subprogram 005c 03ad | | Declare_Type Heap_Access,Defined 005d 00d8 | | Load_Top At_Offset_0 005e 0007 | | Action Break_Optional 005f e22a | * | Load 0x1,0x2a 0060 00d8 | | Load_Top At_Offset_0 0061 e22a | * | Load 0x1,0x2a 0062 00d8 | | Load_Top At_Offset_0 0063 e22a | * | Load 0x1,0x2a 0064 00d8 | | Load_Top At_Offset_0 0065 e22a | * | Load 0x1,0x2a 0066 00d8 | | Load_Top At_Offset_0 0067 e22a | * | Load 0x1,0x2a 0068 00e1 | | Load_Encached Boolean_Cache 0069 e22a | * | Load 0x1,0x2a 006a 00e2 | | Load_Encached Integer_Cache 006b 00e2 | | Load_Encached Integer_Cache 006c e22a | * | Load 0x1,0x2a 006d 00d8 | | Load_Top At_Offset_0 006e e22a | * | Load 0x1,0x2a 006f 00d8 | | Load_Top At_Offset_0 0070 e22d | - | Load 0x1,0x2d 0071 00d8 | | Load_Top At_Offset_0 0072 02a0 | | Declare_Subprogram Null_Subprogram 0073 4813 |H | Short_Literal 0x13 0074 032d | - | Declare_Type Record,Defined 0075 00d8 | | Load_Top At_Offset_0 0076 02a0 | | Declare_Subprogram Null_Subprogram 0077 e20f | | Load 0x1,0xf 0078 03a3 | | Complete_Type Heap_Access,By_Defining 0079 e20f | | Load 0x1,0xf 007a 0129 | ) | Execute Any,Make_Visible 007b c210 | | Store 0x1,0x10 007c 00bf | | Action Accept_Activation 007d 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call 007f 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call 0081 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0082 00c7 | | Action Elaborate_Subprogram 0083 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0084 00c7 | | Action Elaborate_Subprogram 0085 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0086 00c7 | | Action Elaborate_Subprogram 0087 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0088 00c7 | | Action Elaborate_Subprogram 0089 1d18 | | Execute_Immediate Reference_Lex_1,0x18 008a 00c7 | | Action Elaborate_Subprogram 008b 1d19 | | Execute_Immediate Reference_Lex_1,0x19 008c 00c7 | | Action Elaborate_Subprogram 008d 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 008e 00c7 | | Action Elaborate_Subprogram 008f 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0090 00c7 | | Action Elaborate_Subprogram 0091 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0092 00c7 | | Action Elaborate_Subprogram 0093 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0094 00c7 | | Action Elaborate_Subprogram 0095 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0096 00c7 | | Action Elaborate_Subprogram 0097 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0098 00c7 | | Action Elaborate_Subprogram 0099 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 009a 00c7 | | Action Elaborate_Subprogram 009b 1d20 | | Execute_Immediate Reference_Lex_1,0x20 009c 00c7 | | Action Elaborate_Subprogram 009d 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 009e 00c7 | | Action Elaborate_Subprogram 009f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00a0 00c7 | | Action Elaborate_Subprogram 00a1 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00a2 00c7 | | Action Elaborate_Subprogram 00a3 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00a4 00c7 | | Action Elaborate_Subprogram 00a5 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00a6 00c7 | | Action Elaborate_Subprogram 00a7 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00a8 00c7 | | Action Elaborate_Subprogram 00a9 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 00aa 00c7 | | Action Elaborate_Subprogram 00ab 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00ac 00c7 | | Action Elaborate_Subprogram 00ad BODY_0008: 00ad 00bc | | Action Signal_Activated 00ae 00bb | | Action Signal_Completion 00af 0000 | | .XXX[0x1] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b7 | | .CONST 0x00b7 ; Address of begin 00b1 00ce | | .CONST 0x00ce ; Address of exception handler 00b2 0003 | | .CONST 0x0003 ; Number of locals 00b3 INIT_00b0: 00b3 e004 | | Load 0x0,0x4 00b4 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 00b5 e20d | | Load 0x1,0xd 00b6 0007 | | Action Break_Optional 00b7 BODY_00b0: 00b7 e5ff | | Load 0x2,-0x1 00b8 01db | | Execute Vector,Length 00b9 7002 |p | Jump_Nonzero 0xbc 00ba e20d | | Load 0x1,0xd 00bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00bc e5fe | | Load 0x2,-0x2 00bd e005 | | Load 0x0,0x5 00be 180f | | Execute Package,Field_Execute,Field_Number 0xf 00bf 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00c0 e5ff | | Load 0x2,-0x1 00c1 01db | | Execute Vector,Length 00c2 e22b | + | Load 0x1,0x2b 00c3 1c08 | | Execute_Immediate Run_Utility,0x8 00c4 e20d | | Load 0x1,0xd 00c5 00db | | Load_Top At_Offset_3 00c6 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 00c7 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00c8 e5ff | | Load 0x2,-0x1 00c9 00d9 | | Load_Top At_Offset_1 00ca 0217 | | Execute Heap_Access,All_Reference 00cb 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2 00cc 00d8 | | Load_Top At_Offset_0 00cd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00ce TRAP_00b0: 00ce e005 | | Load 0x0,0x5 00cf 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00d0 010f | | Execute Exception,Equal 00d1 6802 |h | Jump_Zero 0xd4 00d2 e212 | | Load 0x1,0x12 00d3 0257 | W | Execute Discrete,Raise 00d4 e005 | | Load 0x0,0x5 00d5 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00d6 010f | | Execute Exception,Equal 00d7 6802 |h | Jump_Zero 0xda 00d8 e211 | | Load 0x1,0x11 00d9 0257 | W | Execute Discrete,Raise 00da 0100 | | Execute Exception,Raise 00db 0000 0000 | | .BLANK 0000[0x5] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00eb | | .CONST 0x00eb ; Address of begin 00e1 0177 | w | .CONST 0x0177 ; Address of exception handler 00e2 0005 | | .CONST 0x0005 ; Number of locals 00e3 INIT_00e0: 00e3 e22d | - | Load 0x1,0x2d 00e4 0007 | | Action Break_Optional 00e5 00d8 | | Load_Top At_Offset_0 00e6 0007 | | Action Break_Optional 00e7 e20f | | Load 0x1,0xf 00e8 0007 | | Action Break_Optional 00e9 e004 | | Load 0x0,0x4 00ea 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 00eb BODY_00e0: 00eb e5ee | | Load 0x2,-0x12 00ec 01db | | Execute Vector,Length 00ed 7003 |p | Jump_Nonzero 0xf1 00ee e22d | - | Load 0x1,0x2d 00ef a402 | | Store_Unchecked 0x2,0x2 00f0 7809 |x | Jump 0xfa 00f1 e5ec | | Load 0x2,-0x14 00f2 e005 | | Load 0x0,0x5 00f3 180f | | Execute Package,Field_Execute,Field_Number 0xf 00f4 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00f5 e5ee | | Load 0x2,-0x12 00f6 e22d | - | Load 0x1,0x2d 00f7 00da | | Load_Top At_Offset_2 00f8 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 00f9 a402 | | Store_Unchecked 0x2,0x2 00fa e5ed | | Load 0x2,-0x13 00fb 01db | | Execute Vector,Length 00fc 7003 |p | Jump_Nonzero 0x100 00fd e22d | - | Load 0x1,0x2d 00fe 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00ff 7809 |x | Jump 0x109 0100 e5ec | | Load 0x2,-0x14 0101 e005 | | Load 0x0,0x5 0102 180f | | Execute Package,Field_Execute,Field_Number 0xf 0103 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0104 e5ed | | Load 0x2,-0x13 0105 e22d | - | Load 0x1,0x2d 0106 00da | | Load_Top At_Offset_2 0107 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0108 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0109 e20f | | Load 0x1,0xf 010a 00d9 | | Load_Top At_Offset_1 010b 039c | | Declare_Variable Heap_Access,By_Allocation 010c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 010d 00d8 | | Load_Top At_Offset_0 010e e5ff | | Load 0x2,-0x1 010f 8230 | 0 | Call 0x1,0x30 0110 00da | | Load_Top At_Offset_2 0111 0217 | | Execute Heap_Access,All_Reference 0112 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0113 00d8 | | Load_Top At_Offset_0 0114 e5fe | | Load 0x2,-0x2 0115 8230 | 0 | Call 0x1,0x30 0116 00da | | Load_Top At_Offset_2 0117 0217 | | Execute Heap_Access,All_Reference 0118 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0119 00d8 | | Load_Top At_Offset_0 011a e5fd | | Load 0x2,-0x3 011b 8230 | 0 | Call 0x1,0x30 011c 00da | | Load_Top At_Offset_2 011d 0217 | | Execute Heap_Access,All_Reference 011e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 011f 00d8 | | Load_Top At_Offset_0 0120 e5fc | | Load 0x2,-0x4 0121 8230 | 0 | Call 0x1,0x30 0122 00da | | Load_Top At_Offset_2 0123 0217 | | Execute Heap_Access,All_Reference 0124 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0125 00d8 | | Load_Top At_Offset_0 0126 e5fb | | Load 0x2,-0x5 0127 8230 | 0 | Call 0x1,0x30 0128 00da | | Load_Top At_Offset_2 0129 0217 | | Execute Heap_Access,All_Reference 012a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 012b 00d8 | | Load_Top At_Offset_0 012c e5fa | | Load 0x2,-0x6 012d 8230 | 0 | Call 0x1,0x30 012e 00da | | Load_Top At_Offset_2 012f 0217 | | Execute Heap_Access,All_Reference 0130 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0131 00d8 | | Load_Top At_Offset_0 0132 e5f9 | | Load 0x2,-0x7 0133 8230 | 0 | Call 0x1,0x30 0134 00da | | Load_Top At_Offset_2 0135 0217 | | Execute Heap_Access,All_Reference 0136 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0137 00d8 | | Load_Top At_Offset_0 0138 e5f8 | | Load 0x2,-0x8 0139 8230 | 0 | Call 0x1,0x30 013a 00da | | Load_Top At_Offset_2 013b 0217 | | Execute Heap_Access,All_Reference 013c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 013d 00d8 | | Load_Top At_Offset_0 013e e5f7 | | Load 0x2,-0x9 013f 8230 | 0 | Call 0x1,0x30 0140 00da | | Load_Top At_Offset_2 0141 0217 | | Execute Heap_Access,All_Reference 0142 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0143 e5f6 | | Load 0x2,-0xa 0144 00da | | Load_Top At_Offset_2 0145 0217 | | Execute Heap_Access,All_Reference 0146 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0147 00d8 | | Load_Top At_Offset_0 0148 e5f5 | | Load 0x2,-0xb 0149 8230 | 0 | Call 0x1,0x30 014a 00da | | Load_Top At_Offset_2 014b 0217 | | Execute Heap_Access,All_Reference 014c 380a |8 | Execute Record,Field_Write,Field_Number 0xa 014d e5f4 | | Load 0x2,-0xc 014e 00da | | Load_Top At_Offset_2 014f 0217 | | Execute Heap_Access,All_Reference 0150 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0151 e5f3 | | Load 0x2,-0xd 0152 00da | | Load_Top At_Offset_2 0153 0217 | | Execute Heap_Access,All_Reference 0154 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0155 00d8 | | Load_Top At_Offset_0 0156 e5f2 | | Load 0x2,-0xe 0157 8230 | 0 | Call 0x1,0x30 0158 00da | | Load_Top At_Offset_2 0159 0217 | | Execute Heap_Access,All_Reference 015a 380d |8 | Execute Record,Field_Write,Field_Number 0xd 015b 00d8 | | Load_Top At_Offset_0 015c e5f1 | | Load 0x2,-0xf 015d 8230 | 0 | Call 0x1,0x30 015e 00da | | Load_Top At_Offset_2 015f 0217 | | Execute Heap_Access,All_Reference 0160 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0161 00d8 | | Load_Top At_Offset_0 0162 e5f0 | | Load 0x2,-0x10 0163 8230 | 0 | Call 0x1,0x30 0164 00da | | Load_Top At_Offset_2 0165 0217 | | Execute Heap_Access,All_Reference 0166 380f |8 | Execute Record,Field_Write,Field_Number 0xf 0167 00d8 | | Load_Top At_Offset_0 0168 e5ef | | Load 0x2,-0x11 0169 8230 | 0 | Call 0x1,0x30 016a 00da | | Load_Top At_Offset_2 016b 0217 | | Execute Heap_Access,All_Reference 016c 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 016d 00db | | Load_Top At_Offset_3 016e 00da | | Load_Top At_Offset_2 016f 0217 | | Execute Heap_Access,All_Reference 0170 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0171 00da | | Load_Top At_Offset_2 0172 00da | | Load_Top At_Offset_2 0173 0217 | | Execute Heap_Access,All_Reference 0174 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0175 00d9 | | Load_Top At_Offset_1 0176 4414 |D | Exit_Subprogram With_Value,New_Top_Offset 0x14 0177 TRAP_00e0: 0177 e005 | | Load 0x0,0x5 0178 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0179 010f | | Execute Exception,Equal 017a 6802 |h | Jump_Zero 0x17d 017b e212 | | Load 0x1,0x12 017c 0257 | W | Execute Discrete,Raise 017d e005 | | Load 0x0,0x5 017e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 017f 010f | | Execute Exception,Equal 0180 6802 |h | Jump_Zero 0x183 0181 e211 | | Load 0x1,0x11 0182 0257 | W | Execute Discrete,Raise 0183 0100 | | Execute Exception,Raise 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00db | | Load_Top At_Offset_3 018c e006 | | Load 0x0,0x6 018d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 018e c5fe | | Store 0x2,-0x2 018f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0194 0000 0000 | | .BLANK 0000[0x4] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 019c 8231 | 1 | Call 0x1,0x31 019d 6802 |h | Jump_Zero 0x1a0 019e e213 | | Load 0x1,0x13 019f 0257 | W | Execute Discrete,Raise 01a0 00da | | Load_Top At_Offset_2 01a1 0217 | | Execute Heap_Access,All_Reference 01a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01a3 0217 | | Execute Heap_Access,All_Reference 01a4 0335 | 5 | Declare_Variable Array,Duplicate 01a5 00cd | | Action Spare6_Action 01a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a7 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 01ac 8231 | 1 | Call 0x1,0x31 01ad 6802 |h | Jump_Zero 0x1b0 01ae e213 | | Load 0x1,0x13 01af 0257 | W | Execute Discrete,Raise 01b0 00da | | Load_Top At_Offset_2 01b1 0217 | | Execute Heap_Access,All_Reference 01b2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01b3 0217 | | Execute Heap_Access,All_Reference 01b4 0335 | 5 | Declare_Variable Array,Duplicate 01b5 00cd | | Action Spare6_Action 01b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b7 0000 | | .XXX[0x1] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 00da | | Load_Top At_Offset_2 01bc 8231 | 1 | Call 0x1,0x31 01bd 6802 |h | Jump_Zero 0x1c0 01be e213 | | Load 0x1,0x13 01bf 0257 | W | Execute Discrete,Raise 01c0 00da | | Load_Top At_Offset_2 01c1 0217 | | Execute Heap_Access,All_Reference 01c2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 01c3 0217 | | Execute Heap_Access,All_Reference 01c4 0335 | 5 | Declare_Variable Array,Duplicate 01c5 00cd | | Action Spare6_Action 01c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00da | | Load_Top At_Offset_2 01cc 8231 | 1 | Call 0x1,0x31 01cd 6802 |h | Jump_Zero 0x1d0 01ce e213 | | Load 0x1,0x13 01cf 0257 | W | Execute Discrete,Raise 01d0 00da | | Load_Top At_Offset_2 01d1 0217 | | Execute Heap_Access,All_Reference 01d2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01d3 0217 | | Execute Heap_Access,All_Reference 01d4 0335 | 5 | Declare_Variable Array,Duplicate 01d5 00cd | | Action Spare6_Action 01d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc 8231 | 1 | Call 0x1,0x31 01dd 6802 |h | Jump_Zero 0x1e0 01de e213 | | Load 0x1,0x13 01df 0257 | W | Execute Discrete,Raise 01e0 00da | | Load_Top At_Offset_2 01e1 0217 | | Execute Heap_Access,All_Reference 01e2 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 01e3 0217 | | Execute Heap_Access,All_Reference 01e4 0335 | 5 | Declare_Variable Array,Duplicate 01e5 00cd | | Action Spare6_Action 01e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e7 0000 | | .XXX[0x1] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 01ec 8231 | 1 | Call 0x1,0x31 01ed 6802 |h | Jump_Zero 0x1f0 01ee e213 | | Load 0x1,0x13 01ef 0257 | W | Execute Discrete,Raise 01f0 00da | | Load_Top At_Offset_2 01f1 0217 | | Execute Heap_Access,All_Reference 01f2 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 01f3 7002 |p | Jump_Nonzero 0x1f6 01f4 4800 |H | Short_Literal 0x0 01f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f6 00da | | Load_Top At_Offset_2 01f7 0217 | | Execute Heap_Access,All_Reference 01f8 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 01f9 0217 | | Execute Heap_Access,All_Reference 01fa 01db | | Execute Vector,Length 01fb 00d8 | | Load_Top At_Offset_0 01fc 00e2 | | Load_Encached Integer_Cache 01fd 0260 | ` | Execute Discrete,In_Type 01fe 7001 |p | Jump_Nonzero 0x200 01ff 0801 | | Execute_Immediate Raise,0x1 0200 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0201 0000 0000 | | .BLANK 0000[0x7] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00da | | Load_Top At_Offset_2 020c 8231 | 1 | Call 0x1,0x31 020d 6802 |h | Jump_Zero 0x210 020e e213 | | Load 0x1,0x13 020f 0257 | W | Execute Discrete,Raise 0210 00da | | Load_Top At_Offset_2 0211 0217 | | Execute Heap_Access,All_Reference 0212 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0213 0217 | | Execute Heap_Access,All_Reference 0214 0335 | 5 | Declare_Variable Array,Duplicate 0215 00cd | | Action Spare6_Action 0216 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0217 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 021c 8231 | 1 | Call 0x1,0x31 021d 6802 |h | Jump_Zero 0x220 021e e213 | | Load 0x1,0x13 021f 0257 | W | Execute Discrete,Raise 0220 00da | | Load_Top At_Offset_2 0221 0217 | | Execute Heap_Access,All_Reference 0222 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0223 7002 |p | Jump_Nonzero 0x226 0224 4800 |H | Short_Literal 0x0 0225 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0226 00da | | Load_Top At_Offset_2 0227 0217 | | Execute Heap_Access,All_Reference 0228 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0229 0217 | | Execute Heap_Access,All_Reference 022a 01db | | Execute Vector,Length 022b 00d8 | | Load_Top At_Offset_0 022c 00e2 | | Load_Encached Integer_Cache 022d 0260 | ` | Execute Discrete,In_Type 022e 7001 |p | Jump_Nonzero 0x230 022f 0801 | | Execute_Immediate Raise,0x1 0230 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0231 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 023c 8231 | 1 | Call 0x1,0x31 023d 6802 |h | Jump_Zero 0x240 023e e213 | | Load 0x1,0x13 023f 0257 | W | Execute Discrete,Raise 0240 00da | | Load_Top At_Offset_2 0241 0217 | | Execute Heap_Access,All_Reference 0242 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0243 0217 | | Execute Heap_Access,All_Reference 0244 0335 | 5 | Declare_Variable Array,Duplicate 0245 00cd | | Action Spare6_Action 0246 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0247 0000 | | .XXX[0x1] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 00da | | Load_Top At_Offset_2 024c 8231 | 1 | Call 0x1,0x31 024d 6802 |h | Jump_Zero 0x250 024e e213 | | Load 0x1,0x13 024f 0257 | W | Execute Discrete,Raise 0250 00da | | Load_Top At_Offset_2 0251 0217 | | Execute Heap_Access,All_Reference 0252 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0253 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0254 0000 0000 | | .BLANK 0000[0x4] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 00da | | Load_Top At_Offset_2 025c 8231 | 1 | Call 0x1,0x31 025d 6802 |h | Jump_Zero 0x260 025e e213 | | Load 0x1,0x13 025f 0257 | W | Execute Discrete,Raise 0260 00da | | Load_Top At_Offset_2 0261 0217 | | Execute Heap_Access,All_Reference 0262 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0263 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0264 0000 0000 | | .BLANK 0000[0x4] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 00da | | Load_Top At_Offset_2 026c 8231 | 1 | Call 0x1,0x31 026d 6802 |h | Jump_Zero 0x270 026e e213 | | Load 0x1,0x13 026f 0257 | W | Execute Discrete,Raise 0270 00da | | Load_Top At_Offset_2 0271 0217 | | Execute Heap_Access,All_Reference 0272 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0273 0217 | | Execute Heap_Access,All_Reference 0274 0335 | 5 | Declare_Variable Array,Duplicate 0275 00cd | | Action Spare6_Action 0276 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0277 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 027c 8231 | 1 | Call 0x1,0x31 027d 6802 |h | Jump_Zero 0x280 027e e213 | | Load 0x1,0x13 027f 0257 | W | Execute Discrete,Raise 0280 00da | | Load_Top At_Offset_2 0281 0217 | | Execute Heap_Access,All_Reference 0282 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0283 0217 | | Execute Heap_Access,All_Reference 0284 01db | | Execute Vector,Length 0285 0e00 | | Execute_Immediate Not_Equal,0x0 0286 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0287 0000 | | .XXX[0x1] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b 00da | | Load_Top At_Offset_2 028c 8231 | 1 | Call 0x1,0x31 028d 6802 |h | Jump_Zero 0x290 028e e213 | | Load 0x1,0x13 028f 0257 | W | Execute Discrete,Raise 0290 00da | | Load_Top At_Offset_2 0291 0217 | | Execute Heap_Access,All_Reference 0292 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0293 0217 | | Execute Heap_Access,All_Reference 0294 0335 | 5 | Declare_Variable Array,Duplicate 0295 00cd | | Action Spare6_Action 0296 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0297 0000 | | .XXX[0x1] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c 8231 | 1 | Call 0x1,0x31 029d 6802 |h | Jump_Zero 0x2a0 029e e213 | | Load 0x1,0x13 029f 0257 | W | Execute Discrete,Raise 02a0 00da | | Load_Top At_Offset_2 02a1 0217 | | Execute Heap_Access,All_Reference 02a2 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a4 0000 0000 | | .BLANK 0000[0x4] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 00da | | Load_Top At_Offset_2 02ac 8231 | 1 | Call 0x1,0x31 02ad 6802 |h | Jump_Zero 0x2b0 02ae e213 | | Load 0x1,0x13 02af 0257 | W | Execute Discrete,Raise 02b0 00da | | Load_Top At_Offset_2 02b1 0217 | | Execute Heap_Access,All_Reference 02b2 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 02b3 0217 | | Execute Heap_Access,All_Reference 02b4 0335 | 5 | Declare_Variable Array,Duplicate 02b5 00cd | | Action Spare6_Action 02b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b7 0000 | | .XXX[0x1] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 02bc 8231 | 1 | Call 0x1,0x31 02bd 6802 |h | Jump_Zero 0x2c0 02be e213 | | Load 0x1,0x13 02bf 0257 | W | Execute Discrete,Raise 02c0 00da | | Load_Top At_Offset_2 02c1 0217 | | Execute Heap_Access,All_Reference 02c2 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 02c3 0217 | | Execute Heap_Access,All_Reference 02c4 0335 | 5 | Declare_Variable Array,Duplicate 02c5 00cd | | Action Spare6_Action 02c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c7 0000 | | .XXX[0x1] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 00da | | Load_Top At_Offset_2 02cc 0217 | | Execute Heap_Access,All_Reference 02cd 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 02ce 0335 | 5 | Declare_Variable Array,Duplicate 02cf 00cd | | Action Spare6_Action 02d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d1 0000 0000 | | .BLANK 0000[0x7] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02dd | | .CONST 0x02dd ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0002 | | .CONST 0x0002 ; Number of locals 02db INIT_02d8: 02db e22a | * | Load 0x1,0x2a 02dc 0007 | | Action Break_Optional 02dd BODY_02d8: 02dd 00db | | Load_Top At_Offset_3 02de e22a | * | Load 0x1,0x2a 02df e5fe | | Load 0x2,-0x2 02e0 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 02e1 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02e2 00d8 | | Load_Top At_Offset_0 02e3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02e4 0000 0000 | | .BLANK 0000[0x4] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb 00da | | Load_Top At_Offset_2 02ec 021d | | Execute Heap_Access,Is_Null 02ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ee 0000 0000 | | .XXX[0x2] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 4608 |F | Jump_Case 0x9 02f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02f5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 02f6 7819 |x | Jump 0x310 ; case 0x2 02f7 7818 |x | Jump 0x310 ; case 0x3 02f8 7817 |x | Jump 0x310 ; case 0x4 02f9 7816 |x | Jump 0x310 ; case 0x5 02fa 7815 |x | Jump 0x310 ; case 0x6 02fb 7801 |x | Jump 0x2fd ; case 0x7 02fc 7809 |x | Jump 0x306 ; case 0x8 02fd 00db | | Load_Top At_Offset_3 02fe 4801 |H | Short_Literal 0x1 02ff e5fe | | Load 0x2,-0x2 0300 00e9 | | Load_Encached String_Cache 0301 035b | [ | Declare_Type Array,Constrained 0302 4801 |H | Short_Literal 0x1 0303 e5ff | | Load 0x2,-0x1 0304 031b | | Declare_Type Variant_Record,Constrained 0305 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0306 00db | | Load_Top At_Offset_3 0307 00db | | Load_Top At_Offset_3 0308 02fc | | Declare_Variable Variant_Record,With_Constraint 0309 4801 |H | Short_Literal 0x1 030a e5fe | | Load 0x2,-0x2 030b 00e9 | | Load_Encached String_Cache 030c 0334 | 4 | Declare_Variable Array,With_Constraint 030d 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2 030e 016a | j | QQ_execute Variant_Record,XXX 030f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0310 0869 | i | Execute_Immediate Raise,0x69 0311 0000 0000 | | .BLANK 0000[0x7] 0318 ; -------------------------------------------------------------------------------------- 0318 ; Debug Table 0318 ; -------------------------------------------------------------------------------------- 0318 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e73,0x0000,0x0001,0x0000 031e 0000 0000 | | .BLANK 0000[0xe2]