|
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: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01b8 | | .CONST 0x01b8 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00fc | | .CONST 0x00fc ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0022 | " | .CONST 0x0022 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00e3 | | Load_Encached Natural_Cache 0021 00e3 | | Load_Encached Natural_Cache 0022 00e3 | | Load_Encached Natural_Cache 0023 00e3 | | Load_Encached Natural_Cache 0024 00e3 | | Load_Encached Natural_Cache 0025 4800 |H | Short_Literal 0x0 0026 4805 |H | Short_Literal 0x5 0027 4805 |H | Short_Literal 0x5 0028 480a |H | Short_Literal 0xa 0029 0319 | | Declare_Type Variant_Record,Incomplete,Visible 002a 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 002c 00d9 | | Load_Top At_Offset_1 002d 012a | * | Execute Any,Change_Utility 002e c21e | | Store 0x1,0x1e 002f 00c4 | | Action Make_Default 0030 00d1 | | Pop_Control Pop_Count_1 0031 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 0033 c220 | | Store 0x1,0x20 0034 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0036 c210 | | Store 0x1,0x10 0037 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 0039 c221 | ! | Store 0x1,0x21 003a 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 003c c212 | | Store 0x1,0x12 003d 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 003f c213 | | Store 0x1,0x13 0040 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0042 c218 | | Store 0x1,0x18 0043 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 0045 c215 | | Store 0x1,0x15 0046 00e9 | | Load_Encached String_Cache 0047 00e9 | | Load_Encached String_Cache 0048 00e9 | | Load_Encached String_Cache 0049 00e9 | | Load_Encached String_Cache 004a 00e9 | | Load_Encached String_Cache 004b 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 004d 4800 |H | Short_Literal 0x0 004e 4805 |H | Short_Literal 0x5 004f 4800 |H | Short_Literal 0x0 0050 e21e | | Load 0x1,0x1e 0051 0307 | | Complete_Type Variant_Record,By_Defining 0052 4800 |H | Short_Literal 0x0 0053 4800 |H | Short_Literal 0x0 0054 4800 |H | Short_Literal 0x0 0055 4800 |H | Short_Literal 0x0 0056 4800 |H | Short_Literal 0x0 0057 e21e | | Load 0x1,0x1e 0058 1c08 | | Execute_Immediate Run_Utility,0x8 0059 0129 | ) | Execute Any,Make_Visible 005a 4800 |H | Short_Literal 0x0 005b 4800 |H | Short_Literal 0x0 005c 4800 |H | Short_Literal 0x0 005d 4800 |H | Short_Literal 0x0 005e 4800 |H | Short_Literal 0x0 005f e21e | | Load 0x1,0x1e 0060 1c08 | | Execute_Immediate Run_Utility,0x8 0061 00d8 | | Load_Top At_Offset_0 0062 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 0063 01dd | | Execute Vector,First 0064 00e2 | | Load_Encached Integer_Cache 0065 00d9 | | Load_Top At_Offset_1 0066 0267 | g | Execute Discrete,Predecessor 0067 00e9 | | Load_Encached String_Cache 0068 035b | [ | Declare_Type Array,Constrained 0069 0337 | 7 | Declare_Variable Array 006a 00d9 | | Load_Top At_Offset_1 006b 00d8 | | Load_Top At_Offset_0 006c 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 006d 00da | | Load_Top At_Offset_2 006e 01da | | Execute Vector,Bounds 006f 00da | | Load_Top At_Offset_2 0070 01da | | Execute Vector,Bounds 0071 00da | | Load_Top At_Offset_2 0072 027f | | Execute Discrete,Equal 0073 7001 |p | Jump_Nonzero 0x75 0074 08e0 | | Execute_Immediate Raise,0xe0 0075 00cd | | Action Spare6_Action 0076 027f | | Execute Discrete,Equal 0077 7001 |p | Jump_Nonzero 0x79 0078 08e0 | | Execute_Immediate Raise,0xe0 0079 00d2 | | Pop_Control Pop_Count_2 007a 00d9 | | Load_Top At_Offset_1 007b 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6 007c 00d8 | | Load_Top At_Offset_0 007d 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 007e 01dd | | Execute Vector,First 007f 00e2 | | Load_Encached Integer_Cache 0080 00d9 | | Load_Top At_Offset_1 0081 0267 | g | Execute Discrete,Predecessor 0082 00e9 | | Load_Encached String_Cache 0083 035b | [ | Declare_Type Array,Constrained 0084 0337 | 7 | Declare_Variable Array 0085 00d9 | | Load_Top At_Offset_1 0086 00d8 | | Load_Top At_Offset_0 0087 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 0088 00da | | Load_Top At_Offset_2 0089 01da | | Execute Vector,Bounds 008a 00da | | Load_Top At_Offset_2 008b 01da | | Execute Vector,Bounds 008c 00da | | Load_Top At_Offset_2 008d 027f | | Execute Discrete,Equal 008e 7001 |p | Jump_Nonzero 0x90 008f 08e0 | | Execute_Immediate Raise,0xe0 0090 00cd | | Action Spare6_Action 0091 027f | | Execute Discrete,Equal 0092 7001 |p | Jump_Nonzero 0x94 0093 08e0 | | Execute_Immediate Raise,0xe0 0094 00d2 | | Pop_Control Pop_Count_2 0095 00d9 | | Load_Top At_Offset_1 0096 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 0097 00d8 | | Load_Top At_Offset_0 0098 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8 0099 01dd | | Execute Vector,First 009a 00e2 | | Load_Encached Integer_Cache 009b 00d9 | | Load_Top At_Offset_1 009c 0267 | g | Execute Discrete,Predecessor 009d 00e9 | | Load_Encached String_Cache 009e 035b | [ | Declare_Type Array,Constrained 009f 0337 | 7 | Declare_Variable Array 00a0 00d9 | | Load_Top At_Offset_1 00a1 00d8 | | Load_Top At_Offset_0 00a2 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8 00a3 00da | | Load_Top At_Offset_2 00a4 01da | | Execute Vector,Bounds 00a5 00da | | Load_Top At_Offset_2 00a6 01da | | Execute Vector,Bounds 00a7 00da | | Load_Top At_Offset_2 00a8 027f | | Execute Discrete,Equal 00a9 7001 |p | Jump_Nonzero 0xab 00aa 08e0 | | Execute_Immediate Raise,0xe0 00ab 00cd | | Action Spare6_Action 00ac 027f | | Execute Discrete,Equal 00ad 7001 |p | Jump_Nonzero 0xaf 00ae 08e0 | | Execute_Immediate Raise,0xe0 00af 00d2 | | Pop_Control Pop_Count_2 00b0 00d9 | | Load_Top At_Offset_1 00b1 2908 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x8 00b2 00d8 | | Load_Top At_Offset_0 00b3 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 00b4 01dd | | Execute Vector,First 00b5 00e2 | | Load_Encached Integer_Cache 00b6 00d9 | | Load_Top At_Offset_1 00b7 0267 | g | Execute Discrete,Predecessor 00b8 00e9 | | Load_Encached String_Cache 00b9 035b | [ | Declare_Type Array,Constrained 00ba 0337 | 7 | Declare_Variable Array 00bb 00d9 | | Load_Top At_Offset_1 00bc 00d8 | | Load_Top At_Offset_0 00bd 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 00be 00da | | Load_Top At_Offset_2 00bf 01da | | Execute Vector,Bounds 00c0 00da | | Load_Top At_Offset_2 00c1 01da | | Execute Vector,Bounds 00c2 00da | | Load_Top At_Offset_2 00c3 027f | | Execute Discrete,Equal 00c4 7001 |p | Jump_Nonzero 0xc6 00c5 08e0 | | Execute_Immediate Raise,0xe0 00c6 00cd | | Action Spare6_Action 00c7 027f | | Execute Discrete,Equal 00c8 7001 |p | Jump_Nonzero 0xca 00c9 08e0 | | Execute_Immediate Raise,0xe0 00ca 00d2 | | Pop_Control Pop_Count_2 00cb 00d9 | | Load_Top At_Offset_1 00cc 2909 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9 00cd 00d8 | | Load_Top At_Offset_0 00ce 250a |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0xa 00cf 01dd | | Execute Vector,First 00d0 00e2 | | Load_Encached Integer_Cache 00d1 00d9 | | Load_Top At_Offset_1 00d2 0267 | g | Execute Discrete,Predecessor 00d3 00e9 | | Load_Encached String_Cache 00d4 035b | [ | Declare_Type Array,Constrained 00d5 0337 | 7 | Declare_Variable Array 00d6 00d9 | | Load_Top At_Offset_1 00d7 00d8 | | Load_Top At_Offset_0 00d8 250a |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0xa 00d9 00da | | Load_Top At_Offset_2 00da 01da | | Execute Vector,Bounds 00db 00da | | Load_Top At_Offset_2 00dc 01da | | Execute Vector,Bounds 00dd 00da | | Load_Top At_Offset_2 00de 027f | | Execute Discrete,Equal 00df 7001 |p | Jump_Nonzero 0xe1 00e0 08e0 | | Execute_Immediate Raise,0xe0 00e1 00cd | | Action Spare6_Action 00e2 027f | | Execute Discrete,Equal 00e3 7001 |p | Jump_Nonzero 0xe5 00e4 08e0 | | Execute_Immediate Raise,0xe0 00e5 00d2 | | Pop_Control Pop_Count_2 00e6 00d9 | | Load_Top At_Offset_1 00e7 290a |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0xa 00e8 00d9 | | Load_Top At_Offset_1 00e9 016d | m | Execute Variant_Record,Structure_Write 00ea c20e | | Store 0x1,0xe 00eb 00bf | | Action Accept_Activation 00ec 029d 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call 00ee 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00ef 00c7 | | Action Elaborate_Subprogram 00f0 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00f1 00c7 | | Action Elaborate_Subprogram 00f2 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00f3 00c7 | | Action Elaborate_Subprogram 00f4 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00f5 00c7 | | Action Elaborate_Subprogram 00f6 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00f7 00c7 | | Action Elaborate_Subprogram 00f8 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00f9 00c7 | | Action Elaborate_Subprogram 00fa 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00fb 00c7 | | Action Elaborate_Subprogram 00fc BODY_0008: 00fc 00bc | | Action Signal_Activated 00fd 00bb | | Action Signal_Completion 00fe 0000 0000 | | .XXX[0x2] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 010f | | .CONST 0x010f ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 00da | | Load_Top At_Offset_2 0104 01db | | Execute Vector,Length 0105 e5fe | | Load 0x2,-0x2 0106 01db | | Execute Vector,Length 0107 e5fd | | Load 0x2,-0x3 0108 01db | | Execute Vector,Length 0109 e5fc | | Load 0x2,-0x4 010a 01db | | Execute Vector,Length 010b e5fb | | Load 0x2,-0x5 010c 01db | | Execute Vector,Length 010d e21e | | Load 0x1,0x1e 010e 1c08 | | Execute_Immediate Run_Utility,0x8 010f BODY_0100: 010f 00db | | Load_Top At_Offset_3 0110 00d9 | | Load_Top At_Offset_1 0111 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6 0112 e5fe | | Load 0x2,-0x2 0113 00d9 | | Load_Top At_Offset_1 0114 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 0115 e5fd | | Load 0x2,-0x3 0116 00d9 | | Load_Top At_Offset_1 0117 2908 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x8 0118 e5fc | | Load 0x2,-0x4 0119 00d9 | | Load_Top At_Offset_1 011a 2909 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9 011b e5fb | | Load 0x2,-0x5 011c 00d9 | | Load_Top At_Offset_1 011d 290a |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0xa 011e 00d8 | | Load_Top At_Offset_0 011f 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00da | | Load_Top At_Offset_2 0124 250a |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0xa 0125 00db | | Load_Top At_Offset_3 0126 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 0127 e5ff | | Load 0x2,-0x1 0128 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8 0129 e5ff | | Load 0x2,-0x1 012a 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 012b e5ff | | Load 0x2,-0x1 012c 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 012d 8222 | " | Call 0x1,0x22 012e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 012f 0000 | | .XXX[0x1] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 00da | | Load_Top At_Offset_2 0134 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 0135 0335 | 5 | Declare_Variable Array,Duplicate 0136 00cd | | Action Spare6_Action 0137 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 013c 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 013d 0335 | 5 | Declare_Variable Array,Duplicate 013e 00cd | | Action Spare6_Action 013f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 00da | | Load_Top At_Offset_2 0144 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8 0145 0335 | 5 | Declare_Variable Array,Duplicate 0146 00cd | | Action Spare6_Action 0147 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 00da | | Load_Top At_Offset_2 014c 2509 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x9 014d 0335 | 5 | Declare_Variable Array,Duplicate 014e 00cd | | Action Spare6_Action 014f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 00da | | Load_Top At_Offset_2 0154 250a |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0xa 0155 0335 | 5 | Declare_Variable Array,Duplicate 0156 00cd | | Action Spare6_Action 0157 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 00da | | Load_Top At_Offset_2 015c e5fe | | Load 0x2,-0x2 015d 01cc | | Execute Vector,Catenate 015e e5fc | | Load 0x2,-0x4 015f 01cc | | Execute Vector,Catenate 0160 e5fb | | Load 0x2,-0x5 0161 01cc | | Execute Vector,Catenate 0162 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0163 0000 0000 | | .BLANK 0000[0x5] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b BODY_0168: 016b INIT_0168: 016b INIT_0168: 016b 4608 |F | Jump_Case 0x9 016c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 016d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 016e 7845 |xE | Jump 0x1b4 ; case 0x2 016f 7844 |xD | Jump 0x1b4 ; case 0x3 0170 7843 |xC | Jump 0x1b4 ; case 0x4 0171 7842 |xB | Jump 0x1b4 ; case 0x5 0172 7841 |xA | Jump 0x1b4 ; case 0x6 0173 7801 |x | Jump 0x175 ; case 0x7 0174 781d |x | Jump 0x192 ; case 0x8 0175 e5fa | | Load 0x2,-0x6 0176 e5fb | | Load 0x2,-0x5 0177 e5fc | | Load 0x2,-0x4 0178 e5fd | | Load 0x2,-0x3 0179 e5fe | | Load 0x2,-0x2 017a 4801 |H | Short_Literal 0x1 017b e5fa | | Load 0x2,-0x6 017c 00e9 | | Load_Encached String_Cache 017d 035b | [ | Declare_Type Array,Constrained 017e 4801 |H | Short_Literal 0x1 017f e5fb | | Load 0x2,-0x5 0180 00e9 | | Load_Encached String_Cache 0181 035b | [ | Declare_Type Array,Constrained 0182 4801 |H | Short_Literal 0x1 0183 e5fc | | Load 0x2,-0x4 0184 00e9 | | Load_Encached String_Cache 0185 035b | [ | Declare_Type Array,Constrained 0186 4801 |H | Short_Literal 0x1 0187 e5fd | | Load 0x2,-0x3 0188 00e9 | | Load_Encached String_Cache 0189 035b | [ | Declare_Type Array,Constrained 018a 4801 |H | Short_Literal 0x1 018b e5fe | | Load 0x2,-0x2 018c 00e9 | | Load_Encached String_Cache 018d 035b | [ | Declare_Type Array,Constrained 018e 4805 |H | Short_Literal 0x5 018f e5ff | | Load 0x2,-0x1 0190 031b | | Declare_Type Variant_Record,Constrained 0191 4206 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x6 0192 e5fa | | Load 0x2,-0x6 0193 e5fb | | Load 0x2,-0x5 0194 e5fc | | Load 0x2,-0x4 0195 e5fd | | Load 0x2,-0x3 0196 e5fe | | Load 0x2,-0x2 0197 e5ff | | Load 0x2,-0x1 0198 02fc | | Declare_Variable Variant_Record,With_Constraint 0199 4801 |H | Short_Literal 0x1 019a e5fa | | Load 0x2,-0x6 019b 00e9 | | Load_Encached String_Cache 019c 0334 | 4 | Declare_Variable Array,With_Constraint 019d 2d06 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6 019e 4801 |H | Short_Literal 0x1 019f e5fb | | Load 0x2,-0x5 01a0 00e9 | | Load_Encached String_Cache 01a1 0334 | 4 | Declare_Variable Array,With_Constraint 01a2 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7 01a3 4801 |H | Short_Literal 0x1 01a4 e5fc | | Load 0x2,-0x4 01a5 00e9 | | Load_Encached String_Cache 01a6 0334 | 4 | Declare_Variable Array,With_Constraint 01a7 2d08 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x8 01a8 4801 |H | Short_Literal 0x1 01a9 e5fd | | Load 0x2,-0x3 01aa 00e9 | | Load_Encached String_Cache 01ab 0334 | 4 | Declare_Variable Array,With_Constraint 01ac 2d09 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x9 01ad 4801 |H | Short_Literal 0x1 01ae e5fe | | Load 0x2,-0x2 01af 00e9 | | Load_Encached String_Cache 01b0 0334 | 4 | Declare_Variable Array,With_Constraint 01b1 2d0a |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0xa 01b2 016a | j | QQ_execute Variant_Record,XXX 01b3 4206 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x6 01b4 0869 | i | Execute_Immediate Raise,0x69 01b5 0000 0000 | | .XXX[0x3] 01b7 0000 | | 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; Debug Table 01b8 ; -------------------------------------------------------------------------------------- 01b8 0004 000e | | .DEBUG4 0x0004,0x000e,0xf455,0x0000,0x0001,0x0000 01be 3400 3a48 |4 :H| .XXX[0x32] 01c0 00e0 00ea | | 01c2 8003 c003 | | 01c4 af80 1000 | | 01c6 0ed4 0044 | D| 01c8 0050 5801 | PX | 01ca 2001 4300 | C | 01cc 04c0 0515 | | 01ce 8014 0014 | | 01d0 7600 0208 |v | 01d2 a0ce 0000 | | 01d4 0060 0000 | ` | 01d6 0400 0000 | | 01d8 0000 001e | | 01da 3f80 0000 |? | 01dc 1000 0000 | | 01de 3000 0000 |0 | 01e0 0040 0000 | @ | 01e2 0413 17d1 | | 01e4 5510 5411 |U T | 01e6 57d0 d3d5 |W | 01e8 5490 5395 |T S | 01ea 1165 a600 | e | 01ec 0000 0000 | | 01ee fe94 004c | L| 01f0 0000 0000 | | .BLANK 0000[0x4] 01f4 0020 8a0c | | .XXX[0xc] 01f6 e000 0006 | | 01f8 0000 0034 | 4| 01fa 0000 0000 | | 01fc 0001 faa8 | | 01fe 0000 0100 | |