|
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_0658fb
└─⟦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 0408 | | .CONST 0x0408 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0061 | a | .CONST 0x0061 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4808 |H | Short_Literal 0x8
000d 029f 006b | k| Declare_Subprogram For_Call,INIT_0068
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 00e8 | | Load_Encached Character_Cache
0011 0266 | f | Execute Discrete,Bounds
0012 00da | | Load_Top At_Offset_2
0013 02a0 | | Declare_Subprogram Null_Subprogram
0014 4801 |H | Short_Literal 0x1
0015 035e | ^ | Declare_Type Array,Defined,Visible
0016 029a 0093 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0090
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0
002c c21b | | Store 0x1,0x1b
002d 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0
002f c21c | | Store 0x1,0x1c
0030 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0
0032 c21d | | Store 0x1,0x1d
0033 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0
0035 c213 | | Store 0x1,0x13
0036 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0
0038 c21e | | Store 0x1,0x1e
0039 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0
003b c215 | | Store 0x1,0x15
003c 029a 0103 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0100
003e c221 | ! | Store 0x1,0x21
003f 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
0041 c217 | | Store 0x1,0x17
0042 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180
0044 c218 | | Store 0x1,0x18
0045 029a 0193 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0190
0047 c219 | | Store 0x1,0x19
0048 00bf | | Action Accept_Activation
0049 029d 02ab | | Declare_Subprogram For_Outer_Call,INIT_02a8
004b 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004c 00c7 | | Action Elaborate_Subprogram
004d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
004e 00c7 | | Action Elaborate_Subprogram
004f 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0050 00c7 | | Action Elaborate_Subprogram
0051 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0052 00c7 | | Action Elaborate_Subprogram
0053 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0054 00c7 | | Action Elaborate_Subprogram
0055 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0056 00c7 | | Action Elaborate_Subprogram
0057 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0058 00c7 | | Action Elaborate_Subprogram
0059 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
005a 00c7 | | Action Elaborate_Subprogram
005b 1d17 | | Execute_Immediate Reference_Lex_1,0x17
005c 00c7 | | Action Elaborate_Subprogram
005d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005e 00c7 | | Action Elaborate_Subprogram
005f 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0060 00c7 | | Action Elaborate_Subprogram
0061 BODY_0008:
0061 00bc | | Action Signal_Activated
0062 00bb | | Action Signal_Completion
0063 0000 0000 | | .BLANK 0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 4607 |F | Jump_Case 0x7
006c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
006d 7806 |x | Jump 0x74 ; case 0x1
006e 7809 |x | Jump 0x78 ; case 0x2
006f 780d |x | Jump 0x7d ; case 0x3
0070 7810 |x | Jump 0x81 ; case 0x4
0071 7811 |x | Jump 0x83 ; case 0x5
0072 7812 |x | Jump 0x85 ; case 0x6
0073 7815 |x | Jump 0x89 ; case 0x7
0074 00da | | Load_Top At_Offset_2
0075 0091 03b9 | | Action Push_String_Extended_Indexed,0x3b9 ; "SA_TRANSFER"
0077 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0078 00db | | Load_Top At_Offset_3
0079 00db | | Load_Top At_Offset_3
007a 00e0 | | Load_Encached Standard_Cache
007b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
007c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
007d 00da | | Load_Top At_Offset_2
007e 00e0 | | Load_Encached Standard_Cache
007f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0080 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0081 00db | | Load_Top At_Offset_3
0082 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0083 00db | | Load_Top At_Offset_3
0084 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0085 e20d | | Load 0x1,0xd
0086 00dc | | Load_Top At_Offset_4
0087 0267 | g | Execute Discrete,Predecessor
0088 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0089 e20d | | Load 0x1,0xd
008a 00dc | | Load_Top At_Offset_4
008b 0268 | h | Execute Discrete,Successor
008c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
008d 0000 0000 | | .XXX[0x3]
008f 0000 | |
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 00e8 | | Load_Encached Character_Cache
0094 e5fd | | Load 0x2,-0x3
0095 e5fe | | Load 0x2,-0x2
0096 e5ff | | Load 0x2,-0x1
0097 4800 |H | Short_Literal 0x0
0098 8222 | " | Call 0x1,0x22
0099 00d2 | | Pop_Control Pop_Count_2
009a c5fc | | Store 0x2,-0x4
009b 4502 |E | Exit_Subprogram 0x2
009c 0000 0000 | | .BLANK 0000[0x4]
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 00e8 | | Load_Encached Character_Cache
00a4 00db | | Load_Top At_Offset_3
00a5 0229 | ) | Execute Access,All_Read
00a6 e5fd | | Load 0x2,-0x3
00a7 e5fe | | Load 0x2,-0x2
00a8 4800 |H | Short_Literal 0x0
00a9 8222 | " | Call 0x1,0x22
00aa 00d2 | | Pop_Control Pop_Count_2
00ab c5fc | | Store 0x2,-0x4
00ac 4503 |E | Exit_Subprogram 0x3
00ad 0000 0000 | | .XXX[0x3]
00af 0000 | |
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 00e8 | | Load_Encached Character_Cache
00b4 e5fd | | Load 0x2,-0x3
00b5 e5ff | | Load 0x2,-0x1
00b6 0229 | ) | Execute Access,All_Read
00b7 e5fe | | Load 0x2,-0x2
00b8 4800 |H | Short_Literal 0x0
00b9 8222 | " | Call 0x1,0x22
00ba 00d2 | | Pop_Control Pop_Count_2
00bb c5fc | | Store 0x2,-0x4
00bc 4503 |E | Exit_Subprogram 0x3
00bd 0000 0000 | | .XXX[0x3]
00bf 0000 | |
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 00e8 | | Load_Encached Character_Cache
00c4 e5fe | | Load 0x2,-0x2
00c5 0229 | ) | Execute Access,All_Read
00c6 e5ff | | Load 0x2,-0x1
00c7 0229 | ) | Execute Access,All_Read
00c8 e5fd | | Load 0x2,-0x3
00c9 4800 |H | Short_Literal 0x0
00ca 8222 | " | Call 0x1,0x22
00cb 00d2 | | Pop_Control Pop_Count_2
00cc c5fc | | Store 0x2,-0x4
00cd 4504 |E | Exit_Subprogram 0x4
00ce 0000 0000 | | .XXX[0x2]
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 00e8 | | Load_Encached Character_Cache
00d4 e5fd | | Load 0x2,-0x3
00d5 e5fe | | Load 0x2,-0x2
00d6 e5ff | | Load 0x2,-0x1
00d7 e5fe | | Load 0x2,-0x2
00d8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00d9 8222 | " | Call 0x1,0x22
00da 00d2 | | Pop_Control Pop_Count_2
00db c5fc | | Store 0x2,-0x4
00dc 4502 |E | Exit_Subprogram 0x2
00dd 0000 0000 | | .XXX[0x3]
00df 0000 | |
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 00e8 | | Load_Encached Character_Cache
00e4 00db | | Load_Top At_Offset_3
00e5 0229 | ) | Execute Access,All_Read
00e6 e5fd | | Load 0x2,-0x3
00e7 e5fe | | Load 0x2,-0x2
00e8 e5fd | | Load 0x2,-0x3
00e9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ea 8222 | " | Call 0x1,0x22
00eb 00d2 | | Pop_Control Pop_Count_2
00ec c5fc | | Store 0x2,-0x4
00ed 4503 |E | Exit_Subprogram 0x3
00ee 0000 0000 | | .XXX[0x2]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 00db | | Load_Top At_Offset_3
00f4 0229 | ) | Execute Access,All_Read
00f5 00e8 | | Load_Encached Character_Cache
00f6 e5fd | | Load 0x2,-0x3
00f7 00da | | Load_Top At_Offset_2
00f8 e5ff | | Load 0x2,-0x1
00f9 e5fe | | Load 0x2,-0x2
00fa 0227 | ' | Execute Access,All_Reference
00fb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00fc 8222 | " | Call 0x1,0x22
00fd 00d2 | | Pop_Control Pop_Count_2
00fe c5fc | | Store 0x2,-0x4
00ff 4502 |E | Exit_Subprogram 0x2
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 e5fd | | Load 0x2,-0x3
0104 0229 | ) | Execute Access,All_Read
0105 00e8 | | Load_Encached Character_Cache
0106 e5ff | | Load 0x2,-0x1
0107 0229 | ) | Execute Access,All_Read
0108 00da | | Load_Top At_Offset_2
0109 e5fe | | Load 0x2,-0x2
010a e5fd | | Load 0x2,-0x3
010b 0227 | ' | Execute Access,All_Reference
010c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
010d 8222 | " | Call 0x1,0x22
010e 00d2 | | Pop_Control Pop_Count_2
010f c5fc | | Store 0x2,-0x4
0110 4503 |E | Exit_Subprogram 0x3
0111 0000 0000 | | .BLANK 0000[0x7]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0121 | ! | .CONST 0x0121 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0003 | | .CONST 0x0003 ; Number of locals
011b INIT_0118:
011b 00e3 | | Load_Encached Natural_Cache
011c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
011d e5fe | | Load 0x2,-0x2
011e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
011f 00e3 | | Load_Encached Natural_Cache
0120 03f1 | | Declare_Variable Discrete,With_Value
0121 BODY_0118:
0121 4800 |H | Short_Literal 0x0
0122 a5fd | | Store_Unchecked 0x2,-0x3
0123 00cf | | Action Mark_Auxiliary
0124 783e |x> | Jump 0x163
0125 00da | | Load_Top At_Offset_2
0126 e5fe | | Load 0x2,-0x2
0127 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0128 01d7 | | Execute Vector,Field_Read
0129 e5ff | | Load 0x2,-0x1
012a 01d7 | | Execute Vector,Field_Read
012b 4608 |F | Jump_Case 0x8
012c 7832 |x2 | Jump 0x15f ; case 0x0
012d 7831 |x1 | Jump 0x15f ; case 0x1
012e 7830 |x0 | Jump 0x15f ; case 0x2
012f 782f |x/ | Jump 0x15f ; case 0x3
0130 780a |x | Jump 0x13b ; case 0x4
0131 7812 |x | Jump 0x144 ; case 0x5
0132 781a |x | Jump 0x14d ; case 0x6
0133 7822 |x" | Jump 0x156 ; case 0x7
0134 7800 |x | Jump 0x135 ; case 0x8
0135 00da | | Load_Top At_Offset_2
0136 e5fe | | Load 0x2,-0x2
0137 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0138 01d7 | | Execute Vector,Field_Read
0139 a5fd | | Store_Unchecked 0x2,-0x3
013a 782c |x, | Jump 0x167
013b 00da | | Load_Top At_Offset_2
013c e5fe | | Load 0x2,-0x2
013d 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
013e 01d7 | | Execute Vector,Field_Read
013f a5fd | | Store_Unchecked 0x2,-0x3
0140 00da | | Load_Top At_Offset_2
0141 0a01 | | Execute_Immediate Plus,0x1
0142 005b | [ | Store_Top Discrete,At_Offset_3
0143 7823 |x# | Jump 0x167
0144 00da | | Load_Top At_Offset_2
0145 e5fe | | Load 0x2,-0x2
0146 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0147 01d7 | | Execute Vector,Field_Read
0148 a5fd | | Store_Unchecked 0x2,-0x3
0149 00da | | Load_Top At_Offset_2
014a 0a01 | | Execute_Immediate Plus,0x1
014b 005b | [ | Store_Top Discrete,At_Offset_3
014c 781a |x | Jump 0x167
014d 00da | | Load_Top At_Offset_2
014e e5fe | | Load 0x2,-0x2
014f 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0150 01d7 | | Execute Vector,Field_Read
0151 a5fd | | Store_Unchecked 0x2,-0x3
0152 00da | | Load_Top At_Offset_2
0153 0a01 | | Execute_Immediate Plus,0x1
0154 005b | [ | Store_Top Discrete,At_Offset_3
0155 7811 |x | Jump 0x167
0156 00da | | Load_Top At_Offset_2
0157 e5fe | | Load 0x2,-0x2
0158 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0159 01d7 | | Execute Vector,Field_Read
015a a5fd | | Store_Unchecked 0x2,-0x3
015b 00da | | Load_Top At_Offset_2
015c 0a01 | | Execute_Immediate Plus,0x1
015d 005b | [ | Store_Top Discrete,At_Offset_3
015e 7808 |x | Jump 0x167
015f 00da | | Load_Top At_Offset_2
0160 0a01 | | Execute_Immediate Plus,0x1
0161 005b | [ | Store_Top Discrete,At_Offset_3
0162 00c9 | | Action Pop_Auxiliary_Loop
0163 00da | | Load_Top At_Offset_2
0164 00da | | Load_Top At_Offset_2
0165 027a | z | Execute Discrete,Less_Equal
0166 77be |w | Jump_Nonzero 0x125
0167 00ce | | Action Pop_Auxiliary
0168 00d8 | | Load_Top At_Offset_0
0169 00da | | Load_Top At_Offset_2
016a 0272 | r | Execute Discrete,Minus
016b 0a01 | | Execute_Immediate Plus,0x1
016c e5fe | | Load 0x2,-0x2
016d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
016e 00d9 | | Load_Top At_Offset_1
016f 00d9 | | Load_Top At_Offset_1
0170 e5fe | | Load 0x2,-0x2
0171 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0172 01cf | | Execute Vector,Slice_Read
0173 4801 |H | Short_Literal 0x1
0174 e5fe | | Load 0x2,-0x2
0175 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0176 e5fe | | Load 0x2,-0x2
0177 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0178 01ce | | Execute Vector,Slice_Write
0179 4502 |E | Exit_Subprogram 0x2
017a 0000 0000 | | .BLANK 0000[0x6]
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 00e8 | | Load_Encached Character_Cache
0184 00db | | Load_Top At_Offset_3
0185 0229 | ) | Execute Access,All_Read
0186 e5fe | | Load 0x2,-0x2
0187 8217 | | Call 0x1,0x17
0188 00d1 | | Pop_Control Pop_Count_1
0189 c5fd | | Store 0x2,-0x3
018a 4503 |E | Exit_Subprogram 0x3
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0199 | | .CONST 0x0199 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0004 | | .CONST 0x0004 ; Number of locals
0193 INIT_0190:
0193 e20d | | Load 0x1,0xd
0194 0607 | | Execute_Immediate Set_Value_Unchecked,0x7
0195 e20d | | Load 0x1,0xd
0196 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0197 00e1 | | Load_Encached Boolean_Cache
0198 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0199 BODY_0190:
0199 00cf | | Action Mark_Auxiliary
019a e5fd | | Load 0x2,-0x3
019b 01d9 | | Execute Vector,Reverse_Bounds
019c 0263 | c | Execute Discrete,Above_Bound
019d 70bc |p | Jump_Nonzero 0x25a
019e 00d8 | | Load_Top At_Offset_0
019f e5fd | | Load 0x2,-0x3
01a0 01d7 | | Execute Vector,Field_Read
01a1 467f |F | Jump_Case 0x7f
01a2 787f |x | Jump 0x222 ; case 0x0
01a3 787e |x~ | Jump 0x222 ; case 0x1
01a4 787d |x} | Jump 0x222 ; case 0x2
01a5 787c |x| | Jump 0x222 ; case 0x3
01a6 787b |x{ | Jump 0x222 ; case 0x4
01a7 787a |xz | Jump 0x222 ; case 0x5
01a8 7879 |xy | Jump 0x222 ; case 0x6
01a9 7878 |xx | Jump 0x222 ; case 0x7
01aa 7877 |xw | Jump 0x222 ; case 0x8
01ab 7876 |xv | Jump 0x222 ; case 0x9
01ac 7875 |xu | Jump 0x222 ; case 0xa
01ad 7874 |xt | Jump 0x222 ; case 0xb
01ae 7873 |xs | Jump 0x222 ; case 0xc
01af 7872 |xr | Jump 0x222 ; case 0xd
01b0 7871 |xq | Jump 0x222 ; case 0xe
01b1 7870 |xp | Jump 0x222 ; case 0xf
01b2 786f |xo | Jump 0x222 ; case 0x10
01b3 786e |xn | Jump 0x222 ; case 0x11
01b4 786d |xm | Jump 0x222 ; case 0x12
01b5 786c |xl | Jump 0x222 ; case 0x13
01b6 786b |xk | Jump 0x222 ; case 0x14
01b7 786a |xj | Jump 0x222 ; case 0x15
01b8 7869 |xi | Jump 0x222 ; case 0x16
01b9 7868 |xh | Jump 0x222 ; case 0x17
01ba 7867 |xg | Jump 0x222 ; case 0x18
01bb 7866 |xf | Jump 0x222 ; case 0x19
01bc 7865 |xe | Jump 0x222 ; case 0x1a
01bd 7864 |xd | Jump 0x222 ; case 0x1b
01be 7863 |xc | Jump 0x222 ; case 0x1c
01bf 7862 |xb | Jump 0x222 ; case 0x1d
01c0 7861 |xa | Jump 0x222 ; case 0x1e
01c1 7860 |x` | Jump 0x222 ; case 0x1f
01c2 785f |x_ | Jump 0x222 ; case 0x20
01c3 785e |x^ | Jump 0x222 ; case 0x21
01c4 785d |x] | Jump 0x222 ; case 0x22
01c5 785c |x\ | Jump 0x222 ; case 0x23
01c6 785b |x[ | Jump 0x222 ; case 0x24
01c7 785a |xZ | Jump 0x222 ; case 0x25
01c8 7859 |xY | Jump 0x222 ; case 0x26
01c9 7858 |xX | Jump 0x222 ; case 0x27
01ca 7857 |xW | Jump 0x222 ; case 0x28
01cb 7856 |xV | Jump 0x222 ; case 0x29
01cc 7855 |xU | Jump 0x222 ; case 0x2a
01cd 7854 |xT | Jump 0x222 ; case 0x2b
01ce 7853 |xS | Jump 0x222 ; case 0x2c
01cf 7852 |xR | Jump 0x222 ; case 0x2d
01d0 7851 |xQ | Jump 0x222 ; case 0x2e
01d1 7850 |xP | Jump 0x222 ; case 0x2f
01d2 784f |xO | Jump 0x222 ; case 0x30
01d3 784e |xN | Jump 0x222 ; case 0x31
01d4 784d |xM | Jump 0x222 ; case 0x32
01d5 784c |xL | Jump 0x222 ; case 0x33
01d6 784b |xK | Jump 0x222 ; case 0x34
01d7 784a |xJ | Jump 0x222 ; case 0x35
01d8 7849 |xI | Jump 0x222 ; case 0x36
01d9 7848 |xH | Jump 0x222 ; case 0x37
01da 7847 |xG | Jump 0x222 ; case 0x38
01db 7846 |xF | Jump 0x222 ; case 0x39
01dc 7845 |xE | Jump 0x222 ; case 0x3a
01dd 7844 |xD | Jump 0x222 ; case 0x3b
01de 7843 |xC | Jump 0x222 ; case 0x3c
01df 7842 |xB | Jump 0x222 ; case 0x3d
01e0 7841 |xA | Jump 0x222 ; case 0x3e
01e1 7840 |x@ | Jump 0x222 ; case 0x3f
01e2 783f |x? | Jump 0x222 ; case 0x40
01e3 7845 |xE | Jump 0x229 ; case 0x41
01e4 783d |x= | Jump 0x222 ; case 0x42
01e5 783c |x< | Jump 0x222 ; case 0x43
01e6 783b |x; | Jump 0x222 ; case 0x44
01e7 783a |x: | Jump 0x222 ; case 0x45
01e8 7839 |x9 | Jump 0x222 ; case 0x46
01e9 7838 |x8 | Jump 0x222 ; case 0x47
01ea 7837 |x7 | Jump 0x222 ; case 0x48
01eb 7837 |x7 | Jump 0x223 ; case 0x49
01ec 7835 |x5 | Jump 0x222 ; case 0x4a
01ed 7834 |x4 | Jump 0x222 ; case 0x4b
01ee 785f |x_ | Jump 0x24e ; case 0x4c
01ef 7832 |x2 | Jump 0x222 ; case 0x4d
01f0 7831 |x1 | Jump 0x222 ; case 0x4e
01f1 7830 |x0 | Jump 0x222 ; case 0x4f
01f2 782f |x/ | Jump 0x222 ; case 0x50
01f3 782e |x. | Jump 0x222 ; case 0x51
01f4 7848 |xH | Jump 0x23d ; case 0x52
01f5 784a |xJ | Jump 0x240 ; case 0x53
01f6 782b |x+ | Jump 0x222 ; case 0x54
01f7 784b |xK | Jump 0x243 ; case 0x55
01f8 7829 |x) | Jump 0x222 ; case 0x56
01f9 7828 |x( | Jump 0x222 ; case 0x57
01fa 782b |x+ | Jump 0x226 ; case 0x58
01fb 7826 |x& | Jump 0x222 ; case 0x59
01fc 7825 |x% | Jump 0x222 ; case 0x5a
01fd 7824 |x$ | Jump 0x222 ; case 0x5b
01fe 7823 |x# | Jump 0x222 ; case 0x5c
01ff 7822 |x" | Jump 0x222 ; case 0x5d
0200 7821 |x! | Jump 0x222 ; case 0x5e
0201 7820 |x | Jump 0x222 ; case 0x5f
0202 781f |x | Jump 0x222 ; case 0x60
0203 7825 |x% | Jump 0x229 ; case 0x61
0204 781d |x | Jump 0x222 ; case 0x62
0205 781c |x | Jump 0x222 ; case 0x63
0206 781b |x | Jump 0x222 ; case 0x64
0207 781a |x | Jump 0x222 ; case 0x65
0208 7819 |x | Jump 0x222 ; case 0x66
0209 7818 |x | Jump 0x222 ; case 0x67
020a 7817 |x | Jump 0x222 ; case 0x68
020b 7817 |x | Jump 0x223 ; case 0x69
020c 7815 |x | Jump 0x222 ; case 0x6a
020d 7814 |x | Jump 0x222 ; case 0x6b
020e 783f |x? | Jump 0x24e ; case 0x6c
020f 7812 |x | Jump 0x222 ; case 0x6d
0210 7811 |x | Jump 0x222 ; case 0x6e
0211 7810 |x | Jump 0x222 ; case 0x6f
0212 780f |x | Jump 0x222 ; case 0x70
0213 780e |x | Jump 0x222 ; case 0x71
0214 7828 |x( | Jump 0x23d ; case 0x72
0215 782a |x* | Jump 0x240 ; case 0x73
0216 780b |x | Jump 0x222 ; case 0x74
0217 782b |x+ | Jump 0x243 ; case 0x75
0218 7809 |x | Jump 0x222 ; case 0x76
0219 7808 |x | Jump 0x222 ; case 0x77
021a 780b |x | Jump 0x226 ; case 0x78
021b 7806 |x | Jump 0x222 ; case 0x79
021c 7805 |x | Jump 0x222 ; case 0x7a
021d 7804 |x | Jump 0x222 ; case 0x7b
021e 7803 |x | Jump 0x222 ; case 0x7c
021f 7802 |x | Jump 0x222 ; case 0x7d
0220 7801 |x | Jump 0x222 ; case 0x7e
0221 7800 |x | Jump 0x222 ; case 0x7f
0222 08e2 | | Execute_Immediate Raise,0xe2
0223 4801 |H | Short_Literal 0x1
0224 a404 | | Store_Unchecked 0x2,0x4
0225 7832 |x2 | Jump 0x258
0226 4800 |H | Short_Literal 0x0
0227 a404 | | Store_Unchecked 0x2,0x4
0228 782f |x/ | Jump 0x258
0229 e403 | | Load 0x2,0x3
022a 4608 |F | Jump_Case 0x8
022b 780e |x | Jump 0x23a ; case 0x0
022c 782b |x+ | Jump 0x258 ; case 0x1
022d 7806 |x | Jump 0x234 ; case 0x2
022e 7808 |x | Jump 0x237 ; case 0x3
022f 7828 |x( | Jump 0x258 ; case 0x4
0230 7827 |x' | Jump 0x258 ; case 0x5
0231 7826 |x& | Jump 0x258 ; case 0x6
0232 7825 |x% | Jump 0x258 ; case 0x7
0233 7824 |x$ | Jump 0x258 ; case 0x8
0234 4805 |H | Short_Literal 0x5
0235 a402 | | Store_Unchecked 0x2,0x2
0236 7821 |x! | Jump 0x258
0237 4806 |H | Short_Literal 0x6
0238 a402 | | Store_Unchecked 0x2,0x2
0239 781e |x | Jump 0x258
023a 4804 |H | Short_Literal 0x4
023b a402 | | Store_Unchecked 0x2,0x2
023c 781b |x | Jump 0x258
023d 4808 |H | Short_Literal 0x8
023e a402 | | Store_Unchecked 0x2,0x2
023f 7818 |x | Jump 0x258
0240 4807 |H | Short_Literal 0x7
0241 a402 | | Store_Unchecked 0x2,0x2
0242 7815 |x | Jump 0x258
0243 4802 |H | Short_Literal 0x2
0244 a403 | | Store_Unchecked 0x2,0x3
0245 e402 | | Load 0x2,0x2
0246 0e08 | | Execute_Immediate Not_Equal,0x8
0247 6810 |h | Jump_Zero 0x258
0248 e402 | | Load 0x2,0x2
0249 0e07 | | Execute_Immediate Not_Equal,0x7
024a 680d |h | Jump_Zero 0x258
024b 4805 |H | Short_Literal 0x5
024c a402 | | Store_Unchecked 0x2,0x2
024d 780a |x | Jump 0x258
024e 4803 |H | Short_Literal 0x3
024f a403 | | Store_Unchecked 0x2,0x3
0250 e402 | | Load 0x2,0x2
0251 0e08 | | Execute_Immediate Not_Equal,0x8
0252 6805 |h | Jump_Zero 0x258
0253 e402 | | Load 0x2,0x2
0254 0e07 | | Execute_Immediate Not_Equal,0x7
0255 6802 |h | Jump_Zero 0x258
0256 4806 |H | Short_Literal 0x6
0257 a402 | | Store_Unchecked 0x2,0x2
0258 00c8 | | Action Pop_Auxiliary_Range
0259 3f44 |?D | Loop_Increasing 0x19e
025a 00ce | | Action Pop_Auxiliary
025b 00d8 | | Load_Top At_Offset_0
025c 680f |h | Jump_Zero 0x26c
025d e5fc | | Load 0x2,-0x4
025e 00d8 | | Load_Top At_Offset_0
025f 0335 | 5 | Declare_Variable Array,Duplicate
0260 00cd | | Action Spare6_Action
0261 487f |H | Short_Literal 0x7f
0262 4800 |H | Short_Literal 0x0
0263 e403 | | Load 0x2,0x3
0264 00d9 | | Load_Top At_Offset_1
0265 e406 | | Load 0x2,0x6
0266 01d6 | | Execute Vector,Field_Write
0267 3ffb |? | Loop_Increasing 0x263
0268 00cd | | Action Spare6_Action
0269 e5fc | | Load 0x2,-0x4
026a 01d4 | | Execute Vector,Structure_Write
026b 780e |x | Jump 0x27a
026c e5fc | | Load 0x2,-0x4
026d 00d8 | | Load_Top At_Offset_0
026e 0335 | 5 | Declare_Variable Array,Duplicate
026f 00cd | | Action Spare6_Action
0270 487f |H | Short_Literal 0x7f
0271 4800 |H | Short_Literal 0x0
0272 e402 | | Load 0x2,0x2
0273 00d9 | | Load_Top At_Offset_1
0274 e406 | | Load 0x2,0x6
0275 01d6 | | Execute Vector,Field_Write
0276 3ffb |? | Loop_Increasing 0x272
0277 00cd | | Action Spare6_Action
0278 e5fc | | Load 0x2,-0x4
0279 01d4 | | Execute Vector,Structure_Write
027a 00cf | | Action Mark_Auxiliary
027b e5fe | | Load 0x2,-0x2
027c 01d9 | | Execute Vector,Reverse_Bounds
027d 0263 | c | Execute Discrete,Above_Bound
027e 7008 |p | Jump_Nonzero 0x287
027f 4801 |H | Short_Literal 0x1
0280 00d9 | | Load_Top At_Offset_1
0281 e5fe | | Load 0x2,-0x2
0282 01d7 | | Execute Vector,Field_Read
0283 e5fc | | Load 0x2,-0x4
0284 01d6 | | Execute Vector,Field_Write
0285 00c8 | | Action Pop_Auxiliary_Range
0286 3ff8 |? | Loop_Increasing 0x27f
0287 00ce | | Action Pop_Auxiliary
0288 00d8 | | Load_Top At_Offset_0
0289 680f |h | Jump_Zero 0x299
028a 00cf | | Action Mark_Auxiliary
028b e5ff | | Load 0x2,-0x1
028c 01d9 | | Execute Vector,Reverse_Bounds
028d 0263 | c | Execute Discrete,Above_Bound
028e 7008 |p | Jump_Nonzero 0x297
028f e402 | | Load 0x2,0x2
0290 00d9 | | Load_Top At_Offset_1
0291 e5ff | | Load 0x2,-0x1
0292 01d7 | | Execute Vector,Field_Read
0293 e5fc | | Load 0x2,-0x4
0294 01d6 | | Execute Vector,Field_Write
0295 00c8 | | Action Pop_Auxiliary_Range
0296 3ff8 |? | Loop_Increasing 0x28f
0297 00ce | | Action Pop_Auxiliary
0298 4504 |E | Exit_Subprogram 0x4
0299 00cf | | Action Mark_Auxiliary
029a e5ff | | Load 0x2,-0x1
029b 01d9 | | Execute Vector,Reverse_Bounds
029c 0263 | c | Execute Discrete,Above_Bound
029d 7008 |p | Jump_Nonzero 0x2a6
029e e403 | | Load 0x2,0x3
029f 00d9 | | Load_Top At_Offset_1
02a0 e5ff | | Load 0x2,-0x1
02a1 01d7 | | Execute Vector,Field_Read
02a2 e5fc | | Load 0x2,-0x4
02a3 01d6 | | Execute Vector,Field_Write
02a4 00c8 | | Action Pop_Auxiliary_Range
02a5 3ff8 |? | Loop_Increasing 0x29e
02a6 00ce | | Action Pop_Auxiliary
02a7 4504 |E | Exit_Subprogram 0x4
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b4 | | .CONST 0x02b4 ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0004 | | .CONST 0x0004 ; Number of locals
02ab INIT_02a8:
02ab 00da | | Load_Top At_Offset_2
02ac 00e3 | | Load_Encached Natural_Cache
02ad 03f1 | | Declare_Variable Discrete,With_Value
02ae 00e3 | | Load_Encached Natural_Cache
02af 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
02b0 e5fc | | Load 0x2,-0x4
02b1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02b2 00e3 | | Load_Encached Natural_Cache
02b3 03f1 | | Declare_Variable Discrete,With_Value
02b4 BODY_02a8:
02b4 4800 |H | Short_Literal 0x0
02b5 a5fb | | Store_Unchecked 0x2,-0x5
02b6 00d8 | | Load_Top At_Offset_0
02b7 e5fd | | Load 0x2,-0x3
02b8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02b9 027d | } | Execute Discrete,Greater
02ba 6803 |h | Jump_Zero 0x2be
02bb e5fd | | Load 0x2,-0x3
02bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02bd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02be 00cf | | Action Mark_Auxiliary
02bf 7894 |x | Jump 0x354
02c0 00da | | Load_Top At_Offset_2
02c1 e5fc | | Load 0x2,-0x4
02c2 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02c3 01d7 | | Execute Vector,Field_Read
02c4 e5fe | | Load 0x2,-0x2
02c5 01d7 | | Execute Vector,Field_Read
02c6 4608 |F | Jump_Case 0x8
02c7 780f |x | Jump 0x2d7 ; case 0x0
02c8 7887 |x | Jump 0x350 ; case 0x1
02c9 7819 |x | Jump 0x2e3 ; case 0x2
02ca 7827 |x' | Jump 0x2f2 ; case 0x3
02cb 7835 |x5 | Jump 0x301 ; case 0x4
02cc 7849 |xI | Jump 0x316 ; case 0x5
02cd 7860 |x` | Jump 0x32e ; case 0x6
02ce 7877 |xw | Jump 0x346 ; case 0x7
02cf 7800 |x | Jump 0x2d0 ; case 0x8
02d0 00da | | Load_Top At_Offset_2
02d1 e5fc | | Load 0x2,-0x4
02d2 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02d3 01d7 | | Execute Vector,Field_Read
02d4 a5fb | | Store_Unchecked 0x2,-0x5
02d5 00ce | | Action Pop_Auxiliary
02d6 78ca |x | Jump 0x3a1
02d7 00db | | Load_Top At_Offset_3
02d8 0a01 | | Execute_Immediate Plus,0x1
02d9 c402 | | Store 0x2,0x2
02da 00da | | Load_Top At_Offset_2
02db e5fc | | Load 0x2,-0x4
02dc 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02dd 01d7 | | Execute Vector,Field_Read
02de e402 | | Load 0x2,0x2
02df e5fd | | Load 0x2,-0x3
02e0 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02e1 01d6 | | Execute Vector,Field_Write
02e2 786d |xm | Jump 0x350
02e3 00db | | Load_Top At_Offset_3
02e4 0a01 | | Execute_Immediate Plus,0x1
02e5 c402 | | Store 0x2,0x2
02e6 00da | | Load_Top At_Offset_2
02e7 e5fc | | Load 0x2,-0x4
02e8 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02e9 01d7 | | Execute Vector,Field_Read
02ea e001 | | Load 0x0,0x1
02eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ec 01d7 | | Execute Vector,Field_Read
02ed e402 | | Load 0x2,0x2
02ee e5fd | | Load 0x2,-0x3
02ef 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02f0 01d6 | | Execute Vector,Field_Write
02f1 785e |x^ | Jump 0x350
02f2 00db | | Load_Top At_Offset_3
02f3 0a01 | | Execute_Immediate Plus,0x1
02f4 c402 | | Store 0x2,0x2
02f5 00da | | Load_Top At_Offset_2
02f6 e5fc | | Load 0x2,-0x4
02f7 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02f8 01d7 | | Execute Vector,Field_Read
02f9 e001 | | Load 0x0,0x1
02fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fb 01d7 | | Execute Vector,Field_Read
02fc e402 | | Load 0x2,0x2
02fd e5fd | | Load 0x2,-0x3
02fe 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
02ff 01d6 | | Execute Vector,Field_Write
0300 784f |xO | Jump 0x350
0301 00db | | Load_Top At_Offset_3
0302 0a01 | | Execute_Immediate Plus,0x1
0303 c402 | | Store 0x2,0x2
0304 00da | | Load_Top At_Offset_2
0305 e5fc | | Load 0x2,-0x4
0306 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0307 01d7 | | Execute Vector,Field_Read
0308 e402 | | Load 0x2,0x2
0309 e5fd | | Load 0x2,-0x3
030a 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
030b 01d6 | | Execute Vector,Field_Write
030c 00da | | Load_Top At_Offset_2
030d e5fc | | Load 0x2,-0x4
030e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
030f 01d7 | | Execute Vector,Field_Read
0310 a5fb | | Store_Unchecked 0x2,-0x5
0311 00da | | Load_Top At_Offset_2
0312 0a01 | | Execute_Immediate Plus,0x1
0313 005b | [ | Store_Top Discrete,At_Offset_3
0314 00ce | | Action Pop_Auxiliary
0315 788b |x | Jump 0x3a1
0316 00db | | Load_Top At_Offset_3
0317 0a01 | | Execute_Immediate Plus,0x1
0318 c402 | | Store 0x2,0x2
0319 00da | | Load_Top At_Offset_2
031a e5fc | | Load 0x2,-0x4
031b 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
031c 01d7 | | Execute Vector,Field_Read
031d e001 | | Load 0x0,0x1
031e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
031f 01d7 | | Execute Vector,Field_Read
0320 e402 | | Load 0x2,0x2
0321 e5fd | | Load 0x2,-0x3
0322 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0323 01d6 | | Execute Vector,Field_Write
0324 00da | | Load_Top At_Offset_2
0325 e5fc | | Load 0x2,-0x4
0326 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0327 01d7 | | Execute Vector,Field_Read
0328 a5fb | | Store_Unchecked 0x2,-0x5
0329 00da | | Load_Top At_Offset_2
032a 0a01 | | Execute_Immediate Plus,0x1
032b 005b | [ | Store_Top Discrete,At_Offset_3
032c 00ce | | Action Pop_Auxiliary
032d 7873 |xs | Jump 0x3a1
032e 00db | | Load_Top At_Offset_3
032f 0a01 | | Execute_Immediate Plus,0x1
0330 c402 | | Store 0x2,0x2
0331 00da | | Load_Top At_Offset_2
0332 e5fc | | Load 0x2,-0x4
0333 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0334 01d7 | | Execute Vector,Field_Read
0335 e001 | | Load 0x0,0x1
0336 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0337 01d7 | | Execute Vector,Field_Read
0338 e402 | | Load 0x2,0x2
0339 e5fd | | Load 0x2,-0x3
033a 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
033b 01d6 | | Execute Vector,Field_Write
033c 00da | | Load_Top At_Offset_2
033d e5fc | | Load 0x2,-0x4
033e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
033f 01d7 | | Execute Vector,Field_Read
0340 a5fb | | Store_Unchecked 0x2,-0x5
0341 00da | | Load_Top At_Offset_2
0342 0a01 | | Execute_Immediate Plus,0x1
0343 005b | [ | Store_Top Discrete,At_Offset_3
0344 00ce | | Action Pop_Auxiliary
0345 785b |x[ | Jump 0x3a1
0346 00da | | Load_Top At_Offset_2
0347 e5fc | | Load 0x2,-0x4
0348 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0349 01d7 | | Execute Vector,Field_Read
034a a5fb | | Store_Unchecked 0x2,-0x5
034b 00da | | Load_Top At_Offset_2
034c 0a01 | | Execute_Immediate Plus,0x1
034d 005b | [ | Store_Top Discrete,At_Offset_3
034e 00ce | | Action Pop_Auxiliary
034f 7851 |xQ | Jump 0x3a1
0350 00da | | Load_Top At_Offset_2
0351 0a01 | | Execute_Immediate Plus,0x1
0352 005b | [ | Store_Top Discrete,At_Offset_3
0353 00c9 | | Action Pop_Auxiliary_Loop
0354 00da | | Load_Top At_Offset_2
0355 00da | | Load_Top At_Offset_2
0356 027a | z | Execute Discrete,Less_Equal
0357 7768 |wh | Jump_Nonzero 0x2c0
0358 00ce | | Action Pop_Auxiliary
0359 e5fc | | Load 0x2,-0x4
035a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
035b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
035c 00cf | | Action Mark_Auxiliary
035d 783e |x> | Jump 0x39c
035e 00da | | Load_Top At_Offset_2
035f e5fc | | Load 0x2,-0x4
0360 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0361 01d7 | | Execute Vector,Field_Read
0362 e5fe | | Load 0x2,-0x2
0363 01d7 | | Execute Vector,Field_Read
0364 4608 |F | Jump_Case 0x8
0365 7832 |x2 | Jump 0x398 ; case 0x0
0366 7831 |x1 | Jump 0x398 ; case 0x1
0367 7830 |x0 | Jump 0x398 ; case 0x2
0368 782f |x/ | Jump 0x398 ; case 0x3
0369 780a |x | Jump 0x374 ; case 0x4
036a 7812 |x | Jump 0x37d ; case 0x5
036b 781a |x | Jump 0x386 ; case 0x6
036c 7822 |x" | Jump 0x38f ; case 0x7
036d 7800 |x | Jump 0x36e ; case 0x8
036e 00da | | Load_Top At_Offset_2
036f e5fc | | Load 0x2,-0x4
0370 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0371 01d7 | | Execute Vector,Field_Read
0372 a5fb | | Store_Unchecked 0x2,-0x5
0373 782c |x, | Jump 0x3a0
0374 00da | | Load_Top At_Offset_2
0375 e5fc | | Load 0x2,-0x4
0376 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0377 01d7 | | Execute Vector,Field_Read
0378 a5fb | | Store_Unchecked 0x2,-0x5
0379 00da | | Load_Top At_Offset_2
037a 0a01 | | Execute_Immediate Plus,0x1
037b 005b | [ | Store_Top Discrete,At_Offset_3
037c 7823 |x# | Jump 0x3a0
037d 00da | | Load_Top At_Offset_2
037e e5fc | | Load 0x2,-0x4
037f 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0380 01d7 | | Execute Vector,Field_Read
0381 a5fb | | Store_Unchecked 0x2,-0x5
0382 00da | | Load_Top At_Offset_2
0383 0a01 | | Execute_Immediate Plus,0x1
0384 005b | [ | Store_Top Discrete,At_Offset_3
0385 781a |x | Jump 0x3a0
0386 00da | | Load_Top At_Offset_2
0387 e5fc | | Load 0x2,-0x4
0388 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0389 01d7 | | Execute Vector,Field_Read
038a a5fb | | Store_Unchecked 0x2,-0x5
038b 00da | | Load_Top At_Offset_2
038c 0a01 | | Execute_Immediate Plus,0x1
038d 005b | [ | Store_Top Discrete,At_Offset_3
038e 7811 |x | Jump 0x3a0
038f 00da | | Load_Top At_Offset_2
0390 e5fc | | Load 0x2,-0x4
0391 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0392 01d7 | | Execute Vector,Field_Read
0393 a5fb | | Store_Unchecked 0x2,-0x5
0394 00da | | Load_Top At_Offset_2
0395 0a01 | | Execute_Immediate Plus,0x1
0396 005b | [ | Store_Top Discrete,At_Offset_3
0397 7808 |x | Jump 0x3a0
0398 00da | | Load_Top At_Offset_2
0399 0a01 | | Execute_Immediate Plus,0x1
039a 005b | [ | Store_Top Discrete,At_Offset_3
039b 00c9 | | Action Pop_Auxiliary_Loop
039c 00da | | Load_Top At_Offset_2
039d 00da | | Load_Top At_Offset_2
039e 027a | z | Execute Discrete,Less_Equal
039f 77be |w | Jump_Nonzero 0x35e
03a0 00ce | | Action Pop_Auxiliary
03a1 e5fc | | Load 0x2,-0x4
03a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03a3 00da | | Load_Top At_Offset_2
03a4 0272 | r | Execute Discrete,Minus
03a5 0a01 | | Execute_Immediate Plus,0x1
03a6 0059 | Y | Store_Top Discrete,At_Offset_1
03a7 00d9 | | Load_Top At_Offset_1
03a8 e5fc | | Load 0x2,-0x4
03a9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03aa e5fc | | Load 0x2,-0x4
03ab 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
03ac 01cf | | Execute Vector,Slice_Read
03ad 4801 |H | Short_Literal 0x1
03ae 00da | | Load_Top At_Offset_2
03af e5fc | | Load 0x2,-0x4
03b0 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
03b1 01ce | | Execute Vector,Slice_Write
03b2 00d8 | | Load_Top At_Offset_0
03b3 e5fc | | Load 0x2,-0x4
03b4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03b5 00da | | Load_Top At_Offset_2
03b6 e5fd | | Load 0x2,-0x3
03b7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03b8 4503 |E | Exit_Subprogram 0x3
03b9 ; --------------------------------------------------------------------------------------
03b9 ; STRING TABLE
03b9 ; --------------------------------------------------------------------------------------
03b9 0014 | | .STRTAB 0x0014->0x03c3 ; "SA_TRANSFER"
03ba 001d | | .STRTAB 0x001d->0x03c8 ; "SA_SKIP"
03bb 0022 | " | .STRTAB 0x0022->0x03cc ; "SA_TRANSFER_UC"
03bc 002e | . | .STRTAB 0x002e->0x03d3 ; "SA_TRANSFER_LC"
03bd 003a | : | .STRTAB 0x003a->0x03da ; "SA_TRANSFER_BREAK"
03be 0049 | I | .STRTAB 0x0049->0x03e2 ; "SA_TRANSFER_UC_BREAK"
03bf 005b | [ | .STRTAB 0x005b->0x03ec ; "SA_TRANSFER_LC_BREAK"
03c0 006d | m | .STRTAB 0x006d->0x03f6 ; "SA_SKIP_BREAK"
03c1 0078 | x | .STRTAB 0x0078->0x03fd ; "SA_RETAIN_BREAK"
03c2 0085 | | .STREND 0x0085->0x0404
03c3 5341 5f54 |SA_T| .STRTAB_STRINGS
0405 0000 0000 | | .XXX[0x3]
0407 0000 | |
0408 ; --------------------------------------------------------------------------------------
0408 ; Debug Table
0408 ; --------------------------------------------------------------------------------------
0408 0004 0008 | | .DEBUG4 0x0004,0x0008,0xa940,0x0000,0x0001,0x0000
040e 0004 20e0 | | .XXX[0x1d]
0410 004d 8000 | M |
0412 0000 6d0e | m |
0414 8020 0100 | |
0416 011a 0000 | |
0418 0003 4f00 | O |
041a 0004 0000 | |
041c 0006 0050 | P|
041e 0000 0010 | |
0420 0000 0400 | |
0422 0000 2200 | " |
0424 0000 0010 | |
0426 0000 00a4 | |
0428 0000 1017 | |
042a 5160 |Q` |
042b 0000 0000 | | .BLANK 0000[0x1c]
0447 6e8f d41c |n | .XXX[0x1d]
0449 0009 b400 | |
044b 0000 0da1 | |
044d d004 0020 | |
044f 0023 4000 | #@ |
0451 0000 6a00 | j |
0453 0000 8000 | |
0455 0000 c00a | |
0457 0000 0002 | |
0459 0000 0080 | |
045b 0000 0440 | @|
045d 0000 0002 | |
045f 0000 0014 | |
0461 8000 0202 | |
0463 ea2e | . |
0464 0000 0000 | | .BLANK 0000[0x1c]
0480 0dd1 fa83 | | .XXX[0x1d]
0482 8001 3700 | 7 |
0484 0000 01b4 | |
0486 3a00 8004 |: |
0488 0004 6800 | h |
048a 0000 0d46 | F|
048c 0000 1000 | |
048e 0000 1801 | |
0490 4000 0000 |@ |
0492 4000 0010 |@ |
0494 0000 0088 | |
0496 0000 0000 | |
0498 4000 0002 |@ |
049a 9000 0040 | @|
049c 5d46 |]F |
049d 0000 0000 | | .BLANK 0000[0x1c]
04b9 01ba 3f50 | ?P| .XXX[0x1e]
04bb 7000 26f0 |p & |
04bd 0000 0036 | 6|
04bf 8740 1000 | @ |
04c1 8000 8d00 | |
04c3 0000 01a9 | |
04c5 4000 0200 |@ |
04c7 0000 0300 | |
04c9 2800 0000 |( |
04cb 0800 0002 | |
04cd 0000 0011 | |
04cf 0000 0000 | |
04d1 0800 0000 | |
04d3 5200 0008 |R |
04d5 0ba8 c800 | |
04d7 0000 0000 | | .BLANK 0000[0x1b]
04f2 0037 47e8 | 7G | .XXX[0x2]
04f4 0000 0000 | | .BLANK 0000[0xd]
0501 0020 0500 | | .XXX[0xc]
0503 0000 0000 | |
0505 0000 4000 | @ |
0507 0002 2000 | |
0509 0000 0100 | |
050b 0000 0a00 | |
050d 0000 0000 | | .BLANK 0000[0x2d]
053a 0004 00a0 | | .XXX[0xc]
053c 0000 0000 | |
053e 0000 0800 | |
0540 0000 4400 | D |
0542 0000 0020 | |
0544 0000 0140 | @|
0546 0000 0000 | | .BLANK 0000[0x2e]
0574 8014 0000 | | .XXX[0xb]
0576 0000 0000 | |
0578 0100 0000 | |
057a 0880 0000 | |
057c 0004 0000 | |
057e 0028 | ( |
057f 0000 0000 | | .BLANK 0000[0x2e]
05ad 1002 8000 | | .XXX[0xb]
05af 0000 0000 | |
05b1 0020 0000 | |
05b3 0110 0000 | |
05b5 0000 8000 | |
05b7 0005 | |
05b8 0000 0000 | | .BLANK 0000[0x48]