|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_043cfb
└─⟦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 0328 | ( | .CONST 0x0328 ; 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 00e4 | | .CONST 0x00e4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0057 | W | .CONST 0x0057 ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache
000c 4800 |H | Short_Literal 0x0
000d 4800 |H | Short_Literal 0x0
000e 4801 |H | Short_Literal 0x1
000f 4804 |H | Short_Literal 0x4
0010 0319 | | Declare_Type Variant_Record,Incomplete,Visible
0011 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call
0013 00d9 | | Load_Top At_Offset_1
0014 012a | * | Execute Any,Change_Utility
0015 0007 | | Action Break_Optional
0016 4800 |H | Short_Literal 0x0
0017 48ff |H | Short_Literal 0xff
0018 00e3 | | Load_Encached Natural_Cache
0019 03f9 | | Declare_Type Discrete,Constrained,Visible
001a 4800 |H | Short_Literal 0x0
001b 6100 |a | Indirect_Literal Discrete,0x11c,{0x00000000, 0x0000ffff}
001c 00e3 | | Load_Encached Natural_Cache
001d 03f9 | | Declare_Type Discrete,Constrained,Visible
001e 00d8 | | Load_Top At_Offset_0
001f 0129 | ) | Execute Any,Make_Visible
0020 e001 | | Load 0x0,0x1
0021 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0022 0129 | ) | Execute Any,Make_Visible
0023 e001 | | Load 0x0,0x1
0024 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0025 0129 | ) | Execute Any,Make_Visible
0026 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0028 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
002a 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
002c 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
002e 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0030 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
0032 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
0034 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
0036 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0038 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
003a 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
003c 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
003e 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated
0040 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
0042 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0044 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0046 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
0048 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated
004a 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated
004c 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
004e 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
0050 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated
0052 e215 | | Load 0x1,0x15
0053 02a0 | | Declare_Subprogram Null_Subprogram
0054 4818 |H | Short_Literal 0x18
0055 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0056 00e3 | | Load_Encached Natural_Cache
0057 00e3 | | Load_Encached Natural_Cache
0058 00da | | Load_Top At_Offset_2
0059 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call
005b 4800 |H | Short_Literal 0x0
005c 4803 |H | Short_Literal 0x3
005d e210 | | Load 0x1,0x10
005e 0307 | | Complete_Type Variant_Record,By_Defining
005f 00bf | | Action Accept_Activation
0060 e002 | | Load 0x0,0x2
0061 190e | | Execute Package,Field_Reference,Field_Number 0xe
0062 0007 | | Action Break_Optional
0063 e002 | | Load 0x0,0x2
0064 190d | | Execute Package,Field_Reference,Field_Number 0xd
0065 0007 | | Action Break_Optional
0066 e003 | | Load 0x0,0x3
0067 190e | | Execute Package,Field_Reference,Field_Number 0xe
0068 00c6 | | Action Check_Subprogram_Elaborated
0069 00e6 | | Load_Encached Float_Cache
006a e004 | | Load 0x0,0x4
006b e005 | | Load 0x0,0x5
006c 4800 |H | Short_Literal 0x0
006d 0007 | | Action Break_Optional
006e e003 | | Load 0x0,0x3
006f 190e | | Execute Package,Field_Reference,Field_Number 0xe
0070 00c6 | | Action Check_Subprogram_Elaborated
0071 e211 | | Load 0x1,0x11
0072 e006 | | Load 0x0,0x6
0073 e007 | | Load 0x0,0x7
0074 4800 |H | Short_Literal 0x0
0075 0007 | | Action Break_Optional
0076 e003 | | Load 0x0,0x3
0077 190e | | Execute Package,Field_Reference,Field_Number 0xe
0078 00c6 | | Action Check_Subprogram_Elaborated
0079 e212 | | Load 0x1,0x12
007a e008 | | Load 0x0,0x8
007b e009 | | Load 0x0,0x9
007c 4800 |H | Short_Literal 0x0
007d 0007 | | Action Break_Optional
007e e003 | | Load 0x0,0x3
007f 190e | | Execute Package,Field_Reference,Field_Number 0xe
0080 00c6 | | Action Check_Subprogram_Elaborated
0081 00e2 | | Load_Encached Integer_Cache
0082 e00a | | Load 0x0,0xa
0083 e00b | | Load 0x0,0xb
0084 4800 |H | Short_Literal 0x0
0085 0007 | | Action Break_Optional
0086 e003 | | Load 0x0,0x3
0087 190e | | Execute Package,Field_Reference,Field_Number 0xe
0088 00c6 | | Action Check_Subprogram_Elaborated
0089 00e5 | | Load_Encached Long_Integer_Cache
008a e00c | | Load 0x0,0xc
008b e00d | | Load 0x0,0xd
008c 4800 |H | Short_Literal 0x0
008d 0007 | | Action Break_Optional
008e e003 | | Load 0x0,0x3
008f 190f | | Execute Package,Field_Reference,Field_Number 0xf
0090 00c6 | | Action Check_Subprogram_Elaborated
0091 00e6 | | Load_Encached Float_Cache
0092 e00e | | Load 0x0,0xe
0093 e00f | | Load 0x0,0xf
0094 4800 |H | Short_Literal 0x0
0095 0007 | | Action Break_Optional
0096 e003 | | Load 0x0,0x3
0097 190f | | Execute Package,Field_Reference,Field_Number 0xf
0098 00c6 | | Action Check_Subprogram_Elaborated
0099 e211 | | Load 0x1,0x11
009a e010 | | Load 0x0,0x10
009b e011 | | Load 0x0,0x11
009c 4800 |H | Short_Literal 0x0
009d 0007 | | Action Break_Optional
009e e003 | | Load 0x0,0x3
009f 190f | | Execute Package,Field_Reference,Field_Number 0xf
00a0 00c6 | | Action Check_Subprogram_Elaborated
00a1 e212 | | Load 0x1,0x12
00a2 e012 | | Load 0x0,0x12
00a3 e013 | | Load 0x0,0x13
00a4 4800 |H | Short_Literal 0x0
00a5 0007 | | Action Break_Optional
00a6 e003 | | Load 0x0,0x3
00a7 190f | | Execute Package,Field_Reference,Field_Number 0xf
00a8 00c6 | | Action Check_Subprogram_Elaborated
00a9 00e2 | | Load_Encached Integer_Cache
00aa e014 | | Load 0x0,0x14
00ab e015 | | Load 0x0,0x15
00ac 4800 |H | Short_Literal 0x0
00ad 0007 | | Action Break_Optional
00ae e003 | | Load 0x0,0x3
00af 190f | | Execute Package,Field_Reference,Field_Number 0xf
00b0 00c6 | | Action Check_Subprogram_Elaborated
00b1 00e5 | | Load_Encached Long_Integer_Cache
00b2 e016 | | Load 0x0,0x16
00b3 e017 | | Load 0x0,0x17
00b4 4800 |H | Short_Literal 0x0
00b5 0007 | | Action Break_Optional
00b6 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00b7 00c7 | | Action Elaborate_Subprogram
00b8 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b9 00c7 | | Action Elaborate_Subprogram
00ba 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call
00bc 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00bd 00c7 | | Action Elaborate_Subprogram
00be 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00bf 00c7 | | Action Elaborate_Subprogram
00c0 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00c1 00c7 | | Action Elaborate_Subprogram
00c2 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00c3 00c7 | | Action Elaborate_Subprogram
00c4 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00c5 00c7 | | Action Elaborate_Subprogram
00c6 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00c7 00c7 | | Action Elaborate_Subprogram
00c8 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00c9 00c7 | | Action Elaborate_Subprogram
00ca 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00cb 00c7 | | Action Elaborate_Subprogram
00cc 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00cd 00c7 | | Action Elaborate_Subprogram
00ce 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00cf 00c7 | | Action Elaborate_Subprogram
00d0 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00d1 00c7 | | Action Elaborate_Subprogram
00d2 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00d3 00c7 | | Action Elaborate_Subprogram
00d4 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00d5 00c7 | | Action Elaborate_Subprogram
00d6 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00d7 00c7 | | Action Elaborate_Subprogram
00d8 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00d9 00c7 | | Action Elaborate_Subprogram
00da 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00db 00c7 | | Action Elaborate_Subprogram
00dc 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00dd 00c7 | | Action Elaborate_Subprogram
00de 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00df 00c7 | | Action Elaborate_Subprogram
00e0 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00e1 00c7 | | Action Elaborate_Subprogram
00e2 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00e3 00c7 | | Action Elaborate_Subprogram
00e4 BODY_0008:
00e4 00bc | | Action Signal_Activated
00e5 00bb | | Action Signal_Completion
00e6 0000 0000 | | .XXX[0x2]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb BODY_00e8:
00eb INIT_00e8:
00eb INIT_00e8:
00eb 4608 |F | Jump_Case 0x9
00ec 7808 |x | Jump 0xf5 ; case 0x0
00ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00ee 7829 |x) | Jump 0x118 ; case 0x2
00ef 7828 |x( | Jump 0x118 ; case 0x3
00f0 7827 |x' | Jump 0x118 ; case 0x4
00f1 7826 |x& | Jump 0x118 ; case 0x5
00f2 7825 |x% | Jump 0x118 ; case 0x6
00f3 781c |x | Jump 0x110 ; case 0x7
00f4 781f |x | Jump 0x114 ; case 0x8
00f5 00da | | Load_Top At_Offset_2
00f6 016c | l | Execute Variant_Record,Is_Constrained
00f7 7009 |p | Jump_Nonzero 0x101
00f8 00cf | | Action Mark_Auxiliary
00f9 e20f | | Load 0x1,0xf
00fa e5ff | | Load 0x2,-0x1
00fb 1c08 | | Execute_Immediate Run_Utility,0x8
00fc 00d8 | | Load_Top At_Offset_0
00fd 1c00 | | Execute_Immediate Run_Utility,0x0
00fe c5ff | | Store 0x2,-0x1
00ff 00ce | | Action Pop_Auxiliary
0100 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0101 00da | | Load_Top At_Offset_2
0102 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0103 00db | | Load_Top At_Offset_3
0104 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0105 4800 |H | Short_Literal 0x0
0106 00db | | Load_Top At_Offset_3
0107 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0108 4801 |H | Short_Literal 0x1
0109 00db | | Load_Top At_Offset_3
010a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
010b e22c | , | Load 0x1,0x2c
010c 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
010d 00db | | Load_Top At_Offset_3
010e 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
010f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0110 00db | | Load_Top At_Offset_3
0111 e5ff | | Load 0x2,-0x1
0112 031b | | Declare_Type Variant_Record,Constrained
0113 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0114 00db | | Load_Top At_Offset_3
0115 00db | | Load_Top At_Offset_3
0116 02fc | | Declare_Variable Variant_Record,With_Constraint
0117 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0118 0869 | i | Execute_Immediate Raise,0x69
0119 0000 0000 | | .XXX[0x3]
011b 0000 | |
011c 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 4801 |H | Short_Literal 0x1
0124 00db | | Load_Top At_Offset_3
0125 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0126 e5ff | | Load 0x2,-0x1
0127 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0128 0227 | ' | Execute Access,All_Reference
0129 01cf | | Execute Vector,Slice_Read
012a 0335 | 5 | Declare_Variable Array,Duplicate
012b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0137 | 7 | .CONST 0x0137 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 e210 | | Load 0x1,0x10
0134 02ff | | Declare_Variable Variant_Record
0135 00d8 | | Load_Top At_Offset_0
0136 1c00 | | Execute_Immediate Run_Utility,0x0
0137 BODY_0130:
0137 e20f | | Load 0x1,0xf
0138 e210 | | Load 0x1,0x10
0139 1c08 | | Execute_Immediate Run_Utility,0x8
013a e5ff | | Load 0x2,-0x1
013b 01db | | Execute Vector,Length
013c 00d9 | | Load_Top At_Offset_1
013d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
013e e5ff | | Load 0x2,-0x1
013f 01db | | Execute Vector,Length
0140 00d9 | | Load_Top At_Offset_1
0141 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0142 4801 |H | Short_Literal 0x1
0143 e5ff | | Load 0x2,-0x1
0144 01db | | Execute Vector,Length
0145 e22c | , | Load 0x1,0x2c
0146 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
0147 00d9 | | Load_Top At_Offset_1
0148 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0149 00d9 | | Load_Top At_Offset_1
014a 016d | m | Execute Variant_Record,Structure_Write
014b 00db | | Load_Top At_Offset_3
014c 00d9 | | Load_Top At_Offset_1
014d 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
014e 0228 | ( | Execute Access,All_Write
014f 00d8 | | Load_Top At_Offset_0
0150 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0151 0000 0000 | | .BLANK 0000[0x7]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00db | | Load_Top At_Offset_3
015c 4801 |H | Short_Literal 0x1
015d 8257 | W | Call 0x1,0x57
015e 00d1 | | Pop_Control Pop_Count_1
015f 00db | | Load_Top At_Offset_3
0160 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0161 0a01 | | Execute_Immediate Plus,0x1
0162 e5fe | | Load 0x2,-0x2
0163 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0164 00da | | Load_Top At_Offset_2
0165 e5fe | | Load 0x2,-0x2
0166 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0167 e5fe | | Load 0x2,-0x2
0168 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0169 0227 | ' | Execute Access,All_Reference
016a 01d6 | | Execute Vector,Field_Write
016b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
016c 0000 0000 | | .BLANK 0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0175 | u | .CONST 0x0175 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0003 | | .CONST 0x0003 ; Number of locals
0173 INIT_0170:
0173 00e3 | | Load_Encached Natural_Cache
0174 00e3 | | Load_Encached Natural_Cache
0175 BODY_0170:
0175 e5fe | | Load 0x2,-0x2
0176 e5ff | | Load 0x2,-0x1
0177 01db | | Execute Vector,Length
0178 00e3 | | Load_Encached Natural_Cache
0179 025b | [ | Execute Discrete,Check_In_Type
017a 8257 | W | Call 0x1,0x57
017b 00d1 | | Pop_Control Pop_Count_1
017c e5fe | | Load 0x2,-0x2
017d 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
017e 0a01 | | Execute_Immediate Plus,0x1
017f 005a | Z | Store_Top Discrete,At_Offset_2
0180 00d9 | | Load_Top At_Offset_1
0181 e5ff | | Load 0x2,-0x1
0182 01db | | Execute Vector,Length
0183 0273 | s | Execute Discrete,Plus
0184 0aff | | Execute_Immediate Plus,-0x1
0185 0059 | Y | Store_Top Discrete,At_Offset_1
0186 e5fe | | Load 0x2,-0x2
0187 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0188 e5ff | | Load 0x2,-0x1
0189 01db | | Execute Vector,Length
018a 0273 | s | Execute Discrete,Plus
018b e5fe | | Load 0x2,-0x2
018c 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
018d e5ff | | Load 0x2,-0x1
018e 00da | | Load_Top At_Offset_2
018f 00da | | Load_Top At_Offset_2
0190 e5fe | | Load 0x2,-0x2
0191 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0192 0229 | ) | Execute Access,All_Read
0193 01ce | | Execute Vector,Slice_Write
0194 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
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 00db | | Load_Top At_Offset_3
019c 00db | | Load_Top At_Offset_3
019d e233 | 3 | Load 0x1,0x33
019e 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
019f e003 | | Load 0x0,0x3
01a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a1 8219 | | Call 0x1,0x19
01a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a3 0000 0000 | | .BLANK 0000[0x5]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00db | | Load_Top At_Offset_3
01ac 00db | | Load_Top At_Offset_3
01ad e237 | 7 | Load 0x1,0x37
01ae 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
01af e003 | | Load 0x0,0x3
01b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b1 8219 | | Call 0x1,0x19
01b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b3 0000 0000 | | .BLANK 0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 00db | | Load_Top At_Offset_3
01bc 00db | | Load_Top At_Offset_3
01bd 00d8 | | Load_Top At_Offset_0
01be e001 | | Load 0x0,0x1
01bf 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c0 0260 | ` | Execute Discrete,In_Type
01c1 7001 |p | Jump_Nonzero 0x1c3
01c2 08e0 | | Execute_Immediate Raise,0xe0
01c3 8218 | | Call 0x1,0x18
01c4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00db | | Load_Top At_Offset_3
01cc 00db | | Load_Top At_Offset_3
01cd 822d | - | Call 0x1,0x2d
01ce 8219 | | Call 0x1,0x19
01cf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 00db | | Load_Top At_Offset_3
01d4 00db | | Load_Top At_Offset_3
01d5 00d8 | | Load_Top At_Offset_0
01d6 e001 | | Load 0x0,0x1
01d7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01d8 0260 | ` | Execute Discrete,In_Type
01d9 7001 |p | Jump_Nonzero 0x1db
01da 08e0 | | Execute_Immediate Raise,0xe0
01db 8218 | | Call 0x1,0x18
01dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01dd 0000 0000 | | .XXX[0x3]
01df 0000 | |
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 00db | | Load_Top At_Offset_3
01e4 00db | | Load_Top At_Offset_3
01e5 e23b | ; | Load 0x1,0x3b
01e6 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
01e7 e003 | | Load 0x0,0x3
01e8 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e9 8219 | | Call 0x1,0x19
01ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01eb 0000 0000 | | .BLANK 0000[0x5]
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 00db | | Load_Top At_Offset_3
01f4 00db | | Load_Top At_Offset_3
01f5 e23f | ? | Load 0x1,0x3f
01f6 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
01f7 e003 | | Load 0x0,0x3
01f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
01f9 8219 | | Call 0x1,0x19
01fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01fb 0000 0000 | | .BLANK 0000[0x5]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 00db | | Load_Top At_Offset_3
0204 00db | | Load_Top At_Offset_3
0205 e22f | / | Load 0x1,0x2f
0206 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0207 e003 | | Load 0x0,0x3
0208 180e | | Execute Package,Field_Execute,Field_Number 0xe
0209 8219 | | Call 0x1,0x19
020a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
020b 0000 0000 | | .BLANK 0000[0x5]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213 | | .CONST 0x0213 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0001 | | .CONST 0x0001 ; Number of locals
0213 BODY_0210:
0213 INIT_0210:
0213 00db | | Load_Top At_Offset_3
0214 00db | | Load_Top At_Offset_3
0215 01d7 | | Execute Vector,Field_Read
0216 a5fd | | Store_Unchecked 0x2,-0x3
0217 00db | | Load_Top At_Offset_3
0218 0a01 | | Execute_Immediate Plus,0x1
0219 c5fe | | Store 0x2,-0x2
021a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
021b 0000 0000 | | .BLANK 0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0225 | % | .CONST 0x0225 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0003 | | .CONST 0x0003 ; Number of locals
0223 INIT_0220:
0223 00e3 | | Load_Encached Natural_Cache
0224 00e3 | | Load_Encached Natural_Cache
0225 BODY_0220:
0225 e5fe | | Load 0x2,-0x2
0226 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0227 00d9 | | Load_Top At_Offset_1
0228 e5fd | | Load 0x2,-0x3
0229 01db | | Execute Vector,Length
022a 0273 | s | Execute Discrete,Plus
022b 0aff | | Execute_Immediate Plus,-0x1
022c 0059 | Y | Store_Top Discrete,At_Offset_1
022d 00d8 | | Load_Top At_Offset_0
022e 0a01 | | Execute_Immediate Plus,0x1
022f c5fe | | Store 0x2,-0x2
0230 00d9 | | Load_Top At_Offset_1
0231 00d9 | | Load_Top At_Offset_1
0232 e5ff | | Load 0x2,-0x1
0233 01cf | | Execute Vector,Slice_Read
0234 e5fd | | Load 0x2,-0x3
0235 01d4 | | Execute Vector,Structure_Write
0236 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0237 0000 | | .XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023d | = | .CONST 0x023d ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0003 | | .CONST 0x0003 ; Number of locals
023b INIT_0238:
023b 00e3 | | Load_Encached Natural_Cache
023c 00e3 | | Load_Encached Natural_Cache
023d BODY_0238:
023d e5fe | | Load 0x2,-0x2
023e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
023f 00d9 | | Load_Top At_Offset_1
0240 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0241 00d8 | | Load_Top At_Offset_0
0242 0a01 | | Execute_Immediate Plus,0x1
0243 c5fe | | Store 0x2,-0x2
0244 00d9 | | Load_Top At_Offset_1
0245 00d9 | | Load_Top At_Offset_1
0246 e5ff | | Load 0x2,-0x1
0247 01cf | | Execute Vector,Slice_Read
0248 e247 | G | Load 0x1,0x47
0249 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
024a e003 | | Load 0x0,0x3
024b 180f | | Execute Package,Field_Execute,Field_Number 0xf
024c a5fd | | Store_Unchecked 0x2,-0x3
024d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
024e 0000 0000 | | .XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0255 | U | .CONST 0x0255 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0003 | | .CONST 0x0003 ; Number of locals
0253 INIT_0250:
0253 00e3 | | Load_Encached Natural_Cache
0254 00e3 | | Load_Encached Natural_Cache
0255 BODY_0250:
0255 e5fe | | Load 0x2,-0x2
0256 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0257 00d9 | | Load_Top At_Offset_1
0258 0a01 | | Execute_Immediate Plus,0x1
0259 0059 | Y | Store_Top Discrete,At_Offset_1
025a 00d8 | | Load_Top At_Offset_0
025b 0a01 | | Execute_Immediate Plus,0x1
025c c5fe | | Store 0x2,-0x2
025d 00d9 | | Load_Top At_Offset_1
025e 00d9 | | Load_Top At_Offset_1
025f e5ff | | Load 0x2,-0x1
0260 01cf | | Execute Vector,Slice_Read
0261 e24b | K | Load 0x1,0x4b
0262 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
0263 e003 | | Load 0x0,0x3
0264 180f | | Execute Package,Field_Execute,Field_Number 0xf
0265 a5fd | | Store_Unchecked 0x2,-0x3
0266 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0267 0000 | | .XXX[0x1]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00db | | Load_Top At_Offset_3
026c 00db | | Load_Top At_Offset_3
026d 01d7 | | Execute Vector,Field_Read
026e 00d8 | | Load_Top At_Offset_0
026f 00e8 | | Load_Encached Character_Cache
0270 0260 | ` | Execute Discrete,In_Type
0271 7001 |p | Jump_Nonzero 0x273
0272 08e0 | | Execute_Immediate Raise,0xe0
0273 a5fd | | Store_Unchecked 0x2,-0x3
0274 00db | | Load_Top At_Offset_3
0275 0a01 | | Execute_Immediate Plus,0x1
0276 c5fe | | Store 0x2,-0x2
0277 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027d | } | .CONST 0x027d ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0003 | | .CONST 0x0003 ; Number of locals
027b INIT_0278:
027b 00e3 | | Load_Encached Natural_Cache
027c 00e3 | | Load_Encached Natural_Cache
027d BODY_0278:
027d e5fe | | Load 0x2,-0x2
027e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
027f 00d9 | | Load_Top At_Offset_1
0280 e5fd | | Load 0x2,-0x3
0281 01db | | Execute Vector,Length
0282 0273 | s | Execute Discrete,Plus
0283 0aff | | Execute_Immediate Plus,-0x1
0284 0059 | Y | Store_Top Discrete,At_Offset_1
0285 00d8 | | Load_Top At_Offset_0
0286 0a01 | | Execute_Immediate Plus,0x1
0287 c5fe | | Store 0x2,-0x2
0288 00d9 | | Load_Top At_Offset_1
0289 00d9 | | Load_Top At_Offset_1
028a e5ff | | Load 0x2,-0x1
028b 01cf | | Execute Vector,Slice_Read
028c 822e | . | Call 0x1,0x2e
028d e5fd | | Load 0x2,-0x3
028e 01d4 | | Execute Vector,Structure_Write
028f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00db | | Load_Top At_Offset_3
0294 00db | | Load_Top At_Offset_3
0295 01d7 | | Execute Vector,Field_Read
0296 00d8 | | Load_Top At_Offset_0
0297 00e1 | | Load_Encached Boolean_Cache
0298 0260 | ` | Execute Discrete,In_Type
0299 7001 |p | Jump_Nonzero 0x29b
029a 08e0 | | Execute_Immediate Raise,0xe0
029b a5fd | | Store_Unchecked 0x2,-0x3
029c 00db | | Load_Top At_Offset_3
029d 0a01 | | Execute_Immediate Plus,0x1
029e c5fe | | Store 0x2,-0x2
029f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a5 | | .CONST 0x02a5 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 00e3 | | Load_Encached Natural_Cache
02a4 00e3 | | Load_Encached Natural_Cache
02a5 BODY_02a0:
02a5 e5fe | | Load 0x2,-0x2
02a6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02a7 00d9 | | Load_Top At_Offset_1
02a8 0a04 | | Execute_Immediate Plus,0x4
02a9 0aff | | Execute_Immediate Plus,-0x1
02aa 0059 | Y | Store_Top Discrete,At_Offset_1
02ab 00d8 | | Load_Top At_Offset_0
02ac 0a01 | | Execute_Immediate Plus,0x1
02ad c5fe | | Store 0x2,-0x2
02ae 00d9 | | Load_Top At_Offset_1
02af 00d9 | | Load_Top At_Offset_1
02b0 e5ff | | Load 0x2,-0x1
02b1 01cf | | Execute Vector,Slice_Read
02b2 e24f | O | Load 0x1,0x4f
02b3 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
02b4 e003 | | Load 0x0,0x3
02b5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b6 a5fd | | Store_Unchecked 0x2,-0x3
02b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bd | | .CONST 0x02bd ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb 00e3 | | Load_Encached Natural_Cache
02bc 00e3 | | Load_Encached Natural_Cache
02bd BODY_02b8:
02bd e5fe | | Load 0x2,-0x2
02be 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02bf 00d9 | | Load_Top At_Offset_1
02c0 0a08 | | Execute_Immediate Plus,0x8
02c1 0aff | | Execute_Immediate Plus,-0x1
02c2 0059 | Y | Store_Top Discrete,At_Offset_1
02c3 00d8 | | Load_Top At_Offset_0
02c4 0a01 | | Execute_Immediate Plus,0x1
02c5 c5fe | | Store 0x2,-0x2
02c6 00d9 | | Load_Top At_Offset_1
02c7 00d9 | | Load_Top At_Offset_1
02c8 e5ff | | Load 0x2,-0x1
02c9 01cf | | Execute Vector,Slice_Read
02ca e253 | S | Load 0x1,0x53
02cb 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
02cc e003 | | Load 0x0,0x3
02cd 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ce a5fd | | Store_Unchecked 0x2,-0x3
02cf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d5 | | .CONST 0x02d5 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0003 | | .CONST 0x0003 ; Number of locals
02d3 INIT_02d0:
02d3 00e3 | | Load_Encached Natural_Cache
02d4 00e3 | | Load_Encached Natural_Cache
02d5 BODY_02d0:
02d5 e5fe | | Load 0x2,-0x2
02d6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
02d7 00d9 | | Load_Top At_Offset_1
02d8 0a08 | | Execute_Immediate Plus,0x8
02d9 0aff | | Execute_Immediate Plus,-0x1
02da 0059 | Y | Store_Top Discrete,At_Offset_1
02db 00d8 | | Load_Top At_Offset_0
02dc 0a01 | | Execute_Immediate Plus,0x1
02dd c5fe | | Store 0x2,-0x2
02de 00d9 | | Load_Top At_Offset_1
02df 00d9 | | Load_Top At_Offset_1
02e0 e5ff | | Load 0x2,-0x1
02e1 01cf | | Execute Vector,Slice_Read
02e2 e243 | C | Load 0x1,0x43
02e3 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
02e4 e003 | | Load 0x0,0x3
02e5 180f | | Execute Package,Field_Execute,Field_Number 0xf
02e6 a5fd | | Store_Unchecked 0x2,-0x3
02e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f6 | | .CONST 0x02f6 ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0006 | | .CONST 0x0006 ; Number of locals
02eb INIT_02e8:
02eb 00e3 | | Load_Encached Natural_Cache
02ec e22c | , | Load 0x1,0x2c
02ed 0007 | | Action Break_Optional
02ee e22c | , | Load 0x1,0x2c
02ef 0007 | | Action Break_Optional
02f0 e5fe | | Load 0x2,-0x2
02f1 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
02f2 0007 | | Action Break_Optional
02f3 e5fe | | Load 0x2,-0x2
02f4 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
02f5 0007 | | Action Break_Optional
02f6 BODY_02e8:
02f6 e5fe | | Load 0x2,-0x2
02f7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f8 e5fe | | Load 0x2,-0x2
02f9 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
02fa 0272 | r | Execute Discrete,Minus
02fb c402 | | Store 0x2,0x2
02fc e5ff | | Load 0x2,-0x1
02fd e402 | | Load 0x2,0x2
02fe 027d | } | Execute Discrete,Greater
02ff 6826 |h& | Jump_Zero 0x326
0300 00cf | | Action Mark_Auxiliary
0301 e5fe | | Load 0x2,-0x2
0302 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0303 0901 | | Execute_Immediate Binary_Scale,0x1
0304 e5fe | | Load 0x2,-0x2
0305 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0306 e5ff | | Load 0x2,-0x1
0307 e5fe | | Load 0x2,-0x2
0308 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0309 e5fe | | Load 0x2,-0x2
030a 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
030b 0272 | r | Execute Discrete,Minus
030c 027a | z | Execute Discrete,Less_Equal
030d 7002 |p | Jump_Nonzero 0x310
030e 00c9 | | Action Pop_Auxiliary_Loop
030f 7ff1 | | Jump 0x301
0310 00ce | | Action Pop_Auxiliary
0311 4801 |H | Short_Literal 0x1
0312 00da | | Load_Top At_Offset_2
0313 e22c | , | Load 0x1,0x2c
0314 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
0315 003b | ; | Store_Top Access,At_Offset_3
0316 e5fe | | Load 0x2,-0x2
0317 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0318 a403 | | Store_Unchecked 0x2,0x3
0319 4801 |H | Short_Literal 0x1
031a 00d9 | | Load_Top At_Offset_1
031b e403 | | Load 0x2,0x3
031c 0227 | ' | Execute Access,All_Reference
031d 01cf | | Execute Vector,Slice_Read
031e 4801 |H | Short_Literal 0x1
031f 00da | | Load_Top At_Offset_2
0320 e404 | | Load 0x2,0x4
0321 0229 | ) | Execute Access,All_Read
0322 01ce | | Execute Vector,Slice_Write
0323 00da | | Load_Top At_Offset_2
0324 e5fe | | Load 0x2,-0x2
0325 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0326 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0327 0000 | | .XXX[0x1]
0328 ; --------------------------------------------------------------------------------------
0328 ; Debug Table
0328 ; --------------------------------------------------------------------------------------
0328 0004 000f | | .DEBUG4 0x0004,0x000f,0x4ae1,0x0000,0x0001,0x0000
032e 0000 0000 | | .BLANK 0000[0xd2]