|
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 - metrics - 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 For_Outer_Call,Visible,Unelaborated,INIT_0048
000d 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070
000f 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080
0011 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090
0013 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0
0015 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8
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_Subprogram 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_Subprogram 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_Result,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 For_Call,INIT_0118
009c 029f 0133 | 3| Declare_Subprogram For_Call,INIT_0130
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_Result,0x1
00ae 8009 | | Call 0x0,0x9
00af 4401 |D | Exit_Subprogram With_Result,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 | | Reference 0x0,0xa
00b4 00c6 | | Action Check_Subprogram_Elaborated
00b5 4ffe |O | Short_Literal 0x7fe
00b6 4802 |H | Short_Literal 0x2
00b7 0099 | | Action Reference_Dynamic
00b8 0093 0000 | | PushFullAddress InMicrocode
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_Subprogram 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 | | Reference 0x0,0xc
00fe 0093 0000 | | PushFullAddress InMicrocode
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_Subprogram 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_Result,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_Result,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_Result,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 0x2
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_Result,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_Result,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_Result,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_Result,0x1
01cf 4800 |H | Short_Literal 0x0
01d0 4401 |D | Exit_Subprogram With_Result,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]