|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0900ea
└─⟦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 01d8 | | .CONST 0x01d8 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 003f | ? | .CONST 0x003f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0014 | | .CONST 0x0014 ; Number of locals 000b INIT_0008: 000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 000f 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 0011 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 0013 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated 0015 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 0017 00bf | | Action Accept_Activation 0018 e003 | | Load 0x0,0x3 0019 0265 | e | Execute Discrete,Reverse_Bounds 001a e003 | | Load 0x0,0x3 001b 1c04 | | Execute_Immediate Run_Utility,0x4 001c 00d0 | | Action Swap_Control 001d e003 | | Load 0x0,0x3 001e 1c04 | | Execute_Immediate Run_Utility,0x4 001f e004 | | Load 0x0,0x4 0020 02a0 | | Declare_Subprogram Null_Subprogram 0021 4801 |H | Short_Literal 0x1 0022 035d | ] | Declare_Type Array,Defined 0023 00d8 | | Load_Top At_Offset_0 0024 0337 | 7 | Declare_Variable Array 0025 00d8 | | Load_Top At_Offset_0 0026 0335 | 5 | Declare_Variable Array,Duplicate 0027 00cd | | Action Spare6_Action 0028 00d9 | | Load_Top At_Offset_1 0029 01d9 | | Execute Vector,Reverse_Bounds 002a 0263 | c | Execute Discrete,Above_Bound 002b 7005 |p | Jump_Nonzero 0x31 002c e004 | | Load 0x0,0x4 002d 00d9 | | Load_Top At_Offset_1 002e e215 | | Load 0x1,0x15 002f 01d6 | | Execute Vector,Field_Write 0030 3ffb |? | Loop_Increasing 0x2c 0031 00d9 | | Load_Top At_Offset_1 0032 01d4 | | Execute Vector,Structure_Write 0033 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0034 00c7 | | Action Elaborate_Subprogram 0035 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0036 00c7 | | Action Elaborate_Subprogram 0037 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0038 00c7 | | Action Elaborate_Subprogram 0039 1d11 | | Execute_Immediate Reference_Lex_1,0x11 003a 00c7 | | Action Elaborate_Subprogram 003b 1d12 | | Execute_Immediate Reference_Lex_1,0x12 003c 00c7 | | Action Elaborate_Subprogram 003d 1d0e | | Execute_Immediate Reference_Lex_1,0xe 003e 00c7 | | Action Elaborate_Subprogram 003f BODY_0008: 003f 00bc | | Action Signal_Activated 0040 00bb | | Action Signal_Completion 0041 0000 0000 | | .BLANK 0000[0x7] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 00cf | | Action Mark_Auxiliary 004c e003 | | Load 0x0,0x3 004d 0265 | e | Execute Discrete,Reverse_Bounds 004e 0263 | c | Execute Discrete,Above_Bound 004f 701a |p | Jump_Nonzero 0x6a 0050 00d8 | | Load_Top At_Offset_0 0051 e005 | | Load 0x0,0x5 0052 027e | ~ | Execute Discrete,Not_Equal 0053 680c |h | Jump_Zero 0x60 0054 e214 | | Load 0x1,0x14 0055 00d9 | | Load_Top At_Offset_1 0056 e003 | | Load 0x0,0x3 0057 1c04 | | Execute_Immediate Run_Utility,0x4 0058 00d8 | | Load_Top At_Offset_0 0059 00da | | Load_Top At_Offset_2 005a 01d7 | | Execute Vector,Field_Read 005b 8006 | | Call 0x0,0x6 005c 00d9 | | Load_Top At_Offset_1 005d 00db | | Load_Top At_Offset_3 005e 01d6 | | Execute Vector,Field_Write 005f 00d2 | | Pop_Control Pop_Count_2 0060 00c8 | | Action Pop_Auxiliary_Range 0061 00d9 | | Load_Top At_Offset_1 0062 00d9 | | Load_Top At_Offset_1 0063 027f | | Execute Discrete,Equal 0064 7004 |p | Jump_Nonzero 0x69 0065 e003 | | Load 0x0,0x3 0066 0122 | " | Execute Any,Make_Root_Type 0067 1c07 | | Execute_Immediate Run_Utility,0x7 0068 7fe7 | | Jump 0x50 0069 00d2 | | Pop_Control Pop_Count_2 006a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 006b 0000 0000 | | .BLANK 0000[0x5] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 00da | | Load_Top At_Offset_2 0074 00db | | Load_Top At_Offset_3 0075 8007 | | Call 0x0,0x7 0076 e003 | | Load 0x0,0x3 0077 1c04 | | Execute_Immediate Run_Utility,0x4 0078 e214 | | Load 0x1,0x14 0079 01d6 | | Execute Vector,Field_Write 007a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 007b 0000 0000 | | .BLANK 0000[0x5] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 00da | | Load_Top At_Offset_2 0084 e003 | | Load 0x0,0x3 0085 1c04 | | Execute_Immediate Run_Utility,0x4 0086 e214 | | Load 0x1,0x14 0087 01d7 | | Execute Vector,Field_Read 0088 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0089 0000 0000 | | .BLANK 0000[0x7] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 009e | | .CONST 0x009e ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0004 | | .CONST 0x0004 ; Number of locals 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 0094 01da | | Execute Vector,Bounds 0095 e008 | | Load 0x0,0x8 0096 035b | [ | Declare_Type Array,Constrained 0097 0337 | 7 | Declare_Variable Array 0098 00d8 | | Load_Top At_Offset_0 0099 1c00 | | Execute_Immediate Run_Utility,0x0 009a 029f 011b | | Declare_Subprogram INIT_0118,For_Call 009c 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 009e BODY_0090: 009e e5ff | | Load 0x2,-0x1 009f 01db | | Execute Vector,Length 00a0 680d |h | Jump_Zero 0xae 00a1 e5ff | | Load 0x2,-0x1 00a2 01dd | | Execute Vector,First 00a3 00d8 | | Load_Top At_Offset_0 00a4 00e4 | | Load_Encached Positive_Cache 00a5 0260 | ` | Execute Discrete,In_Type 00a6 7001 |p | Jump_Nonzero 0xa8 00a7 0801 | | Execute_Immediate Raise,0x1 00a8 8404 | | Call 0x2,0x4 00a9 6804 |h | Jump_Zero 0xae 00aa 00da | | Load_Top At_Offset_2 00ab e008 | | Load 0x0,0x8 00ac 01c6 | | Execute Vector,Convert_To_Formal 00ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ae 8009 | | Call 0x0,0x9 00af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00c3 | | .CONST 0x00c3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0004 | | .CONST 0x0004 ; Number of locals 00b3 INIT_00b0: 00b3 a00a | | Store_Unchecked 0x0,0xa 00b4 00c6 | | Action Check_Subprogram_Elaborated 00b5 4ffe |O | Short_Literal -0x2 00b6 4802 |H | Short_Literal 0x2 00b7 0099 | | Action Reference_Dynamic 00b8 0093 0000 | | push_full_address 0x0 00ba 6035 |`5 | Indirect_Literal Discrete,0xf0,{0x80000000, 0x00020000} 00bb 0273 | s | Execute Discrete,Plus 00bc e5ff | | Load 0x2,-0x1 00bd 602e |`. | Indirect_Literal Discrete,0xec,{0x00000000, 0x0000ffff} 00be 0279 | y | Execute Discrete,And 00bf 0273 | s | Execute Discrete,Plus 00c0 e00b | | Load 0x0,0xb 00c1 0273 | s | Execute Discrete,Plus 00c2 4804 |H | Short_Literal 0x4 00c3 BODY_00b0: 00c3 00cf | | Action Mark_Auxiliary 00c4 e214 | | Load 0x1,0x14 00c5 01da | | Execute Vector,Bounds 00c6 e003 | | Load 0x0,0x3 00c7 1c05 | | Execute_Immediate Run_Utility,0x5 00c8 00d0 | | Action Swap_Control 00c9 e003 | | Load 0x0,0x3 00ca 1c05 | | Execute_Immediate Run_Utility,0x5 00cb 0263 | c | Execute Discrete,Above_Bound 00cc 701b |p | Jump_Nonzero 0xe8 00cd 00d8 | | Load_Top At_Offset_0 00ce e005 | | Load 0x0,0x5 00cf 027e | ~ | Execute Discrete,Not_Equal 00d0 680d |h | Jump_Zero 0xde 00d1 e5fd | | Load 0x2,-0x3 00d2 00d9 | | Load_Top At_Offset_1 00d3 e003 | | Load 0x0,0x3 00d4 1c04 | | Execute_Immediate Run_Utility,0x4 00d5 e214 | | Load 0x1,0x14 00d6 01d7 | | Execute Vector,Field_Read 00d7 4802 |H | Short_Literal 0x2 00d8 4802 |H | Short_Literal 0x2 00d9 0099 | | Action Reference_Dynamic 00da 4803 |H | Short_Literal 0x3 00db 4802 |H | Short_Literal 0x2 00dc 0099 | | Action Reference_Dynamic 00dd 800a | | Call 0x0,0xa 00de 00c8 | | Action Pop_Auxiliary_Range 00df 00d9 | | Load_Top At_Offset_1 00e0 00d9 | | Load_Top At_Offset_1 00e1 027f | | Execute Discrete,Equal 00e2 7004 |p | Jump_Nonzero 0xe7 00e3 e003 | | Load 0x0,0x3 00e4 0122 | " | Execute Any,Make_Root_Type 00e5 1c07 | | Execute_Immediate Run_Utility,0x7 00e6 7fe6 | | Jump 0xcd 00e7 00d2 | | Pop_Control Pop_Count_2 00e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00e9 0000 0000 | | .XXX[0x3] 00eb 0000 | | 00ec 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00f0 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 010b | | .CONST 0x010b ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0004 | | .CONST 0x0004 ; Number of locals 00fb INIT_00f8: 00fb 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00fc 00c6 | | Action Check_Subprogram_Elaborated 00fd a00c | | Store_Unchecked 0x0,0xc 00fe 0093 0000 | | push_full_address 0x0 0100 6013 |` | Indirect_Literal Discrete,0x114,{0x80000000, 0x00010000} 0101 0273 | s | Execute Discrete,Plus 0102 e00d | | Load 0x0,0xd 0103 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0104 67e7 |g | Indirect_Literal Discrete,0xec,{0x00000000, 0x0000ffff} 0105 0279 | y | Execute Discrete,And 0106 0273 | s | Execute Discrete,Plus 0107 e00e | | Load 0x0,0xe 0108 0273 | s | Execute Discrete,Plus 0109 4804 |H | Short_Literal 0x4 010a 0007 | | Action Break_Optional 010b BODY_00f8: 010b e5ff | | Load 0x2,-0x1 010c 4802 |H | Short_Literal 0x2 010d 4802 |H | Short_Literal 0x2 010e 0099 | | Action Reference_Dynamic 010f 4803 |H | Short_Literal 0x3 0110 4802 |H | Short_Literal 0x2 0111 0099 | | Action Reference_Dynamic 0112 8211 | | Call 0x1,0x11 0113 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0114 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 00cf | | Action Mark_Auxiliary 011c e402 | | Load 0x2,0x2 011d 01dc | | Execute Vector,Last 011e e7ff | | Load 0x3,-0x1 011f 0263 | c | Execute Discrete,Above_Bound 0120 700a |p | Jump_Nonzero 0x12b 0121 00d8 | | Load_Top At_Offset_0 0122 e402 | | Load 0x2,0x2 0123 01d5 | | Execute Vector,Field_Reference 0124 e7fe | | Load 0x3,-0x2 0125 017f | | Execute Record,Equal 0126 6802 |h | Jump_Zero 0x129 0127 4801 |H | Short_Literal 0x1 0128 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0129 00c8 | | Action Pop_Auxiliary_Range 012a 3ff6 |? | Loop_Increasing 0x121 012b 00ce | | Action Pop_Auxiliary 012c 4800 |H | Short_Literal 0x0 012d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 012e 0000 0000 | | .XXX[0x2] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 013b | ; | .CONST 0x013b ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0004 | | .CONST 0x0004 ; Number of locals 0133 INIT_0130: 0133 e003 | | Load 0x0,0x3 0134 0007 | | Action Break_Optional 0135 e004 | | Load 0x0,0x4 0136 0007 | | Action Break_Optional 0137 e00f | | Load 0x0,0xf 0138 0322 | " | Declare_Variable Record 0139 00d8 | | Load_Top At_Offset_0 013a 1c00 | | Execute_Immediate Run_Utility,0x0 013b BODY_0130: 013b e7ff | | Load 0x3,-0x1 013c e5ff | | Load 0x2,-0x1 013d 01dc | | Execute Vector,Last 013e 027d | } | Execute Discrete,Greater 013f 6802 |h | Jump_Zero 0x142 0140 4801 |H | Short_Literal 0x1 0141 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0142 e7ff | | Load 0x3,-0x1 0143 e5ff | | Load 0x2,-0x1 0144 01d5 | | Execute Vector,Field_Reference 0145 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0146 4602 |F | Jump_Case 0x3 0147 781f |x | Jump 0x167 ; case 0x0 0148 7859 |xY | Jump 0x1a2 ; case 0x1 0149 7800 |x | Jump 0x14a ; case 0x2 014a e7ff | | Load 0x3,-0x1 014b e5ff | | Load 0x2,-0x1 014c 01d5 | | Execute Vector,Field_Reference 014d 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 014e e010 | | Load 0x0,0x10 014f 0119 | | Execute Any,Check_In_Formal_Type 0150 e7ff | | Load 0x3,-0x1 0151 e5ff | | Load 0x2,-0x1 0152 01d5 | | Execute Vector,Field_Reference 0153 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0154 e011 | | Load 0x0,0x11 0155 0119 | | Execute Any,Check_In_Formal_Type 0156 8012 | | Call 0x0,0x12 0157 6877 |hw | Jump_Zero 0x1cf 0158 e7ff | | Load 0x3,-0x1 0159 0a01 | | Execute_Immediate Plus,0x1 015a 00d8 | | Load_Top At_Offset_0 015b 00e4 | | Load_Encached Positive_Cache 015c 0260 | ` | Execute Discrete,In_Type 015d 7001 |p | Jump_Nonzero 0x15f 015e 0801 | | Execute_Immediate Raise,0x1 015f 8404 | | Call 0x2,0x4 0160 686e |hn | Jump_Zero 0x1cf 0161 e013 | | Load 0x0,0x13 0162 e7ff | | Load 0x3,-0x1 0163 e402 | | Load 0x2,0x2 0164 01d6 | | Execute Vector,Field_Write 0165 4801 |H | Short_Literal 0x1 0166 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0167 e7ff | | Load 0x3,-0x1 0168 e5ff | | Load 0x2,-0x1 0169 01d5 | | Execute Vector,Field_Reference 016a 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 016b 005b | [ | Store_Top Discrete,At_Offset_3 016c 00da | | Load_Top At_Offset_2 016d e003 | | Load 0x0,0x3 016e 1c04 | | Execute_Immediate Run_Utility,0x4 016f e214 | | Load 0x1,0x14 0170 01d7 | | Execute Vector,Field_Read 0171 003a | : | Store_Top Access,At_Offset_2 0172 00cf | | Action Mark_Auxiliary 0173 00da | | Load_Top At_Offset_2 0174 8014 | | Call 0x0,0x14 0175 4801 |H | Short_Literal 0x1 0176 0263 | c | Execute Discrete,Above_Bound 0177 7028 |p( | Jump_Nonzero 0x1a0 0178 e603 | | Load 0x3,0x3 0179 e7ff | | Load 0x3,-0x1 017a e5ff | | Load 0x2,-0x1 017b 01d5 | | Execute Vector,Field_Reference 017c 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4 017d 00da | | Load_Top At_Offset_2 017e 8015 | | Call 0x0,0x15 017f 681e |h | Jump_Zero 0x19e 0180 e7ff | | Load 0x3,-0x1 0181 0a01 | | Execute_Immediate Plus,0x1 0182 00d8 | | Load_Top At_Offset_0 0183 00e4 | | Load_Encached Positive_Cache 0184 0260 | ` | Execute Discrete,In_Type 0185 7001 |p | Jump_Nonzero 0x187 0186 0801 | | Execute_Immediate Raise,0x1 0187 8404 | | Call 0x2,0x4 0188 6815 |h | Jump_Zero 0x19e 0189 e603 | | Load 0x3,0x3 018a 00d9 | | Load_Top At_Offset_1 018b 8016 | | Call 0x0,0x16 018c e604 | | Load 0x3,0x4 018d 017d | } | Execute Record,Structure_Write 018e 00db | | Load_Top At_Offset_3 018f e7ff | | Load 0x3,-0x1 0190 0a01 | | Execute_Immediate Plus,0x1 0191 00d8 | | Load_Top At_Offset_0 0192 00e4 | | Load_Encached Positive_Cache 0193 0260 | ` | Execute Discrete,In_Type 0194 7001 |p | Jump_Nonzero 0x196 0195 0801 | | Execute_Immediate Raise,0x1 0196 8403 | | Call 0x2,0x3 0197 7006 |p | Jump_Nonzero 0x19e 0198 00db | | Load_Top At_Offset_3 0199 e7ff | | Load 0x3,-0x1 019a e402 | | Load 0x2,0x2 019b 01d6 | | Execute Vector,Field_Write 019c 4801 |H | Short_Literal 0x1 019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019e 00c8 | | Action Pop_Auxiliary_Range 019f 3fd8 |? | Loop_Increasing 0x178 01a0 00ce | | Action Pop_Auxiliary 01a1 782d |x- | Jump 0x1cf 01a2 e7ff | | Load 0x3,-0x1 01a3 e5ff | | Load 0x2,-0x1 01a4 01d5 | | Execute Vector,Field_Reference 01a5 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 01a6 005b | [ | Store_Top Discrete,At_Offset_3 01a7 00da | | Load_Top At_Offset_2 01a8 e003 | | Load 0x0,0x3 01a9 1c04 | | Execute_Immediate Run_Utility,0x4 01aa e214 | | Load 0x1,0x14 01ab 01d7 | | Execute Vector,Field_Read 01ac 003a | : | Store_Top Access,At_Offset_2 01ad 00cf | | Action Mark_Auxiliary 01ae 00da | | Load_Top At_Offset_2 01af 8014 | | Call 0x0,0x14 01b0 4801 |H | Short_Literal 0x1 01b1 0263 | c | Execute Discrete,Above_Bound 01b2 700c |p | Jump_Nonzero 0x1bf 01b3 e603 | | Load 0x3,0x3 01b4 e7ff | | Load 0x3,-0x1 01b5 e5ff | | Load 0x2,-0x1 01b6 01d5 | | Execute Vector,Field_Reference 01b7 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4 01b8 00da | | Load_Top At_Offset_2 01b9 8015 | | Call 0x0,0x15 01ba 6802 |h | Jump_Zero 0x1bd 01bb 4800 |H | Short_Literal 0x0 01bc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bd 00c8 | | Action Pop_Auxiliary_Range 01be 3ff4 |? | Loop_Increasing 0x1b3 01bf 00ce | | Action Pop_Auxiliary 01c0 e7ff | | Load 0x3,-0x1 01c1 0a01 | | Execute_Immediate Plus,0x1 01c2 00d8 | | Load_Top At_Offset_0 01c3 00e4 | | Load_Encached Positive_Cache 01c4 0260 | ` | Execute Discrete,In_Type 01c5 7001 |p | Jump_Nonzero 0x1c7 01c6 0801 | | Execute_Immediate Raise,0x1 01c7 8404 | | Call 0x2,0x4 01c8 6806 |h | Jump_Zero 0x1cf 01c9 e013 | | Load 0x0,0x13 01ca e7ff | | Load 0x3,-0x1 01cb e402 | | Load 0x2,0x2 01cc 01d6 | | Execute Vector,Field_Write 01cd 4801 |H | Short_Literal 0x1 01ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cf 4800 |H | Short_Literal 0x0 01d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d1 0000 0000 | | .BLANK 0000[0x7] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; Debug Table 01d8 ; -------------------------------------------------------------------------------------- 01d8 0004 0006 | | .DEBUG4 0x0004,0x0006,0x880a,0x0000,0x0001,0x000a 01de 000b 0206 | | .DBG4T 0x000b,0x0206,0x0000,0x0000 01e2 0018 020e | | .DBG4T 0x0018,0x020e,0x0000,0x0000 01e6 004b 0218 | K | .DBG4T 0x004b,0x0218,0x0001,0x0000 01ea 0073 021d | s | .DBG4T 0x0073,0x021d,0x0001,0x0000 01ee 0083 0220 | | .DBG4T 0x0083,0x0220,0x0002,0x0000 01f2 0093 0223 | #| .DBG4T 0x0093,0x0223,0x0002,0x0000 01f6 00b3 022b | +| .DBG4T 0x00b3,0x022b,0x2801,0x0002 01fa 00fb 0231 | 1| .DBG4T 0x00fb,0x0231,0x0001,0x0000 01fe 011b 0235 | 5| .DBG4T 0x011b,0x0235,0x0002,0x0000 0202 0133 023b | 3 ;| .DBG4T 0x0133,0x023b,0x0002,0x4000 0206 ; -------------------------------------------------------------------------------------- 0206 ; Debug chain 0206 ; -------------------------------------------------------------------------------------- 0206 0006 0000 | | .DBGLEN 0x0006,0x0000 0208 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015 020e ; -------------------------------------------------------------------------------------- 020e ; Debug chain 020e ; -------------------------------------------------------------------------------------- 020e 0008 0000 | | .DBGLEN 0x0008,0x0000 0210 0018 0023 | #| .DBGLNO 0x0018,0x0023,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d 0218 ; -------------------------------------------------------------------------------------- 0218 ; Debug chain 0218 ; -------------------------------------------------------------------------------------- 0218 0000 0003 | | .DBGLEN 0x0000,0x0003 021a 004c 0050 | L P| .DBGLNO 0x004c,0x0050,0x0054 021d ; -------------------------------------------------------------------------------------- 021d ; Debug chain 021d ; -------------------------------------------------------------------------------------- 021d 0000 0001 | | .DBGLEN 0x0000,0x0001 021f 0073 | s | .DBGLNO 0x0073 0220 ; -------------------------------------------------------------------------------------- 0220 ; Debug chain 0220 ; -------------------------------------------------------------------------------------- 0220 0000 0001 | | .DBGLEN 0x0000,0x0001 0222 0083 | | .DBGLNO 0x0083 0223 ; -------------------------------------------------------------------------------------- 0223 ; Debug chain 0223 ; -------------------------------------------------------------------------------------- 0223 0003 0003 | | .DBGLEN 0x0003,0x0003 0225 0093 009a | | .DBGLNO 0x0093,0x009a,0x009c,0x009e,0x00aa,0x00ae 022b ; -------------------------------------------------------------------------------------- 022b ; Debug chain 022b ; -------------------------------------------------------------------------------------- 022b 0001 0003 | | .DBGLEN 0x0001,0x0003 022d 00b3 00c4 | | .DBGLNO 0x00b3,0x00c4,0x00cd,0x00d1 0231 ; -------------------------------------------------------------------------------------- 0231 ; Debug chain 0231 ; -------------------------------------------------------------------------------------- 0231 0001 0001 | | .DBGLEN 0x0001,0x0001 0233 00fb 010b | | .DBGLNO 0x00fb,0x010b 0235 ; -------------------------------------------------------------------------------------- 0235 ; Debug chain 0235 ; -------------------------------------------------------------------------------------- 0235 0000 0004 | | .DBGLEN 0x0000,0x0004 0237 011c 0121 | !| .DBGLNO 0x011c,0x0121,0x0127,0x012c 023b ; -------------------------------------------------------------------------------------- 023b ; Debug chain 023b ; -------------------------------------------------------------------------------------- 023b 0003 0019 | | .DBGLEN 0x0003,0x0019 023d 0133 0135 | 3 5| .DBGLNO 0x0133,0x0135,0x0137,0x013b,0x0140,0x0142,0x014a,0x0158,0x0161,0x0165,0x0167,0x016c,0x0173,0x0178,0x0180,0x0189,0x018e,0x0198,0x019c,0x01a2,0x01a7,0x01ae,0x01b3,0x01bb,0x01c0,0x01c9,0x01cd,0x01cf 0259 0001 0002 | | .XXX[0x19] 025b 0003 0015 | | 025d 0016 0017 | | 025f 0018 0004 | | 0261 0005 0006 | | 0263 0007 0008 | | 0265 0009 000a | | 0267 000b 000c | | 0269 000d 000e | | 026b 000f 0010 | | 026d 0011 0012 | | 026f 0013 0014 | | 0271 0019 | | 0272 0000 0000 | | .BLANK 0000[0x18e]