|
|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7
└─⟦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 0390 | | .CONST 0x0390 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 007d | } | .CONST 0x007d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0028 | ( | .CONST 0x0028 ; Number of locals
000b INIT_0008:
000b 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080
000d 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
000f 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090
0011 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098
0013 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0
0015 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8
0017 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0
0019 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0
001b 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0
001d 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0
001f 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8
0021 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108
0023 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
0025 029a 0143 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0140
0027 029a 0173 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0170
0029 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180
002b 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198
002d 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
002f 0007 | | Action Break_Optional
0030 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0
0032 029a 01f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f0
0034 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
0036 029a 0243 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0240
0038 029a 027b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0278
003a 029a 02ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02a8
003c 029a 02e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02e0
003e 029a 0323 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0320
0040 029a 0373 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0370
0042 029a 0383 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0380
0044 00bf | | Action Accept_Activation
0045 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0046 00c7 | | Action Elaborate_Subprogram
0047 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0048 00c7 | | Action Elaborate_Subprogram
0049 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004a 00c7 | | Action Elaborate_Subprogram
004b 1d10 | | Execute_Immediate Reference_Lex_1,0x10
004c 00c7 | | Action Elaborate_Subprogram
004d 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004e 00c7 | | Action Elaborate_Subprogram
004f 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0050 00c7 | | Action Elaborate_Subprogram
0051 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0052 00c7 | | Action Elaborate_Subprogram
0053 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0054 00c7 | | Action Elaborate_Subprogram
0055 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0056 00c7 | | Action Elaborate_Subprogram
0057 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0058 00c7 | | Action Elaborate_Subprogram
0059 1d17 | | Execute_Immediate Reference_Lex_1,0x17
005a 00c7 | | Action Elaborate_Subprogram
005b 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005c 00c7 | | Action Elaborate_Subprogram
005d 1d19 | | Execute_Immediate Reference_Lex_1,0x19
005e 00c7 | | Action Elaborate_Subprogram
005f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0060 00c7 | | Action Elaborate_Subprogram
0061 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0062 00c7 | | Action Elaborate_Subprogram
0063 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0064 00c7 | | Action Elaborate_Subprogram
0065 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0066 00c7 | | Action Elaborate_Subprogram
0067 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0068 00c7 | | Action Elaborate_Subprogram
0069 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
006a 00c7 | | Action Elaborate_Subprogram
006b 1d20 | | Execute_Immediate Reference_Lex_1,0x20
006c 00c7 | | Action Elaborate_Subprogram
006d 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
006e 00c7 | | Action Elaborate_Subprogram
006f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0070 00c7 | | Action Elaborate_Subprogram
0071 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0072 00c7 | | Action Elaborate_Subprogram
0073 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0074 00c7 | | Action Elaborate_Subprogram
0075 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0076 00c7 | | Action Elaborate_Subprogram
0077 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0078 00c7 | | Action Elaborate_Subprogram
0079 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
007a 00c7 | | Action Elaborate_Subprogram
007b 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
007c 00c7 | | Action Elaborate_Subprogram
007d BODY_0008:
007d 00bc | | Action Signal_Activated
007e 00bb | | Action Signal_Completion
007f 0000 | | .XXX[0x1]
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 4800 |H | Short_Literal 0x0
0084 00db | | Load_Top At_Offset_3
0085 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0086 4501 |E | Exit_Subprogram 0x1
0087 0000 | | .XXX[0x1]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 4800 |H | Short_Literal 0x0
008c 00db | | Load_Top At_Offset_3
008d 0227 | ' | Execute Access,All_Reference
008e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
008f 4502 |E | Exit_Subprogram 0x2
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2
0094 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0095 4401 |D | Exit_Subprogram With_Result,0x1
0096 0000 0000 | | .XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 0227 | ' | Execute Access,All_Reference
009d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
009e 4401 |D | Exit_Subprogram With_Result,0x1
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2
00a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00a5 4401 |D | Exit_Subprogram With_Result,0x1
00a6 0000 0000 | | .XXX[0x2]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2
00ac 0227 | ' | Execute Access,All_Reference
00ad 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ae 4401 |D | Exit_Subprogram With_Result,0x1
00af 0000 | | .XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00da | | Load_Top At_Offset_2
00b4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00b5 00db | | Load_Top At_Offset_3
00b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00b7 0272 | r | Execute Discrete,Minus
00b8 00d8 | | Load_Top At_Offset_0
00b9 e002 | | Load 0x0,0x2
00ba 0260 | ` | Execute Discrete,In_Type
00bb 7001 |p | Jump_Nonzero 0xbd
00bc 0801 | | Execute_Immediate Raise,0x1
00bd 4401 |D | Exit_Subprogram With_Result,0x1
00be 0000 0000 | | .XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2
00c4 0227 | ' | Execute Access,All_Reference
00c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00c6 00db | | Load_Top At_Offset_3
00c7 0227 | ' | Execute Access,All_Reference
00c8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c9 0272 | r | Execute Discrete,Minus
00ca 00d8 | | Load_Top At_Offset_0
00cb e002 | | Load 0x0,0x2
00cc 0260 | ` | Execute Discrete,In_Type
00cd 7001 |p | Jump_Nonzero 0xcf
00ce 0801 | | Execute_Immediate Raise,0x1
00cf 4401 |D | Exit_Subprogram With_Result,0x1
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00db | | Load_Top At_Offset_3
00d4 00db | | Load_Top At_Offset_3
00d5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00d6 027d | } | Execute Discrete,Greater
00d7 6802 |h | Jump_Zero 0xda
00d8 4800 |H | Short_Literal 0x0
00d9 4402 |D | Exit_Subprogram With_Result,0x2
00da 00db | | Load_Top At_Offset_3
00db 00db | | Load_Top At_Offset_3
00dc 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
00dd 01d7 | | Execute Vector,Field_Read
00de 4402 |D | Exit_Subprogram With_Result,0x2
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00db | | Load_Top At_Offset_3
00e4 00db | | Load_Top At_Offset_3
00e5 0227 | ' | Execute Access,All_Reference
00e6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00e7 027d | } | Execute Discrete,Greater
00e8 6802 |h | Jump_Zero 0xeb
00e9 4800 |H | Short_Literal 0x0
00ea 4402 |D | Exit_Subprogram With_Result,0x2
00eb 00db | | Load_Top At_Offset_3
00ec 00db | | Load_Top At_Offset_3
00ed 0227 | ' | Execute Access,All_Reference
00ee 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
00ef 01d7 | | Execute Vector,Field_Read
00f0 4402 |D | Exit_Subprogram With_Result,0x2
00f1 0000 0000 | | .BLANK 0000[0x7]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00da | | Load_Top At_Offset_2
00fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00fd 0c01 | | Execute_Immediate Greater_Equal,0x1
00fe 6805 |h | Jump_Zero 0x104
00ff 4801 |H | Short_Literal 0x1
0100 00db | | Load_Top At_Offset_3
0101 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0102 01d7 | | Execute Vector,Field_Read
0103 4401 |D | Exit_Subprogram With_Result,0x1
0104 4800 |H | Short_Literal 0x0
0105 4401 |D | Exit_Subprogram With_Result,0x1
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00da | | Load_Top At_Offset_2
010c 0227 | ' | Execute Access,All_Reference
010d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
010e 0c01 | | Execute_Immediate Greater_Equal,0x1
010f 6806 |h | Jump_Zero 0x116
0110 4801 |H | Short_Literal 0x1
0111 00db | | Load_Top At_Offset_3
0112 0227 | ' | Execute Access,All_Reference
0113 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0114 01d7 | | Execute Vector,Field_Read
0115 4401 |D | Exit_Subprogram With_Result,0x1
0116 4800 |H | Short_Literal 0x0
0117 4401 |D | Exit_Subprogram With_Result,0x1
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 00da | | Load_Top At_Offset_2
011c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
011d 7003 |p | Jump_Nonzero 0x121
011e 4800 |H | Short_Literal 0x0
011f a5fe | | Store_Unchecked 0x2,-0x2
0120 4501 |E | Exit_Subprogram 0x1
0121 4801 |H | Short_Literal 0x1
0122 00db | | Load_Top At_Offset_3
0123 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0124 01d7 | | Execute Vector,Field_Read
0125 a5fe | | Store_Unchecked 0x2,-0x2
0126 00da | | Load_Top At_Offset_2
0127 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0128 0aff | | Execute_Immediate Plus,-0x1
0129 00db | | Load_Top At_Offset_3
012a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
012b 4802 |H | Short_Literal 0x2
012c 00db | | Load_Top At_Offset_3
012d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
012e 0a01 | | Execute_Immediate Plus,0x1
012f e5ff | | Load 0x2,-0x1
0130 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0131 01cf | | Execute Vector,Slice_Read
0132 4801 |H | Short_Literal 0x1
0133 e5ff | | Load 0x2,-0x1
0134 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0135 e5ff | | Load 0x2,-0x1
0136 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0137 01ce | | Execute Vector,Slice_Write
0138 4501 |E | Exit_Subprogram 0x1
0139 0000 0000 | | .BLANK 0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0144 | D | .CONST 0x0144 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0002 | | .CONST 0x0002 ; Number of locals
0143 INIT_0140:
0143 00e8 | | Load_Encached Character_Cache
0144 BODY_0140:
0144 00db | | Load_Top At_Offset_3
0145 0227 | ' | Execute Access,All_Reference
0146 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0147 7002 |p | Jump_Nonzero 0x14a
0148 4800 |H | Short_Literal 0x0
0149 4401 |D | Exit_Subprogram With_Result,0x1
014a 4801 |H | Short_Literal 0x1
014b e5ff | | Load 0x2,-0x1
014c 0227 | ' | Execute Access,All_Reference
014d 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
014e 01d7 | | Execute Vector,Field_Read
014f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0150 00db | | Load_Top At_Offset_3
0151 0227 | ' | Execute Access,All_Reference
0152 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0153 0aff | | Execute_Immediate Plus,-0x1
0154 e5ff | | Load 0x2,-0x1
0155 0227 | ' | Execute Access,All_Reference
0156 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0157 4802 |H | Short_Literal 0x2
0158 e5ff | | Load 0x2,-0x1
0159 0227 | ' | Execute Access,All_Reference
015a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
015b 0a01 | | Execute_Immediate Plus,0x1
015c e5ff | | Load 0x2,-0x1
015d 0227 | ' | Execute Access,All_Reference
015e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
015f 01cf | | Execute Vector,Slice_Read
0160 4801 |H | Short_Literal 0x1
0161 e5ff | | Load 0x2,-0x1
0162 0227 | ' | Execute Access,All_Reference
0163 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0164 e5ff | | Load 0x2,-0x1
0165 0229 | ) | Execute Access,All_Read
0166 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0167 01ce | | Execute Vector,Slice_Write
0168 00d8 | | Load_Top At_Offset_0
0169 4401 |D | Exit_Subprogram With_Result,0x1
016a 0000 0000 | | .BLANK 0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 00da | | Load_Top At_Offset_2
0174 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0175 0c01 | | Execute_Immediate Greater_Equal,0x1
0176 6806 |h | Jump_Zero 0x17d
0177 00da | | Load_Top At_Offset_2
0178 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0179 00db | | Load_Top At_Offset_3
017a 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
017b 01d7 | | Execute Vector,Field_Read
017c 4401 |D | Exit_Subprogram With_Result,0x1
017d 4800 |H | Short_Literal 0x0
017e 4401 |D | Exit_Subprogram With_Result,0x1
017f 0000 | | .XXX[0x1]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 00da | | Load_Top At_Offset_2
0184 0227 | ' | Execute Access,All_Reference
0185 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0186 0c01 | | Execute_Immediate Greater_Equal,0x1
0187 6808 |h | Jump_Zero 0x190
0188 00da | | Load_Top At_Offset_2
0189 0227 | ' | Execute Access,All_Reference
018a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
018b 00db | | Load_Top At_Offset_3
018c 0227 | ' | Execute Access,All_Reference
018d 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
018e 01d7 | | Execute Vector,Field_Read
018f 4401 |D | Exit_Subprogram With_Result,0x1
0190 4800 |H | Short_Literal 0x0
0191 4401 |D | Exit_Subprogram With_Result,0x1
0192 0000 0000 | | .BLANK 0000[0x6]
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 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
019d 7003 |p | Jump_Nonzero 0x1a1
019e 4800 |H | Short_Literal 0x0
019f a5fe | | Store_Unchecked 0x2,-0x2
01a0 4501 |E | Exit_Subprogram 0x1
01a1 00da | | Load_Top At_Offset_2
01a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01a3 00db | | Load_Top At_Offset_3
01a4 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01a5 01d7 | | Execute Vector,Field_Read
01a6 a5fe | | Store_Unchecked 0x2,-0x2
01a7 00da | | Load_Top At_Offset_2
01a8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01a9 0aff | | Execute_Immediate Plus,-0x1
01aa 00db | | Load_Top At_Offset_3
01ab 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ac 4501 |E | Exit_Subprogram 0x1
01ad 0000 0000 | | .XXX[0x3]
01af 0000 | |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 0227 | ' | Execute Access,All_Reference
01b5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01b6 7002 |p | Jump_Nonzero 0x1b9
01b7 4800 |H | Short_Literal 0x0
01b8 4401 |D | Exit_Subprogram With_Result,0x1
01b9 00da | | Load_Top At_Offset_2
01ba 0227 | ' | Execute Access,All_Reference
01bb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01bc 0aff | | Execute_Immediate Plus,-0x1
01bd 00db | | Load_Top At_Offset_3
01be 0227 | ' | Execute Access,All_Reference
01bf 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01c0 00da | | Load_Top At_Offset_2
01c1 0227 | ' | Execute Access,All_Reference
01c2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01c3 0a01 | | Execute_Immediate Plus,0x1
01c4 00db | | Load_Top At_Offset_3
01c5 0227 | ' | Execute Access,All_Reference
01c6 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01c7 01d7 | | Execute Vector,Field_Read
01c8 4401 |D | Exit_Subprogram With_Result,0x1
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e5fd | | Load 0x2,-0x3
01d4 00db | | Load_Top At_Offset_3
01d5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d6 027d | } | Execute Discrete,Greater
01d7 6809 |h | Jump_Zero 0x1e1
01d8 00db | | Load_Top At_Offset_3
01d9 00db | | Load_Top At_Offset_3
01da 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01db e5ff | | Load 0x2,-0x1
01dc 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01dd 01cf | | Execute Vector,Slice_Read
01de 0335 | 5 | Declare_Variable Array,Duplicate
01df 00cd | | Action Spare6_Action
01e0 4403 |D | Exit_Subprogram With_Result,0x3
01e1 00db | | Load_Top At_Offset_3
01e2 e5fd | | Load 0x2,-0x3
01e3 e5ff | | Load 0x2,-0x1
01e4 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01e5 01cf | | Execute Vector,Slice_Read
01e6 0335 | 5 | Declare_Variable Array,Duplicate
01e7 00cd | | Action Spare6_Action
01e8 4403 |D | Exit_Subprogram With_Result,0x3
01e9 0000 0000 | | .BLANK 0000[0x7]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 e5fd | | Load 0x2,-0x3
01f4 00db | | Load_Top At_Offset_3
01f5 0227 | ' | Execute Access,All_Reference
01f6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01f7 027d | } | Execute Discrete,Greater
01f8 680b |h | Jump_Zero 0x204
01f9 00db | | Load_Top At_Offset_3
01fa 00db | | Load_Top At_Offset_3
01fb 0227 | ' | Execute Access,All_Reference
01fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01fd e5ff | | Load 0x2,-0x1
01fe 0227 | ' | Execute Access,All_Reference
01ff 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0200 01cf | | Execute Vector,Slice_Read
0201 0335 | 5 | Declare_Variable Array,Duplicate
0202 00cd | | Action Spare6_Action
0203 4403 |D | Exit_Subprogram With_Result,0x3
0204 00db | | Load_Top At_Offset_3
0205 e5fd | | Load 0x2,-0x3
0206 e5ff | | Load 0x2,-0x1
0207 0227 | ' | Execute Access,All_Reference
0208 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0209 01cf | | Execute Vector,Slice_Read
020a 0335 | 5 | Declare_Variable Array,Duplicate
020b 00cd | | Action Spare6_Action
020c 4403 |D | Exit_Subprogram With_Result,0x3
020d 0000 0000 | | .XXX[0x3]
020f 0000 | |
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 021c | | .CONST 0x021c ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0003 | | .CONST 0x0003 ; Number of locals
0213 INIT_0210:
0213 00db | | Load_Top At_Offset_3
0214 e002 | | Load 0x0,0x2
0215 03f1 | | Declare_Variable Discrete,With_Value
0216 e5fe | | Load 0x2,-0x2
0217 e5ff | | Load 0x2,-0x1
0218 0272 | r | Execute Discrete,Minus
0219 0a01 | | Execute_Immediate Plus,0x1
021a e002 | | Load 0x0,0x2
021b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
021c BODY_0210:
021c 00d9 | | Load_Top At_Offset_1
021d e5fd | | Load 0x2,-0x3
021e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
021f 027d | } | Execute Discrete,Greater
0220 6809 |h | Jump_Zero 0x22a
0221 e5fd | | Load 0x2,-0x3
0222 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0223 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0224 e5fd | | Load 0x2,-0x3
0225 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0226 e5ff | | Load 0x2,-0x1
0227 0272 | r | Execute Discrete,Minus
0228 0a01 | | Execute_Immediate Plus,0x1
0229 0059 | Y | Store_Top Discrete,At_Offset_1
022a e5ff | | Load 0x2,-0x1
022b 0f01 | | Execute_Immediate Equal,0x1
022c 6804 |h | Jump_Zero 0x231
022d 00d8 | | Load_Top At_Offset_0
022e e5fd | | Load 0x2,-0x3
022f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0230 4503 |E | Exit_Subprogram 0x3
0231 e5ff | | Load 0x2,-0x1
0232 00da | | Load_Top At_Offset_2
0233 e5fd | | Load 0x2,-0x3
0234 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0235 01cf | | Execute Vector,Slice_Read
0236 4801 |H | Short_Literal 0x1
0237 00da | | Load_Top At_Offset_2
0238 e5fd | | Load 0x2,-0x3
0239 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
023a 01ce | | Execute Vector,Slice_Write
023b 00d8 | | Load_Top At_Offset_0
023c e5fd | | Load 0x2,-0x3
023d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
023e 4503 |E | Exit_Subprogram 0x3
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024c | L | .CONST 0x024c ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0003 | | .CONST 0x0003 ; Number of locals
0243 INIT_0240:
0243 e5fd | | Load 0x2,-0x3
0244 e002 | | Load 0x0,0x2
0245 03f1 | | Declare_Variable Discrete,With_Value
0246 e5fd | | Load 0x2,-0x3
0247 e5fe | | Load 0x2,-0x2
0248 0272 | r | Execute Discrete,Minus
0249 0a01 | | Execute_Immediate Plus,0x1
024a e002 | | Load 0x0,0x2
024b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
024c BODY_0240:
024c 00d9 | | Load_Top At_Offset_1
024d e5ff | | Load 0x2,-0x1
024e 0227 | ' | Execute Access,All_Reference
024f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0250 027d | } | Execute Discrete,Greater
0251 680b |h | Jump_Zero 0x25d
0252 e5ff | | Load 0x2,-0x1
0253 0227 | ' | Execute Access,All_Reference
0254 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0255 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0256 e5ff | | Load 0x2,-0x1
0257 0227 | ' | Execute Access,All_Reference
0258 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0259 e5fe | | Load 0x2,-0x2
025a 0272 | r | Execute Discrete,Minus
025b 0a01 | | Execute_Immediate Plus,0x1
025c 0059 | Y | Store_Top Discrete,At_Offset_1
025d e5fe | | Load 0x2,-0x2
025e 0f01 | | Execute_Immediate Equal,0x1
025f 6805 |h | Jump_Zero 0x265
0260 00d8 | | Load_Top At_Offset_0
0261 e5ff | | Load 0x2,-0x1
0262 0227 | ' | Execute Access,All_Reference
0263 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0264 4504 |E | Exit_Subprogram 0x4
0265 e5fe | | Load 0x2,-0x2
0266 00da | | Load_Top At_Offset_2
0267 e5ff | | Load 0x2,-0x1
0268 0227 | ' | Execute Access,All_Reference
0269 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
026a 01cf | | Execute Vector,Slice_Read
026b 4801 |H | Short_Literal 0x1
026c 00da | | Load_Top At_Offset_2
026d e5ff | | Load 0x2,-0x1
026e 0229 | ) | Execute Access,All_Read
026f 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0270 01ce | | Execute Vector,Slice_Write
0271 00d8 | | Load_Top At_Offset_0
0272 e5ff | | Load 0x2,-0x1
0273 0227 | ' | Execute Access,All_Reference
0274 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0275 4504 |E | Exit_Subprogram 0x4
0276 0000 0000 | | .XXX[0x2]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027d | } | .CONST 0x027d ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b e002 | | Load 0x0,0x2
027c 0007 | | Action Break_Optional
027d BODY_0278:
027d e5fd | | Load 0x2,-0x3
027e e5ff | | Load 0x2,-0x1
027f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0280 027b | { | Execute Discrete,Greater_Equal
0281 6809 |h | Jump_Zero 0x28b
0282 e5fe | | Load 0x2,-0x2
0283 e5ff | | Load 0x2,-0x1
0284 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0285 e5ff | | Load 0x2,-0x1
0286 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0287 01cf | | Execute Vector,Slice_Read
0288 0335 | 5 | Declare_Variable Array,Duplicate
0289 00cd | | Action Spare6_Action
028a 4403 |D | Exit_Subprogram With_Result,0x3
028b e5fe | | Load 0x2,-0x2
028c e5fd | | Load 0x2,-0x3
028d 0273 | s | Execute Discrete,Plus
028e 0aff | | Execute_Immediate Plus,-0x1
028f 0059 | Y | Store_Top Discrete,At_Offset_1
0290 00d8 | | Load_Top At_Offset_0
0291 e5ff | | Load 0x2,-0x1
0292 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0293 027b | { | Execute Discrete,Greater_Equal
0294 6809 |h | Jump_Zero 0x29e
0295 e5fe | | Load 0x2,-0x2
0296 e5ff | | Load 0x2,-0x1
0297 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0298 e5ff | | Load 0x2,-0x1
0299 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
029a 01cf | | Execute Vector,Slice_Read
029b 0335 | 5 | Declare_Variable Array,Duplicate
029c 00cd | | Action Spare6_Action
029d 4403 |D | Exit_Subprogram With_Result,0x3
029e e5fe | | Load 0x2,-0x2
029f 00d9 | | Load_Top At_Offset_1
02a0 e5ff | | Load 0x2,-0x1
02a1 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02a2 01cf | | Execute Vector,Slice_Read
02a3 0335 | 5 | Declare_Variable Array,Duplicate
02a4 00cd | | Action Spare6_Action
02a5 4403 |D | Exit_Subprogram With_Result,0x3
02a6 0000 0000 | | .XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ad | | .CONST 0x02ad ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0002 | | .CONST 0x0002 ; Number of locals
02ab INIT_02a8:
02ab e002 | | Load 0x0,0x2
02ac 0007 | | Action Break_Optional
02ad BODY_02a8:
02ad e5fd | | Load 0x2,-0x3
02ae e5ff | | Load 0x2,-0x1
02af 0227 | ' | Execute Access,All_Reference
02b0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02b1 027b | { | Execute Discrete,Greater_Equal
02b2 680b |h | Jump_Zero 0x2be
02b3 e5fe | | Load 0x2,-0x2
02b4 e5ff | | Load 0x2,-0x1
02b5 0227 | ' | Execute Access,All_Reference
02b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02b7 e5ff | | Load 0x2,-0x1
02b8 0227 | ' | Execute Access,All_Reference
02b9 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02ba 01cf | | Execute Vector,Slice_Read
02bb 0335 | 5 | Declare_Variable Array,Duplicate
02bc 00cd | | Action Spare6_Action
02bd 4403 |D | Exit_Subprogram With_Result,0x3
02be e5fe | | Load 0x2,-0x2
02bf e5fd | | Load 0x2,-0x3
02c0 0273 | s | Execute Discrete,Plus
02c1 0aff | | Execute_Immediate Plus,-0x1
02c2 0059 | Y | Store_Top Discrete,At_Offset_1
02c3 00d8 | | Load_Top At_Offset_0
02c4 e5ff | | Load 0x2,-0x1
02c5 0227 | ' | Execute Access,All_Reference
02c6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02c7 027b | { | Execute Discrete,Greater_Equal
02c8 680b |h | Jump_Zero 0x2d4
02c9 e5fe | | Load 0x2,-0x2
02ca e5ff | | Load 0x2,-0x1
02cb 0227 | ' | Execute Access,All_Reference
02cc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02cd e5ff | | Load 0x2,-0x1
02ce 0227 | ' | Execute Access,All_Reference
02cf 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02d0 01cf | | Execute Vector,Slice_Read
02d1 0335 | 5 | Declare_Variable Array,Duplicate
02d2 00cd | | Action Spare6_Action
02d3 4403 |D | Exit_Subprogram With_Result,0x3
02d4 e5fe | | Load 0x2,-0x2
02d5 00d9 | | Load_Top At_Offset_1
02d6 e5ff | | Load 0x2,-0x1
02d7 0227 | ' | Execute Access,All_Reference
02d8 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02d9 01cf | | Execute Vector,Slice_Read
02da 0335 | 5 | Declare_Variable Array,Duplicate
02db 00cd | | Action Spare6_Action
02dc 4403 |D | Exit_Subprogram With_Result,0x3
02dd 0000 0000 | | .XXX[0x3]
02df 0000 | |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e8 | | .CONST 0x02e8 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0003 | | .CONST 0x0003 ; Number of locals
02e3 INIT_02e0:
02e3 e002 | | Load 0x0,0x2
02e4 0007 | | Action Break_Optional
02e5 e5fe | | Load 0x2,-0x2
02e6 e002 | | Load 0x0,0x2
02e7 03f1 | | Declare_Variable Discrete,With_Value
02e8 BODY_02e0:
02e8 e5fe | | Load 0x2,-0x2
02e9 e5fd | | Load 0x2,-0x3
02ea 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02eb 027b | { | Execute Discrete,Greater_Equal
02ec 680a |h | Jump_Zero 0x2f7
02ed e5fd | | Load 0x2,-0x3
02ee 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ef 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02f0 e5fd | | Load 0x2,-0x3
02f1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f2 e5ff | | Load 0x2,-0x1
02f3 0272 | r | Execute Discrete,Minus
02f4 0a01 | | Execute_Immediate Plus,0x1
02f5 0059 | Y | Store_Top Discrete,At_Offset_1
02f6 7813 |x | Jump 0x30a
02f7 e5ff | | Load 0x2,-0x1
02f8 e5fe | | Load 0x2,-0x2
02f9 0273 | s | Execute Discrete,Plus
02fa 0aff | | Execute_Immediate Plus,-0x1
02fb 005a | Z | Store_Top Discrete,At_Offset_2
02fc 00d9 | | Load_Top At_Offset_1
02fd e5fd | | Load 0x2,-0x3
02fe 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ff 027b | { | Execute Discrete,Greater_Equal
0300 6809 |h | Jump_Zero 0x30a
0301 e5fd | | Load 0x2,-0x3
0302 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0303 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0304 e5fd | | Load 0x2,-0x3
0305 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0306 e5ff | | Load 0x2,-0x1
0307 0272 | r | Execute Discrete,Minus
0308 0a01 | | Execute_Immediate Plus,0x1
0309 0059 | Y | Store_Top Discrete,At_Offset_1
030a e5ff | | Load 0x2,-0x1
030b 0f01 | | Execute_Immediate Equal,0x1
030c 6804 |h | Jump_Zero 0x311
030d 00d8 | | Load_Top At_Offset_0
030e e5fd | | Load 0x2,-0x3
030f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0310 4503 |E | Exit_Subprogram 0x3
0311 e5ff | | Load 0x2,-0x1
0312 00da | | Load_Top At_Offset_2
0313 e5fd | | Load 0x2,-0x3
0314 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0315 01cf | | Execute Vector,Slice_Read
0316 4801 |H | Short_Literal 0x1
0317 00da | | Load_Top At_Offset_2
0318 e5fd | | Load 0x2,-0x3
0319 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
031a 01ce | | Execute Vector,Slice_Write
031b 00d8 | | Load_Top At_Offset_0
031c e5fd | | Load 0x2,-0x3
031d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
031e 4503 |E | Exit_Subprogram 0x3
031f 0000 | | .XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0328 | ( | .CONST 0x0328 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0003 | | .CONST 0x0003 ; Number of locals
0323 INIT_0320:
0323 e002 | | Load 0x0,0x2
0324 0007 | | Action Break_Optional
0325 e5fd | | Load 0x2,-0x3
0326 e002 | | Load 0x0,0x2
0327 03f1 | | Declare_Variable Discrete,With_Value
0328 BODY_0320:
0328 e5fd | | Load 0x2,-0x3
0329 e5ff | | Load 0x2,-0x1
032a 0227 | ' | Execute Access,All_Reference
032b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
032c 027b | { | Execute Discrete,Greater_Equal
032d 680c |h | Jump_Zero 0x33a
032e e5ff | | Load 0x2,-0x1
032f 0227 | ' | Execute Access,All_Reference
0330 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0331 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0332 e5ff | | Load 0x2,-0x1
0333 0227 | ' | Execute Access,All_Reference
0334 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0335 e5fe | | Load 0x2,-0x2
0336 0272 | r | Execute Discrete,Minus
0337 0a01 | | Execute_Immediate Plus,0x1
0338 0059 | Y | Store_Top Discrete,At_Offset_1
0339 7816 |x | Jump 0x350
033a e5fe | | Load 0x2,-0x2
033b e5fd | | Load 0x2,-0x3
033c 0273 | s | Execute Discrete,Plus
033d 0aff | | Execute_Immediate Plus,-0x1
033e 005a | Z | Store_Top Discrete,At_Offset_2
033f 00d9 | | Load_Top At_Offset_1
0340 e5ff | | Load 0x2,-0x1
0341 0227 | ' | Execute Access,All_Reference
0342 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0343 027b | { | Execute Discrete,Greater_Equal
0344 680b |h | Jump_Zero 0x350
0345 e5ff | | Load 0x2,-0x1
0346 0227 | ' | Execute Access,All_Reference
0347 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0348 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0349 e5ff | | Load 0x2,-0x1
034a 0227 | ' | Execute Access,All_Reference
034b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
034c e5fe | | Load 0x2,-0x2
034d 0272 | r | Execute Discrete,Minus
034e 0a01 | | Execute_Immediate Plus,0x1
034f 0059 | Y | Store_Top Discrete,At_Offset_1
0350 e5fe | | Load 0x2,-0x2
0351 0f01 | | Execute_Immediate Equal,0x1
0352 6805 |h | Jump_Zero 0x358
0353 00d8 | | Load_Top At_Offset_0
0354 e5ff | | Load 0x2,-0x1
0355 0227 | ' | Execute Access,All_Reference
0356 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0357 4504 |E | Exit_Subprogram 0x4
0358 e5fe | | Load 0x2,-0x2
0359 00da | | Load_Top At_Offset_2
035a e5ff | | Load 0x2,-0x1
035b 0227 | ' | Execute Access,All_Reference
035c 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
035d 01cf | | Execute Vector,Slice_Read
035e 4801 |H | Short_Literal 0x1
035f 00da | | Load_Top At_Offset_2
0360 e5ff | | Load 0x2,-0x1
0361 0229 | ) | Execute Access,All_Read
0362 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0363 01ce | | Execute Vector,Slice_Write
0364 00d8 | | Load_Top At_Offset_0
0365 e5ff | | Load 0x2,-0x1
0366 0227 | ' | Execute Access,All_Reference
0367 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0368 4504 |E | Exit_Subprogram 0x4
0369 0000 0000 | | .BLANK 0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373 | s | .CONST 0x0373 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0001 | | .CONST 0x0001 ; Number of locals
0373 BODY_0370:
0373 INIT_0370:
0373 4801 |H | Short_Literal 0x1
0374 00db | | Load_Top At_Offset_3
0375 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0376 e5ff | | Load 0x2,-0x1
0377 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0378 01cf | | Execute Vector,Slice_Read
0379 0335 | 5 | Declare_Variable Array,Duplicate
037a 00cd | | Action Spare6_Action
037b 4401 |D | Exit_Subprogram With_Result,0x1
037c 0000 0000 | | .BLANK 0000[0x4]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 4801 |H | Short_Literal 0x1
0384 00db | | Load_Top At_Offset_3
0385 0227 | ' | Execute Access,All_Reference
0386 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0387 e5ff | | Load 0x2,-0x1
0388 0227 | ' | Execute Access,All_Reference
0389 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
038a 01cf | | Execute Vector,Slice_Read
038b 0335 | 5 | Declare_Variable Array,Duplicate
038c 00cd | | Action Spare6_Action
038d 4401 |D | Exit_Subprogram With_Result,0x1
038e 0000 0000 | | .XXX[0x2]
0390 ; --------------------------------------------------------------------------------------
0390 ; Debug Table
0390 ; --------------------------------------------------------------------------------------
0390 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4d24,0x0000,0x0001,0x001e
0396 000b 040e | | .DBG4T 0x000b,0x040e,0x8000,0x0000
039a 0045 042d | E -| .DBG4T 0x0045,0x042d,0x8000,0x0000
039e 0083 044b | K| .DBG4T 0x0083,0x044b,0x0001,0x0000
03a2 008b 044e | N| .DBG4T 0x008b,0x044e,0x0001,0x0000
03a6 0093 0451 | Q| .DBG4T 0x0093,0x0451,0x0002,0x0000
03aa 009b 0454 | T| .DBG4T 0x009b,0x0454,0x0002,0x0000
03ae 00a3 0457 | W| .DBG4T 0x00a3,0x0457,0x0002,0x0000
03b2 00ab 045a | Z| .DBG4T 0x00ab,0x045a,0x0002,0x0000
03b6 00b3 045d | ]| .DBG4T 0x00b3,0x045d,0x0002,0x0000
03ba 00c3 0460 | `| .DBG4T 0x00c3,0x0460,0x0002,0x0000
03be 00d3 0463 | c| .DBG4T 0x00d3,0x0463,0x0002,0x0000
03c2 00e3 0468 | h| .DBG4T 0x00e3,0x0468,0x0002,0x0000
03c6 00fb 046d | m| .DBG4T 0x00fb,0x046d,0x0002,0x0000
03ca 010b 0472 | r| .DBG4T 0x010b,0x0472,0x0002,0x0000
03ce 011b 0477 | w| .DBG4T 0x011b,0x0477,0x0001,0x0000
03d2 0143 047f | C | .DBG4T 0x0143,0x047f,0x0002,0x0000
03d6 0173 0488 | s | .DBG4T 0x0173,0x0488,0x0002,0x0000
03da 0183 048d | | .DBG4T 0x0183,0x048d,0x0002,0x0000
03de 019b 0492 | | .DBG4T 0x019b,0x0492,0x0001,0x0000
03e2 01b3 0499 | | .DBG4T 0x01b3,0x0499,0x0002,0x0000
03e6 01d3 049f | | .DBG4T 0x01d3,0x049f,0x0002,0x0000
03ea 01f3 04a4 | | .DBG4T 0x01f3,0x04a4,0x0002,0x0000
03ee 0213 04a9 | | .DBG4T 0x0213,0x04a9,0x0001,0x0000
03f2 0243 04b5 | C | .DBG4T 0x0243,0x04b5,0x0001,0x0000
03f6 027b 04c1 | { | .DBG4T 0x027b,0x04c1,0x0002,0x0000
03fa 02ab 04ca | | .DBG4T 0x02ab,0x04ca,0x0002,0x0000
03fe 02e3 04d3 | | .DBG4T 0x02e3,0x04d3,0x0001,0x0000
0402 0323 04e3 | # | .DBG4T 0x0323,0x04e3,0x0001,0x0000
0406 0373 04f3 | s | .DBG4T 0x0373,0x04f3,0x0002,0x0000
040a 0383 04f6 | | .DBG4T 0x0383,0x04f6,0x0002,0x0000
040e ; --------------------------------------------------------------------------------------
040e ; Debug chain
040e ; --------------------------------------------------------------------------------------
040e 001d 0000 | | .DBGLEN 0x001d,0x0000
0410 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042
042d ; --------------------------------------------------------------------------------------
042d ; Debug chain
042d ; --------------------------------------------------------------------------------------
042d 001c 0000 | | .DBGLEN 0x001c,0x0000
042f 0045 0047 | E G| .DBGLNO 0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x005f,0x0061,0x0063,0x0065,0x0067,0x0069,0x006b,0x006d,0x006f,0x0071,0x0073,0x0075,0x0077,0x0079,0x007b
044b ; --------------------------------------------------------------------------------------
044b ; Debug chain
044b ; --------------------------------------------------------------------------------------
044b 0000 0001 | | .DBGLEN 0x0000,0x0001
044d 0083 | | .DBGLNO 0x0083
044e ; --------------------------------------------------------------------------------------
044e ; Debug chain
044e ; --------------------------------------------------------------------------------------
044e 0000 0001 | | .DBGLEN 0x0000,0x0001
0450 008b | | .DBGLNO 0x008b
0451 ; --------------------------------------------------------------------------------------
0451 ; Debug chain
0451 ; --------------------------------------------------------------------------------------
0451 0000 0001 | | .DBGLEN 0x0000,0x0001
0453 0093 | | .DBGLNO 0x0093
0454 ; --------------------------------------------------------------------------------------
0454 ; Debug chain
0454 ; --------------------------------------------------------------------------------------
0454 0000 0001 | | .DBGLEN 0x0000,0x0001
0456 009b | | .DBGLNO 0x009b
0457 ; --------------------------------------------------------------------------------------
0457 ; Debug chain
0457 ; --------------------------------------------------------------------------------------
0457 0000 0001 | | .DBGLEN 0x0000,0x0001
0459 00a3 | | .DBGLNO 0x00a3
045a ; --------------------------------------------------------------------------------------
045a ; Debug chain
045a ; --------------------------------------------------------------------------------------
045a 0000 0001 | | .DBGLEN 0x0000,0x0001
045c 00ab | | .DBGLNO 0x00ab
045d ; --------------------------------------------------------------------------------------
045d ; Debug chain
045d ; --------------------------------------------------------------------------------------
045d 0000 0001 | | .DBGLEN 0x0000,0x0001
045f 00b3 | | .DBGLNO 0x00b3
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug chain
0460 ; --------------------------------------------------------------------------------------
0460 0000 0001 | | .DBGLEN 0x0000,0x0001
0462 00c3 | | .DBGLNO 0x00c3
0463 ; --------------------------------------------------------------------------------------
0463 ; Debug chain
0463 ; --------------------------------------------------------------------------------------
0463 0000 0003 | | .DBGLEN 0x0000,0x0003
0465 00d3 00d8 | | .DBGLNO 0x00d3,0x00d8,0x00da
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug chain
0468 ; --------------------------------------------------------------------------------------
0468 0000 0003 | | .DBGLEN 0x0000,0x0003
046a 00e3 00e9 | | .DBGLNO 0x00e3,0x00e9,0x00eb
046d ; --------------------------------------------------------------------------------------
046d ; Debug chain
046d ; --------------------------------------------------------------------------------------
046d 0000 0003 | | .DBGLEN 0x0000,0x0003
046f 00fb 00ff | | .DBGLNO 0x00fb,0x00ff,0x0104
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug chain
0472 ; --------------------------------------------------------------------------------------
0472 0000 0003 | | .DBGLEN 0x0000,0x0003
0474 010b 0110 | | .DBGLNO 0x010b,0x0110,0x0116
0477 ; --------------------------------------------------------------------------------------
0477 ; Debug chain
0477 ; --------------------------------------------------------------------------------------
0477 0000 0006 | | .DBGLEN 0x0000,0x0006
0479 011b 011e | | .DBGLNO 0x011b,0x011e,0x0120,0x0121,0x0126,0x012b
047f ; --------------------------------------------------------------------------------------
047f ; Debug chain
047f ; --------------------------------------------------------------------------------------
047f 0001 0006 | | .DBGLEN 0x0001,0x0006
0481 0143 0144 | C D| .DBGLNO 0x0143,0x0144,0x0148,0x014a,0x0150,0x0157,0x0168
0488 ; --------------------------------------------------------------------------------------
0488 ; Debug chain
0488 ; --------------------------------------------------------------------------------------
0488 0000 0003 | | .DBGLEN 0x0000,0x0003
048a 0173 0177 | s w| .DBGLNO 0x0173,0x0177,0x017d
048d ; --------------------------------------------------------------------------------------
048d ; Debug chain
048d ; --------------------------------------------------------------------------------------
048d 0000 0003 | | .DBGLEN 0x0000,0x0003
048f 0183 0188 | | .DBGLNO 0x0183,0x0188,0x0190
0492 ; --------------------------------------------------------------------------------------
0492 ; Debug chain
0492 ; --------------------------------------------------------------------------------------
0492 0000 0005 | | .DBGLEN 0x0000,0x0005
0494 019b 019e | | .DBGLNO 0x019b,0x019e,0x01a0,0x01a1,0x01a7
0499 ; --------------------------------------------------------------------------------------
0499 ; Debug chain
0499 ; --------------------------------------------------------------------------------------
0499 0000 0004 | | .DBGLEN 0x0000,0x0004
049b 01b3 01b7 | | .DBGLNO 0x01b3,0x01b7,0x01b9,0x01c0
049f ; --------------------------------------------------------------------------------------
049f ; Debug chain
049f ; --------------------------------------------------------------------------------------
049f 0000 0003 | | .DBGLEN 0x0000,0x0003
04a1 01d3 01d8 | | .DBGLNO 0x01d3,0x01d8,0x01e1
04a4 ; --------------------------------------------------------------------------------------
04a4 ; Debug chain
04a4 ; --------------------------------------------------------------------------------------
04a4 0000 0003 | | .DBGLEN 0x0000,0x0003
04a6 01f3 01f9 | | .DBGLNO 0x01f3,0x01f9,0x0204
04a9 ; --------------------------------------------------------------------------------------
04a9 ; Debug chain
04a9 ; --------------------------------------------------------------------------------------
04a9 0002 0008 | | .DBGLEN 0x0002,0x0008
04ab 0213 0216 | | .DBGLNO 0x0213,0x0216,0x021c,0x0221,0x0224,0x022a,0x022d,0x0230,0x0231,0x023b
04b5 ; --------------------------------------------------------------------------------------
04b5 ; Debug chain
04b5 ; --------------------------------------------------------------------------------------
04b5 0002 0008 | | .DBGLEN 0x0002,0x0008
04b7 0243 0246 | C F| .DBGLNO 0x0243,0x0246,0x024c,0x0252,0x0256,0x025d,0x0260,0x0264,0x0265,0x0271
04c1 ; --------------------------------------------------------------------------------------
04c1 ; Debug chain
04c1 ; --------------------------------------------------------------------------------------
04c1 0001 0006 | | .DBGLEN 0x0001,0x0006
04c3 027b 027d | { }| .DBGLNO 0x027b,0x027d,0x0282,0x028b,0x0290,0x0295,0x029e
04ca ; --------------------------------------------------------------------------------------
04ca ; Debug chain
04ca ; --------------------------------------------------------------------------------------
04ca 0001 0006 | | .DBGLEN 0x0001,0x0006
04cc 02ab 02ad | | .DBGLNO 0x02ab,0x02ad,0x02b3,0x02be,0x02c3,0x02c9,0x02d4
04d3 ; --------------------------------------------------------------------------------------
04d3 ; Debug chain
04d3 ; --------------------------------------------------------------------------------------
04d3 0002 000c | | .DBGLEN 0x0002,0x000c
04d5 02e3 02e5 | | .DBGLNO 0x02e3,0x02e5,0x02e8,0x02ed,0x02f0,0x02f7,0x02fc,0x0301,0x0304,0x030a,0x030d,0x0310,0x0311,0x031b
04e3 ; --------------------------------------------------------------------------------------
04e3 ; Debug chain
04e3 ; --------------------------------------------------------------------------------------
04e3 0002 000c | | .DBGLEN 0x0002,0x000c
04e5 0323 0325 | # %| .DBGLNO 0x0323,0x0325,0x0328,0x032e,0x0332,0x033a,0x033f,0x0345,0x0349,0x0350,0x0353,0x0357,0x0358,0x0364
04f3 ; --------------------------------------------------------------------------------------
04f3 ; Debug chain
04f3 ; --------------------------------------------------------------------------------------
04f3 0000 0001 | | .DBGLEN 0x0000,0x0001
04f5 0373 | s | .DBGLNO 0x0373
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug chain
04f6 ; --------------------------------------------------------------------------------------
04f6 0000 0001 | | .DBGLEN 0x0000,0x0001
04f8 0383 | | .DBGLNO 0x0383
04f9 0000 0000 | | .BLANK 0000[0x107]