|
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_0a7cf5
└─⟦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 0340 | @ | .CONST 0x0340 ; 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 0057 | W | .CONST 0x0057 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001e | | .CONST 0x001e ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
000d 0266 | f | Execute Discrete,Bounds
000e e001 | | Load 0x0,0x1
000f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0010 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 4801 |H | Short_Literal 0x1
0013 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0014 e001 | | Load 0x0,0x1
0015 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0016 0266 | f | Execute Discrete,Bounds
0017 e001 | | Load 0x0,0x1
0018 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0019 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
001a 02a0 | | Declare_Subprogram Null_Subprogram
001b 4801 |H | Short_Literal 0x1
001c 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
001d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
001f 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
0021 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0023 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0025 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0027 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0029 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
002b 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
002d 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
002f 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
0031 00bf | | Action Accept_Activation
0032 e001 | | Load 0x0,0x1
0033 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0034 0266 | f | Execute Discrete,Bounds
0035 00e1 | | Load_Encached Boolean_Cache
0036 02a0 | | Declare_Subprogram Null_Subprogram
0037 4801 |H | Short_Literal 0x1
0038 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0039 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call
003b 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call
003d 029d 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call
003f 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call
0041 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0042 00c7 | | Action Elaborate_Subprogram
0043 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0044 00c7 | | Action Elaborate_Subprogram
0045 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0046 00c7 | | Action Elaborate_Subprogram
0047 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0048 00c7 | | Action Elaborate_Subprogram
0049 1d13 | | Execute_Immediate Reference_Lex_1,0x13
004a 00c7 | | Action Elaborate_Subprogram
004b 1d14 | | Execute_Immediate Reference_Lex_1,0x14
004c 00c7 | | Action Elaborate_Subprogram
004d 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call
004f 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0050 00c7 | | Action Elaborate_Subprogram
0051 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0052 00c7 | | Action Elaborate_Subprogram
0053 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0054 00c7 | | Action Elaborate_Subprogram
0055 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0056 00c7 | | Action Elaborate_Subprogram
0057 BODY_0008:
0057 00bc | | Action Signal_Activated
0058 00bb | | Action Signal_Completion
0059 0000 0000 | | .BLANK 0000[0x7]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0064 | d | .CONST 0x0064 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0002 | | .CONST 0x0002 ; Number of locals
0063 INIT_0060:
0063 00e1 | | Load_Encached Boolean_Cache
0064 BODY_0060:
0064 e001 | | Load 0x0,0x1
0065 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0066 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0067 e5fe | | Load 0x2,-0x2
0068 017d | } | Execute Record,Structure_Write
0069 00db | | Load_Top At_Offset_3
006a e002 | | Load 0x0,0x2
006b 180f | | Execute Package,Field_Execute,Field_Number 0xf
006c 700b |p | Jump_Nonzero 0x78
006d 00e1 | | Load_Encached Boolean_Cache
006e e5fe | | Load 0x2,-0x2
006f 4803 |H | Short_Literal 0x3
0070 e5ff | | Load 0x2,-0x1
0071 e003 | | Load 0x0,0x3
0072 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0073 e001 | | Load 0x0,0x1
0074 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0075 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0076 00d1 | | Pop_Control Pop_Count_1
0077 0059 | Y | Store_Top Discrete,At_Offset_1
0078 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0079 0000 0000 | | .BLANK 0000[0x7]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008d | | .CONST 0x008d ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0003 | | .CONST 0x0003 ; Number of locals
0083 INIT_0080:
0083 00e1 | | Load_Encached Boolean_Cache
0084 e001 | | Load 0x0,0x1
0085 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0086 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0087 0322 | " | Declare_Variable Record
0088 e001 | | Load 0x0,0x1
0089 1b20 | | Execute Package,Field_Read,Field_Number 0x20
008a 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
008b 00d9 | | Load_Top At_Offset_1
008c 017d | } | Execute Record,Structure_Write
008d BODY_0080:
008d e5ff | | Load 0x2,-0x1
008e e002 | | Load 0x0,0x2
008f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0090 7009 |p | Jump_Nonzero 0x9a
0091 00e1 | | Load_Encached Boolean_Cache
0092 00d9 | | Load_Top At_Offset_1
0093 4803 |H | Short_Literal 0x3
0094 e5ff | | Load 0x2,-0x1
0095 e001 | | Load 0x0,0x1
0096 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0097 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0098 00d1 | | Pop_Control Pop_Count_1
0099 005a | Z | Store_Top Discrete,At_Offset_2
009a 00d8 | | Load_Top At_Offset_0
009b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00aa | | .CONST 0x00aa ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0002 | | .CONST 0x0002 ; Number of locals
00a3 INIT_00a0:
00a3 e001 | | Load 0x0,0x1
00a4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00a5 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
00a6 0322 | " | Declare_Variable Record
00a7 00db | | Load_Top At_Offset_3
00a8 00d9 | | Load_Top At_Offset_1
00a9 017d | } | Execute Record,Structure_Write
00aa BODY_00a0:
00aa 00d8 | | Load_Top At_Offset_0
00ab e001 | | Load 0x0,0x1
00ac 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00ad 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
00ae 00d1 | | Pop_Control Pop_Count_1
00af 00cf | | Action Mark_Auxiliary
00b0 7812 |x | Jump 0xc3
00b1 00d9 | | Load_Top At_Offset_1
00b2 e001 | | Load 0x0,0x1
00b3 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00b4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00b5 a5fe | | Store_Unchecked 0x2,-0x2
00b6 e5fe | | Load 0x2,-0x2
00b7 e001 | | Load 0x0,0x1
00b8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00b9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00ba 0f01 | | Execute_Immediate Equal,0x1
00bb 7001 |p | Jump_Nonzero 0xbd
00bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00bd 00d9 | | Load_Top At_Offset_1
00be e001 | | Load 0x0,0x1
00bf 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00c0 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
00c1 00d1 | | Pop_Control Pop_Count_1
00c2 00c9 | | Action Pop_Auxiliary_Loop
00c3 00d9 | | Load_Top At_Offset_1
00c4 e001 | | Load 0x0,0x1
00c5 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00c6 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00c7 6fe9 |o | Jump_Zero 0xb1
00c8 00ce | | Action Pop_Auxiliary
00c9 e001 | | Load 0x0,0x1
00ca 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00cb 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00cc a5fe | | Store_Unchecked 0x2,-0x2
00cd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ce 0000 0000 | | .XXX[0x2]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00da | | .CONST 0x00da ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0002 | | .CONST 0x0002 ; Number of locals
00d3 INIT_00d0:
00d3 e001 | | Load 0x0,0x1
00d4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00d5 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
00d6 0322 | " | Declare_Variable Record
00d7 e5fe | | Load 0x2,-0x2
00d8 00d9 | | Load_Top At_Offset_1
00d9 017d | } | Execute Record,Structure_Write
00da BODY_00d0:
00da 00d8 | | Load_Top At_Offset_0
00db e001 | | Load 0x0,0x1
00dc 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00dd 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
00de 00d1 | | Pop_Control Pop_Count_1
00df 00cf | | Action Mark_Auxiliary
00e0 7819 |x | Jump 0xfa
00e1 00d9 | | Load_Top At_Offset_1
00e2 e001 | | Load 0x0,0x1
00e3 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00e4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00e5 a5fd | | Store_Unchecked 0x2,-0x3
00e6 e5fd | | Load 0x2,-0x3
00e7 e001 | | Load 0x0,0x1
00e8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00e9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00ea 0f01 | | Execute_Immediate Equal,0x1
00eb 6808 |h | Jump_Zero 0xf4
00ec e5fd | | Load 0x2,-0x3
00ed e001 | | Load 0x0,0x1
00ee 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00ef 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00f0 e5ff | | Load 0x2,-0x1
00f1 027f | | Execute Discrete,Equal
00f2 6801 |h | Jump_Zero 0xf4
00f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00f4 00d9 | | Load_Top At_Offset_1
00f5 e001 | | Load 0x0,0x1
00f6 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00f7 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
00f8 00d1 | | Pop_Control Pop_Count_1
00f9 00c9 | | Action Pop_Auxiliary_Loop
00fa 00d9 | | Load_Top At_Offset_1
00fb e001 | | Load 0x0,0x1
00fc 1b20 | | Execute Package,Field_Read,Field_Number 0x20
00fd 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00fe 6fe2 |o | Jump_Zero 0xe1
00ff 00ce | | Action Pop_Auxiliary
0100 e001 | | Load 0x0,0x1
0101 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0102 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0103 a5fd | | Store_Unchecked 0x2,-0x3
0104 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0105 0000 0000 | | .XXX[0x3]
0107 0000 | |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0115 | | .CONST 0x0115 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0003 | | .CONST 0x0003 ; Number of locals
010b INIT_0108:
010b e001 | | Load 0x0,0x1
010c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
010d 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
010e 0322 | " | Declare_Variable Record
010f e5fe | | Load 0x2,-0x2
0110 00d9 | | Load_Top At_Offset_1
0111 017d | } | Execute Record,Structure_Write
0112 e001 | | Load 0x0,0x1
0113 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0114 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0115 BODY_0108:
0115 00d9 | | Load_Top At_Offset_1
0116 e001 | | Load 0x0,0x1
0117 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0118 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0119 00d1 | | Pop_Control Pop_Count_1
011a 00cf | | Action Mark_Auxiliary
011b 781e |x | Jump 0x13a
011c 00da | | Load_Top At_Offset_2
011d e001 | | Load 0x0,0x1
011e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
011f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0120 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0121 00d9 | | Load_Top At_Offset_1
0122 e001 | | Load 0x0,0x1
0123 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0124 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0125 0f01 | | Execute_Immediate Equal,0x1
0126 680d |h | Jump_Zero 0x134
0127 00d9 | | Load_Top At_Offset_1
0128 e001 | | Load 0x0,0x1
0129 1b20 | | Execute Package,Field_Read,Field_Number 0x20
012a 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
012b e5ff | | Load 0x2,-0x1
012c 027f | | Execute Discrete,Equal
012d 6806 |h | Jump_Zero 0x134
012e e5fd | | Load 0x2,-0x3
012f 00da | | Load_Top At_Offset_2
0130 e001 | | Load 0x0,0x1
0131 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0132 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0133 00d1 | | Pop_Control Pop_Count_1
0134 00da | | Load_Top At_Offset_2
0135 e001 | | Load 0x0,0x1
0136 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0137 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0138 00d1 | | Pop_Control Pop_Count_1
0139 00c9 | | Action Pop_Auxiliary_Loop
013a 00da | | Load_Top At_Offset_2
013b e001 | | Load 0x0,0x1
013c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
013d 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
013e 6fdd |o | Jump_Zero 0x11c
013f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 017e | ~ | .CONST 0x017e ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0007 | | .CONST 0x0007 ; Number of locals
0143 INIT_0140:
0143 e001 | | Load 0x0,0x1
0144 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0145 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0146 0322 | " | Declare_Variable Record
0147 00db | | Load_Top At_Offset_3
0148 00d9 | | Load_Top At_Offset_1
0149 017d | } | Execute Record,Structure_Write
014a e001 | | Load 0x0,0x1
014b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
014c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
014d e5fe | | Load 0x2,-0x2
014e 01da | | Execute Vector,Bounds
014f e001 | | Load 0x0,0x1
0150 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0151 03f8 | | Declare_Type Discrete,Constrained
0152 00d8 | | Load_Top At_Offset_0
0153 0266 | f | Execute Discrete,Bounds
0154 e219 | | Load 0x1,0x19
0155 035b | [ | Declare_Type Array,Constrained
0156 0337 | 7 | Declare_Variable Array
0157 e5fe | | Load 0x2,-0x2
0158 01da | | Execute Vector,Bounds
0159 e219 | | Load 0x1,0x19
015a 035b | [ | Declare_Type Array,Constrained
015b 0337 | 7 | Declare_Variable Array
015c 00d8 | | Load_Top At_Offset_0
015d 01d9 | | Execute Vector,Reverse_Bounds
015e 0263 | c | Execute Discrete,Above_Bound
015f 7005 |p | Jump_Nonzero 0x165
0160 4800 |H | Short_Literal 0x0
0161 00d9 | | Load_Top At_Offset_1
0162 e406 | | Load 0x2,0x6
0163 01d6 | | Execute Vector,Field_Write
0164 3ffb |? | Loop_Increasing 0x160
0165 00d9 | | Load_Top At_Offset_1
0166 01d4 | | Execute Vector,Structure_Write
0167 00d9 | | Load_Top At_Offset_1
0168 0266 | f | Execute Discrete,Bounds
0169 e219 | | Load 0x1,0x19
016a 035b | [ | Declare_Type Array,Constrained
016b 0337 | 7 | Declare_Variable Array
016c e5fe | | Load 0x2,-0x2
016d 01da | | Execute Vector,Bounds
016e e219 | | Load 0x1,0x19
016f 035b | [ | Declare_Type Array,Constrained
0170 0337 | 7 | Declare_Variable Array
0171 00d8 | | Load_Top At_Offset_0
0172 01d9 | | Execute Vector,Reverse_Bounds
0173 0263 | c | Execute Discrete,Above_Bound
0174 7005 |p | Jump_Nonzero 0x17a
0175 4801 |H | Short_Literal 0x1
0176 00d9 | | Load_Top At_Offset_1
0177 e407 | | Load 0x2,0x7
0178 01d6 | | Execute Vector,Field_Write
0179 3ffb |? | Loop_Increasing 0x175
017a 00d9 | | Load_Top At_Offset_1
017b 01d4 | | Execute Vector,Structure_Write
017c e001 | | Load 0x0,0x1
017d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
017e BODY_0140:
017e e5fe | | Load 0x2,-0x2
017f 821b | | Call 0x1,0x1b
0180 00d1 | | Pop_Control Pop_Count_1
0181 e402 | | Load 0x2,0x2
0182 e001 | | Load 0x0,0x1
0183 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0184 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0185 00d1 | | Pop_Control Pop_Count_1
0186 00cf | | Action Mark_Auxiliary
0187 7829 |x) | Jump 0x1b1
0188 e402 | | Load 0x2,0x2
0189 e001 | | Load 0x0,0x1
018a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
018b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
018c a403 | | Store_Unchecked 0x2,0x3
018d e403 | | Load 0x2,0x3
018e e001 | | Load 0x0,0x1
018f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0190 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0191 0f01 | | Execute_Immediate Equal,0x1
0192 6818 |h | Jump_Zero 0x1ab
0193 e403 | | Load 0x2,0x3
0194 e001 | | Load 0x0,0x1
0195 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0196 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0197 e404 | | Load 0x2,0x4
0198 0260 | ` | Execute Discrete,In_Type
0199 6811 |h | Jump_Zero 0x1ab
019a e403 | | Load 0x2,0x3
019b e001 | | Load 0x0,0x1
019c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
019d 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
019e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
019f e403 | | Load 0x2,0x3
01a0 00da | | Load_Top At_Offset_2
01a1 e5fe | | Load 0x2,-0x2
01a2 01d6 | | Execute Vector,Field_Write
01a3 4801 |H | Short_Literal 0x1
01a4 00da | | Load_Top At_Offset_2
01a5 e405 | | Load 0x2,0x5
01a6 01d6 | | Execute Vector,Field_Write
01a7 00db | | Load_Top At_Offset_3
01a8 00db | | Load_Top At_Offset_3
01a9 01df | | Execute Vector,Equal
01aa 700b |p | Jump_Nonzero 0x1b6
01ab e402 | | Load 0x2,0x2
01ac e001 | | Load 0x0,0x1
01ad 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01ae 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
01af 00d1 | | Pop_Control Pop_Count_1
01b0 00c9 | | Action Pop_Auxiliary_Loop
01b1 e402 | | Load 0x2,0x2
01b2 e001 | | Load 0x0,0x1
01b3 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01b4 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
01b5 6fd2 |o | Jump_Zero 0x188
01b6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b7 0000 | | .XXX[0x1]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c5 | | .CONST 0x01c5 ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0004 | | .CONST 0x0004 ; Number of locals
01bb INIT_01b8:
01bb 00db | | Load_Top At_Offset_3
01bc 01da | | Execute Vector,Bounds
01bd e20e | | Load 0x1,0xe
01be 035b | [ | Declare_Type Array,Constrained
01bf 0337 | 7 | Declare_Variable Array
01c0 e001 | | Load 0x0,0x1
01c1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01c2 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
01c3 0322 | " | Declare_Variable Record
01c4 00e1 | | Load_Encached Boolean_Cache
01c5 BODY_01b8:
01c5 e5fe | | Load 0x2,-0x2
01c6 821a | | Call 0x1,0x1a
01c7 00d1 | | Pop_Control Pop_Count_1
01c8 00e1 | | Load_Encached Boolean_Cache
01c9 00da | | Load_Top At_Offset_2
01ca 4803 |H | Short_Literal 0x3
01cb e5ff | | Load 0x2,-0x1
01cc e001 | | Load 0x0,0x1
01cd 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01ce 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
01cf 00d1 | | Pop_Control Pop_Count_1
01d0 0059 | Y | Store_Top Discrete,At_Offset_1
01d1 00da | | Load_Top At_Offset_2
01d2 00da | | Load_Top At_Offset_2
01d3 8214 | | Call 0x1,0x14
01d4 00d1 | | Pop_Control Pop_Count_1
01d5 e5fe | | Load 0x2,-0x2
01d6 00d9 | | Load_Top At_Offset_1
01d7 e402 | | Load 0x2,0x2
01d8 821c | | Call 0x1,0x1c
01d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01da 0000 0000 | | .BLANK 0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f7 | | .CONST 0x01f7 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0005 | | .CONST 0x0005 ; Number of locals
01e3 INIT_01e0:
01e3 00db | | Load_Top At_Offset_3
01e4 01da | | Execute Vector,Bounds
01e5 e20d | | Load 0x1,0xd
01e6 035b | [ | Declare_Type Array,Constrained
01e7 0337 | 7 | Declare_Variable Array
01e8 e002 | | Load 0x0,0x2
01e9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01ea 02c7 | | Declare_Variable Any
01eb e5ff | | Load 0x2,-0x1
01ec a403 | | Store_Unchecked 0x2,0x3
01ed e001 | | Load 0x0,0x1
01ee 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01ef 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
01f0 0322 | " | Declare_Variable Record
01f1 e001 | | Load 0x0,0x1
01f2 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01f3 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
01f4 00d9 | | Load_Top At_Offset_1
01f5 017d | } | Execute Record,Structure_Write
01f6 00e1 | | Load_Encached Boolean_Cache
01f7 BODY_01e0:
01f7 e5fe | | Load 0x2,-0x2
01f8 821a | | Call 0x1,0x1a
01f9 00d1 | | Pop_Control Pop_Count_1
01fa 00cf | | Action Mark_Auxiliary
01fb 7819 |x | Jump 0x215
01fc 00e1 | | Load_Encached Boolean_Cache
01fd 00db | | Load_Top At_Offset_3
01fe 4803 |H | Short_Literal 0x3
01ff e403 | | Load 0x2,0x3
0200 e002 | | Load 0x0,0x2
0201 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0202 e001 | | Load 0x0,0x1
0203 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0204 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0205 00d1 | | Pop_Control Pop_Count_1
0206 005a | Z | Store_Top Discrete,At_Offset_2
0207 e402 | | Load 0x2,0x2
0208 00db | | Load_Top At_Offset_3
0209 821e | | Call 0x1,0x1e
020a 00d1 | | Pop_Control Pop_Count_1
020b e5fe | | Load 0x2,-0x2
020c 00da | | Load_Top At_Offset_2
020d e402 | | Load 0x2,0x2
020e 821d | | Call 0x1,0x1d
020f 00d1 | | Pop_Control Pop_Count_1
0210 00db | | Load_Top At_Offset_3
0211 e002 | | Load 0x0,0x2
0212 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0213 c403 | | Store 0x2,0x3
0214 00c9 | | Action Pop_Auxiliary_Loop
0215 00db | | Load_Top At_Offset_3
0216 e002 | | Load 0x0,0x2
0217 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0218 6fe3 |o | Jump_Zero 0x1fc
0219 4502 |E | Exit_Suprogram New_Top_Offset 0x2
021a 0000 0000 | | .BLANK 0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0226 | & | .CONST 0x0226 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0002 | | .CONST 0x0002 ; Number of locals
0223 INIT_0220:
0223 e001 | | Load 0x0,0x1
0224 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0225 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0226 BODY_0220:
0226 00d8 | | Load_Top At_Offset_0
0227 e5fe | | Load 0x2,-0x2
0228 8210 | | Call 0x1,0x10
0229 e5ff | | Load 0x2,-0x1
022a 8212 | | Call 0x1,0x12
022b 0031 | 1 | Store_Top Heap_Access,At_Offset_1
022c 00d8 | | Load_Top At_Offset_0
022d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
022e 0000 0000 | | .XXX[0x2]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 e001 | | Load 0x0,0x1
0235 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0236 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0237 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0238 4801 |H | Short_Literal 0x1
0239 4807 |H | Short_Literal 0x7
023a 0262 | b | Execute Discrete,In_Range
023b 7006 |p | Jump_Nonzero 0x242
023c 7800 |x | Jump 0x23d
023d e001 | | Load 0x0,0x1
023e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
023f 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0240 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0241 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0242 00da | | Load_Top At_Offset_2
0243 e001 | | Load 0x0,0x1
0244 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0245 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0246 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0247 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 00da | | Load_Top At_Offset_2
024c 00d8 | | Load_Top At_Offset_0
024d 0335 | 5 | Declare_Variable Array,Duplicate
024e 00cd | | Action Spare6_Action
024f 00d9 | | Load_Top At_Offset_1
0250 01d9 | | Execute Vector,Reverse_Bounds
0251 0263 | c | Execute Discrete,Above_Bound
0252 7007 |p | Jump_Nonzero 0x25a
0253 e001 | | Load 0x0,0x1
0254 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0255 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0256 00d9 | | Load_Top At_Offset_1
0257 e403 | | Load 0x2,0x3
0258 01d6 | | Execute Vector,Field_Write
0259 3ff9 |? | Loop_Increasing 0x253
025a 00cd | | Action Spare6_Action
025b 00db | | Load_Top At_Offset_3
025c 01d4 | | Execute Vector,Structure_Write
025d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
025e 0000 0000 | | .XXX[0x2]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 00da | | Load_Top At_Offset_2
0264 00d8 | | Load_Top At_Offset_0
0265 0335 | 5 | Declare_Variable Array,Duplicate
0266 00cd | | Action Spare6_Action
0267 00d9 | | Load_Top At_Offset_1
0268 01d9 | | Execute Vector,Reverse_Bounds
0269 0263 | c | Execute Discrete,Above_Bound
026a 7007 |p | Jump_Nonzero 0x272
026b e001 | | Load 0x0,0x1
026c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
026d 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
026e 00d9 | | Load_Top At_Offset_1
026f e403 | | Load 0x2,0x3
0270 01d6 | | Execute Vector,Field_Write
0271 3ff9 |? | Loop_Increasing 0x26b
0272 00cd | | Action Spare6_Action
0273 00db | | Load_Top At_Offset_3
0274 01d4 | | Execute Vector,Structure_Write
0275 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0276 0000 0000 | | .XXX[0x2]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 00cf | | Action Mark_Auxiliary
027c 00db | | Load_Top At_Offset_3
027d 01d9 | | Execute Vector,Reverse_Bounds
027e 0263 | c | Execute Discrete,Above_Bound
027f 701f |p | Jump_Nonzero 0x29f
0280 00d8 | | Load_Top At_Offset_0
0281 e5ff | | Load 0x2,-0x1
0282 01d7 | | Execute Vector,Field_Read
0283 e001 | | Load 0x0,0x1
0284 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0285 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0286 021f | | Execute Heap_Access,Equal
0287 7015 |p | Jump_Nonzero 0x29d
0288 e5fe | | Load 0x2,-0x2
0289 6808 |h | Jump_Zero 0x292
028a 00d8 | | Load_Top At_Offset_0
028b e5ff | | Load 0x2,-0x1
028c 01d7 | | Execute Vector,Field_Read
028d e001 | | Load 0x0,0x1
028e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
028f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0290 01db | | Execute Vector,Length
0291 700b |p | Jump_Nonzero 0x29d
0292 00d8 | | Load_Top At_Offset_0
0293 e5fd | | Load 0x2,-0x3
0294 01d5 | | Execute Vector,Field_Reference
0295 00d8 | | Load_Top At_Offset_0
0296 00da | | Load_Top At_Offset_2
0297 e5ff | | Load 0x2,-0x1
0298 01d7 | | Execute Vector,Field_Read
0299 e001 | | Load 0x0,0x1
029a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
029b 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
029c 00d2 | | Pop_Control Pop_Count_2
029d 00c8 | | Action Pop_Auxiliary_Range
029e 3fe1 |? | Loop_Increasing 0x280
029f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02af | | .CONST 0x02af ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 e001 | | Load 0x0,0x1
02a4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02a5 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
02a6 e001 | | Load 0x0,0x1
02a7 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02a8 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
02a9 0322 | " | Declare_Variable Record
02aa e001 | | Load 0x0,0x1
02ab 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02ac 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
02ad 00d9 | | Load_Top At_Offset_1
02ae 017d | } | Execute Record,Structure_Write
02af BODY_02a0:
02af 00cf | | Action Mark_Auxiliary
02b0 e5ff | | Load 0x2,-0x1
02b1 01d9 | | Execute Vector,Reverse_Bounds
02b2 0263 | c | Execute Discrete,Above_Bound
02b3 7038 |p8 | Jump_Nonzero 0x2ec
02b4 00d8 | | Load_Top At_Offset_0
02b5 e5ff | | Load 0x2,-0x1
02b6 01d5 | | Execute Vector,Field_Reference
02b7 e001 | | Load 0x0,0x1
02b8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02b9 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
02ba 017f | | Execute Record,Equal
02bb 702e |p. | Jump_Nonzero 0x2ea
02bc 00d8 | | Load_Top At_Offset_0
02bd e5ff | | Load 0x2,-0x1
02be 01d5 | | Execute Vector,Field_Reference
02bf e403 | | Load 0x2,0x3
02c0 017d | } | Execute Record,Structure_Write
02c1 00db | | Load_Top At_Offset_3
02c2 e001 | | Load 0x0,0x1
02c3 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02c4 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
02c5 00d1 | | Pop_Control Pop_Count_1
02c6 00cf | | Action Mark_Auxiliary
02c7 781c |x | Jump 0x2e4
02c8 e403 | | Load 0x2,0x3
02c9 e001 | | Load 0x0,0x1
02ca 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02cb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02cc a402 | | Store_Unchecked 0x2,0x2
02cd e5fe | | Load 0x2,-0x2
02ce 6806 |h | Jump_Zero 0x2d5
02cf e402 | | Load 0x2,0x2
02d0 e001 | | Load 0x0,0x1
02d1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02d2 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
02d3 01db | | Execute Vector,Length
02d4 7009 |p | Jump_Nonzero 0x2de
02d5 00d9 | | Load_Top At_Offset_1
02d6 e5fd | | Load 0x2,-0x3
02d7 01d5 | | Execute Vector,Field_Reference
02d8 00d8 | | Load_Top At_Offset_0
02d9 e402 | | Load 0x2,0x2
02da e001 | | Load 0x0,0x1
02db 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02dc 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02dd 00d2 | | Pop_Control Pop_Count_2
02de e403 | | Load 0x2,0x3
02df e001 | | Load 0x0,0x1
02e0 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02e1 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
02e2 00d1 | | Pop_Control Pop_Count_1
02e3 00c9 | | Action Pop_Auxiliary_Loop
02e4 e403 | | Load 0x2,0x3
02e5 e001 | | Load 0x0,0x1
02e6 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02e7 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02e8 6fdf |o | Jump_Zero 0x2c8
02e9 00ce | | Action Pop_Auxiliary
02ea 00c8 | | Action Pop_Auxiliary_Range
02eb 3fc8 |? | Loop_Increasing 0x2b4
02ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ed 0000 0000 | | .XXX[0x3]
02ef 0000 | |
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0304 | | .CONST 0x0304 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0005 | | .CONST 0x0005 ; Number of locals
02f3 INIT_02f0:
02f3 e001 | | Load 0x0,0x1
02f4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02f5 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
02f6 0322 | " | Declare_Variable Record
02f7 00db | | Load_Top At_Offset_3
02f8 00d9 | | Load_Top At_Offset_1
02f9 017d | } | Execute Record,Structure_Write
02fa e001 | | Load 0x0,0x1
02fb 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02fc 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
02fd e5fe | | Load 0x2,-0x2
02fe 01da | | Execute Vector,Bounds
02ff e001 | | Load 0x0,0x1
0300 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0301 03f8 | | Declare_Type Discrete,Constrained
0302 e001 | | Load 0x0,0x1
0303 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0304 BODY_02f0:
0304 e5fe | | Load 0x2,-0x2
0305 821a | | Call 0x1,0x1a
0306 00d1 | | Pop_Control Pop_Count_1
0307 00db | | Load_Top At_Offset_3
0308 e001 | | Load 0x0,0x1
0309 1b20 | | Execute Package,Field_Read,Field_Number 0x20
030a 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
030b 00d1 | | Pop_Control Pop_Count_1
030c 00cf | | Action Mark_Auxiliary
030d 7826 |x& | Jump 0x334
030e e402 | | Load 0x2,0x2
030f e001 | | Load 0x0,0x1
0310 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0311 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0312 a403 | | Store_Unchecked 0x2,0x3
0313 00db | | Load_Top At_Offset_3
0314 e001 | | Load 0x0,0x1
0315 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0316 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0317 0f01 | | Execute_Immediate Equal,0x1
0318 6815 |h | Jump_Zero 0x32e
0319 00db | | Load_Top At_Offset_3
031a e001 | | Load 0x0,0x1
031b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
031c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
031d 00db | | Load_Top At_Offset_3
031e 0260 | ` | Execute Discrete,In_Type
031f 680e |h | Jump_Zero 0x32e
0320 00db | | Load_Top At_Offset_3
0321 e001 | | Load 0x0,0x1
0322 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0323 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0324 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0325 00d9 | | Load_Top At_Offset_1
0326 e5fe | | Load 0x2,-0x2
0327 01d5 | | Execute Vector,Field_Reference
0328 00d8 | | Load_Top At_Offset_0
0329 e403 | | Load 0x2,0x3
032a e001 | | Load 0x0,0x1
032b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
032c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
032d 00d2 | | Pop_Control Pop_Count_2
032e e402 | | Load 0x2,0x2
032f e001 | | Load 0x0,0x1
0330 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0331 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0332 00d1 | | Pop_Control Pop_Count_1
0333 00c9 | | Action Pop_Auxiliary_Loop
0334 e402 | | Load 0x2,0x2
0335 e001 | | Load 0x0,0x1
0336 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0337 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0338 6fd5 |o | Jump_Zero 0x30e
0339 4502 |E | Exit_Suprogram New_Top_Offset 0x2
033a 0000 0000 | | .BLANK 0000[0x6]
0340 ; --------------------------------------------------------------------------------------
0340 ; Debug Table
0340 ; --------------------------------------------------------------------------------------
0340 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc571,0x0000,0x0001,0x0000
0346 1eb1 312c | 1,| .XXX[0xba]
0348 9ab3 6a6a | jj|
034a 0220 a6b2 | |
034c 5d86 8184 |] |
034e b2b1 6073 | `s|
0350 cdd6 7d86 | } |
0352 d622 6e21 | "n!|
0354 852f b190 | / |
0356 d6b3 edd4 | |
0358 acce 312f | 1/|
035a b668 19da | h |
035c c584 0eb3 | |
035e dec3 68cc | h |
0360 b2b3 052f | /|
0362 1223 7da3 | #} |
0364 e26a ac36 | j 6|
0366 8e21 a455 | ! U|
0368 22b1 c4cf |" |
036a cc52 192d | R -|
036c 5006 aa21 |P !|
036e 7057 4221 |pWB!|
0370 c4ce c9d5 | |
0372 46b2 85ee |F |
0374 34cc 55d8 |4 U |
0376 8074 2a6c | t*l|
0378 99da 7455 | tU|
037a 66b1 0eb1 |f |
037c 6eb3 8221 |n !|
037e 1ab3 6d84 | m |
0380 566c c1d9 |Vl |
0382 2ccc 626d |, bm|
0384 32b1 96b3 |2 |
0386 8d85 52b2 | R |
0388 892f b620 | / |
038a c627 2221 | '"!|
038c b2b3 b5d6 | |
038e ec7a d8ce | z |
0390 6ac9 11d8 |j |
0392 a26d d2b2 | m |
0394 c9a6 0854 | T|
0396 787f e186 |x |
0398 fd2e 3c55 | .<U|
039a eab3 8854 | T|
039c e66c 0e25 | l %|
039e fab2 5454 | TT|
03a0 1eb3 292c | ),|
03a2 198a 686f | ho|
03a4 c456 12b0 | V |
03a6 0d88 3a26 | :&|
03a8 1eb3 312d | 1-|
03aa 026d 65d9 | me |
03ac eeb0 2d8a | - |
03ae 36b3 712c |6 q,|
03b0 0989 99da | |
03b2 46b0 198b |F |
03b4 0054 7624 | Tv$|
03b6 2989 606a |) `j|
03b8 62b3 40ce |b @ |
03ba 6ab0 9627 |j '|
03bc bd2e b056 | . V|
03be 8ccd 5a6d | Zm|
03c0 f5d8 8059 | Y|
03c2 cdd9 f5d9 | |
03c4 2879 726c |(yrl|
03c6 7e6c ad89 |~l |
03c8 e5d8 f058 | X|
03ca d224 b98b | $ |
03cc 18b9 fdd9 | |
03ce 1458 3cd1 | X< |
03d0 d184 1d30 | 0|
03d2 4225 aa6e |B% n|
03d4 d2b2 45d9 | E |
03d6 b66c 8ade | l |
03d8 51d9 14d2 |Q |
03da 41d9 8069 |A i|
03dc ce6c 9566 | l f|
03de 92b1 da6c | l|
03e0 7130 5533 |q0U3|
03e2 0ab0 393b | 9;|
03e4 61ad f26c |a l|
03e6 f06a 99da | j |
03e8 c1db 2ab2 | * |
03ea cab1 7458 | tX|
03ec ad30 69d9 | 0i |
03ee 8988 8cd1 | |
03f0 7a26 266c |z&&l|
03f2 e458 f0dc | X |
03f4 d933 5ab0 | 3Z |
03f6 b0d3 e056 | V|
03f8 3a6c e459 |:l Y|
03fa d5ed c18b | |
03fc 72b2 a058 |r X|
03fe dcd3 7eb2 | ~ |