|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 5120 (0x1400)
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 06d8 | | .CONST 0x06d8 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 007f | | .CONST 0x007f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0029 | ) | .CONST 0x0029 ; Number of locals
000b INIT_0008:
000b 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
000d 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0
000f 0007 | | Action Break_Optional
0010 029a 00b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b0
0012 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0
0014 029a 00f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f0
0016 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110
0018 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130
001a 029a 0153 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0150
001c 029a 0173 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0170
001e 029a 0193 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0190
0020 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
0022 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0
0024 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0
0026 029a 01f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f0
0028 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
002a 029a 0233 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0230
002c 029a 027b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0278
002e 029a 02c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02c0
0030 029a 030b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0308
0032 029a 0353 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0350
0034 029a 039b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0398
0036 029a 03e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03e0
0038 029a 0403 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0400
003a 029a 0423 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0420
003c 029a 0443 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0440
003e 029a 0463 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0460
0040 029a 0483 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0480
0042 029a 04a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04a0
0044 00bf | | Action Accept_Activation
0045 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0046 00c7 | | Action Elaborate_Subprogram
0047 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0048 00c7 | | Action Elaborate_Subprogram
0049 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004a 00c7 | | Action Elaborate_Subprogram
004b 1d10 | | Execute_Immediate Reference_Lex_1,0x10
004c 00c7 | | Action Elaborate_Subprogram
004d 029d 04b3 | | Declare_Subprogram For_Outer_Call,INIT_04b0
004f 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0050 00c7 | | Action Elaborate_Subprogram
0051 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0052 00c7 | | Action Elaborate_Subprogram
0053 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0054 00c7 | | Action Elaborate_Subprogram
0055 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0056 00c7 | | Action Elaborate_Subprogram
0057 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0058 00c7 | | Action Elaborate_Subprogram
0059 1d16 | | Execute_Immediate Reference_Lex_1,0x16
005a 00c7 | | Action Elaborate_Subprogram
005b 1d17 | | Execute_Immediate Reference_Lex_1,0x17
005c 00c7 | | Action Elaborate_Subprogram
005d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005e 00c7 | | Action Elaborate_Subprogram
005f 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0060 00c7 | | Action Elaborate_Subprogram
0061 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0062 00c7 | | Action Elaborate_Subprogram
0063 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0064 00c7 | | Action Elaborate_Subprogram
0065 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0066 00c7 | | Action Elaborate_Subprogram
0067 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0068 00c7 | | Action Elaborate_Subprogram
0069 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
006a 00c7 | | Action Elaborate_Subprogram
006b 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
006c 00c7 | | Action Elaborate_Subprogram
006d 1d20 | | Execute_Immediate Reference_Lex_1,0x20
006e 00c7 | | Action Elaborate_Subprogram
006f 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0070 00c7 | | Action Elaborate_Subprogram
0071 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0072 00c7 | | Action Elaborate_Subprogram
0073 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0074 00c7 | | Action Elaborate_Subprogram
0075 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0076 00c7 | | Action Elaborate_Subprogram
0077 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0078 00c7 | | Action Elaborate_Subprogram
0079 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
007a 00c7 | | Action Elaborate_Subprogram
007b 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
007c 00c7 | | Action Elaborate_Subprogram
007d 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
007e 00c7 | | Action Elaborate_Subprogram
007f BODY_0008:
007f 00bc | | Action Signal_Activated
0080 00bb | | Action Signal_Completion
0081 0000 0000 | | .BLANK 0000[0x7]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0092 | | .CONST 0x0092 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0004 | | .CONST 0x0004 ; Number of locals
008b INIT_0088:
008b e002 | | Load 0x0,0x2
008c 02ff | | Declare_Variable Variant_Record
008d 00d8 | | Load_Top At_Offset_0
008e 1c00 | | Execute_Immediate Run_Utility,0x0
008f e003 | | Load 0x0,0x3
0090 029f 04d3 | | Declare_Subprogram For_Call,INIT_04d0
0092 BODY_0088:
0092 e5ff | | Load 0x2,-0x1
0093 8004 | | Call 0x0,0x4
0094 8404 | | Call 0x2,0x4
0095 00da | | Load_Top At_Offset_2
0096 2622 |&" | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x22
0097 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0098 8005 | | Call 0x0,0x5
0099 a5fa | | Store_Unchecked 0x2,-0x6
009a e5ff | | Load 0x2,-0x1
009b 8006 | | Call 0x0,0x6
009c e5ff | | Load 0x2,-0x1
009d 8007 | | Call 0x0,0x7
009e 4503 |E | Exit_Subprogram 0x3
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00ac | | .CONST 0x00ac ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0005 | | .CONST 0x0005 ; Number of locals
00a3 INIT_00a0:
00a3 e002 | | Load 0x0,0x2
00a4 02ff | | Declare_Variable Variant_Record
00a5 00d8 | | Load_Top At_Offset_0
00a6 1c00 | | Execute_Immediate Run_Utility,0x0
00a7 e008 | | Load 0x0,0x8
00a8 0007 | | Action Break_Optional
00a9 e003 | | Load 0x0,0x3
00aa 029f 053b | ;| Declare_Subprogram For_Call,INIT_0538
00ac BODY_00a0:
00ac e5ff | | Load 0x2,-0x1
00ad 8004 | | Call 0x0,0x4
00ae 8405 | | Call 0x2,0x5
00af 0831 | 1 | Execute_Immediate Raise,0x31
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00bd | | .CONST 0x00bd ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0006 | | .CONST 0x0006 ; Number of locals
00b3 INIT_00b0:
00b3 e009 | | Load 0x0,0x9
00b4 0322 | " | Declare_Variable Record
00b5 00d8 | | Load_Top At_Offset_0
00b6 1c00 | | Execute_Immediate Run_Utility,0x0
00b7 e00a | | Load 0x0,0xa
00b8 0007 | | Action Break_Optional
00b9 00e1 | | Load_Encached Boolean_Cache
00ba e003 | | Load 0x0,0x3
00bb 029f 057b | {| Declare_Subprogram For_Call,INIT_0578
00bd BODY_00b0:
00bd e003 | | Load 0x0,0x3
00be 00e1 | | Load_Encached Boolean_Cache
00bf e00b | | Load 0x0,0xb
00c0 e00c | | Load 0x0,0xc
00c1 e00d | | Load 0x0,0xd
00c2 e5fe | | Load 0x2,-0x2
00c3 e5ff | | Load 0x2,-0x1
00c4 820d | | Call 0x1,0xd
00c5 e402 | | Load 0x2,0x2
00c6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c7 e402 | | Load 0x2,0x2
00c8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00c9 e402 | | Load 0x2,0x2
00ca 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00cb c404 | | Store 0x2,0x4
00cc 005a | Z | Store_Top Discrete,At_Offset_2
00cd 00d9 | | Load_Top At_Offset_1
00ce 7002 |p | Jump_Nonzero 0xd1
00cf e00e | | Load 0x0,0xe
00d0 4402 |D | Exit_Subprogram With_Result,0x2
00d1 00da | | Load_Top At_Offset_2
00d2 7002 |p | Jump_Nonzero 0xd5
00d3 e00e | | Load 0x0,0xe
00d4 4402 |D | Exit_Subprogram With_Result,0x2
00d5 e5ff | | Load 0x2,-0x1
00d6 8004 | | Call 0x0,0x4
00d7 8406 | | Call 0x2,0x6
00d8 e5ff | | Load 0x2,-0x1
00d9 8006 | | Call 0x0,0x6
00da 00db | | Load_Top At_Offset_3
00db 0227 | ' | Execute Access,All_Reference
00dc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00dd 4402 |D | Exit_Subprogram With_Result,0x2
00de 0000 0000 | | .XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e6 | | .CONST 0x00e6 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e00a | | Load 0x0,0xa
00e4 029f 05bb | | Declare_Subprogram For_Call,INIT_05b8
00e6 BODY_00e0:
00e6 e5ff | | Load 0x2,-0x1
00e7 8004 | | Call 0x0,0x4
00e8 8403 | | Call 0x2,0x3
00e9 e5ff | | Load 0x2,-0x1
00ea 8006 | | Call 0x0,0x6
00eb 00d9 | | Load_Top At_Offset_1
00ec 0227 | ' | Execute Access,All_Reference
00ed 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00ee 4401 |D | Exit_Subprogram With_Result,0x1
00ef 0000 | | .XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f7 | | .CONST 0x00f7 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0003 | | .CONST 0x0003 ; Number of locals
00f3 INIT_00f0:
00f3 e00a | | Load 0x0,0xa
00f4 0007 | | Action Break_Optional
00f5 e00f | | Load 0x0,0xf
00f6 0007 | | Action Break_Optional
00f7 BODY_00f0:
00f7 e5fe | | Load 0x2,-0x2
00f8 e5ff | | Load 0x2,-0x1
00f9 8229 | ) | Call 0x1,0x29
00fa 003a | : | Store_Top Access,At_Offset_2
00fb 00d9 | | Load_Top At_Offset_1
00fc 7002 |p | Jump_Nonzero 0xff
00fd e010 | | Load 0x0,0x10
00fe 4403 |D | Exit_Subprogram With_Result,0x3
00ff e5ff | | Load 0x2,-0x1
0100 8004 | | Call 0x0,0x4
0101 00d9 | | Load_Top At_Offset_1
0102 0227 | ' | Execute Access,All_Reference
0103 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0104 0039 | 9 | Store_Top Access,At_Offset_1
0105 e5fd | | Load 0x2,-0x3
0106 8011 | | Call 0x0,0x11
0107 00da | | Load_Top At_Offset_2
0108 0227 | ' | Execute Access,All_Reference
0109 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
010a e5ff | | Load 0x2,-0x1
010b 8006 | | Call 0x0,0x6
010c 00d8 | | Load_Top At_Offset_0
010d 8012 | | Call 0x0,0x12
010e 4403 |D | Exit_Subprogram With_Result,0x3
010f 0000 | | .XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0117 | | .CONST 0x0117 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0003 | | .CONST 0x0003 ; Number of locals
0113 INIT_0110:
0113 e00a | | Load 0x0,0xa
0114 0007 | | Action Break_Optional
0115 e00f | | Load 0x0,0xf
0116 0007 | | Action Break_Optional
0117 BODY_0110:
0117 e5fe | | Load 0x2,-0x2
0118 e5ff | | Load 0x2,-0x1
0119 8229 | ) | Call 0x1,0x29
011a 003a | : | Store_Top Access,At_Offset_2
011b 00d9 | | Load_Top At_Offset_1
011c 7002 |p | Jump_Nonzero 0x11f
011d e013 | | Load 0x0,0x13
011e 4403 |D | Exit_Subprogram With_Result,0x3
011f e5ff | | Load 0x2,-0x1
0120 8004 | | Call 0x0,0x4
0121 00d9 | | Load_Top At_Offset_1
0122 0227 | ' | Execute Access,All_Reference
0123 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0124 0039 | 9 | Store_Top Access,At_Offset_1
0125 e5fd | | Load 0x2,-0x3
0126 8014 | | Call 0x0,0x14
0127 00da | | Load_Top At_Offset_2
0128 0227 | ' | Execute Access,All_Reference
0129 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
012a e5ff | | Load 0x2,-0x1
012b 8006 | | Call 0x0,0x6
012c 00d8 | | Load_Top At_Offset_0
012d 8015 | | Call 0x0,0x15
012e 4403 |D | Exit_Subprogram With_Result,0x3
012f 0000 | | .XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0137 | 7 | .CONST 0x0137 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0003 | | .CONST 0x0003 ; Number of locals
0133 INIT_0130:
0133 e00a | | Load 0x0,0xa
0134 0007 | | Action Break_Optional
0135 e00f | | Load 0x0,0xf
0136 0007 | | Action Break_Optional
0137 BODY_0130:
0137 e5fe | | Load 0x2,-0x2
0138 e5ff | | Load 0x2,-0x1
0139 8229 | ) | Call 0x1,0x29
013a 003a | : | Store_Top Access,At_Offset_2
013b 00d9 | | Load_Top At_Offset_1
013c 7002 |p | Jump_Nonzero 0x13f
013d e013 | | Load 0x0,0x13
013e 4403 |D | Exit_Subprogram With_Result,0x3
013f e5ff | | Load 0x2,-0x1
0140 8004 | | Call 0x0,0x4
0141 00d9 | | Load_Top At_Offset_1
0142 0227 | ' | Execute Access,All_Reference
0143 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0144 0039 | 9 | Store_Top Access,At_Offset_1
0145 e5fd | | Load 0x2,-0x3
0146 8014 | | Call 0x0,0x14
0147 00da | | Load_Top At_Offset_2
0148 0227 | ' | Execute Access,All_Reference
0149 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
014a e5ff | | Load 0x2,-0x1
014b 8006 | | Call 0x0,0x6
014c 00d8 | | Load_Top At_Offset_0
014d 8015 | | Call 0x0,0x15
014e 4403 |D | Exit_Subprogram With_Result,0x3
014f 0000 | | .XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0157 | W | .CONST 0x0157 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0003 | | .CONST 0x0003 ; Number of locals
0153 INIT_0150:
0153 e00a | | Load 0x0,0xa
0154 0007 | | Action Break_Optional
0155 e00f | | Load 0x0,0xf
0156 0007 | | Action Break_Optional
0157 BODY_0150:
0157 e5fe | | Load 0x2,-0x2
0158 e5ff | | Load 0x2,-0x1
0159 8229 | ) | Call 0x1,0x29
015a 003a | : | Store_Top Access,At_Offset_2
015b 00d9 | | Load_Top At_Offset_1
015c 7002 |p | Jump_Nonzero 0x15f
015d e016 | | Load 0x0,0x16
015e 4403 |D | Exit_Subprogram With_Result,0x3
015f e5ff | | Load 0x2,-0x1
0160 8004 | | Call 0x0,0x4
0161 00d9 | | Load_Top At_Offset_1
0162 0227 | ' | Execute Access,All_Reference
0163 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0164 0039 | 9 | Store_Top Access,At_Offset_1
0165 e5fd | | Load 0x2,-0x3
0166 8017 | | Call 0x0,0x17
0167 00da | | Load_Top At_Offset_2
0168 0227 | ' | Execute Access,All_Reference
0169 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
016a e5ff | | Load 0x2,-0x1
016b 8006 | | Call 0x0,0x6
016c 00d8 | | Load_Top At_Offset_0
016d 8018 | | Call 0x0,0x18
016e 4403 |D | Exit_Subprogram With_Result,0x3
016f 0000 | | .XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0177 | w | .CONST 0x0177 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0003 | | .CONST 0x0003 ; Number of locals
0173 INIT_0170:
0173 e00a | | Load 0x0,0xa
0174 0007 | | Action Break_Optional
0175 e00f | | Load 0x0,0xf
0176 0007 | | Action Break_Optional
0177 BODY_0170:
0177 e5fe | | Load 0x2,-0x2
0178 e5ff | | Load 0x2,-0x1
0179 8229 | ) | Call 0x1,0x29
017a 003a | : | Store_Top Access,At_Offset_2
017b 00d9 | | Load_Top At_Offset_1
017c 7002 |p | Jump_Nonzero 0x17f
017d e016 | | Load 0x0,0x16
017e 4403 |D | Exit_Subprogram With_Result,0x3
017f e5ff | | Load 0x2,-0x1
0180 8004 | | Call 0x0,0x4
0181 00d9 | | Load_Top At_Offset_1
0182 0227 | ' | Execute Access,All_Reference
0183 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0184 0039 | 9 | Store_Top Access,At_Offset_1
0185 e5fd | | Load 0x2,-0x3
0186 8017 | | Call 0x0,0x17
0187 00da | | Load_Top At_Offset_2
0188 0227 | ' | Execute Access,All_Reference
0189 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
018a e5ff | | Load 0x2,-0x1
018b 8006 | | Call 0x0,0x6
018c 00d8 | | Load_Top At_Offset_0
018d 8018 | | Call 0x0,0x18
018e 4403 |D | Exit_Subprogram With_Result,0x3
018f 0000 | | .XXX[0x1]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0197 | | .CONST 0x0197 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0003 | | .CONST 0x0003 ; Number of locals
0193 INIT_0190:
0193 e00a | | Load 0x0,0xa
0194 0007 | | Action Break_Optional
0195 e00f | | Load 0x0,0xf
0196 0007 | | Action Break_Optional
0197 BODY_0190:
0197 e5fe | | Load 0x2,-0x2
0198 e5ff | | Load 0x2,-0x1
0199 8229 | ) | Call 0x1,0x29
019a 003a | : | Store_Top Access,At_Offset_2
019b 00d9 | | Load_Top At_Offset_1
019c 7002 |p | Jump_Nonzero 0x19f
019d e016 | | Load 0x0,0x16
019e 4403 |D | Exit_Subprogram With_Result,0x3
019f e5ff | | Load 0x2,-0x1
01a0 8004 | | Call 0x0,0x4
01a1 00d9 | | Load_Top At_Offset_1
01a2 0227 | ' | Execute Access,All_Reference
01a3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
01a4 0039 | 9 | Store_Top Access,At_Offset_1
01a5 e5fd | | Load 0x2,-0x3
01a6 8017 | | Call 0x0,0x17
01a7 00da | | Load_Top At_Offset_2
01a8 0227 | ' | Execute Access,All_Reference
01a9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01aa e5ff | | Load 0x2,-0x1
01ab 8006 | | Call 0x0,0x6
01ac 00d8 | | Load_Top At_Offset_0
01ad 8018 | | Call 0x0,0x18
01ae 4403 |D | Exit_Subprogram With_Result,0x3
01af 0000 | | .XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b7 | | .CONST 0x01b7 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0003 | | .CONST 0x0003 ; Number of locals
01b3 INIT_01b0:
01b3 e00a | | Load 0x0,0xa
01b4 0007 | | Action Break_Optional
01b5 e00f | | Load 0x0,0xf
01b6 0007 | | Action Break_Optional
01b7 BODY_01b0:
01b7 e5fe | | Load 0x2,-0x2
01b8 e5ff | | Load 0x2,-0x1
01b9 8229 | ) | Call 0x1,0x29
01ba 003a | : | Store_Top Access,At_Offset_2
01bb 00d9 | | Load_Top At_Offset_1
01bc 7002 |p | Jump_Nonzero 0x1bf
01bd e016 | | Load 0x0,0x16
01be 4403 |D | Exit_Subprogram With_Result,0x3
01bf e5ff | | Load 0x2,-0x1
01c0 8004 | | Call 0x0,0x4
01c1 00d9 | | Load_Top At_Offset_1
01c2 0227 | ' | Execute Access,All_Reference
01c3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
01c4 0039 | 9 | Store_Top Access,At_Offset_1
01c5 e5fd | | Load 0x2,-0x3
01c6 8017 | | Call 0x0,0x17
01c7 00da | | Load_Top At_Offset_2
01c8 0227 | ' | Execute Access,All_Reference
01c9 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01ca e5ff | | Load 0x2,-0x1
01cb 8006 | | Call 0x0,0x6
01cc 00d8 | | Load_Top At_Offset_0
01cd 8018 | | Call 0x0,0x18
01ce 4403 |D | Exit_Subprogram With_Result,0x3
01cf 0000 | | .XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d6 | | .CONST 0x01d6 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 e00f | | Load 0x0,0xf
01d4 029f 0603 | | Declare_Subprogram For_Call,INIT_0600
01d6 BODY_01d0:
01d6 e5ff | | Load 0x2,-0x1
01d7 8004 | | Call 0x0,0x4
01d8 8403 | | Call 0x2,0x3
01d9 e5ff | | Load 0x2,-0x1
01da 8006 | | Call 0x0,0x6
01db 00d9 | | Load_Top At_Offset_1
01dc 8019 | | Call 0x0,0x19
01dd 4403 |D | Exit_Subprogram With_Result,0x3
01de 0000 0000 | | .XXX[0x2]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e6 | | .CONST 0x01e6 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0003 | | .CONST 0x0003 ; Number of locals
01e3 INIT_01e0:
01e3 e00f | | Load 0x0,0xf
01e4 029f 062b | +| Declare_Subprogram For_Call,INIT_0628
01e6 BODY_01e0:
01e6 e5ff | | Load 0x2,-0x1
01e7 8004 | | Call 0x0,0x4
01e8 8403 | | Call 0x2,0x3
01e9 e5ff | | Load 0x2,-0x1
01ea 8006 | | Call 0x0,0x6
01eb 00d9 | | Load_Top At_Offset_1
01ec 801a | | Call 0x0,0x1a
01ed 4403 |D | Exit_Subprogram With_Result,0x3
01ee 0000 0000 | | .XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f7 | | .CONST 0x01f7 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0003 | | .CONST 0x0003 ; Number of locals
01f3 INIT_01f0:
01f3 e00a | | Load 0x0,0xa
01f4 0007 | | Action Break_Optional
01f5 e00f | | Load 0x0,0xf
01f6 0007 | | Action Break_Optional
01f7 BODY_01f0:
01f7 e5fe | | Load 0x2,-0x2
01f8 e5ff | | Load 0x2,-0x1
01f9 8229 | ) | Call 0x1,0x29
01fa 003a | : | Store_Top Access,At_Offset_2
01fb 00d9 | | Load_Top At_Offset_1
01fc 7002 |p | Jump_Nonzero 0x1ff
01fd e01b | | Load 0x0,0x1b
01fe 4403 |D | Exit_Subprogram With_Result,0x3
01ff e5ff | | Load 0x2,-0x1
0200 8004 | | Call 0x0,0x4
0201 00d9 | | Load_Top At_Offset_1
0202 0227 | ' | Execute Access,All_Reference
0203 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0204 0039 | 9 | Store_Top Access,At_Offset_1
0205 e5fd | | Load 0x2,-0x3
0206 801c | | Call 0x0,0x1c
0207 00da | | Load_Top At_Offset_2
0208 0227 | ' | Execute Access,All_Reference
0209 380a |8 | Execute Record,Field_Write,Field_Number 0xa
020a e5ff | | Load 0x2,-0x1
020b 8006 | | Call 0x0,0x6
020c 00d8 | | Load_Top At_Offset_0
020d 801d | | Call 0x0,0x1d
020e 4403 |D | Exit_Subprogram With_Result,0x3
020f 0000 | | .XXX[0x1]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0217 | | .CONST 0x0217 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0003 | | .CONST 0x0003 ; Number of locals
0213 INIT_0210:
0213 e00a | | Load 0x0,0xa
0214 0007 | | Action Break_Optional
0215 e00f | | Load 0x0,0xf
0216 0007 | | Action Break_Optional
0217 BODY_0210:
0217 e5fe | | Load 0x2,-0x2
0218 e5ff | | Load 0x2,-0x1
0219 8229 | ) | Call 0x1,0x29
021a 003a | : | Store_Top Access,At_Offset_2
021b 00d9 | | Load_Top At_Offset_1
021c 7002 |p | Jump_Nonzero 0x21f
021d e01e | | Load 0x0,0x1e
021e 4403 |D | Exit_Subprogram With_Result,0x3
021f e5ff | | Load 0x2,-0x1
0220 8004 | | Call 0x0,0x4
0221 00d9 | | Load_Top At_Offset_1
0222 0227 | ' | Execute Access,All_Reference
0223 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0224 0039 | 9 | Store_Top Access,At_Offset_1
0225 e5fd | | Load 0x2,-0x3
0226 801f | | Call 0x0,0x1f
0227 00da | | Load_Top At_Offset_2
0228 0227 | ' | Execute Access,All_Reference
0229 380b |8 | Execute Record,Field_Write,Field_Number 0xb
022a e5ff | | Load 0x2,-0x1
022b 8006 | | Call 0x0,0x6
022c 00d8 | | Load_Top At_Offset_0
022d 8020 | | Call 0x0,0x20
022e 4403 |D | Exit_Subprogram With_Result,0x3
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0236 | 6 | .CONST 0x0236 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 0227 | ' | Execute Access,All_Reference
0235 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
0236 BODY_0230:
0236 00cf | | Action Mark_Auxiliary
0237 781a |x | Jump 0x252
0238 00d9 | | Load_Top At_Offset_1
0239 0227 | ' | Execute Access,All_Reference
023a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
023b e5fe | | Load 0x2,-0x2
023c 0227 | ' | Execute Access,All_Reference
023d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
023e 027f | | Execute Discrete,Equal
023f 680d |h | Jump_Zero 0x24d
0240 e5fe | | Load 0x2,-0x2
0241 0227 | ' | Execute Access,All_Reference
0242 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0243 00da | | Load_Top At_Offset_2
0244 0227 | ' | Execute Access,All_Reference
0245 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0246 e5fe | | Load 0x2,-0x2
0247 0227 | ' | Execute Access,All_Reference
0248 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0249 00da | | Load_Top At_Offset_2
024a 0227 | ' | Execute Access,All_Reference
024b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
024c 4503 |E | Exit_Subprogram 0x3
024d 00d9 | | Load_Top At_Offset_1
024e 0227 | ' | Execute Access,All_Reference
024f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0250 003a | : | Store_Top Access,At_Offset_2
0251 00c9 | | Action Pop_Auxiliary_Loop
0252 00d9 | | Load_Top At_Offset_1
0253 77e4 |w | Jump_Nonzero 0x238
0254 00ce | | Action Pop_Auxiliary
0255 e021 | ! | Load 0x0,0x21
0256 0322 | " | Declare_Variable Record
0257 e5fe | | Load 0x2,-0x2
0258 0227 | ' | Execute Access,All_Reference
0259 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
025a 00d9 | | Load_Top At_Offset_1
025b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025c e5fe | | Load 0x2,-0x2
025d 0227 | ' | Execute Access,All_Reference
025e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
025f 00d9 | | Load_Top At_Offset_1
0260 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0261 e5fe | | Load 0x2,-0x2
0262 0227 | ' | Execute Access,All_Reference
0263 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0264 00d9 | | Load_Top At_Offset_1
0265 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0266 e5ff | | Load 0x2,-0x1
0267 0227 | ' | Execute Access,All_Reference
0268 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
0269 00d9 | | Load_Top At_Offset_1
026a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
026b e022 | " | Load 0x0,0x22
026c 03b6 | | Declare_Variable Access,By_Allocation,With_Value
026d 0039 | 9 | Store_Top Access,At_Offset_1
026e 00d8 | | Load_Top At_Offset_0
026f e5ff | | Load 0x2,-0x1
0270 0227 | ' | Execute Access,All_Reference
0271 3823 |8# | Execute Record,Field_Write,Field_Number 0x23
0272 4503 |E | Exit_Subprogram 0x3
0273 0000 0000 | | .BLANK 0000[0x5]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e | ~ | .CONST 0x027e ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b 00da | | Load_Top At_Offset_2
027c 0227 | ' | Execute Access,All_Reference
027d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
027e BODY_0278:
027e 00cf | | Action Mark_Auxiliary
027f 781a |x | Jump 0x29a
0280 00d9 | | Load_Top At_Offset_1
0281 0227 | ' | Execute Access,All_Reference
0282 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0283 e5fe | | Load 0x2,-0x2
0284 0227 | ' | Execute Access,All_Reference
0285 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0286 027f | | Execute Discrete,Equal
0287 680d |h | Jump_Zero 0x295
0288 e5fe | | Load 0x2,-0x2
0289 0227 | ' | Execute Access,All_Reference
028a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
028b 00da | | Load_Top At_Offset_2
028c 0227 | ' | Execute Access,All_Reference
028d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
028e e5fe | | Load 0x2,-0x2
028f 0227 | ' | Execute Access,All_Reference
0290 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0291 00da | | Load_Top At_Offset_2
0292 0227 | ' | Execute Access,All_Reference
0293 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0294 4503 |E | Exit_Subprogram 0x3
0295 00d9 | | Load_Top At_Offset_1
0296 0227 | ' | Execute Access,All_Reference
0297 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0298 003a | : | Store_Top Access,At_Offset_2
0299 00c9 | | Action Pop_Auxiliary_Loop
029a 00d9 | | Load_Top At_Offset_1
029b 77e4 |w | Jump_Nonzero 0x280
029c 00ce | | Action Pop_Auxiliary
029d e021 | ! | Load 0x0,0x21
029e 0322 | " | Declare_Variable Record
029f e5fe | | Load 0x2,-0x2
02a0 0227 | ' | Execute Access,All_Reference
02a1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02a2 00d9 | | Load_Top At_Offset_1
02a3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02a4 e5fe | | Load 0x2,-0x2
02a5 0227 | ' | Execute Access,All_Reference
02a6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02a7 00d9 | | Load_Top At_Offset_1
02a8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02a9 e5fe | | Load 0x2,-0x2
02aa 0227 | ' | Execute Access,All_Reference
02ab 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02ac 00d9 | | Load_Top At_Offset_1
02ad 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02ae e5ff | | Load 0x2,-0x1
02af 0227 | ' | Execute Access,All_Reference
02b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b1 00d9 | | Load_Top At_Offset_1
02b2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02b3 e022 | " | Load 0x0,0x22
02b4 03b6 | | Declare_Variable Access,By_Allocation,With_Value
02b5 0039 | 9 | Store_Top Access,At_Offset_1
02b6 00d8 | | Load_Top At_Offset_0
02b7 e5ff | | Load 0x2,-0x1
02b8 0227 | ' | Execute Access,All_Reference
02b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02ba 4503 |E | Exit_Subprogram 0x3
02bb 0000 0000 | | .BLANK 0000[0x5]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c6 | | .CONST 0x02c6 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0002 | | .CONST 0x0002 ; Number of locals
02c3 INIT_02c0:
02c3 00da | | Load_Top At_Offset_2
02c4 0227 | ' | Execute Access,All_Reference
02c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c6 BODY_02c0:
02c6 00cf | | Action Mark_Auxiliary
02c7 781a |x | Jump 0x2e2
02c8 00d9 | | Load_Top At_Offset_1
02c9 0227 | ' | Execute Access,All_Reference
02ca 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02cb e5fe | | Load 0x2,-0x2
02cc 0227 | ' | Execute Access,All_Reference
02cd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ce 027f | | Execute Discrete,Equal
02cf 680d |h | Jump_Zero 0x2dd
02d0 e5fe | | Load 0x2,-0x2
02d1 0227 | ' | Execute Access,All_Reference
02d2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02d3 00da | | Load_Top At_Offset_2
02d4 0227 | ' | Execute Access,All_Reference
02d5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02d6 e5fe | | Load 0x2,-0x2
02d7 0227 | ' | Execute Access,All_Reference
02d8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02d9 00da | | Load_Top At_Offset_2
02da 0227 | ' | Execute Access,All_Reference
02db 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02dc 4503 |E | Exit_Subprogram 0x3
02dd 00d9 | | Load_Top At_Offset_1
02de 0227 | ' | Execute Access,All_Reference
02df 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02e0 003a | : | Store_Top Access,At_Offset_2
02e1 00c9 | | Action Pop_Auxiliary_Loop
02e2 00d9 | | Load_Top At_Offset_1
02e3 77e4 |w | Jump_Nonzero 0x2c8
02e4 00ce | | Action Pop_Auxiliary
02e5 e021 | ! | Load 0x0,0x21
02e6 0322 | " | Declare_Variable Record
02e7 e5fe | | Load 0x2,-0x2
02e8 0227 | ' | Execute Access,All_Reference
02e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ea 00d9 | | Load_Top At_Offset_1
02eb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02ec e5fe | | Load 0x2,-0x2
02ed 0227 | ' | Execute Access,All_Reference
02ee 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ef 00d9 | | Load_Top At_Offset_1
02f0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02f1 e5fe | | Load 0x2,-0x2
02f2 0227 | ' | Execute Access,All_Reference
02f3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02f4 00d9 | | Load_Top At_Offset_1
02f5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02f6 e5ff | | Load 0x2,-0x1
02f7 0227 | ' | Execute Access,All_Reference
02f8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02f9 00d9 | | Load_Top At_Offset_1
02fa 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02fb e022 | " | Load 0x0,0x22
02fc 03b6 | | Declare_Variable Access,By_Allocation,With_Value
02fd 0039 | 9 | Store_Top Access,At_Offset_1
02fe 00d8 | | Load_Top At_Offset_0
02ff e5ff | | Load 0x2,-0x1
0300 0227 | ' | Execute Access,All_Reference
0301 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0302 4503 |E | Exit_Subprogram 0x3
0303 0000 0000 | | .BLANK 0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030e | | .CONST 0x030e ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b 00da | | Load_Top At_Offset_2
030c 0227 | ' | Execute Access,All_Reference
030d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
030e BODY_0308:
030e 00cf | | Action Mark_Auxiliary
030f 781a |x | Jump 0x32a
0310 00d9 | | Load_Top At_Offset_1
0311 0227 | ' | Execute Access,All_Reference
0312 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0313 e5fe | | Load 0x2,-0x2
0314 0227 | ' | Execute Access,All_Reference
0315 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0316 027f | | Execute Discrete,Equal
0317 680d |h | Jump_Zero 0x325
0318 e5fe | | Load 0x2,-0x2
0319 0227 | ' | Execute Access,All_Reference
031a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
031b 00da | | Load_Top At_Offset_2
031c 0227 | ' | Execute Access,All_Reference
031d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
031e e5fe | | Load 0x2,-0x2
031f 0227 | ' | Execute Access,All_Reference
0320 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0321 00da | | Load_Top At_Offset_2
0322 0227 | ' | Execute Access,All_Reference
0323 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0324 4503 |E | Exit_Subprogram 0x3
0325 00d9 | | Load_Top At_Offset_1
0326 0227 | ' | Execute Access,All_Reference
0327 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0328 003a | : | Store_Top Access,At_Offset_2
0329 00c9 | | Action Pop_Auxiliary_Loop
032a 00d9 | | Load_Top At_Offset_1
032b 77e4 |w | Jump_Nonzero 0x310
032c 00ce | | Action Pop_Auxiliary
032d e021 | ! | Load 0x0,0x21
032e 0322 | " | Declare_Variable Record
032f e5fe | | Load 0x2,-0x2
0330 0227 | ' | Execute Access,All_Reference
0331 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0332 00d9 | | Load_Top At_Offset_1
0333 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0334 e5fe | | Load 0x2,-0x2
0335 0227 | ' | Execute Access,All_Reference
0336 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0337 00d9 | | Load_Top At_Offset_1
0338 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0339 e5fe | | Load 0x2,-0x2
033a 0227 | ' | Execute Access,All_Reference
033b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
033c 00d9 | | Load_Top At_Offset_1
033d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
033e e5ff | | Load 0x2,-0x1
033f 0227 | ' | Execute Access,All_Reference
0340 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0341 00d9 | | Load_Top At_Offset_1
0342 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0343 e022 | " | Load 0x0,0x22
0344 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0345 0039 | 9 | Store_Top Access,At_Offset_1
0346 00d8 | | Load_Top At_Offset_0
0347 e5ff | | Load 0x2,-0x1
0348 0227 | ' | Execute Access,All_Reference
0349 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
034a 4503 |E | Exit_Subprogram 0x3
034b 0000 0000 | | .BLANK 0000[0x5]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0356 | V | .CONST 0x0356 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0002 | | .CONST 0x0002 ; Number of locals
0353 INIT_0350:
0353 00da | | Load_Top At_Offset_2
0354 0227 | ' | Execute Access,All_Reference
0355 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0356 BODY_0350:
0356 00cf | | Action Mark_Auxiliary
0357 781a |x | Jump 0x372
0358 00d9 | | Load_Top At_Offset_1
0359 0227 | ' | Execute Access,All_Reference
035a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
035b e5fe | | Load 0x2,-0x2
035c 0227 | ' | Execute Access,All_Reference
035d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
035e 027f | | Execute Discrete,Equal
035f 680d |h | Jump_Zero 0x36d
0360 e5fe | | Load 0x2,-0x2
0361 0227 | ' | Execute Access,All_Reference
0362 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0363 00da | | Load_Top At_Offset_2
0364 0227 | ' | Execute Access,All_Reference
0365 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0366 e5fe | | Load 0x2,-0x2
0367 0227 | ' | Execute Access,All_Reference
0368 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0369 00da | | Load_Top At_Offset_2
036a 0227 | ' | Execute Access,All_Reference
036b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
036c 4503 |E | Exit_Subprogram 0x3
036d 00d9 | | Load_Top At_Offset_1
036e 0227 | ' | Execute Access,All_Reference
036f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0370 003a | : | Store_Top Access,At_Offset_2
0371 00c9 | | Action Pop_Auxiliary_Loop
0372 00d9 | | Load_Top At_Offset_1
0373 77e4 |w | Jump_Nonzero 0x358
0374 00ce | | Action Pop_Auxiliary
0375 e021 | ! | Load 0x0,0x21
0376 0322 | " | Declare_Variable Record
0377 e5fe | | Load 0x2,-0x2
0378 0227 | ' | Execute Access,All_Reference
0379 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
037a 00d9 | | Load_Top At_Offset_1
037b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
037c e5fe | | Load 0x2,-0x2
037d 0227 | ' | Execute Access,All_Reference
037e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
037f 00d9 | | Load_Top At_Offset_1
0380 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0381 e5fe | | Load 0x2,-0x2
0382 0227 | ' | Execute Access,All_Reference
0383 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0384 00d9 | | Load_Top At_Offset_1
0385 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0386 e5ff | | Load 0x2,-0x1
0387 0227 | ' | Execute Access,All_Reference
0388 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0389 00d9 | | Load_Top At_Offset_1
038a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
038b e022 | " | Load 0x0,0x22
038c 03b6 | | Declare_Variable Access,By_Allocation,With_Value
038d 0039 | 9 | Store_Top Access,At_Offset_1
038e 00d8 | | Load_Top At_Offset_0
038f e5ff | | Load 0x2,-0x1
0390 0227 | ' | Execute Access,All_Reference
0391 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0392 4503 |E | Exit_Subprogram 0x3
0393 0000 0000 | | .BLANK 0000[0x5]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039e | | .CONST 0x039e ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0002 | | .CONST 0x0002 ; Number of locals
039b INIT_0398:
039b 00da | | Load_Top At_Offset_2
039c 0227 | ' | Execute Access,All_Reference
039d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
039e BODY_0398:
039e 00cf | | Action Mark_Auxiliary
039f 781a |x | Jump 0x3ba
03a0 00d9 | | Load_Top At_Offset_1
03a1 0227 | ' | Execute Access,All_Reference
03a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03a3 e5fe | | Load 0x2,-0x2
03a4 0227 | ' | Execute Access,All_Reference
03a5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03a6 027f | | Execute Discrete,Equal
03a7 680d |h | Jump_Zero 0x3b5
03a8 e5fe | | Load 0x2,-0x2
03a9 0227 | ' | Execute Access,All_Reference
03aa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03ab 00da | | Load_Top At_Offset_2
03ac 0227 | ' | Execute Access,All_Reference
03ad 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03ae e5fe | | Load 0x2,-0x2
03af 0227 | ' | Execute Access,All_Reference
03b0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03b1 00da | | Load_Top At_Offset_2
03b2 0227 | ' | Execute Access,All_Reference
03b3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03b4 4503 |E | Exit_Subprogram 0x3
03b5 00d9 | | Load_Top At_Offset_1
03b6 0227 | ' | Execute Access,All_Reference
03b7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03b8 003a | : | Store_Top Access,At_Offset_2
03b9 00c9 | | Action Pop_Auxiliary_Loop
03ba 00d9 | | Load_Top At_Offset_1
03bb 77e4 |w | Jump_Nonzero 0x3a0
03bc 00ce | | Action Pop_Auxiliary
03bd e021 | ! | Load 0x0,0x21
03be 0322 | " | Declare_Variable Record
03bf e5fe | | Load 0x2,-0x2
03c0 0227 | ' | Execute Access,All_Reference
03c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03c2 00d9 | | Load_Top At_Offset_1
03c3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03c4 e5fe | | Load 0x2,-0x2
03c5 0227 | ' | Execute Access,All_Reference
03c6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03c7 00d9 | | Load_Top At_Offset_1
03c8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03c9 e5fe | | Load 0x2,-0x2
03ca 0227 | ' | Execute Access,All_Reference
03cb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03cc 00d9 | | Load_Top At_Offset_1
03cd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03ce e5ff | | Load 0x2,-0x1
03cf 0227 | ' | Execute Access,All_Reference
03d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d1 00d9 | | Load_Top At_Offset_1
03d2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
03d3 e022 | " | Load 0x0,0x22
03d4 03b6 | | Declare_Variable Access,By_Allocation,With_Value
03d5 0039 | 9 | Store_Top Access,At_Offset_1
03d6 00d8 | | Load_Top At_Offset_0
03d7 e5ff | | Load 0x2,-0x1
03d8 0227 | ' | Execute Access,All_Reference
03d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03da 4503 |E | Exit_Subprogram 0x3
03db 0000 0000 | | .BLANK 0000[0x5]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e6 | | .CONST 0x03e6 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0002 | | .CONST 0x0002 ; Number of locals
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 0227 | ' | Execute Access,All_Reference
03e5 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
03e6 BODY_03e0:
03e6 00cf | | Action Mark_Auxiliary
03e7 780d |x | Jump 0x3f5
03e8 00d9 | | Load_Top At_Offset_1
03e9 0227 | ' | Execute Access,All_Reference
03ea 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03eb e5fe | | Load 0x2,-0x2
03ec 027f | | Execute Discrete,Equal
03ed 6802 |h | Jump_Zero 0x3f0
03ee 00d9 | | Load_Top At_Offset_1
03ef 4402 |D | Exit_Subprogram With_Result,0x2
03f0 00d9 | | Load_Top At_Offset_1
03f1 0227 | ' | Execute Access,All_Reference
03f2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
03f3 003a | : | Store_Top Access,At_Offset_2
03f4 00c9 | | Action Pop_Auxiliary_Loop
03f5 00d9 | | Load_Top At_Offset_1
03f6 77f1 |w | Jump_Nonzero 0x3e8
03f7 00ce | | Action Pop_Auxiliary
03f8 e022 | " | Load 0x0,0x22
03f9 4402 |D | Exit_Subprogram With_Result,0x2
03fa 0000 0000 | | .BLANK 0000[0x6]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0406 | | .CONST 0x0406 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0002 | | .CONST 0x0002 ; Number of locals
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 0227 | ' | Execute Access,All_Reference
0405 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0406 BODY_0400:
0406 00cf | | Action Mark_Auxiliary
0407 780d |x | Jump 0x415
0408 00d9 | | Load_Top At_Offset_1
0409 0227 | ' | Execute Access,All_Reference
040a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
040b e5fe | | Load 0x2,-0x2
040c 027f | | Execute Discrete,Equal
040d 6802 |h | Jump_Zero 0x410
040e 00d9 | | Load_Top At_Offset_1
040f 4402 |D | Exit_Subprogram With_Result,0x2
0410 00d9 | | Load_Top At_Offset_1
0411 0227 | ' | Execute Access,All_Reference
0412 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0413 003a | : | Store_Top Access,At_Offset_2
0414 00c9 | | Action Pop_Auxiliary_Loop
0415 00d9 | | Load_Top At_Offset_1
0416 77f1 |w | Jump_Nonzero 0x408
0417 00ce | | Action Pop_Auxiliary
0418 e022 | " | Load 0x0,0x22
0419 4402 |D | Exit_Subprogram With_Result,0x2
041a 0000 0000 | | .BLANK 0000[0x6]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0426 | & | .CONST 0x0426 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0002 | | .CONST 0x0002 ; Number of locals
0423 INIT_0420:
0423 00da | | Load_Top At_Offset_2
0424 0227 | ' | Execute Access,All_Reference
0425 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0426 BODY_0420:
0426 00cf | | Action Mark_Auxiliary
0427 780d |x | Jump 0x435
0428 00d9 | | Load_Top At_Offset_1
0429 0227 | ' | Execute Access,All_Reference
042a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
042b e5fe | | Load 0x2,-0x2
042c 027f | | Execute Discrete,Equal
042d 6802 |h | Jump_Zero 0x430
042e 00d9 | | Load_Top At_Offset_1
042f 4402 |D | Exit_Subprogram With_Result,0x2
0430 00d9 | | Load_Top At_Offset_1
0431 0227 | ' | Execute Access,All_Reference
0432 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0433 003a | : | Store_Top Access,At_Offset_2
0434 00c9 | | Action Pop_Auxiliary_Loop
0435 00d9 | | Load_Top At_Offset_1
0436 77f1 |w | Jump_Nonzero 0x428
0437 00ce | | Action Pop_Auxiliary
0438 e022 | " | Load 0x0,0x22
0439 4402 |D | Exit_Subprogram With_Result,0x2
043a 0000 0000 | | .BLANK 0000[0x6]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0446 | F | .CONST 0x0446 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0002 | | .CONST 0x0002 ; Number of locals
0443 INIT_0440:
0443 00da | | Load_Top At_Offset_2
0444 0227 | ' | Execute Access,All_Reference
0445 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0446 BODY_0440:
0446 00cf | | Action Mark_Auxiliary
0447 780d |x | Jump 0x455
0448 00d9 | | Load_Top At_Offset_1
0449 0227 | ' | Execute Access,All_Reference
044a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
044b e5fe | | Load 0x2,-0x2
044c 027f | | Execute Discrete,Equal
044d 6802 |h | Jump_Zero 0x450
044e 00d9 | | Load_Top At_Offset_1
044f 4402 |D | Exit_Subprogram With_Result,0x2
0450 00d9 | | Load_Top At_Offset_1
0451 0227 | ' | Execute Access,All_Reference
0452 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0453 003a | : | Store_Top Access,At_Offset_2
0454 00c9 | | Action Pop_Auxiliary_Loop
0455 00d9 | | Load_Top At_Offset_1
0456 77f1 |w | Jump_Nonzero 0x448
0457 00ce | | Action Pop_Auxiliary
0458 e022 | " | Load 0x0,0x22
0459 4402 |D | Exit_Subprogram With_Result,0x2
045a 0000 0000 | | .BLANK 0000[0x6]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0466 | f | .CONST 0x0466 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0002 | | .CONST 0x0002 ; Number of locals
0463 INIT_0460:
0463 00da | | Load_Top At_Offset_2
0464 0227 | ' | Execute Access,All_Reference
0465 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0466 BODY_0460:
0466 00cf | | Action Mark_Auxiliary
0467 780d |x | Jump 0x475
0468 00d9 | | Load_Top At_Offset_1
0469 0227 | ' | Execute Access,All_Reference
046a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
046b e5fe | | Load 0x2,-0x2
046c 027f | | Execute Discrete,Equal
046d 6802 |h | Jump_Zero 0x470
046e 00d9 | | Load_Top At_Offset_1
046f 4402 |D | Exit_Subprogram With_Result,0x2
0470 00d9 | | Load_Top At_Offset_1
0471 0227 | ' | Execute Access,All_Reference
0472 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0473 003a | : | Store_Top Access,At_Offset_2
0474 00c9 | | Action Pop_Auxiliary_Loop
0475 00d9 | | Load_Top At_Offset_1
0476 77f1 |w | Jump_Nonzero 0x468
0477 00ce | | Action Pop_Auxiliary
0478 e022 | " | Load 0x0,0x22
0479 4402 |D | Exit_Subprogram With_Result,0x2
047a 0000 0000 | | .BLANK 0000[0x6]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0486 | | .CONST 0x0486 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0002 | | .CONST 0x0002 ; Number of locals
0483 INIT_0480:
0483 00da | | Load_Top At_Offset_2
0484 0227 | ' | Execute Access,All_Reference
0485 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0486 BODY_0480:
0486 00cf | | Action Mark_Auxiliary
0487 780d |x | Jump 0x495
0488 00d9 | | Load_Top At_Offset_1
0489 0227 | ' | Execute Access,All_Reference
048a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
048b e5fe | | Load 0x2,-0x2
048c 027f | | Execute Discrete,Equal
048d 6802 |h | Jump_Zero 0x490
048e 00d9 | | Load_Top At_Offset_1
048f 4402 |D | Exit_Subprogram With_Result,0x2
0490 00d9 | | Load_Top At_Offset_1
0491 0227 | ' | Execute Access,All_Reference
0492 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0493 003a | : | Store_Top Access,At_Offset_2
0494 00c9 | | Action Pop_Auxiliary_Loop
0495 00d9 | | Load_Top At_Offset_1
0496 77f1 |w | Jump_Nonzero 0x488
0497 00ce | | Action Pop_Auxiliary
0498 e022 | " | Load 0x0,0x22
0499 4402 |D | Exit_Subprogram With_Result,0x2
049a 0000 0000 | | .BLANK 0000[0x6]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 00da | | Load_Top At_Offset_2
04a4 00db | | Load_Top At_Offset_3
04a5 0227 | ' | Execute Access,All_Reference
04a6 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
04a7 8023 | # | Call 0x0,0x23
04a8 8024 | $ | Call 0x0,0x24
04a9 4401 |D | Exit_Subprogram With_Result,0x1
04aa 0000 0000 | | .BLANK 0000[0x6]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b6 | | .CONST 0x04b6 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0002 | | .CONST 0x0002 ; Number of locals
04b3 INIT_04b0:
04b3 00da | | Load_Top At_Offset_2
04b4 0227 | ' | Execute Access,All_Reference
04b5 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25
04b6 BODY_04b0:
04b6 00cf | | Action Mark_Auxiliary
04b7 780f |x | Jump 0x4c7
04b8 00d9 | | Load_Top At_Offset_1
04b9 0227 | ' | Execute Access,All_Reference
04ba 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04bb 0227 | ' | Execute Access,All_Reference
04bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04bd e5fe | | Load 0x2,-0x2
04be 027f | | Execute Discrete,Equal
04bf 6802 |h | Jump_Zero 0x4c2
04c0 00d9 | | Load_Top At_Offset_1
04c1 4402 |D | Exit_Subprogram With_Result,0x2
04c2 00d9 | | Load_Top At_Offset_1
04c3 0227 | ' | Execute Access,All_Reference
04c4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04c5 003a | : | Store_Top Access,At_Offset_2
04c6 00c9 | | Action Pop_Auxiliary_Loop
04c7 00d9 | | Load_Top At_Offset_1
04c8 77ef |w | Jump_Nonzero 0x4b8
04c9 00ce | | Action Pop_Auxiliary
04ca e00a | | Load 0x0,0xa
04cb 4402 |D | Exit_Subprogram With_Result,0x2
04cc 0000 0000 | | .BLANK 0000[0x4]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3 | | .CONST 0x04d3 ; Address of begin
04d1 0532 | 2 | .CONST 0x0532 ; Address of exception handler
04d2 0001 | | .CONST 0x0001 ; Number of locals
04d3 BODY_04d0:
04d3 INIT_04d0:
04d3 e5fe | | Load 0x2,-0x2
04d4 01db | | Execute Vector,Length
04d5 00d8 | | Load_Top At_Offset_0
04d6 e008 | | Load 0x0,0x8
04d7 0260 | ` | Execute Discrete,In_Type
04d8 7001 |p | Jump_Nonzero 0x4da
04d9 0801 | | Execute_Immediate Raise,0x1
04da e025 | % | Load 0x0,0x25
04db 0322 | " | Declare_Variable Record
04dc 4862 |Hb | Short_Literal 0x62
04dd 00d9 | | Load_Top At_Offset_1
04de 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04df e025 | % | Load 0x0,0x25
04e0 012c | , | Execute Any,Size
04e1 09fb | | Execute_Immediate Binary_Scale,-0x5
04e2 e5fe | | Load 0x2,-0x2
04e3 01db | | Execute Vector,Length
04e4 0a03 | | Execute_Immediate Plus,0x3
04e5 09fe | | Execute_Immediate Binary_Scale,-0x2
04e6 0273 | s | Execute Discrete,Plus
04e7 00d9 | | Load_Top At_Offset_1
04e8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04e9 4800 |H | Short_Literal 0x0
04ea 00d9 | | Load_Top At_Offset_1
04eb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04ec 4800 |H | Short_Literal 0x0
04ed 00d9 | | Load_Top At_Offset_1
04ee 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
04ef 4800 |H | Short_Literal 0x0
04f0 00d9 | | Load_Top At_Offset_1
04f1 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
04f2 e5fe | | Load 0x2,-0x2
04f3 01db | | Execute Vector,Length
04f4 00d9 | | Load_Top At_Offset_1
04f5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04f6 e5ff | | Load 0x2,-0x1
04f7 e026 | & | Load 0x0,0x26
04f8 a027 | ' | Reference 0x0,0x27
04f9 e028 | ( | Load 0x0,0x28
04fa e029 | ) | Load 0x0,0x29
04fb a02a | * | Reference 0x0,0x2a
04fc 802b | + | Call 0x0,0x2b
04fd e5fe | | Load 0x2,-0x2
04fe e5ff | | Load 0x2,-0x1
04ff e02c | , | Load 0x0,0x2c
0500 e02d | - | Load 0x0,0x2d
0501 e02e | . | Load 0x0,0x2e
0502 a02f | / | Reference 0x0,0x2f
0503 e030 | 0 | Load 0x0,0x30
0504 e031 | 1 | Load 0x0,0x31
0505 a032 | 2 | Reference 0x0,0x32
0506 8033 | 3 | Call 0x0,0x33
0507 e003 | | Load 0x0,0x3
0508 e402 | | Load 0x2,0x2
0509 4801 |H | Short_Literal 0x1
050a 4800 |H | Short_Literal 0x0
050b 4862 |Hb | Short_Literal 0x62
050c e5ff | | Load 0x2,-0x1
050d e034 | 4 | Load 0x0,0x34
050e a035 | 5 | Reference 0x0,0x35
050f a036 | 6 | Reference 0x0,0x36
0510 8037 | 7 | Call 0x0,0x37
0511 00d1 | | Pop_Control Pop_Count_1
0512 c403 | | Store 0x2,0x3
0513 e403 | | Load 0x2,0x3
0514 a5f9 | | Store_Unchecked 0x2,-0x7
0515 e403 | | Load 0x2,0x3
0516 700e |p | Jump_Nonzero 0x525
0517 4800 |H | Short_Literal 0x0
0518 a5fd | | Store_Unchecked 0x2,-0x3
0519 4800 |H | Short_Literal 0x0
051a a5fc | | Store_Unchecked 0x2,-0x4
051b 4800 |H | Short_Literal 0x0
051c a5fb | | Store_Unchecked 0x2,-0x5
051d 4800 |H | Short_Literal 0x0
051e a5fa | | Store_Unchecked 0x2,-0x6
051f e5ff | | Load 0x2,-0x1
0520 8006 | | Call 0x0,0x6
0521 e5ff | | Load 0x2,-0x1
0522 8007 | | Call 0x0,0x7
0523 00cc | | Action Pop_Block
0524 4503 |E | Exit_Subprogram 0x3
0525 e402 | | Load 0x2,0x2
0526 2622 |&" | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x22
0527 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0528 a5fd | | Store_Unchecked 0x2,-0x3
0529 e402 | | Load 0x2,0x2
052a 2622 |&" | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x22
052b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
052c c5fc | | Store 0x2,-0x4
052d e402 | | Load 0x2,0x2
052e 2622 |&" | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x22
052f 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0530 a5fb | | Store_Unchecked 0x2,-0x5
0531 4501 |E | Exit_Subprogram 0x1
0532 TRAP_04d0:
0532 0007 | | Action Break_Optional
0533 e5ff | | Load 0x2,-0x1
0534 8006 | | Call 0x0,0x6
0535 00d8 | | Load_Top At_Offset_0
0536 0101 | | Execute Exception,Reraise
0537 0000 | | .XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053d | = | .CONST 0x053d ; Address of begin
0539 056c | l | .CONST 0x056c ; Address of exception handler
053a 0002 | | .CONST 0x0002 ; Number of locals
053b INIT_0538:
053b 029f 0653 | S| Declare_Subprogram For_Call,INIT_0650
053d BODY_0538:
053d e038 | 8 | Load 0x0,0x38
053e 0322 | " | Declare_Variable Record
053f 4863 |Hc | Short_Literal 0x63
0540 00d9 | | Load_Top At_Offset_1
0541 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0542 e038 | 8 | Load 0x0,0x38
0543 012c | , | Execute Any,Size
0544 09fb | | Execute_Immediate Binary_Scale,-0x5
0545 00d9 | | Load_Top At_Offset_1
0546 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0547 4800 |H | Short_Literal 0x0
0548 00d9 | | Load_Top At_Offset_1
0549 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
054a e5ff | | Load 0x2,-0x1
054b e039 | 9 | Load 0x0,0x39
054c a03a | : | Reference 0x0,0x3a
054d e03b | ; | Load 0x0,0x3b
054e e03c | < | Load 0x0,0x3c
054f a03d | = | Reference 0x0,0x3d
0550 803e | > | Call 0x0,0x3e
0551 e003 | | Load 0x0,0x3
0552 e402 | | Load 0x2,0x2
0553 4800 |H | Short_Literal 0x0
0554 4800 |H | Short_Literal 0x0
0555 4863 |Hc | Short_Literal 0x63
0556 e5ff | | Load 0x2,-0x1
0557 e034 | 4 | Load 0x0,0x34
0558 a035 | 5 | Reference 0x0,0x35
0559 a036 | 6 | Reference 0x0,0x36
055a 8037 | 7 | Call 0x0,0x37
055b 00d1 | | Pop_Control Pop_Count_1
055c c404 | | Store 0x2,0x4
055d e404 | | Load 0x2,0x4
055e 6804 |h | Jump_Zero 0x563
055f e402 | | Load 0x2,0x2
0560 2619 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x19
0561 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0562 7007 |p | Jump_Nonzero 0x56a
0563 e5ff | | Load 0x2,-0x1
0564 8006 | | Call 0x0,0x6
0565 e5ff | | Load 0x2,-0x1
0566 8007 | | Call 0x0,0x7
0567 e03f | ? | Load 0x0,0x3f
0568 00cb | | Action Pop_Block_With_Result
0569 4401 |D | Exit_Subprogram With_Result,0x1
056a 8602 | | Call 0x3,0x2
056b 4501 |E | Exit_Subprogram 0x1
056c TRAP_0538:
056c 0007 | | Action Break_Optional
056d e5ff | | Load 0x2,-0x1
056e 8006 | | Call 0x0,0x6
056f 00d8 | | Load_Top At_Offset_0
0570 0101 | | Execute Exception,Reraise
0571 0000 0000 | | .BLANK 0000[0x7]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 059b | | .CONST 0x059b ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b e00a | | Load 0x0,0xa
057c 03bc | | Declare_Variable Access,By_Allocation
057d a403 | | Store_Unchecked 0x2,0x3
057e e5ff | | Load 0x2,-0x1
057f 0227 | ' | Execute Access,All_Reference
0580 3c24 |<$ | Execute Record,Field_Read,Field_Number 0x24
0581 e402 | | Load 0x2,0x2
0582 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0583 e402 | | Load 0x2,0x2
0584 e00e | | Load 0x0,0xe
0585 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0586 e403 | | Load 0x2,0x3
0587 0227 | ' | Execute Access,All_Reference
0588 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0589 e5ff | | Load 0x2,-0x1
058a 0227 | ' | Execute Access,All_Reference
058b 3c24 |<$ | Execute Record,Field_Read,Field_Number 0x24
058c 0a01 | | Execute_Immediate Plus,0x1
058d e5ff | | Load 0x2,-0x1
058e 0227 | ' | Execute Access,All_Reference
058f 3824 |8$ | Execute Record,Field_Write,Field_Number 0x24
0590 e5ff | | Load 0x2,-0x1
0591 0227 | ' | Execute Access,All_Reference
0592 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25
0593 e403 | | Load 0x2,0x3
0594 0227 | ' | Execute Access,All_Reference
0595 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0596 e403 | | Load 0x2,0x3
0597 e5ff | | Load 0x2,-0x1
0598 0227 | ' | Execute Access,All_Reference
0599 3825 |8% | Execute Record,Field_Write,Field_Number 0x25
059a 4501 |E | Exit_Subprogram 0x1
059b TRAP_0578:
059b 0007 | | Action Break_Optional
059c e5ff | | Load 0x2,-0x1
059d 8006 | | Call 0x0,0x6
059e e403 | | Load 0x2,0x3
059f 6815 |h | Jump_Zero 0x5b5
05a0 e403 | | Load 0x2,0x3
05a1 0227 | ' | Execute Access,All_Reference
05a2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05a3 680b |h | Jump_Zero 0x5af
05a4 e403 | | Load 0x2,0x3
05a5 0229 | ) | Execute Access,All_Read
05a6 00d8 | | Load_Top At_Offset_0
05a7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05a8 e040 | @ | Load 0x0,0x40
05a9 e041 | A | Load 0x0,0x41
05aa a042 | B | Reference 0x0,0x42
05ab 8043 | C | Call 0x0,0x43
05ac 00d9 | | Load_Top At_Offset_1
05ad 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05ae 00d1 | | Pop_Control Pop_Count_1
05af e403 | | Load 0x2,0x3
05b0 e044 | D | Load 0x0,0x44
05b1 e045 | E | Load 0x0,0x45
05b2 a046 | F | Reference 0x0,0x46
05b3 8043 | C | Call 0x0,0x43
05b4 c403 | | Store 0x2,0x3
05b5 00d8 | | Load_Top At_Offset_0
05b6 0101 | | Execute Exception,Reraise
05b7 0000 | | .XXX[0x1]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 05e0 | | .CONST 0x05e0 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e00a | | Load 0x0,0xa
05bc 03bc | | Declare_Variable Access,By_Allocation
05bd a402 | | Store_Unchecked 0x2,0x2
05be e00e | | Load 0x0,0xe
05bf 03bc | | Declare_Variable Access,By_Allocation
05c0 00d8 | | Load_Top At_Offset_0
05c1 0227 | ' | Execute Access,All_Reference
05c2 1c00 | | Execute_Immediate Run_Utility,0x0
05c3 e402 | | Load 0x2,0x2
05c4 0227 | ' | Execute Access,All_Reference
05c5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05c6 e5ff | | Load 0x2,-0x1
05c7 0227 | ' | Execute Access,All_Reference
05c8 3c24 |<$ | Execute Record,Field_Read,Field_Number 0x24
05c9 e402 | | Load 0x2,0x2
05ca 0227 | ' | Execute Access,All_Reference
05cb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05cc 0227 | ' | Execute Access,All_Reference
05cd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05ce e5ff | | Load 0x2,-0x1
05cf 0227 | ' | Execute Access,All_Reference
05d0 3c24 |<$ | Execute Record,Field_Read,Field_Number 0x24
05d1 0a01 | | Execute_Immediate Plus,0x1
05d2 e5ff | | Load 0x2,-0x1
05d3 0227 | ' | Execute Access,All_Reference
05d4 3824 |8$ | Execute Record,Field_Write,Field_Number 0x24
05d5 e5ff | | Load 0x2,-0x1
05d6 0227 | ' | Execute Access,All_Reference
05d7 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25
05d8 e402 | | Load 0x2,0x2
05d9 0227 | ' | Execute Access,All_Reference
05da 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05db e402 | | Load 0x2,0x2
05dc e5ff | | Load 0x2,-0x1
05dd 0227 | ' | Execute Access,All_Reference
05de 3825 |8% | Execute Record,Field_Write,Field_Number 0x25
05df 4501 |E | Exit_Subprogram 0x1
05e0 TRAP_05b8:
05e0 0007 | | Action Break_Optional
05e1 e5ff | | Load 0x2,-0x1
05e2 8006 | | Call 0x0,0x6
05e3 e402 | | Load 0x2,0x2
05e4 6815 |h | Jump_Zero 0x5fa
05e5 e402 | | Load 0x2,0x2
05e6 0227 | ' | Execute Access,All_Reference
05e7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05e8 680b |h | Jump_Zero 0x5f4
05e9 e402 | | Load 0x2,0x2
05ea 0229 | ) | Execute Access,All_Read
05eb 00d8 | | Load_Top At_Offset_0
05ec 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05ed e040 | @ | Load 0x0,0x40
05ee e041 | A | Load 0x0,0x41
05ef a042 | B | Reference 0x0,0x42
05f0 8043 | C | Call 0x0,0x43
05f1 00d9 | | Load_Top At_Offset_1
05f2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05f3 00d1 | | Pop_Control Pop_Count_1
05f4 e402 | | Load 0x2,0x2
05f5 e044 | D | Load 0x0,0x44
05f6 e045 | E | Load 0x0,0x45
05f7 a046 | F | Reference 0x0,0x46
05f8 8043 | C | Call 0x0,0x43
05f9 c402 | | Store 0x2,0x2
05fa 00d8 | | Load_Top At_Offset_0
05fb 0101 | | Execute Exception,Reraise
05fc 0000 0000 | | .BLANK 0000[0x4]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603 | | .CONST 0x0603 ; Address of begin
0601 061c | | .CONST 0x061c ; Address of exception handler
0602 0001 | | .CONST 0x0001 ; Number of locals
0603 BODY_0600:
0603 INIT_0600:
0603 e5fe | | Load 0x2,-0x2
0604 e5ff | | Load 0x2,-0x1
0605 0227 | ' | Execute Access,All_Reference
0606 343b |4; | Execute Record,Field_Reference,Field_Number 0x3b
0607 01d7 | | Execute Vector,Field_Read
0608 a402 | | Store_Unchecked 0x2,0x2
0609 e5fd | | Load 0x2,-0x3
060a e047 | G | Load 0x0,0x47
060b 022f | / | Execute Access,Equal
060c 6807 |h | Jump_Zero 0x614
060d e048 | H | Load 0x0,0x48
060e e5fe | | Load 0x2,-0x2
060f e5ff | | Load 0x2,-0x1
0610 0227 | ' | Execute Access,All_Reference
0611 343b |4; | Execute Record,Field_Reference,Field_Number 0x3b
0612 01d6 | | Execute Vector,Field_Write
0613 4501 |E | Exit_Subprogram 0x1
0614 e5fd | | Load 0x2,-0x3
0615 8049 | I | Call 0x0,0x49
0616 e5fe | | Load 0x2,-0x2
0617 e5ff | | Load 0x2,-0x1
0618 0227 | ' | Execute Access,All_Reference
0619 343b |4; | Execute Record,Field_Reference,Field_Number 0x3b
061a 01d6 | | Execute Vector,Field_Write
061b 4501 |E | Exit_Subprogram 0x1
061c TRAP_0600:
061c 0007 | | Action Break_Optional
061d e5ff | | Load 0x2,-0x1
061e 8006 | | Call 0x0,0x6
061f 00d8 | | Load_Top At_Offset_0
0620 0101 | | Execute Exception,Reraise
0621 0000 0000 | | .BLANK 0000[0x7]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b | + | .CONST 0x062b ; Address of begin
0629 0644 | D | .CONST 0x0644 ; Address of exception handler
062a 0001 | | .CONST 0x0001 ; Number of locals
062b BODY_0628:
062b INIT_0628:
062b e5fe | | Load 0x2,-0x2
062c e5ff | | Load 0x2,-0x1
062d 0227 | ' | Execute Access,All_Reference
062e 343c |4< | Execute Record,Field_Reference,Field_Number 0x3c
062f 01d7 | | Execute Vector,Field_Read
0630 a402 | | Store_Unchecked 0x2,0x2
0631 e5fd | | Load 0x2,-0x3
0632 e04a | J | Load 0x0,0x4a
0633 022f | / | Execute Access,Equal
0634 6807 |h | Jump_Zero 0x63c
0635 e04b | K | Load 0x0,0x4b
0636 e5fe | | Load 0x2,-0x2
0637 e5ff | | Load 0x2,-0x1
0638 0227 | ' | Execute Access,All_Reference
0639 343c |4< | Execute Record,Field_Reference,Field_Number 0x3c
063a 01d6 | | Execute Vector,Field_Write
063b 4501 |E | Exit_Subprogram 0x1
063c e5fd | | Load 0x2,-0x3
063d 804c | L | Call 0x0,0x4c
063e e5fe | | Load 0x2,-0x2
063f e5ff | | Load 0x2,-0x1
0640 0227 | ' | Execute Access,All_Reference
0641 343c |4< | Execute Record,Field_Reference,Field_Number 0x3c
0642 01d6 | | Execute Vector,Field_Write
0643 4501 |E | Exit_Subprogram 0x1
0644 TRAP_0628:
0644 0007 | | Action Break_Optional
0645 e5ff | | Load 0x2,-0x1
0646 8006 | | Call 0x0,0x6
0647 00d8 | | Load_Top At_Offset_0
0648 0101 | | Execute Exception,Reraise
0649 0000 0000 | | .BLANK 0000[0x7]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0666 | f | .CONST 0x0666 ; Address of begin
0651 06af | | .CONST 0x06af ; Address of exception handler
0652 0005 | | .CONST 0x0005 ; Number of locals
0653 INIT_0650:
0653 e008 | | Load 0x0,0x8
0654 0007 | | Action Break_Optional
0655 e03f | ? | Load 0x0,0x3f
0656 0007 | | Action Break_Optional
0657 4801 |H | Short_Literal 0x1
0658 e402 | | Load 0x2,0x2
0659 2619 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x19
065a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
065b 00d8 | | Load_Top At_Offset_0
065c e008 | | Load 0x0,0x8
065d 0260 | ` | Execute Discrete,In_Type
065e 7001 |p | Jump_Nonzero 0x660
065f 0801 | | Execute_Immediate Raise,0x1
0660 0902 | | Execute_Immediate Binary_Scale,0x2
0661 e04d | M | Load 0x0,0x4d
0662 035b | [ | Declare_Type Array,Constrained
0663 0337 | 7 | Declare_Variable Array
0664 029f 06bb | | Declare_Subprogram For_Call,INIT_06b8
0666 BODY_0650:
0666 8805 | | Call 0x4,0x5
0667 00d9 | | Load_Top At_Offset_1
0668 e5ff | | Load 0x2,-0x1
0669 e04e | N | Load 0x0,0x4e
066a e04f | O | Load 0x0,0x4f
066b e050 | P | Load 0x0,0x50
066c a051 | Q | Reference 0x0,0x51
066d e052 | R | Load 0x0,0x52
066e e053 | S | Load 0x0,0x53
066f a054 | T | Reference 0x0,0x54
0670 8055 | U | Call 0x0,0x55
0671 00d1 | | Pop_Control Pop_Count_1
0672 4801 |H | Short_Literal 0x1
0673 a403 | | Store_Unchecked 0x2,0x3
0674 00cf | | Action Mark_Auxiliary
0675 00db | | Load_Top At_Offset_3
0676 0227 | ' | Execute Access,All_Reference
0677 01d9 | | Execute Vector,Reverse_Bounds
0678 0263 | c | Execute Discrete,Above_Bound
0679 702c |p, | Jump_Nonzero 0x6a6
067a 00cf | | Action Mark_Auxiliary
067b e804 | | Load 0x4,0x4
067c 01dc | | Execute Vector,Last
067d e403 | | Load 0x2,0x3
067e 0263 | c | Execute Discrete,Above_Bound
067f 7023 |p# | Jump_Nonzero 0x6a3
0680 00d8 | | Load_Top At_Offset_0
0681 e804 | | Load 0x4,0x4
0682 01d7 | | Execute Vector,Field_Read
0683 701d |p | Jump_Nonzero 0x6a1
0684 00d8 | | Load_Top At_Offset_0
0685 e403 | | Load 0x2,0x3
0686 0272 | r | Execute Discrete,Minus
0687 c802 | | Store 0x4,0x2
0688 4801 |H | Short_Literal 0x1
0689 e802 | | Load 0x4,0x2
068a e056 | V | Load 0x0,0x56
068b 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
068c e808 | | Load 0x4,0x8
068d e803 | | Load 0x4,0x3
068e 0227 | ' | Execute Access,All_Reference
068f 01d6 | | Execute Vector,Field_Write
0690 e403 | | Load 0x2,0x3
0691 00d8 | | Load_Top At_Offset_0
0692 e802 | | Load 0x4,0x2
0693 0273 | s | Execute Discrete,Plus
0694 0aff | | Execute_Immediate Plus,-0x1
0695 e804 | | Load 0x4,0x4
0696 01cf | | Execute Vector,Slice_Read
0697 e808 | | Load 0x4,0x8
0698 e803 | | Load 0x4,0x3
0699 0229 | ) | Execute Access,All_Read
069a 01d7 | | Execute Vector,Field_Read
069b 0228 | ( | Execute Access,All_Write
069c 00d8 | | Load_Top At_Offset_0
069d 0a01 | | Execute_Immediate Plus,0x1
069e c403 | | Store 0x2,0x3
069f 00d2 | | Pop_Control Pop_Count_2
06a0 7802 |x | Jump 0x6a3
06a1 00c8 | | Action Pop_Auxiliary_Range
06a2 3fdd |? | Loop_Increasing 0x680
06a3 00ce | | Action Pop_Auxiliary
06a4 00c8 | | Action Pop_Auxiliary_Range
06a5 3fd4 |? | Loop_Increasing 0x67a
06a6 00ce | | Action Pop_Auxiliary
06a7 e5ff | | Load 0x2,-0x1
06a8 8006 | | Call 0x0,0x6
06a9 e5ff | | Load 0x2,-0x1
06aa 8007 | | Call 0x0,0x7
06ab 00da | | Load_Top At_Offset_2
06ac 00cb | | Action Pop_Block_With_Result
06ad 00cb | | Action Pop_Block_With_Result
06ae 4401 |D | Exit_Subprogram With_Result,0x1
06af TRAP_0650:
06af 0007 | | Action Break_Optional
06b0 00db | | Load_Top At_Offset_3
06b1 8057 | W | Call 0x0,0x57
06b2 c803 | | Store 0x4,0x3
06b3 00d8 | | Load_Top At_Offset_0
06b4 0101 | | Execute Exception,Reraise
06b5 0000 0000 | | .XXX[0x3]
06b7 0000 | |
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb | | .CONST 0x06bb ; Address of begin
06b9 06c3 | | .CONST 0x06c3 ; Address of exception handler
06ba 0001 | | .CONST 0x0001 ; Number of locals
06bb BODY_06b8:
06bb INIT_06b8:
06bb 4801 |H | Short_Literal 0x1
06bc e402 | | Load 0x2,0x2
06bd 2619 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x19
06be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06bf e03f | ? | Load 0x0,0x3f
06c0 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
06c1 a803 | | Store_Unchecked 0x4,0x3
06c2 4501 |E | Exit_Subprogram 0x1
06c3 TRAP_06b8:
06c3 0007 | | Action Break_Optional
06c4 e402 | | Load 0x2,0x2
06c5 2619 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x19
06c6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06c7 0902 | | Execute_Immediate Binary_Scale,0x2
06c8 00d8 | | Load_Top At_Offset_0
06c9 e008 | | Load 0x0,0x8
06ca 0260 | ` | Execute Discrete,In_Type
06cb 7001 |p | Jump_Nonzero 0x6cd
06cc 0801 | | Execute_Immediate Raise,0x1
06cd e5ff | | Load 0x2,-0x1
06ce 8058 | X | Call 0x0,0x58
06cf 00d8 | | Load_Top At_Offset_0
06d0 0101 | | Execute Exception,Reraise
06d1 0000 0000 | | .BLANK 0000[0x7]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug Table
06d8 ; --------------------------------------------------------------------------------------
06d8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68ca,0x0000,0x0001,0x0027
06de 000b 077a | z| .DBG4T 0x000b,0x077a,0x8000,0x0000
06e2 0045 0799 | E | .DBG4T 0x0045,0x0799,0x8000,0x0000
06e6 008b 07b8 | | .DBG4T 0x008b,0x07b8,0x0001,0x0000
06ea 00a3 07c1 | | .DBG4T 0x00a3,0x07c1,0x0002,0x0000
06ee 00b3 07c8 | | .DBG4T 0x00b3,0x07c8,0x0002,0x0000
06f2 00e3 07d7 | | .DBG4T 0x00e3,0x07d7,0x0002,0x0000
06f6 00f3 07de | | .DBG4T 0x00f3,0x07de,0x0002,0x0000
06fa 0113 07ea | | .DBG4T 0x0113,0x07ea,0x0002,0x0000
06fe 0133 07f6 | 3 | .DBG4T 0x0133,0x07f6,0x0002,0x0000
0702 0153 0802 | S | .DBG4T 0x0153,0x0802,0x0002,0x0000
0706 0173 080e | s | .DBG4T 0x0173,0x080e,0x0002,0x0000
070a 0193 081a | | .DBG4T 0x0193,0x081a,0x0002,0x0000
070e 01b3 0826 | &| .DBG4T 0x01b3,0x0826,0x0002,0x0000
0712 01d3 0832 | 2| .DBG4T 0x01d3,0x0832,0x0002,0x0000
0716 01e3 0839 | 9| .DBG4T 0x01e3,0x0839,0x0002,0x0000
071a 01f3 0840 | @| .DBG4T 0x01f3,0x0840,0x0002,0x0000
071e 0213 084c | L| .DBG4T 0x0213,0x084c,0x0002,0x0000
0722 0233 0858 | 3 X| .DBG4T 0x0233,0x0858,0x0001,0x4000
0726 027b 086b | { k| .DBG4T 0x027b,0x086b,0x0001,0x4000
072a 02c3 087e | ~| .DBG4T 0x02c3,0x087e,0x0001,0x4000
072e 030b 0891 | | .DBG4T 0x030b,0x0891,0x0001,0x4000
0732 0353 08a4 | S | .DBG4T 0x0353,0x08a4,0x0001,0x4000
0736 039b 08b7 | | .DBG4T 0x039b,0x08b7,0x0001,0x4000
073a 03e3 08ca | | .DBG4T 0x03e3,0x08ca,0x0002,0x4000
073e 0403 08d7 | | .DBG4T 0x0403,0x08d7,0x0002,0x4000
0742 0423 08e4 | # | .DBG4T 0x0423,0x08e4,0x0002,0x4000
0746 0443 08f1 | C | .DBG4T 0x0443,0x08f1,0x0002,0x4000
074a 0463 08fe | c | .DBG4T 0x0463,0x08fe,0x0002,0x4000
074e 0483 090b | | .DBG4T 0x0483,0x090b,0x0002,0x4000
0752 04a3 0918 | | .DBG4T 0x04a3,0x0918,0x0002,0x0000
0756 04b3 091b | | .DBG4T 0x04b3,0x091b,0x0002,0x4000
075a 04d3 0928 | (| .DBG4T 0x04d3,0x0928,0x0004,0x0000
075e 053b 093b | ; ;| .DBG4T 0x053b,0x093b,0x0004,0x0000
0762 057b 0946 | { F| .DBG4T 0x057b,0x0946,0x0004,0x0000
0766 05bb 0954 | T| .DBG4T 0x05bb,0x0954,0x0004,0x0000
076a 0603 0962 | b| .DBG4T 0x0603,0x0962,0x0004,0x0000
076e 062b 096a | + j| .DBG4T 0x062b,0x096a,0x0004,0x0000
0772 0653 0972 | S r| .DBG4T 0x0653,0x0972,0x0004,0x0000
0776 06bb 0987 | | .DBG4T 0x06bb,0x0987,0x0004,0x0000
077a ; --------------------------------------------------------------------------------------
077a ; Debug chain
077a ; --------------------------------------------------------------------------------------
077a 001d 0000 | | .DBGLEN 0x001d,0x0000
077c 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0010,0x0012,0x0014,0x0016,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042
0799 ; --------------------------------------------------------------------------------------
0799 ; Debug chain
0799 ; --------------------------------------------------------------------------------------
0799 001d 0000 | | .DBGLEN 0x001d,0x0000
079b 0045 0047 | E G| .DBGLNO 0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x005f,0x0061,0x0063,0x0065,0x0067,0x0069,0x006b,0x006d,0x006f,0x0071,0x0073,0x0075,0x0077,0x0079,0x007b,0x007d
07b8 ; --------------------------------------------------------------------------------------
07b8 ; Debug chain
07b8 ; --------------------------------------------------------------------------------------
07b8 0002 0005 | | .DBGLEN 0x0002,0x0005
07ba 008b 008f | | .DBGLNO 0x008b,0x008f,0x0092,0x0094,0x0095,0x009a,0x009c
07c1 ; --------------------------------------------------------------------------------------
07c1 ; Debug chain
07c1 ; --------------------------------------------------------------------------------------
07c1 0003 0002 | | .DBGLEN 0x0003,0x0002
07c3 00a3 00a7 | | .DBGLNO 0x00a3,0x00a7,0x00a9,0x00ac,0x00ae
07c8 ; --------------------------------------------------------------------------------------
07c8 ; Debug chain
07c8 ; --------------------------------------------------------------------------------------
07c8 0004 0009 | | .DBGLEN 0x0004,0x0009
07ca 00b3 00b7 | | .DBGLNO 0x00b3,0x00b7,0x00b9,0x00ba,0x00bd,0x00cd,0x00cf,0x00d1,0x00d3,0x00d5,0x00d7,0x00d8,0x00da
07d7 ; --------------------------------------------------------------------------------------
07d7 ; Debug chain
07d7 ; --------------------------------------------------------------------------------------
07d7 0001 0004 | | .DBGLEN 0x0001,0x0004
07d9 00e3 00e6 | | .DBGLNO 0x00e3,0x00e6,0x00e8,0x00e9,0x00eb
07de ; --------------------------------------------------------------------------------------
07de ; Debug chain
07de ; --------------------------------------------------------------------------------------
07de 0002 0008 | | .DBGLEN 0x0002,0x0008
07e0 00f3 00f5 | | .DBGLNO 0x00f3,0x00f5,0x00f7,0x00fb,0x00fd,0x00ff,0x0101,0x0105,0x010a,0x010c
07ea ; --------------------------------------------------------------------------------------
07ea ; Debug chain
07ea ; --------------------------------------------------------------------------------------
07ea 0002 0008 | | .DBGLEN 0x0002,0x0008
07ec 0113 0115 | | .DBGLNO 0x0113,0x0115,0x0117,0x011b,0x011d,0x011f,0x0121,0x0125,0x012a,0x012c
07f6 ; --------------------------------------------------------------------------------------
07f6 ; Debug chain
07f6 ; --------------------------------------------------------------------------------------
07f6 0002 0008 | | .DBGLEN 0x0002,0x0008
07f8 0133 0135 | 3 5| .DBGLNO 0x0133,0x0135,0x0137,0x013b,0x013d,0x013f,0x0141,0x0145,0x014a,0x014c
0802 ; --------------------------------------------------------------------------------------
0802 ; Debug chain
0802 ; --------------------------------------------------------------------------------------
0802 0002 0008 | | .DBGLEN 0x0002,0x0008
0804 0153 0155 | S U| .DBGLNO 0x0153,0x0155,0x0157,0x015b,0x015d,0x015f,0x0161,0x0165,0x016a,0x016c
080e ; --------------------------------------------------------------------------------------
080e ; Debug chain
080e ; --------------------------------------------------------------------------------------
080e 0002 0008 | | .DBGLEN 0x0002,0x0008
0810 0173 0175 | s u| .DBGLNO 0x0173,0x0175,0x0177,0x017b,0x017d,0x017f,0x0181,0x0185,0x018a,0x018c
081a ; --------------------------------------------------------------------------------------
081a ; Debug chain
081a ; --------------------------------------------------------------------------------------
081a 0002 0008 | | .DBGLEN 0x0002,0x0008
081c 0193 0195 | | .DBGLNO 0x0193,0x0195,0x0197,0x019b,0x019d,0x019f,0x01a1,0x01a5,0x01aa,0x01ac
0826 ; --------------------------------------------------------------------------------------
0826 ; Debug chain
0826 ; --------------------------------------------------------------------------------------
0826 0002 0008 | | .DBGLEN 0x0002,0x0008
0828 01b3 01b5 | | .DBGLNO 0x01b3,0x01b5,0x01b7,0x01bb,0x01bd,0x01bf,0x01c1,0x01c5,0x01ca,0x01cc
0832 ; --------------------------------------------------------------------------------------
0832 ; Debug chain
0832 ; --------------------------------------------------------------------------------------
0832 0001 0004 | | .DBGLEN 0x0001,0x0004
0834 01d3 01d6 | | .DBGLNO 0x01d3,0x01d6,0x01d8,0x01d9,0x01db
0839 ; --------------------------------------------------------------------------------------
0839 ; Debug chain
0839 ; --------------------------------------------------------------------------------------
0839 0001 0004 | | .DBGLEN 0x0001,0x0004
083b 01e3 01e6 | | .DBGLNO 0x01e3,0x01e6,0x01e8,0x01e9,0x01eb
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug chain
0840 ; --------------------------------------------------------------------------------------
0840 0002 0008 | | .DBGLEN 0x0002,0x0008
0842 01f3 01f5 | | .DBGLNO 0x01f3,0x01f5,0x01f7,0x01fb,0x01fd,0x01ff,0x0201,0x0205,0x020a,0x020c
084c ; --------------------------------------------------------------------------------------
084c ; Debug chain
084c ; --------------------------------------------------------------------------------------
084c 0002 0008 | | .DBGLEN 0x0002,0x0008
084e 0213 0215 | | .DBGLNO 0x0213,0x0215,0x0217,0x021b,0x021d,0x021f,0x0221,0x0225,0x022a,0x022c
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug chain
0858 ; --------------------------------------------------------------------------------------
0858 0001 0008 | | .DBGLEN 0x0001,0x0008
085a 0233 0238 | 3 8| .DBGLNO 0x0233,0x0238,0x0240,0x0246,0x024c,0x024d,0x0252,0x0255,0x026e
0863 0002 0003 | | .XXX[0x8]
0865 0004 0005 | |
0867 0006 0001 | |
0869 0007 0008 | |
086b ; --------------------------------------------------------------------------------------
086b ; Debug chain
086b ; --------------------------------------------------------------------------------------
086b 0001 0008 | | .DBGLEN 0x0001,0x0008
086d 027b 0280 | { | .DBGLNO 0x027b,0x0280,0x0288,0x028e,0x0294,0x0295,0x029a,0x029d,0x02b6
0876 0002 0003 | | .XXX[0x8]
0878 0004 0005 | |
087a 0006 0001 | |
087c 0007 0008 | |
087e ; --------------------------------------------------------------------------------------
087e ; Debug chain
087e ; --------------------------------------------------------------------------------------
087e 0001 0008 | | .DBGLEN 0x0001,0x0008
0880 02c3 02c8 | | .DBGLNO 0x02c3,0x02c8,0x02d0,0x02d6,0x02dc,0x02dd,0x02e2,0x02e5,0x02fe
0889 0002 0003 | | .XXX[0x8]
088b 0004 0005 | |
088d 0006 0001 | |
088f 0007 0008 | |
0891 ; --------------------------------------------------------------------------------------
0891 ; Debug chain
0891 ; --------------------------------------------------------------------------------------
0891 0001 0008 | | .DBGLEN 0x0001,0x0008
0893 030b 0310 | | .DBGLNO 0x030b,0x0310,0x0318,0x031e,0x0324,0x0325,0x032a,0x032d,0x0346
089c 0002 0003 | | .XXX[0x8]
089e 0004 0005 | |
08a0 0006 0001 | |
08a2 0007 0008 | |
08a4 ; --------------------------------------------------------------------------------------
08a4 ; Debug chain
08a4 ; --------------------------------------------------------------------------------------
08a4 0001 0008 | | .DBGLEN 0x0001,0x0008
08a6 0353 0358 | S X| .DBGLNO 0x0353,0x0358,0x0360,0x0366,0x036c,0x036d,0x0372,0x0375,0x038e
08af 0002 0003 | | .XXX[0x8]
08b1 0004 0005 | |
08b3 0006 0001 | |
08b5 0007 0008 | |
08b7 ; --------------------------------------------------------------------------------------
08b7 ; Debug chain
08b7 ; --------------------------------------------------------------------------------------
08b7 0001 0008 | | .DBGLEN 0x0001,0x0008
08b9 039b 03a0 | | .DBGLNO 0x039b,0x03a0,0x03a8,0x03ae,0x03b4,0x03b5,0x03ba,0x03bd,0x03d6
08c2 0002 0003 | | .XXX[0x8]
08c4 0004 0005 | |
08c6 0006 0001 | |
08c8 0007 0008 | |
08ca ; --------------------------------------------------------------------------------------
08ca ; Debug chain
08ca ; --------------------------------------------------------------------------------------
08ca 0001 0005 | | .DBGLEN 0x0001,0x0005
08cc 03e3 03e8 | | .DBGLNO 0x03e3,0x03e8,0x03ee,0x03f0,0x03f5,0x03f8
08d2 0002 0003 | | .XXX[0x5]
08d4 0004 0001 | |
08d6 0005 | |
08d7 ; --------------------------------------------------------------------------------------
08d7 ; Debug chain
08d7 ; --------------------------------------------------------------------------------------
08d7 0001 0005 | | .DBGLEN 0x0001,0x0005
08d9 0403 0408 | | .DBGLNO 0x0403,0x0408,0x040e,0x0410,0x0415,0x0418
08df 0002 0003 | | .XXX[0x5]
08e1 0004 0001 | |
08e3 0005 | |
08e4 ; --------------------------------------------------------------------------------------
08e4 ; Debug chain
08e4 ; --------------------------------------------------------------------------------------
08e4 0001 0005 | | .DBGLEN 0x0001,0x0005
08e6 0423 0428 | # (| .DBGLNO 0x0423,0x0428,0x042e,0x0430,0x0435,0x0438
08ec 0002 0003 | | .XXX[0x5]
08ee 0004 0001 | |
08f0 0005 | |
08f1 ; --------------------------------------------------------------------------------------
08f1 ; Debug chain
08f1 ; --------------------------------------------------------------------------------------
08f1 0001 0005 | | .DBGLEN 0x0001,0x0005
08f3 0443 0448 | C H| .DBGLNO 0x0443,0x0448,0x044e,0x0450,0x0455,0x0458
08f9 0002 0003 | | .XXX[0x5]
08fb 0004 0001 | |
08fd 0005 | |
08fe ; --------------------------------------------------------------------------------------
08fe ; Debug chain
08fe ; --------------------------------------------------------------------------------------
08fe 0001 0005 | | .DBGLEN 0x0001,0x0005
0900 0463 0468 | c h| .DBGLNO 0x0463,0x0468,0x046e,0x0470,0x0475,0x0478
0906 0002 0003 | | .XXX[0x5]
0908 0004 0001 | |
090a 0005 | |
090b ; --------------------------------------------------------------------------------------
090b ; Debug chain
090b ; --------------------------------------------------------------------------------------
090b 0001 0005 | | .DBGLEN 0x0001,0x0005
090d 0483 0488 | | .DBGLNO 0x0483,0x0488,0x048e,0x0490,0x0495,0x0498
0913 0002 0003 | | .XXX[0x5]
0915 0004 0001 | |
0917 0005 | |
0918 ; --------------------------------------------------------------------------------------
0918 ; Debug chain
0918 ; --------------------------------------------------------------------------------------
0918 0000 0001 | | .DBGLEN 0x0000,0x0001
091a 04a3 | | .DBGLNO 0x04a3
091b ; --------------------------------------------------------------------------------------
091b ; Debug chain
091b ; --------------------------------------------------------------------------------------
091b 0001 0005 | | .DBGLEN 0x0001,0x0005
091d 04b3 04b8 | | .DBGLNO 0x04b3,0x04b8,0x04c0,0x04c2,0x04c7,0x04ca
0923 0002 0003 | | .XXX[0x5]
0925 0004 0001 | |
0927 0005 | |
0928 ; --------------------------------------------------------------------------------------
0928 ; Debug chain
0928 ; --------------------------------------------------------------------------------------
0928 0000 0011 | | .DBGLEN 0x0000,0x0011
092a 04d3 04fd | | .DBGLNO 0x04d3,0x04fd,0x0507,0x0513,0x0515,0x0517,0x0519,0x051b,0x051d,0x051f,0x0521,0x0523,0x0525,0x0529,0x052d,0x0533,0x0535
093b ; --------------------------------------------------------------------------------------
093b ; Debug chain
093b ; --------------------------------------------------------------------------------------
093b 0000 0009 | | .DBGLEN 0x0000,0x0009
093d 053d 0551 | = Q| .DBGLNO 0x053d,0x0551,0x055d,0x0563,0x0565,0x0567,0x056a,0x056d,0x056f
0946 ; --------------------------------------------------------------------------------------
0946 ; Debug chain
0946 ; --------------------------------------------------------------------------------------
0946 0000 000c | | .DBGLEN 0x0000,0x000c
0948 057b 057e | { ~| .DBGLNO 0x057b,0x057e,0x0583,0x0589,0x0590,0x0596,0x059c,0x059e,0x05a0,0x05a4,0x05af,0x05b5
0954 ; --------------------------------------------------------------------------------------
0954 ; Debug chain
0954 ; --------------------------------------------------------------------------------------
0954 0000 000c | | .DBGLEN 0x0000,0x000c
0956 05bb 05be | | .DBGLNO 0x05bb,0x05be,0x05c6,0x05ce,0x05d5,0x05db,0x05e1,0x05e3,0x05e5,0x05e9,0x05f4,0x05fa
0962 ; --------------------------------------------------------------------------------------
0962 ; Debug chain
0962 ; --------------------------------------------------------------------------------------
0962 0000 0006 | | .DBGLEN 0x0000,0x0006
0964 0603 0609 | | .DBGLNO 0x0603,0x0609,0x060d,0x0614,0x061d,0x061f
096a ; --------------------------------------------------------------------------------------
096a ; Debug chain
096a ; --------------------------------------------------------------------------------------
096a 0000 0006 | | .DBGLEN 0x0000,0x0006
096c 062b 0631 | + 1| .DBGLNO 0x062b,0x0631,0x0635,0x063c,0x0645,0x0647
0972 ; --------------------------------------------------------------------------------------
0972 ; Debug chain
0972 ; --------------------------------------------------------------------------------------
0972 0003 0010 | | .DBGLEN 0x0003,0x0010
0974 0653 0655 | S U| .DBGLNO 0x0653,0x0655,0x0657,0x0666,0x0667,0x0672,0x0675,0x067b,0x0680,0x0684,0x0688,0x0690,0x069c,0x069f,0x06a7,0x06a9,0x06ab,0x06b0,0x06b3
0987 ; --------------------------------------------------------------------------------------
0987 ; Debug chain
0987 ; --------------------------------------------------------------------------------------
0987 0000 0003 | | .DBGLEN 0x0000,0x0003
0989 06bb 06c4 | | .DBGLNO 0x06bb,0x06c4,0x06cf
098c 0000 0000 | | .BLANK 0000[0x74]