|
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: 7168 (0x1c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0858 | X | .CONST 0x0858 ; 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 0006 | | .CONST 0x0006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0050 | P | .CONST 0x0050 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001d | | .CONST 0x001d ; Number of locals
000b INIT_0008:
000b 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
000d 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
000f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0011 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
0013 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
0015 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0017 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0019 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
001b 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
001d 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
001f 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
0021 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0023 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0025 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0027 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
0029 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
002b 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
002d 00bf | | Action Accept_Activation
002e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002f 00c7 | | Action Elaborate_Subprogram
0030 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0031 00c7 | | Action Elaborate_Subprogram
0032 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0033 00c7 | | Action Elaborate_Subprogram
0034 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0035 00c7 | | Action Elaborate_Subprogram
0036 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0037 00c7 | | Action Elaborate_Subprogram
0038 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0039 00c7 | | Action Elaborate_Subprogram
003a 1d13 | | Execute_Immediate Reference_Lex_1,0x13
003b 00c7 | | Action Elaborate_Subprogram
003c 1d14 | | Execute_Immediate Reference_Lex_1,0x14
003d 00c7 | | Action Elaborate_Subprogram
003e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
003f 00c7 | | Action Elaborate_Subprogram
0040 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0041 00c7 | | Action Elaborate_Subprogram
0042 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0043 00c7 | | Action Elaborate_Subprogram
0044 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0045 00c7 | | Action Elaborate_Subprogram
0046 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0047 00c7 | | Action Elaborate_Subprogram
0048 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0049 00c7 | | Action Elaborate_Subprogram
004a 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
004b 00c7 | | Action Elaborate_Subprogram
004c 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
004d 00c7 | | Action Elaborate_Subprogram
004e 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
004f 00c7 | | Action Elaborate_Subprogram
0050 BODY_0008:
0050 00bc | | Action Signal_Activated
0051 00bb | | Action Signal_Completion
0052 0000 0000 | | .BLANK 0000[0x6]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00da | | Load_Top At_Offset_2
005c 8002 | | Call 0x0,0x2
005d 00da | | Load_Top At_Offset_2
005e 8003 | | Call 0x0,0x3
005f 00da | | Load_Top At_Offset_2
0060 8004 | | Call 0x0,0x4
0061 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0062 0000 0000 | | .BLANK 0000[0x6]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006e | n | .CONST 0x006e ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b e005 | | Load 0x0,0x5
006c 029f 0183 | | Declare_Subprogram INIT_0180,For_Call
006e BODY_0068:
006e e5ff | | Load 0x2,-0x1
006f 8002 | | Call 0x0,0x2
0070 8403 | | Call 0x2,0x3
0071 e5ff | | Load 0x2,-0x1
0072 8004 | | Call 0x0,0x4
0073 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0074 0000 0000 | | .BLANK 0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007d | } | .CONST 0x007d ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call
007d BODY_0078:
007d 00db | | Load_Top At_Offset_3
007e 8002 | | Call 0x0,0x2
007f 8402 | | Call 0x2,0x2
0080 00db | | Load_Top At_Offset_3
0081 8004 | | Call 0x0,0x4
0082 00db | | Load_Top At_Offset_3
0083 8006 | | Call 0x0,0x6
0084 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0096 | | .CONST 0x0096 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0005 | | .CONST 0x0005 ; Number of locals
008b INIT_0088:
008b 4801 |H | Short_Literal 0x1
008c 4820 |H | Short_Literal 0x20
008d e007 | | Load 0x0,0x7
008e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
008f 035b | [ | Declare_Type Array,Constrained
0090 0337 | 7 | Declare_Variable Array
0091 e008 | | Load 0x0,0x8
0092 0007 | | Action Break_Optional
0093 e009 | | Load 0x0,0x9
0094 029f 020b | | Declare_Subprogram INIT_0208,For_Call
0096 BODY_0088:
0096 e5ff | | Load 0x2,-0x1
0097 8002 | | Call 0x0,0x2
0098 8405 | | Call 0x2,0x5
0099 e5ff | | Load 0x2,-0x1
009a 8004 | | Call 0x0,0x4
009b e5ff | | Load 0x2,-0x1
009c 8006 | | Call 0x0,0x6
009d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
009e 0000 0000 | | .XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a6 | | .CONST 0x00a6 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 e00a | | Load 0x0,0xa
00a4 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call
00a6 BODY_00a0:
00a6 e5ff | | Load 0x2,-0x1
00a7 8002 | | Call 0x0,0x2
00a8 8403 | | Call 0x2,0x3
00a9 e5ff | | Load 0x2,-0x1
00aa 8004 | | Call 0x0,0x4
00ab 00d9 | | Load_Top At_Offset_1
00ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ad 0000 0000 | | .XXX[0x3]
00af 0000 | |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b6 | | .CONST 0x00b6 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0003 | | .CONST 0x0003 ; Number of locals
00b3 INIT_00b0:
00b3 e00a | | Load 0x0,0xa
00b4 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
00b6 BODY_00b0:
00b6 e5ff | | Load 0x2,-0x1
00b7 8002 | | Call 0x0,0x2
00b8 8403 | | Call 0x2,0x3
00b9 e5ff | | Load 0x2,-0x1
00ba 8004 | | Call 0x0,0x4
00bb 00d9 | | Load_Top At_Offset_1
00bc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00bd 0000 0000 | | .XXX[0x3]
00bf 0000 | |
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cc | | .CONST 0x00cc ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0006 | | .CONST 0x0006 ; Number of locals
00c3 INIT_00c0:
00c3 e005 | | Load 0x0,0x5
00c4 0007 | | Action Break_Optional
00c5 e005 | | Load 0x0,0x5
00c6 0007 | | Action Break_Optional
00c7 e00a | | Load 0x0,0xa
00c8 0007 | | Action Break_Optional
00c9 e009 | | Load 0x0,0x9
00ca 029f 029b | | Declare_Subprogram INIT_0298,For_Call
00cc BODY_00c0:
00cc e5fc | | Load 0x2,-0x4
00cd 8002 | | Call 0x0,0x2
00ce 8406 | | Call 0x2,0x6
00cf 4800 |H | Short_Literal 0x0
00d0 a5f9 | | Store_Unchecked 0x2,-0x7
00d1 e5fc | | Load 0x2,-0x4
00d2 8004 | | Call 0x0,0x4
00d3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e2 | | .CONST 0x00e2 ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0005 | | .CONST 0x0005 ; Number of locals
00db INIT_00d8:
00db e005 | | Load 0x0,0x5
00dc 0007 | | Action Break_Optional
00dd e005 | | Load 0x0,0x5
00de 0007 | | Action Break_Optional
00df e00a | | Load 0x0,0xa
00e0 029f 033b | ;| Declare_Subprogram INIT_0338,For_Call
00e2 BODY_00d8:
00e2 e5ff | | Load 0x2,-0x1
00e3 8002 | | Call 0x0,0x2
00e4 8405 | | Call 0x2,0x5
00e5 4800 |H | Short_Literal 0x0
00e6 a5fc | | Store_Unchecked 0x2,-0x4
00e7 e5ff | | Load 0x2,-0x1
00e8 8004 | | Call 0x0,0x4
00e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00ea 0000 0000 | | .BLANK 0000[0x6]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00fa | | .CONST 0x00fa ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0005 | | .CONST 0x0005 ; Number of locals
00f3 INIT_00f0:
00f3 e005 | | Load 0x0,0x5
00f4 0007 | | Action Break_Optional
00f5 e005 | | Load 0x0,0x5
00f6 0007 | | Action Break_Optional
00f7 e00a | | Load 0x0,0xa
00f8 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call
00fa BODY_00f0:
00fa e5ff | | Load 0x2,-0x1
00fb 8002 | | Call 0x0,0x2
00fc 8405 | | Call 0x2,0x5
00fd e5ff | | Load 0x2,-0x1
00fe 8004 | | Call 0x0,0x4
00ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 010a | | .CONST 0x010a ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0005 | | .CONST 0x0005 ; Number of locals
0103 INIT_0100:
0103 e005 | | Load 0x0,0x5
0104 0007 | | Action Break_Optional
0105 e005 | | Load 0x0,0x5
0106 0007 | | Action Break_Optional
0107 e00a | | Load 0x0,0xa
0108 029f 047b | {| Declare_Subprogram INIT_0478,For_Call
010a BODY_0100:
010a e5ff | | Load 0x2,-0x1
010b 8002 | | Call 0x0,0x2
010c 8405 | | Call 0x2,0x5
010d e5ff | | Load 0x2,-0x1
010e 8004 | | Call 0x0,0x4
010f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011a | | .CONST 0x011a ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0005 | | .CONST 0x0005 ; Number of locals
0113 INIT_0110:
0113 e005 | | Load 0x0,0x5
0114 0007 | | Action Break_Optional
0115 e005 | | Load 0x0,0x5
0116 0007 | | Action Break_Optional
0117 e00a | | Load 0x0,0xa
0118 029f 051b | | Declare_Subprogram INIT_0518,For_Call
011a BODY_0110:
011a e5ff | | Load 0x2,-0x1
011b 8002 | | Call 0x0,0x2
011c 8405 | | Call 0x2,0x5
011d e5ff | | Load 0x2,-0x1
011e 8004 | | Call 0x0,0x4
011f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012a | * | .CONST 0x012a ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0005 | | .CONST 0x0005 ; Number of locals
0123 INIT_0120:
0123 e005 | | Load 0x0,0x5
0124 0007 | | Action Break_Optional
0125 e005 | | Load 0x0,0x5
0126 0007 | | Action Break_Optional
0127 e009 | | Load 0x0,0x9
0128 029f 05cb | | Declare_Subprogram INIT_05c8,For_Call
012a BODY_0120:
012a e5fc | | Load 0x2,-0x4
012b 8002 | | Call 0x0,0x2
012c 8405 | | Call 0x2,0x5
012d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
012e 0000 0000 | | .XXX[0x2]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0138 | 8 | .CONST 0x0138 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0004 | | .CONST 0x0004 ; Number of locals
0133 INIT_0130:
0133 e005 | | Load 0x0,0x5
0134 0007 | | Action Break_Optional
0135 e005 | | Load 0x0,0x5
0136 029f 065b | [| Declare_Subprogram INIT_0658,For_Call
0138 BODY_0130:
0138 e5ff | | Load 0x2,-0x1
0139 8002 | | Call 0x0,0x2
013a 8404 | | Call 0x2,0x4
013b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
013c 0000 0000 | | .BLANK 0000[0x4]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0146 | F | .CONST 0x0146 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0003 | | .CONST 0x0003 ; Number of locals
0143 INIT_0140:
0143 e005 | | Load 0x0,0x5
0144 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call
0146 BODY_0140:
0146 e5ff | | Load 0x2,-0x1
0147 8002 | | Call 0x0,0x2
0148 8403 | | Call 0x2,0x3
0149 e5ff | | Load 0x2,-0x1
014a 8004 | | Call 0x0,0x4
014b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
014c 0000 0000 | | .BLANK 0000[0x4]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0155 | U | .CONST 0x0155 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0002 | | .CONST 0x0002 ; Number of locals
0153 INIT_0150:
0153 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call
0155 BODY_0150:
0155 00db | | Load_Top At_Offset_3
0156 8002 | | Call 0x0,0x2
0157 8402 | | Call 0x2,0x2
0158 00db | | Load_Top At_Offset_3
0159 8004 | | Call 0x0,0x4
015a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
015b 0000 0000 | | .BLANK 0000[0x5]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0168 | h | .CONST 0x0168 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0004 | | .CONST 0x0004 ; Number of locals
0163 INIT_0160:
0163 e005 | | Load 0x0,0x5
0164 0007 | | Action Break_Optional
0165 e009 | | Load 0x0,0x9
0166 029f 075b | [| Declare_Subprogram INIT_0758,For_Call
0168 BODY_0160:
0168 e5fc | | Load 0x2,-0x4
0169 8002 | | Call 0x0,0x2
016a 8404 | | Call 0x2,0x4
016b e5fc | | Load 0x2,-0x4
016c 8004 | | Call 0x0,0x4
016d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
016e 0000 0000 | | .XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0178 | x | .CONST 0x0178 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0004 | | .CONST 0x0004 ; Number of locals
0173 INIT_0170:
0173 e005 | | Load 0x0,0x5
0174 0007 | | Action Break_Optional
0175 e005 | | Load 0x0,0x5
0176 029f 07bb | | Declare_Subprogram INIT_07b8,For_Call
0178 BODY_0170:
0178 e5ff | | Load 0x2,-0x1
0179 8002 | | Call 0x0,0x2
017a 8404 | | Call 0x2,0x4
017b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
017c 0000 0000 | | .BLANK 0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 01b6 | | .CONST 0x01b6 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 e5ff | | Load 0x2,-0x1
0184 0227 | ' | Execute Access,All_Reference
0185 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
0186 a402 | | Store_Unchecked 0x2,0x2
0187 e402 | | Load 0x2,0x2
0188 e005 | | Load 0x0,0x5
0189 022f | / | Execute Access,Equal
018a 6807 |h | Jump_Zero 0x192
018b e005 | | Load 0x0,0x5
018c 03bc | | Declare_Variable Access,By_Allocation
018d 00d8 | | Load_Top At_Offset_0
018e 0227 | ' | Execute Access,All_Reference
018f 1c00 | | Execute_Immediate Run_Utility,0x0
0190 a402 | | Store_Unchecked 0x2,0x2
0191 7806 |x | Jump 0x198
0192 e402 | | Load 0x2,0x2
0193 0227 | ' | Execute Access,All_Reference
0194 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0195 e5ff | | Load 0x2,-0x1
0196 0227 | ' | Execute Access,All_Reference
0197 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
0198 e5ff | | Load 0x2,-0x1
0199 0227 | ' | Execute Access,All_Reference
019a 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
019b e402 | | Load 0x2,0x2
019c 0227 | ' | Execute Access,All_Reference
019d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
019e e5fe | | Load 0x2,-0x2
019f e402 | | Load 0x2,0x2
01a0 0227 | ' | Execute Access,All_Reference
01a1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01a2 e402 | | Load 0x2,0x2
01a3 e5ff | | Load 0x2,-0x1
01a4 0227 | ' | Execute Access,All_Reference
01a5 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
01a6 e5ff | | Load 0x2,-0x1
01a7 0227 | ' | Execute Access,All_Reference
01a8 3c27 |<' | Execute Record,Field_Read,Field_Number 0x27
01a9 7004 |p | Jump_Nonzero 0x1ae
01aa e402 | | Load 0x2,0x2
01ab e5ff | | Load 0x2,-0x1
01ac 0227 | ' | Execute Access,All_Reference
01ad 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
01ae e5ff | | Load 0x2,-0x1
01af 0227 | ' | Execute Access,All_Reference
01b0 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
01b1 0a01 | | Execute_Immediate Plus,0x1
01b2 e5ff | | Load 0x2,-0x1
01b3 0227 | ' | Execute Access,All_Reference
01b4 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
01b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01b6 TRAP_0180:
01b6 0007 | | Action Break_Optional
01b7 e5ff | | Load 0x2,-0x1
01b8 8004 | | Call 0x0,0x4
01b9 00d8 | | Load_Top At_Offset_0
01ba 0101 | | Execute Exception,Reraise
01bb 0000 0000 | | .BLANK 0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 01ff | | .CONST 0x01ff ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 4804 |H | Short_Literal 0x4
01c4 e00b | | Load 0x0,0xb
01c5 0322 | " | Declare_Variable Record
01c6 4802 |H | Short_Literal 0x2
01c7 00d9 | | Load_Top At_Offset_1
01c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01c9 e00b | | Load 0x0,0xb
01ca 012c | , | Execute Any,Size
01cb 09fb | | Execute_Immediate Binary_Scale,-0x5
01cc 0a01 | | Execute_Immediate Plus,0x1
01cd 00d9 | | Load_Top At_Offset_1
01ce 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01cf 4800 |H | Short_Literal 0x0
01d0 00d9 | | Load_Top At_Offset_1
01d1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01d2 e5fe | | Load 0x2,-0x2
01d3 00d9 | | Load_Top At_Offset_1
01d4 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01d5 e00b | | Load 0x0,0xb
01d6 3004 |0 | Execute Record,Field_Type,Field_Number 0x4
01d7 0337 | 7 | Declare_Variable Array
01d8 4801 |H | Short_Literal 0x1
01d9 4814 |H | Short_Literal 0x14
01da 00da | | Load_Top At_Offset_2
01db 01d6 | | Execute Vector,Field_Write
01dc 4813 |H | Short_Literal 0x13
01dd 4800 |H | Short_Literal 0x0
01de 4800 |H | Short_Literal 0x0
01df 00d9 | | Load_Top At_Offset_1
01e0 e604 | | Load 0x3,0x4
01e1 01d6 | | Execute Vector,Field_Write
01e2 3ffb |? | Loop_Increasing 0x1de
01e3 481f |H | Short_Literal 0x1f
01e4 4815 |H | Short_Literal 0x15
01e5 4800 |H | Short_Literal 0x0
01e6 00d9 | | Load_Top At_Offset_1
01e7 e604 | | Load 0x3,0x4
01e8 01d6 | | Execute Vector,Field_Write
01e9 3ffb |? | Loop_Increasing 0x1e5
01ea e00b | | Load 0x0,0xb
01eb 3004 |0 | Execute Record,Field_Type,Field_Number 0x4
01ec 0119 | | Execute Any,Check_In_Formal_Type
01ed 00d9 | | Load_Top At_Offset_1
01ee 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01ef e5ff | | Load 0x2,-0x1
01f0 e00c | | Load 0x0,0xc
01f1 a00d | | Store_Unchecked 0x0,0xd
01f2 e00e | | Load 0x0,0xe
01f3 e00f | | Load 0x0,0xf
01f4 a010 | | Store_Unchecked 0x0,0x10
01f5 8011 | | Call 0x0,0x11
01f6 e5fd | | Load 0x2,-0x3
01f7 e5ff | | Load 0x2,-0x1
01f8 e012 | | Load 0x0,0x12
01f9 a013 | | Store_Unchecked 0x0,0x13
01fa e014 | | Load 0x0,0x14
01fb e015 | | Load 0x0,0x15
01fc a016 | | Store_Unchecked 0x0,0x16
01fd 8017 | | Call 0x0,0x17
01fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ff TRAP_01c0:
01ff 0007 | | Action Break_Optional
0200 e5ff | | Load 0x2,-0x1
0201 8004 | | Call 0x0,0x4
0202 00d8 | | Load_Top At_Offset_0
0203 0101 | | Execute Exception,Reraise
0204 0000 0000 | | .BLANK 0000[0x4]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0254 | T | .CONST 0x0254 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b e5fb | | Load 0x2,-0x5
020c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
020d e5ff | | Load 0x2,-0x1
020e 0227 | ' | Execute Access,All_Reference
020f 343c |4< | Execute Record,Field_Reference,Field_Number 0x3c
0210 01d7 | | Execute Vector,Field_Read
0211 a403 | | Store_Unchecked 0x2,0x3
0212 e403 | | Load 0x2,0x3
0213 e008 | | Load 0x0,0x8
0214 022f | / | Execute Access,Equal
0215 6809 |h | Jump_Zero 0x21f
0216 e018 | | Load 0x0,0x18
0217 a403 | | Store_Unchecked 0x2,0x3
0218 e403 | | Load 0x2,0x3
0219 e5fb | | Load 0x2,-0x5
021a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
021b e5ff | | Load 0x2,-0x1
021c 0227 | ' | Execute Access,All_Reference
021d 343c |4< | Execute Record,Field_Reference,Field_Number 0x3c
021e 01d6 | | Execute Vector,Field_Write
021f e019 | | Load 0x0,0x19
0220 e402 | | Load 0x2,0x2
0221 e5fb | | Load 0x2,-0x5
0222 e5ff | | Load 0x2,-0x1
0223 e403 | | Load 0x2,0x3
0224 801a | | Call 0x0,0x1a
0225 801b | | Call 0x0,0x1b
0226 00d1 | | Pop_Control Pop_Count_1
0227 c404 | | Store 0x2,0x4
0228 e404 | | Load 0x2,0x4
0229 7003 |p | Jump_Nonzero 0x22d
022a 4800 |H | Short_Literal 0x0
022b a5fa | | Store_Unchecked 0x2,-0x6
022c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
022d 4801 |H | Short_Literal 0x1
022e a5fa | | Store_Unchecked 0x2,-0x6
022f e01c | | Load 0x0,0x1c
0230 0322 | " | Declare_Variable Record
0231 4819 |H | Short_Literal 0x19
0232 00d9 | | Load_Top At_Offset_1
0233 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0234 e01c | | Load 0x0,0x1c
0235 012c | , | Execute Any,Size
0236 09fb | | Execute_Immediate Binary_Scale,-0x5
0237 00d9 | | Load_Top At_Offset_1
0238 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0239 e5fe | | Load 0x2,-0x2
023a 00d9 | | Load_Top At_Offset_1
023b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
023c e5fd | | Load 0x2,-0x3
023d 801d | | Call 0x0,0x1d
023e 00d9 | | Load_Top At_Offset_1
023f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0240 e5fc | | Load 0x2,-0x4
0241 e01c | | Load 0x0,0x1c
0242 3004 |0 | Execute Record,Field_Type,Field_Number 0x4
0243 0119 | | Execute Any,Check_In_Formal_Type
0244 00d9 | | Load_Top At_Offset_1
0245 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0246 e402 | | Load 0x2,0x2
0247 e01c | | Load 0x0,0x1c
0248 3005 |0 | Execute Record,Field_Type,Field_Number 0x5
0249 0119 | | Execute Any,Check_In_Formal_Type
024a 00d9 | | Load_Top At_Offset_1
024b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
024c e5ff | | Load 0x2,-0x1
024d e01e | | Load 0x0,0x1e
024e a01f | | Store_Unchecked 0x0,0x1f
024f e020 | | Load 0x0,0x20
0250 e021 | ! | Load 0x0,0x21
0251 a022 | " | Store_Unchecked 0x0,0x22
0252 8023 | # | Call 0x0,0x23
0253 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0254 TRAP_0208:
0254 0007 | | Action Break_Optional
0255 e5ff | | Load 0x2,-0x1
0256 8004 | | Call 0x0,0x4
0257 00d8 | | Load_Top At_Offset_0
0258 0101 | | Execute Exception,Reraise
0259 0000 0000 | | .BLANK 0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0274 | t | .CONST 0x0274 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 e5ff | | Load 0x2,-0x1
0264 0227 | ' | Execute Access,All_Reference
0265 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
0266 0c01 | | Execute_Immediate Greater_Equal,0x1
0267 7002 |p | Jump_Nonzero 0x26a
0268 e5fe | | Load 0x2,-0x2
0269 7005 |p | Jump_Nonzero 0x26f
026a e5ff | | Load 0x2,-0x1
026b 0227 | ' | Execute Access,All_Reference
026c 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
026d a402 | | Store_Unchecked 0x2,0x2
026e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
026f e5fe | | Load 0x2,-0x2
0270 e5ff | | Load 0x2,-0x1
0271 8024 | $ | Call 0x0,0x24
0272 a402 | | Store_Unchecked 0x2,0x2
0273 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0274 TRAP_0260:
0274 0007 | | Action Break_Optional
0275 e5ff | | Load 0x2,-0x1
0276 8004 | | Call 0x0,0x4
0277 00d8 | | Load_Top At_Offset_0
0278 0101 | | Execute Exception,Reraise
0279 0000 0000 | | .BLANK 0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0292 | | .CONST 0x0292 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 e5ff | | Load 0x2,-0x1
0284 0227 | ' | Execute Access,All_Reference
0285 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
0286 0c01 | | Execute_Immediate Greater_Equal,0x1
0287 6805 |h | Jump_Zero 0x28d
0288 e5ff | | Load 0x2,-0x1
0289 0227 | ' | Execute Access,All_Reference
028a 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
028b a402 | | Store_Unchecked 0x2,0x2
028c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
028d 4802 |H | Short_Literal 0x2
028e e5ff | | Load 0x2,-0x1
028f 8024 | $ | Call 0x0,0x24
0290 a402 | | Store_Unchecked 0x2,0x2
0291 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0292 TRAP_0280:
0292 0007 | | Action Break_Optional
0293 e5ff | | Load 0x2,-0x1
0294 8004 | | Call 0x0,0x4
0295 00d8 | | Load_Top At_Offset_0
0296 0101 | | Execute Exception,Reraise
0297 0000 | | .XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0330 | 0 | .CONST 0x0330 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b e005 | | Load 0x0,0x5
029c a402 | | Store_Unchecked 0x2,0x2
029d e5fc | | Load 0x2,-0x4
029e 0227 | ' | Execute Access,All_Reference
029f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
02a0 a403 | | Store_Unchecked 0x2,0x3
02a1 00cf | | Action Mark_Auxiliary
02a2 4800 |H | Short_Literal 0x0
02a3 4802 |H | Short_Literal 0x2
02a4 00cf | | Action Mark_Auxiliary
02a5 7868 |xh | Jump 0x30e
02a6 e009 | | Load 0x0,0x9
02a7 0122 | " | Execute Any,Make_Root_Type
02a8 e5fa | | Load 0x2,-0x6
02a9 00d8 | | Load_Top At_Offset_0
02aa 0120 | | Execute Any,Is_Value
02ab 6803 |h | Jump_Zero 0x2af
02ac e5fd | | Load 0x2,-0x3
02ad 0122 | " | Execute Any,Make_Root_Type
02ae 011e | | Execute Any,Convert
02af e403 | | Load 0x2,0x3
02b0 0227 | ' | Execute Access,All_Reference
02b1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02b2 e5fc | | Load 0x2,-0x4
02b3 85fe | | Call 0x2,-0x2
02b4 c5fa | | Store 0x2,-0x6
02b5 c405 | | Store 0x2,0x5
02b6 e405 | | Load 0x2,0x5
02b7 0f01 | | Execute_Immediate Equal,0x1
02b8 684e |hN | Jump_Zero 0x307
02b9 e403 | | Load 0x2,0x3
02ba 0227 | ' | Execute Access,All_Reference
02bb 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02bc e5fb | | Load 0x2,-0x5
02bd 016d | m | Execute Variant_Record,Structure_Write
02be e402 | | Load 0x2,0x2
02bf 680f |h | Jump_Zero 0x2cf
02c0 e403 | | Load 0x2,0x3
02c1 0227 | ' | Execute Access,All_Reference
02c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c3 e402 | | Load 0x2,0x2
02c4 0227 | ' | Execute Access,All_Reference
02c5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02c6 e402 | | Load 0x2,0x2
02c7 0227 | ' | Execute Access,All_Reference
02c8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c9 7013 |p | Jump_Nonzero 0x2dd
02ca e402 | | Load 0x2,0x2
02cb e5fc | | Load 0x2,-0x4
02cc 0227 | ' | Execute Access,All_Reference
02cd 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
02ce 780e |x | Jump 0x2dd
02cf e403 | | Load 0x2,0x3
02d0 0227 | ' | Execute Access,All_Reference
02d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02d2 e5fc | | Load 0x2,-0x4
02d3 0227 | ' | Execute Access,All_Reference
02d4 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
02d5 e5fc | | Load 0x2,-0x4
02d6 0227 | ' | Execute Access,All_Reference
02d7 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
02d8 7004 |p | Jump_Nonzero 0x2dd
02d9 e005 | | Load 0x0,0x5
02da e5fc | | Load 0x2,-0x4
02db 0227 | ' | Execute Access,All_Reference
02dc 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
02dd e5fc | | Load 0x2,-0x4
02de 0227 | ' | Execute Access,All_Reference
02df 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
02e0 0c64 | d | Execute_Immediate Greater_Equal,0x64
02e1 6807 |h | Jump_Zero 0x2e9
02e2 e403 | | Load 0x2,0x3
02e3 e025 | % | Load 0x0,0x25
02e4 e026 | & | Load 0x0,0x26
02e5 a027 | ' | Store_Unchecked 0x0,0x27
02e6 8028 | ( | Call 0x0,0x28
02e7 c403 | | Store 0x2,0x3
02e8 7811 |x | Jump 0x2fa
02e9 e5fc | | Load 0x2,-0x4
02ea 0227 | ' | Execute Access,All_Reference
02eb 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
02ec e403 | | Load 0x2,0x3
02ed 0227 | ' | Execute Access,All_Reference
02ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02ef e403 | | Load 0x2,0x3
02f0 e5fc | | Load 0x2,-0x4
02f1 0227 | ' | Execute Access,All_Reference
02f2 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
02f3 e5fc | | Load 0x2,-0x4
02f4 0227 | ' | Execute Access,All_Reference
02f5 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
02f6 0a01 | | Execute_Immediate Plus,0x1
02f7 e5fc | | Load 0x2,-0x4
02f8 0227 | ' | Execute Access,All_Reference
02f9 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
02fa e5fc | | Load 0x2,-0x4
02fb 0227 | ' | Execute Access,All_Reference
02fc 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
02fd 0aff | | Execute_Immediate Plus,-0x1
02fe e5fc | | Load 0x2,-0x4
02ff 0227 | ' | Execute Access,All_Reference
0300 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
0301 e5fc | | Load 0x2,-0x4
0302 8004 | | Call 0x0,0x4
0303 4801 |H | Short_Literal 0x1
0304 a5f9 | | Store_Unchecked 0x2,-0x7
0305 00cc | | Action Pop_Block
0306 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0307 e403 | | Load 0x2,0x3
0308 a402 | | Store_Unchecked 0x2,0x2
0309 e402 | | Load 0x2,0x2
030a 0227 | ' | Execute Access,All_Reference
030b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
030c a403 | | Store_Unchecked 0x2,0x3
030d 00c9 | | Action Pop_Auxiliary_Loop
030e e403 | | Load 0x2,0x3
030f 7796 |w | Jump_Nonzero 0x2a6
0310 00ce | | Action Pop_Auxiliary
0311 00d8 | | Load_Top At_Offset_0
0312 7002 |p | Jump_Nonzero 0x315
0313 00d2 | | Pop_Control Pop_Count_2
0314 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0315 00d8 | | Load_Top At_Offset_0
0316 0f01 | | Execute_Immediate Equal,0x1
0317 6803 |h | Jump_Zero 0x31b
0318 e5fc | | Load 0x2,-0x4
0319 8003 | | Call 0x0,0x3
031a 7807 |x | Jump 0x322
031b 00d8 | | Load_Top At_Offset_0
031c 0f02 | | Execute_Immediate Equal,0x2
031d 6804 |h | Jump_Zero 0x322
031e 4801 |H | Short_Literal 0x1
031f e5fc | | Load 0x2,-0x4
0320 8024 | $ | Call 0x0,0x24
0321 a404 | | Store_Unchecked 0x2,0x4
0322 e402 | | Load 0x2,0x2
0323 7005 |p | Jump_Nonzero 0x329
0324 e5fc | | Load 0x2,-0x4
0325 0227 | ' | Execute Access,All_Reference
0326 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0327 a403 | | Store_Unchecked 0x2,0x3
0328 7804 |x | Jump 0x32d
0329 e402 | | Load 0x2,0x2
032a 0227 | ' | Execute Access,All_Reference
032b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
032c a403 | | Store_Unchecked 0x2,0x3
032d 00c8 | | Action Pop_Auxiliary_Range
032e 3775 |7u | Loop_Decreasing 0x2a4
032f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0330 TRAP_0298:
0330 0007 | | Action Break_Optional
0331 e5fc | | Load 0x2,-0x4
0332 8004 | | Call 0x0,0x4
0333 00d8 | | Load_Top At_Offset_0
0334 0101 | | Execute Exception,Reraise
0335 0000 0000 | | .XXX[0x3]
0337 0000 | |
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b | ; | .CONST 0x033b ; Address of begin
0339 03da | | .CONST 0x03da ; Address of exception handler
033a 0001 | | .CONST 0x0001 ; Number of locals
033b BODY_0338:
033b INIT_0338:
033b e005 | | Load 0x0,0x5
033c a402 | | Store_Unchecked 0x2,0x2
033d e5ff | | Load 0x2,-0x1
033e 0227 | ' | Execute Access,All_Reference
033f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0340 a403 | | Store_Unchecked 0x2,0x3
0341 00cf | | Action Mark_Auxiliary
0342 4800 |H | Short_Literal 0x0
0343 4802 |H | Short_Literal 0x2
0344 00cf | | Action Mark_Auxiliary
0345 7872 |xr | Jump 0x3b8
0346 e403 | | Load 0x2,0x3
0347 0227 | ' | Execute Access,All_Reference
0348 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0349 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
034a e029 | ) | Load 0x0,0x29
034b 01d5 | | Execute Vector,Field_Reference
034c e5fe | | Load 0x2,-0x2
034d 01d3 | | Execute Vector,And
034e e02a | * | Load 0x0,0x2a
034f 01df | | Execute Vector,Equal
0350 7060 |p` | Jump_Nonzero 0x3b1
0351 e403 | | Load 0x2,0x3
0352 0227 | ' | Execute Access,All_Reference
0353 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0354 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0355 0f06 | | Execute_Immediate Equal,0x6
0356 680c |h | Jump_Zero 0x363
0357 e5fe | | Load 0x2,-0x2
0358 e02b | + | Load 0x0,0x2b
0359 01d3 | | Execute Vector,And
035a e02a | * | Load 0x0,0x2a
035b 01df | | Execute Vector,Equal
035c 6806 |h | Jump_Zero 0x363
035d e5fe | | Load 0x2,-0x2
035e e02c | , | Load 0x0,0x2c
035f 01d3 | | Execute Vector,And
0360 e02a | * | Load 0x0,0x2a
0361 01df | | Execute Vector,Equal
0362 704e |pN | Jump_Nonzero 0x3b1
0363 e403 | | Load 0x2,0x3
0364 0227 | ' | Execute Access,All_Reference
0365 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0366 e5fd | | Load 0x2,-0x3
0367 016d | m | Execute Variant_Record,Structure_Write
0368 e402 | | Load 0x2,0x2
0369 680f |h | Jump_Zero 0x379
036a e403 | | Load 0x2,0x3
036b 0227 | ' | Execute Access,All_Reference
036c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
036d e402 | | Load 0x2,0x2
036e 0227 | ' | Execute Access,All_Reference
036f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0370 e402 | | Load 0x2,0x2
0371 0227 | ' | Execute Access,All_Reference
0372 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0373 7013 |p | Jump_Nonzero 0x387
0374 e402 | | Load 0x2,0x2
0375 e5ff | | Load 0x2,-0x1
0376 0227 | ' | Execute Access,All_Reference
0377 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
0378 780e |x | Jump 0x387
0379 e403 | | Load 0x2,0x3
037a 0227 | ' | Execute Access,All_Reference
037b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
037c e5ff | | Load 0x2,-0x1
037d 0227 | ' | Execute Access,All_Reference
037e 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
037f e5ff | | Load 0x2,-0x1
0380 0227 | ' | Execute Access,All_Reference
0381 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0382 7004 |p | Jump_Nonzero 0x387
0383 e005 | | Load 0x0,0x5
0384 e5ff | | Load 0x2,-0x1
0385 0227 | ' | Execute Access,All_Reference
0386 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
0387 e5ff | | Load 0x2,-0x1
0388 0227 | ' | Execute Access,All_Reference
0389 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
038a 0c64 | d | Execute_Immediate Greater_Equal,0x64
038b 6807 |h | Jump_Zero 0x393
038c e403 | | Load 0x2,0x3
038d e025 | % | Load 0x0,0x25
038e e026 | & | Load 0x0,0x26
038f a027 | ' | Store_Unchecked 0x0,0x27
0390 8028 | ( | Call 0x0,0x28
0391 c403 | | Store 0x2,0x3
0392 7811 |x | Jump 0x3a4
0393 e5ff | | Load 0x2,-0x1
0394 0227 | ' | Execute Access,All_Reference
0395 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
0396 e403 | | Load 0x2,0x3
0397 0227 | ' | Execute Access,All_Reference
0398 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0399 e403 | | Load 0x2,0x3
039a e5ff | | Load 0x2,-0x1
039b 0227 | ' | Execute Access,All_Reference
039c 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
039d e5ff | | Load 0x2,-0x1
039e 0227 | ' | Execute Access,All_Reference
039f 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
03a0 0a01 | | Execute_Immediate Plus,0x1
03a1 e5ff | | Load 0x2,-0x1
03a2 0227 | ' | Execute Access,All_Reference
03a3 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
03a4 e5ff | | Load 0x2,-0x1
03a5 0227 | ' | Execute Access,All_Reference
03a6 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
03a7 0aff | | Execute_Immediate Plus,-0x1
03a8 e5ff | | Load 0x2,-0x1
03a9 0227 | ' | Execute Access,All_Reference
03aa 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
03ab 4801 |H | Short_Literal 0x1
03ac a5fc | | Store_Unchecked 0x2,-0x4
03ad e5ff | | Load 0x2,-0x1
03ae 8004 | | Call 0x0,0x4
03af 00cc | | Action Pop_Block
03b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03b1 e403 | | Load 0x2,0x3
03b2 a402 | | Store_Unchecked 0x2,0x2
03b3 e403 | | Load 0x2,0x3
03b4 0227 | ' | Execute Access,All_Reference
03b5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03b6 a403 | | Store_Unchecked 0x2,0x3
03b7 00c9 | | Action Pop_Auxiliary_Loop
03b8 e403 | | Load 0x2,0x3
03b9 778c |w | Jump_Nonzero 0x346
03ba 00ce | | Action Pop_Auxiliary
03bb 00d8 | | Load_Top At_Offset_0
03bc 7002 |p | Jump_Nonzero 0x3bf
03bd 00d2 | | Pop_Control Pop_Count_2
03be 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03bf 00d8 | | Load_Top At_Offset_0
03c0 0f01 | | Execute_Immediate Equal,0x1
03c1 6803 |h | Jump_Zero 0x3c5
03c2 e5ff | | Load 0x2,-0x1
03c3 8003 | | Call 0x0,0x3
03c4 7807 |x | Jump 0x3cc
03c5 00d8 | | Load_Top At_Offset_0
03c6 0f02 | | Execute_Immediate Equal,0x2
03c7 6804 |h | Jump_Zero 0x3cc
03c8 4801 |H | Short_Literal 0x1
03c9 e5ff | | Load 0x2,-0x1
03ca 8024 | $ | Call 0x0,0x24
03cb a404 | | Store_Unchecked 0x2,0x4
03cc e402 | | Load 0x2,0x2
03cd 7005 |p | Jump_Nonzero 0x3d3
03ce e5ff | | Load 0x2,-0x1
03cf 0227 | ' | Execute Access,All_Reference
03d0 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
03d1 a403 | | Store_Unchecked 0x2,0x3
03d2 7804 |x | Jump 0x3d7
03d3 e402 | | Load 0x2,0x2
03d4 0227 | ' | Execute Access,All_Reference
03d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d6 a403 | | Store_Unchecked 0x2,0x3
03d7 00c8 | | Action Pop_Auxiliary_Range
03d8 376b |7k | Loop_Decreasing 0x344
03d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03da TRAP_0338:
03da 0007 | | Action Break_Optional
03db e5ff | | Load 0x2,-0x1
03dc 8004 | | Call 0x0,0x4
03dd 00d8 | | Load_Top At_Offset_0
03de 0101 | | Execute Exception,Reraise
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 046e | n | .CONST 0x046e ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 e005 | | Load 0x0,0x5
03e4 a402 | | Store_Unchecked 0x2,0x2
03e5 e5ff | | Load 0x2,-0x1
03e6 0227 | ' | Execute Access,All_Reference
03e7 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
03e8 a403 | | Store_Unchecked 0x2,0x3
03e9 00cf | | Action Mark_Auxiliary
03ea 4800 |H | Short_Literal 0x0
03eb 4802 |H | Short_Literal 0x2
03ec 00cf | | Action Mark_Auxiliary
03ed 785c |x\ | Jump 0x44a
03ee e403 | | Load 0x2,0x3
03ef 0227 | ' | Execute Access,All_Reference
03f0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03f1 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03f2 e5fe | | Load 0x2,-0x2
03f3 027f | | Execute Discrete,Equal
03f4 684e |hN | Jump_Zero 0x443
03f5 e403 | | Load 0x2,0x3
03f6 0227 | ' | Execute Access,All_Reference
03f7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03f8 e5fd | | Load 0x2,-0x3
03f9 016d | m | Execute Variant_Record,Structure_Write
03fa e402 | | Load 0x2,0x2
03fb 680f |h | Jump_Zero 0x40b
03fc e403 | | Load 0x2,0x3
03fd 0227 | ' | Execute Access,All_Reference
03fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03ff e402 | | Load 0x2,0x2
0400 0227 | ' | Execute Access,All_Reference
0401 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0402 e402 | | Load 0x2,0x2
0403 0227 | ' | Execute Access,All_Reference
0404 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0405 7013 |p | Jump_Nonzero 0x419
0406 e402 | | Load 0x2,0x2
0407 e5ff | | Load 0x2,-0x1
0408 0227 | ' | Execute Access,All_Reference
0409 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
040a 780e |x | Jump 0x419
040b e403 | | Load 0x2,0x3
040c 0227 | ' | Execute Access,All_Reference
040d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
040e e5ff | | Load 0x2,-0x1
040f 0227 | ' | Execute Access,All_Reference
0410 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0411 e5ff | | Load 0x2,-0x1
0412 0227 | ' | Execute Access,All_Reference
0413 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0414 7004 |p | Jump_Nonzero 0x419
0415 e005 | | Load 0x0,0x5
0416 e5ff | | Load 0x2,-0x1
0417 0227 | ' | Execute Access,All_Reference
0418 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
0419 e5ff | | Load 0x2,-0x1
041a 0227 | ' | Execute Access,All_Reference
041b 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
041c 0c64 | d | Execute_Immediate Greater_Equal,0x64
041d 6807 |h | Jump_Zero 0x425
041e e403 | | Load 0x2,0x3
041f e025 | % | Load 0x0,0x25
0420 e026 | & | Load 0x0,0x26
0421 a027 | ' | Store_Unchecked 0x0,0x27
0422 8028 | ( | Call 0x0,0x28
0423 c403 | | Store 0x2,0x3
0424 7811 |x | Jump 0x436
0425 e5ff | | Load 0x2,-0x1
0426 0227 | ' | Execute Access,All_Reference
0427 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
0428 e403 | | Load 0x2,0x3
0429 0227 | ' | Execute Access,All_Reference
042a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
042b e403 | | Load 0x2,0x3
042c e5ff | | Load 0x2,-0x1
042d 0227 | ' | Execute Access,All_Reference
042e 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
042f e5ff | | Load 0x2,-0x1
0430 0227 | ' | Execute Access,All_Reference
0431 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0432 0a01 | | Execute_Immediate Plus,0x1
0433 e5ff | | Load 0x2,-0x1
0434 0227 | ' | Execute Access,All_Reference
0435 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
0436 e5ff | | Load 0x2,-0x1
0437 0227 | ' | Execute Access,All_Reference
0438 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
0439 0aff | | Execute_Immediate Plus,-0x1
043a e5ff | | Load 0x2,-0x1
043b 0227 | ' | Execute Access,All_Reference
043c 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
043d 4801 |H | Short_Literal 0x1
043e a5fc | | Store_Unchecked 0x2,-0x4
043f e5ff | | Load 0x2,-0x1
0440 8004 | | Call 0x0,0x4
0441 00cc | | Action Pop_Block
0442 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0443 e403 | | Load 0x2,0x3
0444 a402 | | Store_Unchecked 0x2,0x2
0445 e403 | | Load 0x2,0x3
0446 0227 | ' | Execute Access,All_Reference
0447 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0448 a403 | | Store_Unchecked 0x2,0x3
0449 00c9 | | Action Pop_Auxiliary_Loop
044a e403 | | Load 0x2,0x3
044b 77a2 |w | Jump_Nonzero 0x3ee
044c 00ce | | Action Pop_Auxiliary
044d 00d8 | | Load_Top At_Offset_0
044e 7004 |p | Jump_Nonzero 0x453
044f 4800 |H | Short_Literal 0x0
0450 a5fc | | Store_Unchecked 0x2,-0x4
0451 00d2 | | Pop_Control Pop_Count_2
0452 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0453 00d8 | | Load_Top At_Offset_0
0454 0f01 | | Execute_Immediate Equal,0x1
0455 6803 |h | Jump_Zero 0x459
0456 e5ff | | Load 0x2,-0x1
0457 8003 | | Call 0x0,0x3
0458 7807 |x | Jump 0x460
0459 00d8 | | Load_Top At_Offset_0
045a 0f02 | | Execute_Immediate Equal,0x2
045b 6804 |h | Jump_Zero 0x460
045c 4801 |H | Short_Literal 0x1
045d e5ff | | Load 0x2,-0x1
045e 8024 | $ | Call 0x0,0x24
045f a404 | | Store_Unchecked 0x2,0x4
0460 e402 | | Load 0x2,0x2
0461 7005 |p | Jump_Nonzero 0x467
0462 e5ff | | Load 0x2,-0x1
0463 0227 | ' | Execute Access,All_Reference
0464 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0465 a403 | | Store_Unchecked 0x2,0x3
0466 7804 |x | Jump 0x46b
0467 e402 | | Load 0x2,0x2
0468 0227 | ' | Execute Access,All_Reference
0469 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
046a a403 | | Store_Unchecked 0x2,0x3
046b 00c8 | | Action Pop_Auxiliary_Range
046c 377f |7 | Loop_Decreasing 0x3ec
046d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
046e TRAP_03e0:
046e 0007 | | Action Break_Optional
046f e5ff | | Load 0x2,-0x1
0470 8004 | | Call 0x0,0x4
0471 00d8 | | Load_Top At_Offset_0
0472 0101 | | Execute Exception,Reraise
0473 0000 0000 | | .BLANK 0000[0x5]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b | { | .CONST 0x047b ; Address of begin
0479 050d | | .CONST 0x050d ; Address of exception handler
047a 0001 | | .CONST 0x0001 ; Number of locals
047b BODY_0478:
047b INIT_0478:
047b e005 | | Load 0x0,0x5
047c a402 | | Store_Unchecked 0x2,0x2
047d e5ff | | Load 0x2,-0x1
047e 0227 | ' | Execute Access,All_Reference
047f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0480 a403 | | Store_Unchecked 0x2,0x3
0481 00cf | | Action Mark_Auxiliary
0482 4800 |H | Short_Literal 0x0
0483 4802 |H | Short_Literal 0x2
0484 00cf | | Action Mark_Auxiliary
0485 7863 |xc | Jump 0x4e9
0486 e403 | | Load 0x2,0x3
0487 0227 | ' | Execute Access,All_Reference
0488 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0489 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
048a e5fd | | Load 0x2,-0x3
048b 027f | | Execute Discrete,Equal
048c 6855 |hU | Jump_Zero 0x4e2
048d e403 | | Load 0x2,0x3
048e 0227 | ' | Execute Access,All_Reference
048f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0490 2405 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x5
0491 e5fe | | Load 0x2,-0x2
0492 017f | | Execute Record,Equal
0493 684e |hN | Jump_Zero 0x4e2
0494 e403 | | Load 0x2,0x3
0495 0227 | ' | Execute Access,All_Reference
0496 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0497 e5fc | | Load 0x2,-0x4
0498 016d | m | Execute Variant_Record,Structure_Write
0499 e402 | | Load 0x2,0x2
049a 680f |h | Jump_Zero 0x4aa
049b e403 | | Load 0x2,0x3
049c 0227 | ' | Execute Access,All_Reference
049d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
049e e402 | | Load 0x2,0x2
049f 0227 | ' | Execute Access,All_Reference
04a0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04a1 e402 | | Load 0x2,0x2
04a2 0227 | ' | Execute Access,All_Reference
04a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04a4 7013 |p | Jump_Nonzero 0x4b8
04a5 e402 | | Load 0x2,0x2
04a6 e5ff | | Load 0x2,-0x1
04a7 0227 | ' | Execute Access,All_Reference
04a8 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
04a9 780e |x | Jump 0x4b8
04aa e403 | | Load 0x2,0x3
04ab 0227 | ' | Execute Access,All_Reference
04ac 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04ad e5ff | | Load 0x2,-0x1
04ae 0227 | ' | Execute Access,All_Reference
04af 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
04b0 e5ff | | Load 0x2,-0x1
04b1 0227 | ' | Execute Access,All_Reference
04b2 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
04b3 7004 |p | Jump_Nonzero 0x4b8
04b4 e005 | | Load 0x0,0x5
04b5 e5ff | | Load 0x2,-0x1
04b6 0227 | ' | Execute Access,All_Reference
04b7 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
04b8 e5ff | | Load 0x2,-0x1
04b9 0227 | ' | Execute Access,All_Reference
04ba 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
04bb 0c64 | d | Execute_Immediate Greater_Equal,0x64
04bc 6807 |h | Jump_Zero 0x4c4
04bd e403 | | Load 0x2,0x3
04be e025 | % | Load 0x0,0x25
04bf e026 | & | Load 0x0,0x26
04c0 a027 | ' | Store_Unchecked 0x0,0x27
04c1 8028 | ( | Call 0x0,0x28
04c2 c403 | | Store 0x2,0x3
04c3 7811 |x | Jump 0x4d5
04c4 e5ff | | Load 0x2,-0x1
04c5 0227 | ' | Execute Access,All_Reference
04c6 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
04c7 e403 | | Load 0x2,0x3
04c8 0227 | ' | Execute Access,All_Reference
04c9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04ca e403 | | Load 0x2,0x3
04cb e5ff | | Load 0x2,-0x1
04cc 0227 | ' | Execute Access,All_Reference
04cd 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
04ce e5ff | | Load 0x2,-0x1
04cf 0227 | ' | Execute Access,All_Reference
04d0 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
04d1 0a01 | | Execute_Immediate Plus,0x1
04d2 e5ff | | Load 0x2,-0x1
04d3 0227 | ' | Execute Access,All_Reference
04d4 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
04d5 e5ff | | Load 0x2,-0x1
04d6 0227 | ' | Execute Access,All_Reference
04d7 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
04d8 0aff | | Execute_Immediate Plus,-0x1
04d9 e5ff | | Load 0x2,-0x1
04da 0227 | ' | Execute Access,All_Reference
04db 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
04dc 4801 |H | Short_Literal 0x1
04dd a5fb | | Store_Unchecked 0x2,-0x5
04de e5ff | | Load 0x2,-0x1
04df 8004 | | Call 0x0,0x4
04e0 00cc | | Action Pop_Block
04e1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04e2 e403 | | Load 0x2,0x3
04e3 a402 | | Store_Unchecked 0x2,0x2
04e4 e403 | | Load 0x2,0x3
04e5 0227 | ' | Execute Access,All_Reference
04e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04e7 a403 | | Store_Unchecked 0x2,0x3
04e8 00c9 | | Action Pop_Auxiliary_Loop
04e9 e403 | | Load 0x2,0x3
04ea 779b |w | Jump_Nonzero 0x486
04eb 00ce | | Action Pop_Auxiliary
04ec 00d8 | | Load_Top At_Offset_0
04ed 7004 |p | Jump_Nonzero 0x4f2
04ee 4800 |H | Short_Literal 0x0
04ef a5fb | | Store_Unchecked 0x2,-0x5
04f0 00d2 | | Pop_Control Pop_Count_2
04f1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04f2 00d8 | | Load_Top At_Offset_0
04f3 0f01 | | Execute_Immediate Equal,0x1
04f4 6803 |h | Jump_Zero 0x4f8
04f5 e5ff | | Load 0x2,-0x1
04f6 8003 | | Call 0x0,0x3
04f7 7807 |x | Jump 0x4ff
04f8 00d8 | | Load_Top At_Offset_0
04f9 0f02 | | Execute_Immediate Equal,0x2
04fa 6804 |h | Jump_Zero 0x4ff
04fb 4801 |H | Short_Literal 0x1
04fc e5ff | | Load 0x2,-0x1
04fd 8024 | $ | Call 0x0,0x24
04fe a404 | | Store_Unchecked 0x2,0x4
04ff e402 | | Load 0x2,0x2
0500 7005 |p | Jump_Nonzero 0x506
0501 e5ff | | Load 0x2,-0x1
0502 0227 | ' | Execute Access,All_Reference
0503 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0504 a403 | | Store_Unchecked 0x2,0x3
0505 7804 |x | Jump 0x50a
0506 e402 | | Load 0x2,0x2
0507 0227 | ' | Execute Access,All_Reference
0508 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0509 a403 | | Store_Unchecked 0x2,0x3
050a 00c8 | | Action Pop_Auxiliary_Range
050b 3778 |7x | Loop_Decreasing 0x484
050c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
050d TRAP_0478:
050d 0007 | | Action Break_Optional
050e e5ff | | Load 0x2,-0x1
050f 8004 | | Call 0x0,0x4
0510 00d8 | | Load_Top At_Offset_0
0511 0101 | | Execute Exception,Reraise
0512 0000 0000 | | .BLANK 0000[0x6]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 05c3 | | .CONST 0x05c3 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b e005 | | Load 0x0,0x5
051c a402 | | Store_Unchecked 0x2,0x2
051d e5ff | | Load 0x2,-0x1
051e 0227 | ' | Execute Access,All_Reference
051f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0520 a403 | | Store_Unchecked 0x2,0x3
0521 00cf | | Action Mark_Auxiliary
0522 4800 |H | Short_Literal 0x0
0523 4802 |H | Short_Literal 0x2
0524 00cf | | Action Mark_Auxiliary
0525 7879 |xy | Jump 0x59f
0526 e403 | | Load 0x2,0x3
0527 0227 | ' | Execute Access,All_Reference
0528 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0529 2405 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x5
052a e5fe | | Load 0x2,-0x2
052b 017f | | Execute Record,Equal
052c 706b |pk | Jump_Nonzero 0x598
052d e403 | | Load 0x2,0x3
052e 0227 | ' | Execute Access,All_Reference
052f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0530 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0531 e029 | ) | Load 0x0,0x29
0532 01d5 | | Execute Vector,Field_Reference
0533 e5fd | | Load 0x2,-0x3
0534 01d3 | | Execute Vector,And
0535 e02a | * | Load 0x0,0x2a
0536 01df | | Execute Vector,Equal
0537 7060 |p` | Jump_Nonzero 0x598
0538 e403 | | Load 0x2,0x3
0539 0227 | ' | Execute Access,All_Reference
053a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
053b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
053c 0f06 | | Execute_Immediate Equal,0x6
053d 680c |h | Jump_Zero 0x54a
053e e5fd | | Load 0x2,-0x3
053f e02b | + | Load 0x0,0x2b
0540 01d3 | | Execute Vector,And
0541 e02a | * | Load 0x0,0x2a
0542 01df | | Execute Vector,Equal
0543 6806 |h | Jump_Zero 0x54a
0544 e5fd | | Load 0x2,-0x3
0545 e02c | , | Load 0x0,0x2c
0546 01d3 | | Execute Vector,And
0547 e02a | * | Load 0x0,0x2a
0548 01df | | Execute Vector,Equal
0549 704e |pN | Jump_Nonzero 0x598
054a e403 | | Load 0x2,0x3
054b 0227 | ' | Execute Access,All_Reference
054c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
054d e5fc | | Load 0x2,-0x4
054e 016d | m | Execute Variant_Record,Structure_Write
054f e402 | | Load 0x2,0x2
0550 680f |h | Jump_Zero 0x560
0551 e403 | | Load 0x2,0x3
0552 0227 | ' | Execute Access,All_Reference
0553 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0554 e402 | | Load 0x2,0x2
0555 0227 | ' | Execute Access,All_Reference
0556 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0557 e402 | | Load 0x2,0x2
0558 0227 | ' | Execute Access,All_Reference
0559 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
055a 7013 |p | Jump_Nonzero 0x56e
055b e402 | | Load 0x2,0x2
055c e5ff | | Load 0x2,-0x1
055d 0227 | ' | Execute Access,All_Reference
055e 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
055f 780e |x | Jump 0x56e
0560 e403 | | Load 0x2,0x3
0561 0227 | ' | Execute Access,All_Reference
0562 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0563 e5ff | | Load 0x2,-0x1
0564 0227 | ' | Execute Access,All_Reference
0565 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0566 e5ff | | Load 0x2,-0x1
0567 0227 | ' | Execute Access,All_Reference
0568 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0569 7004 |p | Jump_Nonzero 0x56e
056a e005 | | Load 0x0,0x5
056b e5ff | | Load 0x2,-0x1
056c 0227 | ' | Execute Access,All_Reference
056d 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
056e e5ff | | Load 0x2,-0x1
056f 0227 | ' | Execute Access,All_Reference
0570 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0571 0c64 | d | Execute_Immediate Greater_Equal,0x64
0572 6807 |h | Jump_Zero 0x57a
0573 e403 | | Load 0x2,0x3
0574 e025 | % | Load 0x0,0x25
0575 e026 | & | Load 0x0,0x26
0576 a027 | ' | Store_Unchecked 0x0,0x27
0577 8028 | ( | Call 0x0,0x28
0578 c403 | | Store 0x2,0x3
0579 7811 |x | Jump 0x58b
057a e5ff | | Load 0x2,-0x1
057b 0227 | ' | Execute Access,All_Reference
057c 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
057d e403 | | Load 0x2,0x3
057e 0227 | ' | Execute Access,All_Reference
057f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0580 e403 | | Load 0x2,0x3
0581 e5ff | | Load 0x2,-0x1
0582 0227 | ' | Execute Access,All_Reference
0583 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
0584 e5ff | | Load 0x2,-0x1
0585 0227 | ' | Execute Access,All_Reference
0586 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0587 0a01 | | Execute_Immediate Plus,0x1
0588 e5ff | | Load 0x2,-0x1
0589 0227 | ' | Execute Access,All_Reference
058a 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
058b e5ff | | Load 0x2,-0x1
058c 0227 | ' | Execute Access,All_Reference
058d 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
058e 0aff | | Execute_Immediate Plus,-0x1
058f e5ff | | Load 0x2,-0x1
0590 0227 | ' | Execute Access,All_Reference
0591 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
0592 4801 |H | Short_Literal 0x1
0593 a5fb | | Store_Unchecked 0x2,-0x5
0594 e5ff | | Load 0x2,-0x1
0595 8004 | | Call 0x0,0x4
0596 00cc | | Action Pop_Block
0597 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0598 e403 | | Load 0x2,0x3
0599 a402 | | Store_Unchecked 0x2,0x2
059a e403 | | Load 0x2,0x3
059b 0227 | ' | Execute Access,All_Reference
059c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
059d a403 | | Store_Unchecked 0x2,0x3
059e 00c9 | | Action Pop_Auxiliary_Loop
059f e403 | | Load 0x2,0x3
05a0 7785 |w | Jump_Nonzero 0x526
05a1 00ce | | Action Pop_Auxiliary
05a2 00d8 | | Load_Top At_Offset_0
05a3 7004 |p | Jump_Nonzero 0x5a8
05a4 4800 |H | Short_Literal 0x0
05a5 a5fb | | Store_Unchecked 0x2,-0x5
05a6 00d2 | | Pop_Control Pop_Count_2
05a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05a8 00d8 | | Load_Top At_Offset_0
05a9 0f01 | | Execute_Immediate Equal,0x1
05aa 6803 |h | Jump_Zero 0x5ae
05ab e5ff | | Load 0x2,-0x1
05ac 8003 | | Call 0x0,0x3
05ad 7807 |x | Jump 0x5b5
05ae 00d8 | | Load_Top At_Offset_0
05af 0f02 | | Execute_Immediate Equal,0x2
05b0 6804 |h | Jump_Zero 0x5b5
05b1 4801 |H | Short_Literal 0x1
05b2 e5ff | | Load 0x2,-0x1
05b3 8024 | $ | Call 0x0,0x24
05b4 a404 | | Store_Unchecked 0x2,0x4
05b5 e402 | | Load 0x2,0x2
05b6 7005 |p | Jump_Nonzero 0x5bc
05b7 e5ff | | Load 0x2,-0x1
05b8 0227 | ' | Execute Access,All_Reference
05b9 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
05ba a403 | | Store_Unchecked 0x2,0x3
05bb 7804 |x | Jump 0x5c0
05bc e402 | | Load 0x2,0x2
05bd 0227 | ' | Execute Access,All_Reference
05be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05bf a403 | | Store_Unchecked 0x2,0x3
05c0 00c8 | | Action Pop_Auxiliary_Range
05c1 3762 |7b | Loop_Decreasing 0x524
05c2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05c3 TRAP_0518:
05c3 0007 | | Action Break_Optional
05c4 e5ff | | Load 0x2,-0x1
05c5 8004 | | Call 0x0,0x4
05c6 00d8 | | Load_Top At_Offset_0
05c7 0101 | | Execute Exception,Reraise
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb | | .CONST 0x05cb ; Address of begin
05c9 0650 | P | .CONST 0x0650 ; Address of exception handler
05ca 0001 | | .CONST 0x0001 ; Number of locals
05cb BODY_05c8:
05cb INIT_05c8:
05cb e005 | | Load 0x0,0x5
05cc a403 | | Store_Unchecked 0x2,0x3
05cd e5fc | | Load 0x2,-0x4
05ce 0227 | ' | Execute Access,All_Reference
05cf 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
05d0 a402 | | Store_Unchecked 0x2,0x2
05d1 00cf | | Action Mark_Auxiliary
05d2 00cf | | Action Mark_Auxiliary
05d3 7866 |xf | Jump 0x63a
05d4 e009 | | Load 0x0,0x9
05d5 0122 | " | Execute Any,Make_Root_Type
05d6 e5fa | | Load 0x2,-0x6
05d7 00d8 | | Load_Top At_Offset_0
05d8 0120 | | Execute Any,Is_Value
05d9 6803 |h | Jump_Zero 0x5dd
05da e5fd | | Load 0x2,-0x3
05db 0122 | " | Execute Any,Make_Root_Type
05dc 011e | | Execute Any,Convert
05dd e402 | | Load 0x2,0x2
05de 0227 | ' | Execute Access,All_Reference
05df 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
05e0 e5fc | | Load 0x2,-0x4
05e1 85fe | | Call 0x2,-0x2
05e2 c5fa | | Store 0x2,-0x6
05e3 c404 | | Store 0x2,0x4
05e4 e404 | | Load 0x2,0x4
05e5 0f01 | | Execute_Immediate Equal,0x1
05e6 684c |hL | Jump_Zero 0x633
05e7 e402 | | Load 0x2,0x2
05e8 0227 | ' | Execute Access,All_Reference
05e9 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
05ea e5fb | | Load 0x2,-0x5
05eb 016d | m | Execute Variant_Record,Structure_Write
05ec e403 | | Load 0x2,0x3
05ed 680f |h | Jump_Zero 0x5fd
05ee e402 | | Load 0x2,0x2
05ef 0227 | ' | Execute Access,All_Reference
05f0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05f1 e403 | | Load 0x2,0x3
05f2 0227 | ' | Execute Access,All_Reference
05f3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05f4 e402 | | Load 0x2,0x2
05f5 0227 | ' | Execute Access,All_Reference
05f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05f7 7013 |p | Jump_Nonzero 0x60b
05f8 e403 | | Load 0x2,0x3
05f9 e5fc | | Load 0x2,-0x4
05fa 0227 | ' | Execute Access,All_Reference
05fb 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
05fc 780e |x | Jump 0x60b
05fd e402 | | Load 0x2,0x2
05fe 0227 | ' | Execute Access,All_Reference
05ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0600 e5fc | | Load 0x2,-0x4
0601 0227 | ' | Execute Access,All_Reference
0602 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0603 e402 | | Load 0x2,0x2
0604 0227 | ' | Execute Access,All_Reference
0605 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0606 7004 |p | Jump_Nonzero 0x60b
0607 e005 | | Load 0x0,0x5
0608 e5fc | | Load 0x2,-0x4
0609 0227 | ' | Execute Access,All_Reference
060a 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
060b e5fc | | Load 0x2,-0x4
060c 0227 | ' | Execute Access,All_Reference
060d 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
060e 0c64 | d | Execute_Immediate Greater_Equal,0x64
060f 6807 |h | Jump_Zero 0x617
0610 e402 | | Load 0x2,0x2
0611 e025 | % | Load 0x0,0x25
0612 e026 | & | Load 0x0,0x26
0613 a027 | ' | Store_Unchecked 0x0,0x27
0614 8028 | ( | Call 0x0,0x28
0615 c402 | | Store 0x2,0x2
0616 7811 |x | Jump 0x628
0617 e5fc | | Load 0x2,-0x4
0618 0227 | ' | Execute Access,All_Reference
0619 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
061a e402 | | Load 0x2,0x2
061b 0227 | ' | Execute Access,All_Reference
061c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
061d e402 | | Load 0x2,0x2
061e e5fc | | Load 0x2,-0x4
061f 0227 | ' | Execute Access,All_Reference
0620 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
0621 e5fc | | Load 0x2,-0x4
0622 0227 | ' | Execute Access,All_Reference
0623 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0624 0a01 | | Execute_Immediate Plus,0x1
0625 e5fc | | Load 0x2,-0x4
0626 0227 | ' | Execute Access,All_Reference
0627 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
0628 e5fc | | Load 0x2,-0x4
0629 0227 | ' | Execute Access,All_Reference
062a 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
062b 0aff | | Execute_Immediate Plus,-0x1
062c e5fc | | Load 0x2,-0x4
062d 0227 | ' | Execute Access,All_Reference
062e 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
062f e5fc | | Load 0x2,-0x4
0630 8004 | | Call 0x0,0x4
0631 00cc | | Action Pop_Block
0632 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0633 e402 | | Load 0x2,0x2
0634 a403 | | Store_Unchecked 0x2,0x3
0635 e402 | | Load 0x2,0x2
0636 0227 | ' | Execute Access,All_Reference
0637 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0638 a402 | | Store_Unchecked 0x2,0x2
0639 00c9 | | Action Pop_Auxiliary_Loop
063a e402 | | Load 0x2,0x2
063b 7798 |w | Jump_Nonzero 0x5d4
063c 00ce | | Action Pop_Auxiliary
063d e5fc | | Load 0x2,-0x4
063e 802d | - | Call 0x0,0x2d
063f e403 | | Load 0x2,0x3
0640 7005 |p | Jump_Nonzero 0x646
0641 e5fc | | Load 0x2,-0x4
0642 0227 | ' | Execute Access,All_Reference
0643 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0644 a402 | | Store_Unchecked 0x2,0x2
0645 7808 |x | Jump 0x64e
0646 e403 | | Load 0x2,0x3
0647 0227 | ' | Execute Access,All_Reference
0648 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0649 6804 |h | Jump_Zero 0x64e
064a e403 | | Load 0x2,0x3
064b 0227 | ' | Execute Access,All_Reference
064c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
064d a402 | | Store_Unchecked 0x2,0x2
064e 00c9 | | Action Pop_Auxiliary_Loop
064f 7f82 | | Jump 0x5d2
0650 TRAP_05c8:
0650 0007 | | Action Break_Optional
0651 e5fc | | Load 0x2,-0x4
0652 8004 | | Call 0x0,0x4
0653 00d8 | | Load_Top At_Offset_0
0654 0101 | | Execute Exception,Reraise
0655 0000 0000 | | .XXX[0x3]
0657 0000 | |
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 06ea | | .CONST 0x06ea ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b e005 | | Load 0x0,0x5
065c a402 | | Store_Unchecked 0x2,0x2
065d e5ff | | Load 0x2,-0x1
065e 0227 | ' | Execute Access,All_Reference
065f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0660 a403 | | Store_Unchecked 0x2,0x3
0661 00cf | | Action Mark_Auxiliary
0662 00cf | | Action Mark_Auxiliary
0663 7870 |xp | Jump 0x6d4
0664 e403 | | Load 0x2,0x3
0665 0227 | ' | Execute Access,All_Reference
0666 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0667 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0668 e029 | ) | Load 0x0,0x29
0669 01d5 | | Execute Vector,Field_Reference
066a e5fe | | Load 0x2,-0x2
066b 01d3 | | Execute Vector,And
066c e02a | * | Load 0x0,0x2a
066d 01df | | Execute Vector,Equal
066e 705e |p^ | Jump_Nonzero 0x6cd
066f e403 | | Load 0x2,0x3
0670 0227 | ' | Execute Access,All_Reference
0671 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0672 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0673 0f06 | | Execute_Immediate Equal,0x6
0674 680c |h | Jump_Zero 0x681
0675 e5fe | | Load 0x2,-0x2
0676 e02b | + | Load 0x0,0x2b
0677 01d3 | | Execute Vector,And
0678 e02a | * | Load 0x0,0x2a
0679 01df | | Execute Vector,Equal
067a 6806 |h | Jump_Zero 0x681
067b e5fe | | Load 0x2,-0x2
067c e02b | + | Load 0x0,0x2b
067d 01d3 | | Execute Vector,And
067e e02a | * | Load 0x0,0x2a
067f 01df | | Execute Vector,Equal
0680 704c |pL | Jump_Nonzero 0x6cd
0681 e403 | | Load 0x2,0x3
0682 0227 | ' | Execute Access,All_Reference
0683 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0684 e5fd | | Load 0x2,-0x3
0685 016d | m | Execute Variant_Record,Structure_Write
0686 e402 | | Load 0x2,0x2
0687 680f |h | Jump_Zero 0x697
0688 e403 | | Load 0x2,0x3
0689 0227 | ' | Execute Access,All_Reference
068a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
068b e402 | | Load 0x2,0x2
068c 0227 | ' | Execute Access,All_Reference
068d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
068e e402 | | Load 0x2,0x2
068f 0227 | ' | Execute Access,All_Reference
0690 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0691 7013 |p | Jump_Nonzero 0x6a5
0692 e402 | | Load 0x2,0x2
0693 e5ff | | Load 0x2,-0x1
0694 0227 | ' | Execute Access,All_Reference
0695 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
0696 780e |x | Jump 0x6a5
0697 e403 | | Load 0x2,0x3
0698 0227 | ' | Execute Access,All_Reference
0699 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
069a e5ff | | Load 0x2,-0x1
069b 0227 | ' | Execute Access,All_Reference
069c 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
069d e5ff | | Load 0x2,-0x1
069e 0227 | ' | Execute Access,All_Reference
069f 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
06a0 7004 |p | Jump_Nonzero 0x6a5
06a1 e005 | | Load 0x0,0x5
06a2 e5ff | | Load 0x2,-0x1
06a3 0227 | ' | Execute Access,All_Reference
06a4 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
06a5 e5ff | | Load 0x2,-0x1
06a6 0227 | ' | Execute Access,All_Reference
06a7 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
06a8 0c64 | d | Execute_Immediate Greater_Equal,0x64
06a9 6807 |h | Jump_Zero 0x6b1
06aa e403 | | Load 0x2,0x3
06ab e025 | % | Load 0x0,0x25
06ac e026 | & | Load 0x0,0x26
06ad a027 | ' | Store_Unchecked 0x0,0x27
06ae 8028 | ( | Call 0x0,0x28
06af c403 | | Store 0x2,0x3
06b0 7811 |x | Jump 0x6c2
06b1 e5ff | | Load 0x2,-0x1
06b2 0227 | ' | Execute Access,All_Reference
06b3 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
06b4 e403 | | Load 0x2,0x3
06b5 0227 | ' | Execute Access,All_Reference
06b6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06b7 e403 | | Load 0x2,0x3
06b8 e5ff | | Load 0x2,-0x1
06b9 0227 | ' | Execute Access,All_Reference
06ba 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
06bb e5ff | | Load 0x2,-0x1
06bc 0227 | ' | Execute Access,All_Reference
06bd 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
06be 0a01 | | Execute_Immediate Plus,0x1
06bf e5ff | | Load 0x2,-0x1
06c0 0227 | ' | Execute Access,All_Reference
06c1 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
06c2 e5ff | | Load 0x2,-0x1
06c3 0227 | ' | Execute Access,All_Reference
06c4 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
06c5 0aff | | Execute_Immediate Plus,-0x1
06c6 e5ff | | Load 0x2,-0x1
06c7 0227 | ' | Execute Access,All_Reference
06c8 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
06c9 e5ff | | Load 0x2,-0x1
06ca 8004 | | Call 0x0,0x4
06cb 00cc | | Action Pop_Block
06cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06cd e403 | | Load 0x2,0x3
06ce a402 | | Store_Unchecked 0x2,0x2
06cf e403 | | Load 0x2,0x3
06d0 0227 | ' | Execute Access,All_Reference
06d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06d2 a403 | | Store_Unchecked 0x2,0x3
06d3 00c9 | | Action Pop_Auxiliary_Loop
06d4 e403 | | Load 0x2,0x3
06d5 778e |w | Jump_Nonzero 0x664
06d6 00ce | | Action Pop_Auxiliary
06d7 e5ff | | Load 0x2,-0x1
06d8 802d | - | Call 0x0,0x2d
06d9 e402 | | Load 0x2,0x2
06da 7005 |p | Jump_Nonzero 0x6e0
06db e5ff | | Load 0x2,-0x1
06dc 0227 | ' | Execute Access,All_Reference
06dd 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
06de a403 | | Store_Unchecked 0x2,0x3
06df 7808 |x | Jump 0x6e8
06e0 e402 | | Load 0x2,0x2
06e1 0227 | ' | Execute Access,All_Reference
06e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06e3 6804 |h | Jump_Zero 0x6e8
06e4 e402 | | Load 0x2,0x2
06e5 0227 | ' | Execute Access,All_Reference
06e6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06e7 a403 | | Store_Unchecked 0x2,0x3
06e8 00c9 | | Action Pop_Auxiliary_Loop
06e9 7f78 | x | Jump 0x662
06ea TRAP_0658:
06ea 0007 | | Action Break_Optional
06eb e5ff | | Load 0x2,-0x1
06ec 8004 | | Call 0x0,0x4
06ed 00d8 | | Load_Top At_Offset_0
06ee 0101 | | Execute Exception,Reraise
06ef 0000 | | .XXX[0x1]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3 | | .CONST 0x06f3 ; Address of begin
06f1 0735 | 5 | .CONST 0x0735 ; Address of exception handler
06f2 0001 | | .CONST 0x0001 ; Number of locals
06f3 BODY_06f0:
06f3 INIT_06f0:
06f3 e5ff | | Load 0x2,-0x1
06f4 0227 | ' | Execute Access,All_Reference
06f5 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
06f6 7002 |p | Jump_Nonzero 0x6f9
06f7 e5ff | | Load 0x2,-0x1
06f8 802d | - | Call 0x0,0x2d
06f9 e5ff | | Load 0x2,-0x1
06fa 0227 | ' | Execute Access,All_Reference
06fb 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
06fc a402 | | Store_Unchecked 0x2,0x2
06fd e402 | | Load 0x2,0x2
06fe 0227 | ' | Execute Access,All_Reference
06ff 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0700 e5fe | | Load 0x2,-0x2
0701 016d | m | Execute Variant_Record,Structure_Write
0702 e402 | | Load 0x2,0x2
0703 0227 | ' | Execute Access,All_Reference
0704 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0705 e5ff | | Load 0x2,-0x1
0706 0227 | ' | Execute Access,All_Reference
0707 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0708 e5ff | | Load 0x2,-0x1
0709 0227 | ' | Execute Access,All_Reference
070a 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
070b 7004 |p | Jump_Nonzero 0x710
070c e005 | | Load 0x0,0x5
070d e5ff | | Load 0x2,-0x1
070e 0227 | ' | Execute Access,All_Reference
070f 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
0710 e5ff | | Load 0x2,-0x1
0711 0227 | ' | Execute Access,All_Reference
0712 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0713 0c64 | d | Execute_Immediate Greater_Equal,0x64
0714 6807 |h | Jump_Zero 0x71c
0715 e402 | | Load 0x2,0x2
0716 e025 | % | Load 0x0,0x25
0717 e026 | & | Load 0x0,0x26
0718 a027 | ' | Store_Unchecked 0x0,0x27
0719 8028 | ( | Call 0x0,0x28
071a c402 | | Store 0x2,0x2
071b 7811 |x | Jump 0x72d
071c e5ff | | Load 0x2,-0x1
071d 0227 | ' | Execute Access,All_Reference
071e 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
071f e402 | | Load 0x2,0x2
0720 0227 | ' | Execute Access,All_Reference
0721 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0722 e402 | | Load 0x2,0x2
0723 e5ff | | Load 0x2,-0x1
0724 0227 | ' | Execute Access,All_Reference
0725 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
0726 e5ff | | Load 0x2,-0x1
0727 0227 | ' | Execute Access,All_Reference
0728 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0729 0a01 | | Execute_Immediate Plus,0x1
072a e5ff | | Load 0x2,-0x1
072b 0227 | ' | Execute Access,All_Reference
072c 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
072d e5ff | | Load 0x2,-0x1
072e 0227 | ' | Execute Access,All_Reference
072f 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
0730 0aff | | Execute_Immediate Plus,-0x1
0731 e5ff | | Load 0x2,-0x1
0732 0227 | ' | Execute Access,All_Reference
0733 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
0734 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0735 TRAP_06f0:
0735 0007 | | Action Break_Optional
0736 e5ff | | Load 0x2,-0x1
0737 8004 | | Call 0x0,0x4
0738 00d8 | | Load_Top At_Offset_0
0739 0101 | | Execute Exception,Reraise
073a 0000 0000 | | .BLANK 0000[0x6]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743 | C | .CONST 0x0743 ; Address of begin
0741 0751 | Q | .CONST 0x0751 ; Address of exception handler
0742 0001 | | .CONST 0x0001 ; Number of locals
0743 BODY_0740:
0743 INIT_0740:
0743 e5ff | | Load 0x2,-0x1
0744 0227 | ' | Execute Access,All_Reference
0745 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0746 7002 |p | Jump_Nonzero 0x749
0747 e5ff | | Load 0x2,-0x1
0748 802d | - | Call 0x0,0x2d
0749 e5ff | | Load 0x2,-0x1
074a 0227 | ' | Execute Access,All_Reference
074b 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
074c 0227 | ' | Execute Access,All_Reference
074d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
074e e5fe | | Load 0x2,-0x2
074f 016d | m | Execute Variant_Record,Structure_Write
0750 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0751 TRAP_0740:
0751 0007 | | Action Break_Optional
0752 e5ff | | Load 0x2,-0x1
0753 8004 | | Call 0x0,0x4
0754 00d8 | | Load_Top At_Offset_0
0755 0101 | | Execute Exception,Reraise
0756 0000 0000 | | .XXX[0x2]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b | [ | .CONST 0x075b ; Address of begin
0759 07b3 | | .CONST 0x07b3 ; Address of exception handler
075a 0001 | | .CONST 0x0001 ; Number of locals
075b BODY_0758:
075b INIT_0758:
075b e5fc | | Load 0x2,-0x4
075c 0227 | ' | Execute Access,All_Reference
075d 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
075e 7002 |p | Jump_Nonzero 0x761
075f e5fc | | Load 0x2,-0x4
0760 802d | - | Call 0x0,0x2d
0761 e009 | | Load 0x0,0x9
0762 0122 | " | Execute Any,Make_Root_Type
0763 e5fa | | Load 0x2,-0x6
0764 00d8 | | Load_Top At_Offset_0
0765 0120 | | Execute Any,Is_Value
0766 6803 |h | Jump_Zero 0x76a
0767 e5fd | | Load 0x2,-0x3
0768 0122 | " | Execute Any,Make_Root_Type
0769 011e | | Execute Any,Convert
076a e5fc | | Load 0x2,-0x4
076b 0227 | ' | Execute Access,All_Reference
076c 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
076d 0227 | ' | Execute Access,All_Reference
076e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
076f e5fc | | Load 0x2,-0x4
0770 85fe | | Call 0x2,-0x2
0771 c5fa | | Store 0x2,-0x6
0772 c403 | | Store 0x2,0x3
0773 e403 | | Load 0x2,0x3
0774 0f01 | | Execute_Immediate Equal,0x1
0775 6808 |h | Jump_Zero 0x77e
0776 e5fc | | Load 0x2,-0x4
0777 0227 | ' | Execute Access,All_Reference
0778 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0779 0227 | ' | Execute Access,All_Reference
077a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
077b e5fb | | Load 0x2,-0x5
077c 016d | m | Execute Variant_Record,Structure_Write
077d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
077e e5fc | | Load 0x2,-0x4
077f 0227 | ' | Execute Access,All_Reference
0780 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0781 a402 | | Store_Unchecked 0x2,0x2
0782 00cf | | Action Mark_Auxiliary
0783 00cf | | Action Mark_Auxiliary
0784 7825 |x% | Jump 0x7aa
0785 e009 | | Load 0x0,0x9
0786 0122 | " | Execute Any,Make_Root_Type
0787 e5fa | | Load 0x2,-0x6
0788 00d8 | | Load_Top At_Offset_0
0789 0120 | | Execute Any,Is_Value
078a 6803 |h | Jump_Zero 0x78e
078b e5fd | | Load 0x2,-0x3
078c 0122 | " | Execute Any,Make_Root_Type
078d 011e | | Execute Any,Convert
078e e402 | | Load 0x2,0x2
078f 0227 | ' | Execute Access,All_Reference
0790 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0791 0227 | ' | Execute Access,All_Reference
0792 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0793 e5fc | | Load 0x2,-0x4
0794 85fe | | Call 0x2,-0x2
0795 c5fa | | Store 0x2,-0x6
0796 c403 | | Store 0x2,0x3
0797 e403 | | Load 0x2,0x3
0798 0f01 | | Execute_Immediate Equal,0x1
0799 680b |h | Jump_Zero 0x7a5
079a e402 | | Load 0x2,0x2
079b 0227 | ' | Execute Access,All_Reference
079c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
079d 0227 | ' | Execute Access,All_Reference
079e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
079f e5fb | | Load 0x2,-0x5
07a0 016d | m | Execute Variant_Record,Structure_Write
07a1 e5fc | | Load 0x2,-0x4
07a2 8004 | | Call 0x0,0x4
07a3 00cc | | Action Pop_Block
07a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07a5 e402 | | Load 0x2,0x2
07a6 0227 | ' | Execute Access,All_Reference
07a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07a8 a402 | | Store_Unchecked 0x2,0x2
07a9 00c9 | | Action Pop_Auxiliary_Loop
07aa e402 | | Load 0x2,0x2
07ab 0227 | ' | Execute Access,All_Reference
07ac 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07ad 77d7 |w | Jump_Nonzero 0x785
07ae 00ce | | Action Pop_Auxiliary
07af e5fc | | Load 0x2,-0x4
07b0 802d | - | Call 0x0,0x2d
07b1 00c9 | | Action Pop_Auxiliary_Loop
07b2 7fd0 | | Jump 0x783
07b3 TRAP_0758:
07b3 0007 | | Action Break_Optional
07b4 e5fc | | Load 0x2,-0x4
07b5 8004 | | Call 0x0,0x4
07b6 00d8 | | Load_Top At_Offset_0
07b7 0101 | | Execute Exception,Reraise
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb | | .CONST 0x07bb ; Address of begin
07b9 084d | M | .CONST 0x084d ; Address of exception handler
07ba 0001 | | .CONST 0x0001 ; Number of locals
07bb BODY_07b8:
07bb INIT_07b8:
07bb e005 | | Load 0x0,0x5
07bc a402 | | Store_Unchecked 0x2,0x2
07bd e5ff | | Load 0x2,-0x1
07be 0227 | ' | Execute Access,All_Reference
07bf 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
07c0 a403 | | Store_Unchecked 0x2,0x3
07c1 00cf | | Action Mark_Auxiliary
07c2 00cf | | Action Mark_Auxiliary
07c3 7877 |xw | Jump 0x83b
07c4 e403 | | Load 0x2,0x3
07c5 0227 | ' | Execute Access,All_Reference
07c6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
07c7 2405 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x5
07c8 e5fe | | Load 0x2,-0x2
07c9 017f | | Execute Record,Equal
07ca 6869 |hi | Jump_Zero 0x834
07cb e403 | | Load 0x2,0x3
07cc 0227 | ' | Execute Access,All_Reference
07cd 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
07ce 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07cf e029 | ) | Load 0x0,0x29
07d0 01d5 | | Execute Vector,Field_Reference
07d1 e5fd | | Load 0x2,-0x3
07d2 01d3 | | Execute Vector,And
07d3 e02a | * | Load 0x0,0x2a
07d4 01df | | Execute Vector,Equal
07d5 705e |p^ | Jump_Nonzero 0x834
07d6 e403 | | Load 0x2,0x3
07d7 0227 | ' | Execute Access,All_Reference
07d8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
07d9 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07da 0f06 | | Execute_Immediate Equal,0x6
07db 680c |h | Jump_Zero 0x7e8
07dc e5fd | | Load 0x2,-0x3
07dd e02b | + | Load 0x0,0x2b
07de 01d3 | | Execute Vector,And
07df e02a | * | Load 0x0,0x2a
07e0 01df | | Execute Vector,Equal
07e1 6806 |h | Jump_Zero 0x7e8
07e2 e5fd | | Load 0x2,-0x3
07e3 e02c | , | Load 0x0,0x2c
07e4 01d3 | | Execute Vector,And
07e5 e02a | * | Load 0x0,0x2a
07e6 01df | | Execute Vector,Equal
07e7 704c |pL | Jump_Nonzero 0x834
07e8 e403 | | Load 0x2,0x3
07e9 0227 | ' | Execute Access,All_Reference
07ea 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
07eb e5fc | | Load 0x2,-0x4
07ec 016d | m | Execute Variant_Record,Structure_Write
07ed e402 | | Load 0x2,0x2
07ee 680f |h | Jump_Zero 0x7fe
07ef e403 | | Load 0x2,0x3
07f0 0227 | ' | Execute Access,All_Reference
07f1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f2 e402 | | Load 0x2,0x2
07f3 0227 | ' | Execute Access,All_Reference
07f4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
07f5 e402 | | Load 0x2,0x2
07f6 0227 | ' | Execute Access,All_Reference
07f7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f8 7013 |p | Jump_Nonzero 0x80c
07f9 e402 | | Load 0x2,0x2
07fa e5ff | | Load 0x2,-0x1
07fb 0227 | ' | Execute Access,All_Reference
07fc 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
07fd 780e |x | Jump 0x80c
07fe e403 | | Load 0x2,0x3
07ff 0227 | ' | Execute Access,All_Reference
0800 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0801 e5ff | | Load 0x2,-0x1
0802 0227 | ' | Execute Access,All_Reference
0803 3826 |8& | Execute Record,Field_Write,Field_Number 0x26
0804 e5ff | | Load 0x2,-0x1
0805 0227 | ' | Execute Access,All_Reference
0806 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0807 7004 |p | Jump_Nonzero 0x80c
0808 e005 | | Load 0x0,0x5
0809 e5ff | | Load 0x2,-0x1
080a 0227 | ' | Execute Access,All_Reference
080b 3827 |8' | Execute Record,Field_Write,Field_Number 0x27
080c e5ff | | Load 0x2,-0x1
080d 0227 | ' | Execute Access,All_Reference
080e 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
080f 0c64 | d | Execute_Immediate Greater_Equal,0x64
0810 6807 |h | Jump_Zero 0x818
0811 e403 | | Load 0x2,0x3
0812 e025 | % | Load 0x0,0x25
0813 e026 | & | Load 0x0,0x26
0814 a027 | ' | Store_Unchecked 0x0,0x27
0815 8028 | ( | Call 0x0,0x28
0816 c403 | | Store 0x2,0x3
0817 7811 |x | Jump 0x829
0818 e5ff | | Load 0x2,-0x1
0819 0227 | ' | Execute Access,All_Reference
081a 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29
081b e403 | | Load 0x2,0x3
081c 0227 | ' | Execute Access,All_Reference
081d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
081e e403 | | Load 0x2,0x3
081f e5ff | | Load 0x2,-0x1
0820 0227 | ' | Execute Access,All_Reference
0821 3829 |8) | Execute Record,Field_Write,Field_Number 0x29
0822 e5ff | | Load 0x2,-0x1
0823 0227 | ' | Execute Access,All_Reference
0824 3c2a |<* | Execute Record,Field_Read,Field_Number 0x2a
0825 0a01 | | Execute_Immediate Plus,0x1
0826 e5ff | | Load 0x2,-0x1
0827 0227 | ' | Execute Access,All_Reference
0828 382a |8* | Execute Record,Field_Write,Field_Number 0x2a
0829 e5ff | | Load 0x2,-0x1
082a 0227 | ' | Execute Access,All_Reference
082b 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28
082c 0aff | | Execute_Immediate Plus,-0x1
082d e5ff | | Load 0x2,-0x1
082e 0227 | ' | Execute Access,All_Reference
082f 3828 |8( | Execute Record,Field_Write,Field_Number 0x28
0830 e5ff | | Load 0x2,-0x1
0831 8004 | | Call 0x0,0x4
0832 00cc | | Action Pop_Block
0833 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0834 e403 | | Load 0x2,0x3
0835 a402 | | Store_Unchecked 0x2,0x2
0836 e403 | | Load 0x2,0x3
0837 0227 | ' | Execute Access,All_Reference
0838 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0839 a403 | | Store_Unchecked 0x2,0x3
083a 00c9 | | Action Pop_Auxiliary_Loop
083b e403 | | Load 0x2,0x3
083c 7787 |w | Jump_Nonzero 0x7c4
083d 00ce | | Action Pop_Auxiliary
083e e5ff | | Load 0x2,-0x1
083f 802d | - | Call 0x0,0x2d
0840 e402 | | Load 0x2,0x2
0841 7005 |p | Jump_Nonzero 0x847
0842 e5ff | | Load 0x2,-0x1
0843 0227 | ' | Execute Access,All_Reference
0844 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26
0845 a403 | | Store_Unchecked 0x2,0x3
0846 7804 |x | Jump 0x84b
0847 e402 | | Load 0x2,0x2
0848 0227 | ' | Execute Access,All_Reference
0849 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
084a a403 | | Store_Unchecked 0x2,0x3
084b 00c9 | | Action Pop_Auxiliary_Loop
084c 7f75 | u | Jump 0x7c2
084d TRAP_07b8:
084d 0007 | | Action Break_Optional
084e e5ff | | Load 0x2,-0x1
084f 8004 | | Call 0x0,0x4
0850 00d8 | | Load_Top At_Offset_0
0851 0101 | | Execute Exception,Reraise
0852 0000 0000 | | .BLANK 0000[0x6]
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug Table
0858 ; --------------------------------------------------------------------------------------
0858 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68d9,0x0000,0x0001,0x0023
085e 000b 08ea | | .DBG4T 0x000b,0x08ea,0x8000,0x0000
0862 002e 08fd | . | .DBG4T 0x002e,0x08fd,0x8000,0x0000
0866 005b 0910 | [ | .DBG4T 0x005b,0x0910,0x0001,0x0000
086a 006b 0915 | k | .DBG4T 0x006b,0x0915,0x0001,0x0000
086e 007b 091b | { | .DBG4T 0x007b,0x091b,0x0001,0x0000
0872 008b 0921 | !| .DBG4T 0x008b,0x0921,0x0001,0x0000
0876 00a3 092a | *| .DBG4T 0x00a3,0x092a,0x0002,0x0000
087a 00b3 0931 | 1| .DBG4T 0x00b3,0x0931,0x0002,0x0000
087e 00c3 0938 | 8| .DBG4T 0x00c3,0x0938,0x2801,0x0002
0882 00db 0942 | B| .DBG4T 0x00db,0x0942,0x0001,0x0000
0886 00f3 094b | K| .DBG4T 0x00f3,0x094b,0x0001,0x0000
088a 0103 0953 | S| .DBG4T 0x0103,0x0953,0x0001,0x0000
088e 0113 095b | [| .DBG4T 0x0113,0x095b,0x0001,0x0000
0892 0123 0963 | # c| .DBG4T 0x0123,0x0963,0x2801,0x0002
0896 0133 096a | 3 j| .DBG4T 0x0133,0x096a,0x0001,0x0000
089a 0143 0970 | C p| .DBG4T 0x0143,0x0970,0x0001,0x0000
089e 0153 0976 | S v| .DBG4T 0x0153,0x0976,0x0001,0x0000
08a2 0163 097b | c {| .DBG4T 0x0163,0x097b,0x2801,0x0002
08a6 0173 0982 | s | .DBG4T 0x0173,0x0982,0x0001,0x0000
08aa 0183 0988 | | .DBG4T 0x0183,0x0988,0x0004,0x0000
08ae 01c3 0996 | | .DBG4T 0x01c3,0x0996,0x0004,0x0000
08b2 020b 099c | | .DBG4T 0x020b,0x099c,0x0004,0x0000
08b6 0263 09a9 | c | .DBG4T 0x0263,0x09a9,0x0004,0x0000
08ba 0283 09b0 | | .DBG4T 0x0283,0x09b0,0x0004,0x0000
08be 029b 09b7 | | .DBG4T 0x029b,0x09b7,0x0804,0x4002
08c2 033b 0a01 | ; | .DBG4T 0x033b,0x0a01,0x0004,0x4000
08c6 03e3 0a49 | I| .DBG4T 0x03e3,0x0a49,0x0004,0x4000
08ca 047b 0a93 | { | .DBG4T 0x047b,0x0a93,0x0004,0x4000
08ce 051b 0add | | .DBG4T 0x051b,0x0add,0x0004,0x4000
08d2 05cb 0b27 | '| .DBG4T 0x05cb,0x0b27,0x0804,0x4002
08d6 065b 0b67 | [ g| .DBG4T 0x065b,0x0b67,0x0004,0x4000
08da 06f3 0ba5 | | .DBG4T 0x06f3,0x0ba5,0x0004,0x0000
08de 0743 0bb6 | C | .DBG4T 0x0743,0x0bb6,0x0004,0x0000
08e2 075b 0bbd | [ | .DBG4T 0x075b,0x0bbd,0x0804,0x4002
08e6 07bb 0be1 | | .DBG4T 0x07bb,0x0be1,0x0004,0x4000
08ea ; --------------------------------------------------------------------------------------
08ea ; Debug chain
08ea ; --------------------------------------------------------------------------------------
08ea 0011 0000 | | .DBGLEN 0x0011,0x0000
08ec 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b
08fd ; --------------------------------------------------------------------------------------
08fd ; Debug chain
08fd ; --------------------------------------------------------------------------------------
08fd 0011 0000 | | .DBGLEN 0x0011,0x0000
08ff 002e 0030 | . 0| .DBGLNO 0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug chain
0910 ; --------------------------------------------------------------------------------------
0910 0000 0003 | | .DBGLEN 0x0000,0x0003
0912 005b 005d | [ ]| .DBGLNO 0x005b,0x005d,0x005f
0915 ; --------------------------------------------------------------------------------------
0915 ; Debug chain
0915 ; --------------------------------------------------------------------------------------
0915 0001 0003 | | .DBGLEN 0x0001,0x0003
0917 006b 006e | k n| .DBGLNO 0x006b,0x006e,0x0070,0x0071
091b ; --------------------------------------------------------------------------------------
091b ; Debug chain
091b ; --------------------------------------------------------------------------------------
091b 0000 0004 | | .DBGLEN 0x0000,0x0004
091d 007d 007f | } | .DBGLNO 0x007d,0x007f,0x0080,0x0082
0921 ; --------------------------------------------------------------------------------------
0921 ; Debug chain
0921 ; --------------------------------------------------------------------------------------
0921 0003 0004 | | .DBGLEN 0x0003,0x0004
0923 008b 0091 | | .DBGLNO 0x008b,0x0091,0x0093,0x0096,0x0098,0x0099,0x009b
092a ; --------------------------------------------------------------------------------------
092a ; Debug chain
092a ; --------------------------------------------------------------------------------------
092a 0001 0004 | | .DBGLEN 0x0001,0x0004
092c 00a3 00a6 | | .DBGLNO 0x00a3,0x00a6,0x00a8,0x00a9,0x00ab
0931 ; --------------------------------------------------------------------------------------
0931 ; Debug chain
0931 ; --------------------------------------------------------------------------------------
0931 0001 0004 | | .DBGLEN 0x0001,0x0004
0933 00b3 00b6 | | .DBGLNO 0x00b3,0x00b6,0x00b8,0x00b9,0x00bb
0938 ; --------------------------------------------------------------------------------------
0938 ; Debug chain
0938 ; --------------------------------------------------------------------------------------
0938 0004 0004 | | .DBGLEN 0x0004,0x0004
093a 00c3 00c5 | | .DBGLNO 0x00c3,0x00c5,0x00c7,0x00c9,0x00cc,0x00ce,0x00cf,0x00d1
0942 ; --------------------------------------------------------------------------------------
0942 ; Debug chain
0942 ; --------------------------------------------------------------------------------------
0942 0003 0004 | | .DBGLEN 0x0003,0x0004
0944 00db 00dd | | .DBGLNO 0x00db,0x00dd,0x00df,0x00e2,0x00e4,0x00e5,0x00e7
094b ; --------------------------------------------------------------------------------------
094b ; Debug chain
094b ; --------------------------------------------------------------------------------------
094b 0003 0003 | | .DBGLEN 0x0003,0x0003
094d 00f3 00f5 | | .DBGLNO 0x00f3,0x00f5,0x00f7,0x00fa,0x00fc,0x00fd
0953 ; --------------------------------------------------------------------------------------
0953 ; Debug chain
0953 ; --------------------------------------------------------------------------------------
0953 0003 0003 | | .DBGLEN 0x0003,0x0003
0955 0103 0105 | | .DBGLNO 0x0103,0x0105,0x0107,0x010a,0x010c,0x010d
095b ; --------------------------------------------------------------------------------------
095b ; Debug chain
095b ; --------------------------------------------------------------------------------------
095b 0003 0003 | | .DBGLEN 0x0003,0x0003
095d 0113 0115 | | .DBGLNO 0x0113,0x0115,0x0117,0x011a,0x011c,0x011d
0963 ; --------------------------------------------------------------------------------------
0963 ; Debug chain
0963 ; --------------------------------------------------------------------------------------
0963 0003 0002 | | .DBGLEN 0x0003,0x0002
0965 0123 0125 | # %| .DBGLNO 0x0123,0x0125,0x0127,0x012a,0x012c
096a ; --------------------------------------------------------------------------------------
096a ; Debug chain
096a ; --------------------------------------------------------------------------------------
096a 0002 0002 | | .DBGLEN 0x0002,0x0002
096c 0133 0135 | 3 5| .DBGLNO 0x0133,0x0135,0x0138,0x013a
0970 ; --------------------------------------------------------------------------------------
0970 ; Debug chain
0970 ; --------------------------------------------------------------------------------------
0970 0001 0003 | | .DBGLEN 0x0001,0x0003
0972 0143 0146 | C F| .DBGLNO 0x0143,0x0146,0x0148,0x0149
0976 ; --------------------------------------------------------------------------------------
0976 ; Debug chain
0976 ; --------------------------------------------------------------------------------------
0976 0000 0003 | | .DBGLEN 0x0000,0x0003
0978 0155 0157 | U W| .DBGLNO 0x0155,0x0157,0x0158
097b ; --------------------------------------------------------------------------------------
097b ; Debug chain
097b ; --------------------------------------------------------------------------------------
097b 0002 0003 | | .DBGLEN 0x0002,0x0003
097d 0163 0165 | c e| .DBGLNO 0x0163,0x0165,0x0168,0x016a,0x016b
0982 ; --------------------------------------------------------------------------------------
0982 ; Debug chain
0982 ; --------------------------------------------------------------------------------------
0982 0002 0002 | | .DBGLEN 0x0002,0x0002
0984 0173 0175 | s u| .DBGLNO 0x0173,0x0175,0x0178,0x017a
0988 ; --------------------------------------------------------------------------------------
0988 ; Debug chain
0988 ; --------------------------------------------------------------------------------------
0988 0000 000c | | .DBGLEN 0x0000,0x000c
098a 0183 0187 | | .DBGLNO 0x0183,0x0187,0x018b,0x0192,0x0198,0x019e,0x01a2,0x01a6,0x01aa,0x01ae,0x01b7,0x01b9
0996 ; --------------------------------------------------------------------------------------
0996 ; Debug chain
0996 ; --------------------------------------------------------------------------------------
0996 0000 0004 | | .DBGLEN 0x0000,0x0004
0998 01c3 01f6 | | .DBGLNO 0x01c3,0x01f6,0x0200,0x0202
099c ; --------------------------------------------------------------------------------------
099c ; Debug chain
099c ; --------------------------------------------------------------------------------------
099c 0000 000b | | .DBGLEN 0x0000,0x000b
099e 020b 0212 | | .DBGLNO 0x020b,0x0212,0x0216,0x0218,0x021f,0x0228,0x022a,0x022d,0x022f,0x0255,0x0257
09a9 ; --------------------------------------------------------------------------------------
09a9 ; Debug chain
09a9 ; --------------------------------------------------------------------------------------
09a9 0000 0005 | | .DBGLEN 0x0000,0x0005
09ab 0263 026a | c j| .DBGLNO 0x0263,0x026a,0x026f,0x0275,0x0277
09b0 ; --------------------------------------------------------------------------------------
09b0 ; Debug chain
09b0 ; --------------------------------------------------------------------------------------
09b0 0000 0005 | | .DBGLEN 0x0000,0x0005
09b2 0283 0288 | | .DBGLNO 0x0283,0x0288,0x028d,0x0293,0x0295
09b7 ; --------------------------------------------------------------------------------------
09b7 ; Debug chain
09b7 ; --------------------------------------------------------------------------------------
09b7 0000 0024 | $| .DBGLEN 0x0000,0x0024
09b9 029b 029d | | .DBGLNO 0x029b,0x029d,0x02a2,0x02a6,0x02b6,0x02b9,0x02be,0x02c0,0x02c6,0x02ca,0x02cf,0x02d5,0x02d9,0x02dd,0x02e2,0x02e9,0x02ef,0x02f3,0x02fa,0x0301,0x0303,0x0305,0x0307,0x0309,0x030e,0x0311,0x0313,0x0315,0x0318,0x031b,0x031e,0x0322,0x0324,0x0329,0x0331,0x0333
09dd 0001 0002 | | .XXX[0x24]
09df 0003 0005 | |
09e1 0006 0007 | |
09e3 0008 0009 | |
09e5 000a 000b | |
09e7 000c 000d | |
09e9 000e 000f | |
09eb 0010 0011 | |
09ed 0012 0013 | |
09ef 0014 0015 | |
09f1 0016 0017 | |
09f3 0018 0019 | |
09f5 0004 001a | |
09f7 001b 001c | |
09f9 001d 001e | |
09fb 001f 0020 | |
09fd 0021 0022 | ! "|
09ff 0023 0024 | # $|
0a01 ; --------------------------------------------------------------------------------------
0a01 ; Debug chain
0a01 ; --------------------------------------------------------------------------------------
0a01 0000 0023 | #| .DBGLEN 0x0000,0x0023
0a03 033b 033d | ; =| .DBGLNO 0x033b,0x033d,0x0342,0x0346,0x0363,0x0368,0x036a,0x0370,0x0374,0x0379,0x037f,0x0383,0x0387,0x038c,0x0393,0x0399,0x039d,0x03a4,0x03ab,0x03ad,0x03af,0x03b1,0x03b3,0x03b8,0x03bb,0x03bd,0x03bf,0x03c2,0x03c5,0x03c8,0x03cc,0x03ce,0x03d3,0x03db,0x03dd
0a26 0001 0002 | | .XXX[0x23]
0a28 0003 0005 | |
0a2a 0006 0007 | |
0a2c 0008 0009 | |
0a2e 000a 000b | |
0a30 000c 000d | |
0a32 000e 000f | |
0a34 0010 0011 | |
0a36 0012 0013 | |
0a38 0014 0015 | |
0a3a 0016 0017 | |
0a3c 0018 0004 | |
0a3e 0019 001a | |
0a40 001b 001c | |
0a42 001d 001e | |
0a44 001f 0020 | |
0a46 0021 0022 | ! "|
0a48 0023 | # |
0a49 ; --------------------------------------------------------------------------------------
0a49 ; Debug chain
0a49 ; --------------------------------------------------------------------------------------
0a49 0000 0024 | $| .DBGLEN 0x0000,0x0024
0a4b 03e3 03e5 | | .DBGLNO 0x03e3,0x03e5,0x03ea,0x03ee,0x03f5,0x03fa,0x03fc,0x0402,0x0406,0x040b,0x0411,0x0415,0x0419,0x041e,0x0425,0x042b,0x042f,0x0436,0x043d,0x043f,0x0441,0x0443,0x0445,0x044a,0x044d,0x044f,0x0451,0x0453,0x0456,0x0459,0x045c,0x0460,0x0462,0x0467,0x046f,0x0471
0a6f 0001 0002 | | .XXX[0x24]
0a71 0003 0005 | |
0a73 0006 0007 | |
0a75 0008 0009 | |
0a77 000a 000b | |
0a79 000c 000d | |
0a7b 000e 000f | |
0a7d 0010 0011 | |
0a7f 0012 0013 | |
0a81 0014 0015 | |
0a83 0016 0017 | |
0a85 0018 0004 | |
0a87 0019 001a | |
0a89 001b 001c | |
0a8b 001d 001e | |
0a8d 001f 0020 | |
0a8f 0021 0022 | ! "|
0a91 0023 0024 | # $|
0a93 ; --------------------------------------------------------------------------------------
0a93 ; Debug chain
0a93 ; --------------------------------------------------------------------------------------
0a93 0000 0024 | $| .DBGLEN 0x0000,0x0024
0a95 047b 047d | { }| .DBGLNO 0x047b,0x047d,0x0482,0x0486,0x0494,0x0499,0x049b,0x04a1,0x04a5,0x04aa,0x04b0,0x04b4,0x04b8,0x04bd,0x04c4,0x04ca,0x04ce,0x04d5,0x04dc,0x04de,0x04e0,0x04e2,0x04e4,0x04e9,0x04ec,0x04ee,0x04f0,0x04f2,0x04f5,0x04f8,0x04fb,0x04ff,0x0501,0x0506,0x050e,0x0510
0ab9 0001 0002 | | .XXX[0x24]
0abb 0003 0005 | |
0abd 0006 0007 | |
0abf 0008 0009 | |
0ac1 000a 000b | |
0ac3 000c 000d | |
0ac5 000e 000f | |
0ac7 0010 0011 | |
0ac9 0012 0013 | |
0acb 0014 0015 | |
0acd 0016 0017 | |
0acf 0018 0004 | |
0ad1 0019 001a | |
0ad3 001b 001c | |
0ad5 001d 001e | |
0ad7 001f 0020 | |
0ad9 0021 0022 | ! "|
0adb 0023 0024 | # $|
0add ; --------------------------------------------------------------------------------------
0add ; Debug chain
0add ; --------------------------------------------------------------------------------------
0add 0000 0024 | $| .DBGLEN 0x0000,0x0024
0adf 051b 051d | | .DBGLNO 0x051b,0x051d,0x0522,0x0526,0x054a,0x054f,0x0551,0x0557,0x055b,0x0560,0x0566,0x056a,0x056e,0x0573,0x057a,0x0580,0x0584,0x058b,0x0592,0x0594,0x0596,0x0598,0x059a,0x059f,0x05a2,0x05a4,0x05a6,0x05a8,0x05ab,0x05ae,0x05b1,0x05b5,0x05b7,0x05bc,0x05c4,0x05c6
0b03 0001 0002 | | .XXX[0x24]
0b05 0003 0005 | |
0b07 0006 0007 | |
0b09 0008 0009 | |
0b0b 000a 000b | |
0b0d 000c 000d | |
0b0f 000e 000f | |
0b11 0010 0011 | |
0b13 0012 0013 | |
0b15 0014 0015 | |
0b17 0016 0017 | |
0b19 0018 0004 | |
0b1b 0019 001a | |
0b1d 001b 001c | |
0b1f 001d 001e | |
0b21 001f 0020 | |
0b23 0021 0022 | ! "|
0b25 0023 0024 | # $|
0b27 ; --------------------------------------------------------------------------------------
0b27 ; Debug chain
0b27 ; --------------------------------------------------------------------------------------
0b27 0000 001f | | .DBGLEN 0x0000,0x001f
0b29 05cb 05cd | | .DBGLNO 0x05cb,0x05cd,0x05d2,0x05d4,0x05e4,0x05e7,0x05ec,0x05ee,0x05f4,0x05f8,0x05fd,0x0603,0x0607,0x060b,0x0610,0x0617,0x061d,0x0621,0x0628,0x062f,0x0631,0x0633,0x0635,0x063a,0x063d,0x063f,0x0641,0x0646,0x064a,0x0651,0x0653
0b48 0001 0002 | | .XXX[0x1f]
0b4a 0003 0005 | |
0b4c 0006 0007 | |
0b4e 0008 0009 | |
0b50 000a 000b | |
0b52 000c 000d | |
0b54 000e 000f | |
0b56 0010 0011 | |
0b58 0012 0013 | |
0b5a 0014 0015 | |
0b5c 0016 0017 | |
0b5e 0018 0004 | |
0b60 0019 001a | |
0b62 001b 001c | |
0b64 001d 001e | |
0b66 001f | |
0b67 ; --------------------------------------------------------------------------------------
0b67 ; Debug chain
0b67 ; --------------------------------------------------------------------------------------
0b67 0000 001e | | .DBGLEN 0x0000,0x001e
0b69 065b 065d | [ ]| .DBGLNO 0x065b,0x065d,0x0662,0x0664,0x0681,0x0686,0x0688,0x068e,0x0692,0x0697,0x069d,0x06a1,0x06a5,0x06aa,0x06b1,0x06b7,0x06bb,0x06c2,0x06c9,0x06cb,0x06cd,0x06cf,0x06d4,0x06d7,0x06d9,0x06db,0x06e0,0x06e4,0x06eb,0x06ed
0b87 0001 0002 | | .XXX[0x1e]
0b89 0003 0005 | |
0b8b 0006 0007 | |
0b8d 0008 0009 | |
0b8f 000a 000b | |
0b91 000c 000d | |
0b93 000e 000f | |
0b95 0010 0011 | |
0b97 0012 0013 | |
0b99 0014 0015 | |
0b9b 0016 0017 | |
0b9d 0004 0018 | |
0b9f 0019 001a | |
0ba1 001b 001c | |
0ba3 001d 001e | |
0ba5 ; --------------------------------------------------------------------------------------
0ba5 ; Debug chain
0ba5 ; --------------------------------------------------------------------------------------
0ba5 0000 000f | | .DBGLEN 0x0000,0x000f
0ba7 06f3 06f7 | | .DBGLNO 0x06f3,0x06f7,0x06f9,0x06fd,0x0702,0x0708,0x070c,0x0710,0x0715,0x071c,0x0722,0x0726,0x072d,0x0736,0x0738
0bb6 ; --------------------------------------------------------------------------------------
0bb6 ; Debug chain
0bb6 ; --------------------------------------------------------------------------------------
0bb6 0000 0005 | | .DBGLEN 0x0000,0x0005
0bb8 0743 0747 | C G| .DBGLNO 0x0743,0x0747,0x0749,0x0752,0x0754
0bbd ; --------------------------------------------------------------------------------------
0bbd ; Debug chain
0bbd ; --------------------------------------------------------------------------------------
0bbd 0000 0011 | | .DBGLEN 0x0000,0x0011
0bbf 075b 075f | [ _| .DBGLNO 0x075b,0x075f,0x0761,0x0773,0x0776,0x077e,0x0783,0x0785,0x0797,0x079a,0x07a1,0x07a3,0x07a5,0x07aa,0x07af,0x07b4,0x07b6
0bd0 0001 0002 | | .XXX[0x11]
0bd2 0003 0004 | |
0bd4 0005 0006 | |
0bd6 0007 0009 | |
0bd8 000a 000b | |
0bda 000c 000d | |
0bdc 000e 0008 | |
0bde 000f 0010 | |
0be0 0011 | |
0be1 ; --------------------------------------------------------------------------------------
0be1 ; Debug chain
0be1 ; --------------------------------------------------------------------------------------
0be1 0000 001d | | .DBGLEN 0x0000,0x001d
0be3 07bb 07bd | | .DBGLNO 0x07bb,0x07bd,0x07c2,0x07c4,0x07e8,0x07ed,0x07ef,0x07f5,0x07f9,0x07fe,0x0804,0x0808,0x080c,0x0811,0x0818,0x081e,0x0822,0x0829,0x0830,0x0832,0x0834,0x0836,0x083b,0x083e,0x0840,0x0842,0x0847,0x084e,0x0850
0c00 0001 0002 | | .XXX[0x1d]
0c02 0003 0005 | |
0c04 0006 0007 | |
0c06 0008 0009 | |
0c08 000a 000b | |
0c0a 000c 000d | |
0c0c 000e 000f | |
0c0e 0010 0011 | |
0c10 0012 0013 | |
0c12 0014 0015 | |
0c14 0016 0017 | |
0c16 0004 0018 | |
0c18 0019 001a | |
0c1a 001b 001c | |
0c1c 001d | |
0c1d 0000 0000 | | .BLANK 0000[0x1e3]