|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5120 (0x1400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0b50f3
└─⟦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 06a0 | | .CONST 0x06a0 ; 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 00bf | | .CONST 0x00bf ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003c | < | .CONST 0x003c ; Number of locals
000b INIT_0008:
000b 00da | | Load_Top At_Offset_2
000c e20f | | Load 0x1,0xf
000d e001 | | Load 0x0,0x1
000e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
000f 0129 | ) | Execute Any,Make_Visible
0010 00d8 | | Load_Top At_Offset_0
0011 e002 | | Load 0x0,0x2
0012 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0013 1c07 | | Execute_Immediate Run_Utility,0x7
0014 0129 | ) | Execute Any,Make_Visible
0015 00da | | Load_Top At_Offset_2
0016 0266 | f | Execute Discrete,Bounds
0017 e003 | | Load 0x0,0x3
0018 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0019 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call
001b 4801 |H | Short_Literal 0x1
001c 035e | ^ | Declare_Type Array,Defined,Visible
001d 00e4 | | Load_Encached Positive_Cache
001e 0266 | f | Execute Discrete,Bounds
001f 00da | | Load_Top At_Offset_2
0020 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call
0022 4801 |H | Short_Literal 0x1
0023 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0024 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated
0026 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0028 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
002a 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
002c 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
002e 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
0030 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
0032 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
0034 4800 |H | Short_Literal 0x0
0035 4805 |H | Short_Literal 0x5
0036 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call
0038 03fe | | Declare_Type Discrete,Defined,Visible
0039 e212 | | Load 0x1,0x12
003a 00d9 | | Load_Top At_Offset_1
003b e003 | | Load 0x0,0x3
003c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003d 029f 066b | k| Declare_Subprogram INIT_0668,For_Call
003f 4803 |H | Short_Literal 0x3
0040 032e | . | Declare_Type Record,Defined,Visible
0041 00e4 | | Load_Encached Positive_Cache
0042 0266 | f | Execute Discrete,Bounds
0043 00da | | Load_Top At_Offset_2
0044 029f 019b | | Declare_Subprogram INIT_0198,For_Call
0046 4801 |H | Short_Literal 0x1
0047 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0048 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
004a 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
004c 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
004e 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
0050 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0052 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0054 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
0056 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated
0058 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated
005a 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated
005c 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
005e 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated
0060 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
0062 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
0064 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
0066 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
0068 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
006a 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
006c e004 | | Load 0x0,0x4
006d 0129 | ) | Execute Any,Make_Visible
006e 00bf | | Action Accept_Activation
006f e005 | | Load 0x0,0x5
0070 e006 | | Load 0x0,0x6
0071 e215 | | Load 0x1,0x15
0072 e20f | | Load 0x1,0xf
0073 0335 | 5 | Declare_Variable Array,Duplicate
0074 00cd | | Action Spare6_Action
0075 e210 | | Load 0x1,0x10
0076 e211 | | Load 0x1,0x11
0077 e002 | | Load 0x0,0x2
0078 1918 | | Execute Package,Field_Reference,Field_Number 0x18
0079 e007 | | Load 0x0,0x7
007a 0387 | | Declare_Variable Package
007b 00d8 | | Load_Top At_Offset_0
007c 020f | | Execute Module,Activate
007d 1d17 | | Execute_Immediate Reference_Lex_1,0x17
007e 00c7 | | Action Elaborate_Subprogram
007f 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0080 00c7 | | Action Elaborate_Subprogram
0081 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0082 00c7 | | Action Elaborate_Subprogram
0083 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0084 00c7 | | Action Elaborate_Subprogram
0085 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0086 00c7 | | Action Elaborate_Subprogram
0087 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0088 00c7 | | Action Elaborate_Subprogram
0089 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
008a 00c7 | | Action Elaborate_Subprogram
008b 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
008c 00c7 | | Action Elaborate_Subprogram
008d 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call
008f 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0090 00c7 | | Action Elaborate_Subprogram
0091 029d 048b | | Declare_Subprogram INIT_0488,For_Outer_Call
0093 029d 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call
0095 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call
0097 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call
0099 029d 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call
009b 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
009c 00c7 | | Action Elaborate_Subprogram
009d 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
009e 00c7 | | Action Elaborate_Subprogram
009f 029d 059b | | Declare_Subprogram INIT_0598,For_Outer_Call
00a1 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00a4 00c7 | | Action Elaborate_Subprogram
00a5 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00a6 00c7 | | Action Elaborate_Subprogram
00a7 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00a8 00c7 | | Action Elaborate_Subprogram
00a9 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00aa 00c7 | | Action Elaborate_Subprogram
00ab 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00ac 00c7 | | Action Elaborate_Subprogram
00ad 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00ae 00c7 | | Action Elaborate_Subprogram
00af 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
00b0 00c7 | | Action Elaborate_Subprogram
00b1 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
00b2 00c7 | | Action Elaborate_Subprogram
00b3 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
00b4 00c7 | | Action Elaborate_Subprogram
00b5 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00b6 00c7 | | Action Elaborate_Subprogram
00b7 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
00ba 00c7 | | Action Elaborate_Subprogram
00bb 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00bc 00c7 | | Action Elaborate_Subprogram
00bd 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00be 00c7 | | Action Elaborate_Subprogram
00bf BODY_0008:
00bf 00bc | | Action Signal_Activated
00c0 00bb | | Action Signal_Completion
00c1 0000 0000 | | .BLANK 0000[0x7]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 00d1 | | Pop_Control Pop_Count_1
00cc 00da | | Load_Top At_Offset_2
00cd 01d8 | | Execute Vector,Element_Type
00ce 02ff | | Declare_Variable Variant_Record
00cf 00d8 | | Load_Top At_Offset_0
00d0 1c00 | | Execute_Immediate Run_Utility,0x0
00d1 00db | | Load_Top At_Offset_3
00d2 01dc | | Execute Vector,Last
00d3 e5ff | | Load 0x2,-0x1
00d4 01dd | | Execute Vector,First
00d5 0263 | c | Execute Discrete,Above_Bound
00d6 7006 |p | Jump_Nonzero 0xdd
00d7 00da | | Load_Top At_Offset_2
00d8 00d9 | | Load_Top At_Offset_1
00d9 e5ff | | Load 0x2,-0x1
00da 01d6 | | Execute Vector,Field_Write
00db 0a01 | | Execute_Immediate Plus,0x1
00dc 7ff8 | | Jump 0xd5
00dd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00de 0000 0000 | | .XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00d1 | | Pop_Control Pop_Count_1
00e4 00da | | Load_Top At_Offset_2
00e5 01d8 | | Execute Vector,Element_Type
00e6 0337 | 7 | Declare_Variable Array
00e7 00d8 | | Load_Top At_Offset_0
00e8 1c00 | | Execute_Immediate Run_Utility,0x0
00e9 00db | | Load_Top At_Offset_3
00ea 01dc | | Execute Vector,Last
00eb e5ff | | Load 0x2,-0x1
00ec 01dd | | Execute Vector,First
00ed 0263 | c | Execute Discrete,Above_Bound
00ee 7006 |p | Jump_Nonzero 0xf5
00ef 00da | | Load_Top At_Offset_2
00f0 00d9 | | Load_Top At_Offset_1
00f1 e5ff | | Load 0x2,-0x1
00f2 01d6 | | Execute Vector,Field_Write
00f3 0a01 | | Execute_Immediate Plus,0x1
00f4 7ff8 | | Jump 0xed
00f5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00db | | Load_Top At_Offset_3
00fc 00db | | Load_Top At_Offset_3
00fd e235 | 5 | Load 0x1,0x35
00fe 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00ff 01d5 | | Execute Vector,Field_Reference
0100 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0101 0000 0000 | | .BLANK 0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010f | | .CONST 0x010f ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b e215 | | Load 0x1,0x15
010c 0337 | 7 | Declare_Variable Array
010d 00d8 | | Load_Top At_Offset_0
010e 1c00 | | Execute_Immediate Run_Utility,0x0
010f BODY_0108:
010f 00db | | Load_Top At_Offset_3
0110 e235 | 5 | Load 0x1,0x35
0111 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0112 00d9 | | Load_Top At_Offset_1
0113 01d4 | | Execute Vector,Structure_Write
0114 e5fe | | Load 0x2,-0x2
0115 00d9 | | Load_Top At_Offset_1
0116 01d5 | | Execute Vector,Field_Reference
0117 e5fd | | Load 0x2,-0x3
0118 e003 | | Load 0x0,0x3
0119 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
011a 6809 |h | Jump_Zero 0x124
011b e5fd | | Load 0x2,-0x3
011c e5fe | | Load 0x2,-0x2
011d 00da | | Load_Top At_Offset_2
011e 01d6 | | Execute Vector,Field_Write
011f 00d8 | | Load_Top At_Offset_0
0120 e5ff | | Load 0x2,-0x1
0121 e235 | 5 | Load 0x1,0x35
0122 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0123 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0124 e234 | 4 | Load 0x1,0x34
0125 0257 | W | Execute Discrete,Raise
0126 0000 0000 | | .XXX[0x2]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012f | / | .CONST 0x012f ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0002 | | .CONST 0x0002 ; Number of locals
012b INIT_0128:
012b e214 | | Load 0x1,0x14
012c 02ff | | Declare_Variable Variant_Record
012d 00d8 | | Load_Top At_Offset_0
012e 1c00 | | Execute_Immediate Run_Utility,0x0
012f BODY_0128:
012f 00db | | Load_Top At_Offset_3
0130 e235 | 5 | Load 0x1,0x35
0131 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0132 00d9 | | Load_Top At_Offset_1
0133 016d | m | Execute Variant_Record,Structure_Write
0134 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0135 0000 0000 | | .XXX[0x3]
0137 0000 | |
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013f | ? | .CONST 0x013f ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e214 | | Load 0x1,0x14
013c 02ff | | Declare_Variable Variant_Record
013d 00d8 | | Load_Top At_Offset_0
013e 1c00 | | Execute_Immediate Run_Utility,0x0
013f BODY_0138:
013f 00cf | | Action Mark_Auxiliary
0140 e5ff | | Load 0x2,-0x1
0141 01d9 | | Execute Vector,Reverse_Bounds
0142 0263 | c | Execute Discrete,Above_Bound
0143 7009 |p | Jump_Nonzero 0x14d
0144 00d8 | | Load_Top At_Offset_0
0145 e5ff | | Load 0x2,-0x1
0146 01d5 | | Execute Vector,Field_Reference
0147 e235 | 5 | Load 0x1,0x35
0148 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0149 e402 | | Load 0x2,0x2
014a 016d | m | Execute Variant_Record,Structure_Write
014b 00c8 | | Action Pop_Auxiliary_Range
014c 3ff7 |? | Loop_Increasing 0x144
014d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
014e 0000 0000 | | .XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 00da | | Load_Top At_Offset_2
0154 e235 | 5 | Load 0x1,0x35
0155 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0156 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0157 0000 | | .XXX[0x1]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b e235 | 5 | Load 0x1,0x35
015c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
015d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015e 0000 0000 | | .XXX[0x2]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 e235 | 5 | Load 0x1,0x35
0164 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0165 00ca | | Action Exit_Nullary_Function
0166 0000 0000 | | .XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b e235 | 5 | Load 0x1,0x35
016c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
016d 00ca | | Action Exit_Nullary_Function
016e 0000 0000 | | .XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 4607 |F | Jump_Case 0x8
0174 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0175 7806 |x | Jump 0x17c ; case 0x1
0176 7809 |x | Jump 0x180 ; case 0x2
0177 780d |x | Jump 0x185 ; case 0x3
0178 7810 |x | Jump 0x189 ; case 0x4
0179 7811 |x | Jump 0x18b ; case 0x5
017a 7812 |x | Jump 0x18d ; case 0x6
017b 7815 |x | Jump 0x191 ; case 0x7
017c 00da | | Load_Top At_Offset_2
017d 0091 067a | z| Action Push_String_Extended_Indexed,0x67a ; "GREATER"
017f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0180 00db | | Load_Top At_Offset_3
0181 00db | | Load_Top At_Offset_3
0182 00e0 | | Load_Encached Standard_Cache
0183 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0184 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0185 00da | | Load_Top At_Offset_2
0186 00e0 | | Load_Encached Standard_Cache
0187 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0188 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0189 00db | | Load_Top At_Offset_3
018a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018b 00db | | Load_Top At_Offset_3
018c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018d e21f | | Load 0x1,0x1f
018e 00dc | | Load_Top At_Offset_4
018f 0267 | g | Execute Discrete,Predecessor
0190 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0191 e21f | | Load 0x1,0x1f
0192 00dc | | Load_Top At_Offset_4
0193 0268 | h | Execute Discrete,Successor
0194 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00d1 | | Pop_Control Pop_Count_1
019c 00da | | Load_Top At_Offset_2
019d 01d8 | | Execute Vector,Element_Type
019e 0322 | " | Declare_Variable Record
019f 00d8 | | Load_Top At_Offset_0
01a0 1c00 | | Execute_Immediate Run_Utility,0x0
01a1 00db | | Load_Top At_Offset_3
01a2 01dc | | Execute Vector,Last
01a3 e5ff | | Load 0x2,-0x1
01a4 01dd | | Execute Vector,First
01a5 0263 | c | Execute Discrete,Above_Bound
01a6 7006 |p | Jump_Nonzero 0x1ad
01a7 00da | | Load_Top At_Offset_2
01a8 00d9 | | Load_Top At_Offset_1
01a9 e5ff | | Load 0x2,-0x1
01aa 01d6 | | Execute Vector,Field_Write
01ab 0a01 | | Execute_Immediate Plus,0x1
01ac 7ff8 | | Jump 0x1a5
01ad 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
01ae 0000 0000 | | .XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01bf | | .CONST 0x01bf ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0006 | | .CONST 0x0006 ; Number of locals
01b3 INIT_01b0:
01b3 029f 05bb | | Declare_Subprogram INIT_05b8,For_Call
01b5 e008 | | Load 0x0,0x8
01b6 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37
01b7 00c6 | | Action Check_Subprogram_Elaborated
01b8 4802 |H | Short_Literal 0x2
01b9 4802 |H | Short_Literal 0x2
01ba 0099 | | Action Reference_Dynamic
01bb e009 | | Load 0x0,0x9
01bc e00a | | Load 0x0,0xa
01bd 4806 |H | Short_Literal 0x6
01be 0007 | | Action Break_Optional
01bf BODY_01b0:
01bf 821d | | Call 0x1,0x1d
01c0 4803 |H | Short_Literal 0x3
01c1 4802 |H | Short_Literal 0x2
01c2 0099 | | Action Reference_Dynamic
01c3 4804 |H | Short_Literal 0x4
01c4 4802 |H | Short_Literal 0x2
01c5 0099 | | Action Reference_Dynamic
01c6 e008 | | Load 0x0,0x8
01c7 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01c8 00e1 | | Load_Encached Boolean_Cache
01c9 025e | ^ | Execute Discrete,Convert
01ca 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01cb 0000 0000 | | .BLANK 0000[0x5]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d8 | | .CONST 0x01d8 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 e002 | | Load 0x0,0x2
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 02ff | | Declare_Variable Variant_Record
01d6 00d8 | | Load_Top At_Offset_0
01d7 1c00 | | Execute_Immediate Run_Utility,0x0
01d8 BODY_01d0:
01d8 00db | | Load_Top At_Offset_3
01d9 8229 | ) | Call 0x1,0x29
01da 00d9 | | Load_Top At_Offset_1
01db 016d | m | Execute Variant_Record,Structure_Write
01dc 00d8 | | Load_Top At_Offset_0
01dd 823c | < | Call 0x1,0x3c
01de 016f | o | Execute Variant_Record,Equal
01df 6802 |h | Jump_Zero 0x1e2
01e0 4800 |H | Short_Literal 0x0
01e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e2 4801 |H | Short_Literal 0x1
01e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e4 0000 0000 | | .BLANK 0000[0x4]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4801 |H | Short_Literal 0x1
01ec 4801 |H | Short_Literal 0x1
01ed e221 | ! | Load 0x1,0x21
01ee 035b | [ | Declare_Type Array,Constrained
01ef 0337 | 7 | Declare_Variable Array
01f0 e220 | | Load 0x1,0x20
01f1 0322 | " | Declare_Variable Record
01f2 e5ff | | Load 0x2,-0x1
01f3 00d9 | | Load_Top At_Offset_1
01f4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01f5 e5fe | | Load 0x2,-0x2
01f6 00d9 | | Load_Top At_Offset_1
01f7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01f8 e5fd | | Load 0x2,-0x3
01f9 00d9 | | Load_Top At_Offset_1
01fa 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01fb 4801 |H | Short_Literal 0x1
01fc 00da | | Load_Top At_Offset_2
01fd 01d6 | | Execute Vector,Field_Write
01fe 8223 | # | Call 0x1,0x23
01ff 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 4801 |H | Short_Literal 0x1
0204 4802 |H | Short_Literal 0x2
0205 e221 | ! | Load 0x1,0x21
0206 035b | [ | Declare_Type Array,Constrained
0207 0337 | 7 | Declare_Variable Array
0208 e220 | | Load 0x1,0x20
0209 0322 | " | Declare_Variable Record
020a e5ff | | Load 0x2,-0x1
020b 00d9 | | Load_Top At_Offset_1
020c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
020d e5fe | | Load 0x2,-0x2
020e 00d9 | | Load_Top At_Offset_1
020f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0210 e5fd | | Load 0x2,-0x3
0211 00d9 | | Load_Top At_Offset_1
0212 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0213 4801 |H | Short_Literal 0x1
0214 00da | | Load_Top At_Offset_2
0215 01d6 | | Execute Vector,Field_Write
0216 e220 | | Load 0x1,0x20
0217 0322 | " | Declare_Variable Record
0218 e5fc | | Load 0x2,-0x4
0219 00d9 | | Load_Top At_Offset_1
021a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
021b e5fb | | Load 0x2,-0x5
021c 00d9 | | Load_Top At_Offset_1
021d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
021e e5fa | | Load 0x2,-0x6
021f 00d9 | | Load_Top At_Offset_1
0220 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0221 4802 |H | Short_Literal 0x2
0222 00da | | Load_Top At_Offset_2
0223 01d6 | | Execute Vector,Field_Write
0224 8223 | # | Call 0x1,0x23
0225 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0226 0000 0000 | | .XXX[0x2]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 4801 |H | Short_Literal 0x1
022c 4804 |H | Short_Literal 0x4
022d e221 | ! | Load 0x1,0x21
022e 035b | [ | Declare_Type Array,Constrained
022f 0337 | 7 | Declare_Variable Array
0230 e220 | | Load 0x1,0x20
0231 0322 | " | Declare_Variable Record
0232 e5ff | | Load 0x2,-0x1
0233 00d9 | | Load_Top At_Offset_1
0234 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0235 e5fe | | Load 0x2,-0x2
0236 00d9 | | Load_Top At_Offset_1
0237 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0238 e5fd | | Load 0x2,-0x3
0239 00d9 | | Load_Top At_Offset_1
023a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
023b 4801 |H | Short_Literal 0x1
023c 00da | | Load_Top At_Offset_2
023d 01d6 | | Execute Vector,Field_Write
023e e220 | | Load 0x1,0x20
023f 0322 | " | Declare_Variable Record
0240 e5fc | | Load 0x2,-0x4
0241 00d9 | | Load_Top At_Offset_1
0242 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0243 e5fb | | Load 0x2,-0x5
0244 00d9 | | Load_Top At_Offset_1
0245 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0246 e5fa | | Load 0x2,-0x6
0247 00d9 | | Load_Top At_Offset_1
0248 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0249 4802 |H | Short_Literal 0x2
024a 00da | | Load_Top At_Offset_2
024b 01d6 | | Execute Vector,Field_Write
024c e220 | | Load 0x1,0x20
024d 0322 | " | Declare_Variable Record
024e e5f9 | | Load 0x2,-0x7
024f 00d9 | | Load_Top At_Offset_1
0250 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0251 e5f8 | | Load 0x2,-0x8
0252 00d9 | | Load_Top At_Offset_1
0253 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0254 e5f7 | | Load 0x2,-0x9
0255 00d9 | | Load_Top At_Offset_1
0256 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0257 4803 |H | Short_Literal 0x3
0258 00da | | Load_Top At_Offset_2
0259 01d6 | | Execute Vector,Field_Write
025a e220 | | Load 0x1,0x20
025b 0322 | " | Declare_Variable Record
025c e5f6 | | Load 0x2,-0xa
025d 00d9 | | Load_Top At_Offset_1
025e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025f e5f5 | | Load 0x2,-0xb
0260 00d9 | | Load_Top At_Offset_1
0261 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0262 e5f4 | | Load 0x2,-0xc
0263 00d9 | | Load_Top At_Offset_1
0264 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0265 4804 |H | Short_Literal 0x4
0266 00da | | Load_Top At_Offset_2
0267 01d6 | | Execute Vector,Field_Write
0268 8223 | # | Call 0x1,0x23
0269 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc
026a 0000 0000 | | .BLANK 0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 4801 |H | Short_Literal 0x1
0274 4803 |H | Short_Literal 0x3
0275 e221 | ! | Load 0x1,0x21
0276 035b | [ | Declare_Type Array,Constrained
0277 0337 | 7 | Declare_Variable Array
0278 e220 | | Load 0x1,0x20
0279 0322 | " | Declare_Variable Record
027a e5ff | | Load 0x2,-0x1
027b 00d9 | | Load_Top At_Offset_1
027c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
027d e5fe | | Load 0x2,-0x2
027e 00d9 | | Load_Top At_Offset_1
027f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0280 e5fd | | Load 0x2,-0x3
0281 00d9 | | Load_Top At_Offset_1
0282 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0283 4801 |H | Short_Literal 0x1
0284 00da | | Load_Top At_Offset_2
0285 01d6 | | Execute Vector,Field_Write
0286 e220 | | Load 0x1,0x20
0287 0322 | " | Declare_Variable Record
0288 e5fc | | Load 0x2,-0x4
0289 00d9 | | Load_Top At_Offset_1
028a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
028b e5fb | | Load 0x2,-0x5
028c 00d9 | | Load_Top At_Offset_1
028d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
028e e5fa | | Load 0x2,-0x6
028f 00d9 | | Load_Top At_Offset_1
0290 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0291 4802 |H | Short_Literal 0x2
0292 00da | | Load_Top At_Offset_2
0293 01d6 | | Execute Vector,Field_Write
0294 e220 | | Load 0x1,0x20
0295 0322 | " | Declare_Variable Record
0296 e5f9 | | Load 0x2,-0x7
0297 00d9 | | Load_Top At_Offset_1
0298 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0299 e5f8 | | Load 0x2,-0x8
029a 00d9 | | Load_Top At_Offset_1
029b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
029c e5f7 | | Load 0x2,-0x9
029d 00d9 | | Load_Top At_Offset_1
029e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
029f 4803 |H | Short_Literal 0x3
02a0 00da | | Load_Top At_Offset_2
02a1 01d6 | | Execute Vector,Field_Write
02a2 8223 | # | Call 0x1,0x23
02a3 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
02a4 0000 0000 | | .BLANK 0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab 4801 |H | Short_Literal 0x1
02ac 4805 |H | Short_Literal 0x5
02ad e221 | ! | Load 0x1,0x21
02ae 035b | [ | Declare_Type Array,Constrained
02af 0337 | 7 | Declare_Variable Array
02b0 e220 | | Load 0x1,0x20
02b1 0322 | " | Declare_Variable Record
02b2 e5ff | | Load 0x2,-0x1
02b3 00d9 | | Load_Top At_Offset_1
02b4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02b5 e5fe | | Load 0x2,-0x2
02b6 00d9 | | Load_Top At_Offset_1
02b7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02b8 e5fd | | Load 0x2,-0x3
02b9 00d9 | | Load_Top At_Offset_1
02ba 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02bb 4801 |H | Short_Literal 0x1
02bc 00da | | Load_Top At_Offset_2
02bd 01d6 | | Execute Vector,Field_Write
02be e220 | | Load 0x1,0x20
02bf 0322 | " | Declare_Variable Record
02c0 e5fc | | Load 0x2,-0x4
02c1 00d9 | | Load_Top At_Offset_1
02c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02c3 e5fb | | Load 0x2,-0x5
02c4 00d9 | | Load_Top At_Offset_1
02c5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02c6 e5fa | | Load 0x2,-0x6
02c7 00d9 | | Load_Top At_Offset_1
02c8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02c9 4802 |H | Short_Literal 0x2
02ca 00da | | Load_Top At_Offset_2
02cb 01d6 | | Execute Vector,Field_Write
02cc e220 | | Load 0x1,0x20
02cd 0322 | " | Declare_Variable Record
02ce e5f9 | | Load 0x2,-0x7
02cf 00d9 | | Load_Top At_Offset_1
02d0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02d1 e5f8 | | Load 0x2,-0x8
02d2 00d9 | | Load_Top At_Offset_1
02d3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02d4 e5f7 | | Load 0x2,-0x9
02d5 00d9 | | Load_Top At_Offset_1
02d6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02d7 4803 |H | Short_Literal 0x3
02d8 00da | | Load_Top At_Offset_2
02d9 01d6 | | Execute Vector,Field_Write
02da e220 | | Load 0x1,0x20
02db 0322 | " | Declare_Variable Record
02dc e5f6 | | Load 0x2,-0xa
02dd 00d9 | | Load_Top At_Offset_1
02de 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02df e5f5 | | Load 0x2,-0xb
02e0 00d9 | | Load_Top At_Offset_1
02e1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02e2 e5f4 | | Load 0x2,-0xc
02e3 00d9 | | Load_Top At_Offset_1
02e4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02e5 4804 |H | Short_Literal 0x4
02e6 00da | | Load_Top At_Offset_2
02e7 01d6 | | Execute Vector,Field_Write
02e8 e220 | | Load 0x1,0x20
02e9 0322 | " | Declare_Variable Record
02ea e5f3 | | Load 0x2,-0xd
02eb 00d9 | | Load_Top At_Offset_1
02ec 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02ed e5f2 | | Load 0x2,-0xe
02ee 00d9 | | Load_Top At_Offset_1
02ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02f0 e5f1 | | Load 0x2,-0xf
02f1 00d9 | | Load_Top At_Offset_1
02f2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02f3 4805 |H | Short_Literal 0x5
02f4 00da | | Load_Top At_Offset_2
02f5 01d6 | | Execute Vector,Field_Write
02f6 8223 | # | Call 0x1,0x23
02f7 440f |D | Exit_Subprogram With_Value,New_Top_Offset 0xf
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 031d | | .CONST 0x031d ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 000d | | .CONST 0x000d ; Number of locals
02fb INIT_02f8:
02fb 00e1 | | Load_Encached Boolean_Cache
02fc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02fd e214 | | Load 0x1,0x14
02fe 02ff | | Declare_Variable Variant_Record
02ff 00d8 | | Load_Top At_Offset_0
0300 1c00 | | Execute_Immediate Run_Utility,0x0
0301 e213 | | Load 0x1,0x13
0302 e002 | | Load 0x0,0x2
0303 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0304 1c08 | | Execute_Immediate Run_Utility,0x8
0305 00d8 | | Load_Top At_Offset_0
0306 1c00 | | Execute_Immediate Run_Utility,0x0
0307 029f 05db | | Declare_Subprogram INIT_05d8,For_Call
0309 e008 | | Load 0x0,0x8
030a 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36
030b 00c6 | | Action Check_Subprogram_Elaborated
030c 4805 |H | Short_Literal 0x5
030d 4802 |H | Short_Literal 0x2
030e 0099 | | Action Reference_Dynamic
030f e00b | | Load 0x0,0xb
0310 e00c | | Load 0x0,0xc
0311 4809 |H | Short_Literal 0x9
0312 0007 | | Action Break_Optional
0313 e008 | | Load 0x0,0x8
0314 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37
0315 00c6 | | Action Check_Subprogram_Elaborated
0316 4805 |H | Short_Literal 0x5
0317 4802 |H | Short_Literal 0x2
0318 0099 | | Action Reference_Dynamic
0319 e00d | | Load 0x0,0xd
031a e00e | | Load 0x0,0xe
031b 480d |H | Short_Literal 0xd
031c 0007 | | Action Break_Optional
031d BODY_02f8:
031d 821d | | Call 0x1,0x1d
031e 480a |H | Short_Literal 0xa
031f 4802 |H | Short_Literal 0x2
0320 0099 | | Action Reference_Dynamic
0321 480b |H | Short_Literal 0xb
0322 4802 |H | Short_Literal 0x2
0323 0099 | | Action Reference_Dynamic
0324 e008 | | Load 0x0,0x8
0325 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0326 a402 | | Store_Unchecked 0x2,0x2
0327 e402 | | Load 0x2,0x2
0328 680c |h | Jump_Zero 0x335
0329 821d | | Call 0x1,0x1d
032a 4806 |H | Short_Literal 0x6
032b 4802 |H | Short_Literal 0x2
032c 0099 | | Action Reference_Dynamic
032d 4807 |H | Short_Literal 0x7
032e 4802 |H | Short_Literal 0x2
032f 0099 | | Action Reference_Dynamic
0330 e008 | | Load 0x0,0x8
0331 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0332 e403 | | Load 0x2,0x3
0333 016d | m | Execute Variant_Record,Structure_Write
0334 780a |x | Jump 0x33f
0335 e404 | | Load 0x2,0x4
0336 4800 |H | Short_Literal 0x0
0337 e002 | | Load 0x0,0x2
0338 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0339 00d1 | | Pop_Control Pop_Count_1
033a e404 | | Load 0x2,0x4
033b e214 | | Load 0x1,0x14
033c 0162 | b | Execute Variant_Record,Check_In_Type
033d e403 | | Load 0x2,0x3
033e 016d | m | Execute Variant_Record,Structure_Write
033f e403 | | Load 0x2,0x3
0340 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0341 0000 0000 | | .BLANK 0000[0x7]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0357 | W | .CONST 0x0357 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0006 | | .CONST 0x0006 ; Number of locals
034b INIT_0348:
034b 029f 0603 | | Declare_Subprogram INIT_0600,For_Call
034d e008 | | Load 0x0,0x8
034e 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35
034f 00c6 | | Action Check_Subprogram_Elaborated
0350 4802 |H | Short_Literal 0x2
0351 4802 |H | Short_Literal 0x2
0352 0099 | | Action Reference_Dynamic
0353 e00f | | Load 0x0,0xf
0354 e010 | | Load 0x0,0x10
0355 4806 |H | Short_Literal 0x6
0356 0007 | | Action Break_Optional
0357 BODY_0348:
0357 6010 |` | Indirect_Literal Discrete,0x368,{0x00000000, 0x7fffffff}
0358 821d | | Call 0x1,0x1d
0359 4803 |H | Short_Literal 0x3
035a 4802 |H | Short_Literal 0x2
035b 0099 | | Action Reference_Dynamic
035c 4804 |H | Short_Literal 0x4
035d 4802 |H | Short_Literal 0x2
035e 0099 | | Action Reference_Dynamic
035f e008 | | Load 0x0,0x8
0360 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0361 e008 | | Load 0x0,0x8
0362 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0363 01c6 | | Execute Vector,Convert_To_Formal
0364 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0365 0000 0000 | | .XXX[0x3]
0367 0000 | |
0368 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
036c 0000 0000 | | .BLANK 0000[0x4]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 037f | | .CONST 0x037f ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0006 | | .CONST 0x0006 ; Number of locals
0373 INIT_0370:
0373 029f 0613 | | Declare_Subprogram INIT_0610,For_Call
0375 e008 | | Load 0x0,0x8
0376 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35
0377 00c6 | | Action Check_Subprogram_Elaborated
0378 4802 |H | Short_Literal 0x2
0379 4802 |H | Short_Literal 0x2
037a 0099 | | Action Reference_Dynamic
037b e011 | | Load 0x0,0x11
037c e012 | | Load 0x0,0x12
037d 4806 |H | Short_Literal 0x6
037e 0007 | | Action Break_Optional
037f BODY_0370:
037f 67e8 |g | Indirect_Literal Discrete,0x368,{0x00000000, 0x7fffffff}
0380 821d | | Call 0x1,0x1d
0381 4803 |H | Short_Literal 0x3
0382 4802 |H | Short_Literal 0x2
0383 0099 | | Action Reference_Dynamic
0384 4804 |H | Short_Literal 0x4
0385 4802 |H | Short_Literal 0x2
0386 0099 | | Action Reference_Dynamic
0387 e008 | | Load 0x0,0x8
0388 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0389 e008 | | Load 0x0,0x8
038a 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
038b 01c6 | | Execute Vector,Convert_To_Formal
038c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
038d 0000 0000 | | .XXX[0x3]
038f 0000 | |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 039f | | .CONST 0x039f ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0006 | | .CONST 0x0006 ; Number of locals
0393 INIT_0390:
0393 029f 063b | ;| Declare_Subprogram INIT_0638,For_Call
0395 e008 | | Load 0x0,0x8
0396 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38
0397 00c6 | | Action Check_Subprogram_Elaborated
0398 4802 |H | Short_Literal 0x2
0399 4802 |H | Short_Literal 0x2
039a 0099 | | Action Reference_Dynamic
039b e013 | | Load 0x0,0x13
039c e014 | | Load 0x0,0x14
039d 4806 |H | Short_Literal 0x6
039e 0007 | | Action Break_Optional
039f BODY_0390:
039f 821d | | Call 0x1,0x1d
03a0 4803 |H | Short_Literal 0x3
03a1 4802 |H | Short_Literal 0x2
03a2 0099 | | Action Reference_Dynamic
03a3 4804 |H | Short_Literal 0x4
03a4 4802 |H | Short_Literal 0x2
03a5 0099 | | Action Reference_Dynamic
03a6 e008 | | Load 0x0,0x8
03a7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03a8 e214 | | Load 0x1,0x14
03a9 0165 | e | Execute Variant_Record,Convert
03aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ab 0000 0000 | | .BLANK 0000[0x5]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03bf | | .CONST 0x03bf ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0006 | | .CONST 0x0006 ; Number of locals
03b3 INIT_03b0:
03b3 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call
03b5 e008 | | Load 0x0,0x8
03b6 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38
03b7 00c6 | | Action Check_Subprogram_Elaborated
03b8 4802 |H | Short_Literal 0x2
03b9 4802 |H | Short_Literal 0x2
03ba 0099 | | Action Reference_Dynamic
03bb e015 | | Load 0x0,0x15
03bc e016 | | Load 0x0,0x16
03bd 4806 |H | Short_Literal 0x6
03be 0007 | | Action Break_Optional
03bf BODY_03b0:
03bf 821d | | Call 0x1,0x1d
03c0 4803 |H | Short_Literal 0x3
03c1 4802 |H | Short_Literal 0x2
03c2 0099 | | Action Reference_Dynamic
03c3 4804 |H | Short_Literal 0x4
03c4 4802 |H | Short_Literal 0x2
03c5 0099 | | Action Reference_Dynamic
03c6 e008 | | Load 0x0,0x8
03c7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
03c8 e214 | | Load 0x1,0x14
03c9 0165 | e | Execute Variant_Record,Convert
03ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03cb 0000 0000 | | .BLANK 0000[0x5]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3 | | .CONST 0x03d3 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0001 | | .CONST 0x0001 ; Number of locals
03d3 BODY_03d0:
03d3 INIT_03d0:
03d3 00da | | Load_Top At_Offset_2
03d4 e235 | 5 | Load 0x1,0x35
03d5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03d6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d7 0000 | | .XXX[0x1]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db e235 | 5 | Load 0x1,0x35
03dc 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03de 0000 0000 | | .XXX[0x2]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 e235 | 5 | Load 0x1,0x35
03e5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03e7 0000 | | .XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb e235 | 5 | Load 0x1,0x35
03ec 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ee 0000 0000 | | .XXX[0x2]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03fd | | .CONST 0x03fd ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0005 | | .CONST 0x0005 ; Number of locals
03f3 INIT_03f0:
03f3 e008 | | Load 0x0,0x8
03f4 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37
03f5 00c6 | | Action Check_Subprogram_Elaborated
03f6 4ffe |O | Short_Literal -0x2
03f7 4802 |H | Short_Literal 0x2
03f8 0099 | | Action Reference_Dynamic
03f9 e017 | | Load 0x0,0x17
03fa e018 | | Load 0x0,0x18
03fb 4805 |H | Short_Literal 0x5
03fc 0007 | | Action Break_Optional
03fd BODY_03f0:
03fd 821d | | Call 0x1,0x1d
03fe 4802 |H | Short_Literal 0x2
03ff 4802 |H | Short_Literal 0x2
0400 0099 | | Action Reference_Dynamic
0401 4803 |H | Short_Literal 0x3
0402 4802 |H | Short_Literal 0x2
0403 0099 | | Action Reference_Dynamic
0404 e008 | | Load 0x0,0x8
0405 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0406 00e1 | | Load_Encached Boolean_Cache
0407 025e | ^ | Execute Discrete,Convert
0408 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0409 0000 0000 | | .BLANK 0000[0x7]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 041d | | .CONST 0x041d ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0005 | | .CONST 0x0005 ; Number of locals
0413 INIT_0410:
0413 e008 | | Load 0x0,0x8
0414 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36
0415 00c6 | | Action Check_Subprogram_Elaborated
0416 4ffe |O | Short_Literal -0x2
0417 4802 |H | Short_Literal 0x2
0418 0099 | | Action Reference_Dynamic
0419 e019 | | Load 0x0,0x19
041a e01a | | Load 0x0,0x1a
041b 4805 |H | Short_Literal 0x5
041c 0007 | | Action Break_Optional
041d BODY_0410:
041d 821d | | Call 0x1,0x1d
041e 4802 |H | Short_Literal 0x2
041f 4802 |H | Short_Literal 0x2
0420 0099 | | Action Reference_Dynamic
0421 4803 |H | Short_Literal 0x3
0422 4802 |H | Short_Literal 0x2
0423 0099 | | Action Reference_Dynamic
0424 e008 | | Load 0x0,0x8
0425 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0426 e214 | | Load 0x1,0x14
0427 0165 | e | Execute Variant_Record,Convert
0428 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0429 0000 0000 | | .BLANK 0000[0x7]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433 | 3 | .CONST 0x0433 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0001 | | .CONST 0x0001 ; Number of locals
0433 BODY_0430:
0433 INIT_0430:
0433 e5fd | | Load 0x2,-0x3
0434 4605 |F | Jump_Case 0x6
0435 7811 |x | Jump 0x447 ; case 0x0
0436 782a |x* | Jump 0x461 ; case 0x1
0437 7843 |xC | Jump 0x47b ; case 0x2
0438 781b |x | Jump 0x454 ; case 0x3
0439 7834 |x4 | Jump 0x46e ; case 0x4
043a 7800 |x | Jump 0x43b ; case 0x5
043b 00db | | Load_Top At_Offset_3
043c 00d8 | | Load_Top At_Offset_0
043d e212 | | Load 0x1,0x12
043e 0260 | ` | Execute Discrete,In_Type
043f 7001 |p | Jump_Nonzero 0x441
0440 0801 | | Execute_Immediate Raise,0x1
0441 00db | | Load_Top At_Offset_3
0442 8217 | | Call 0x1,0x17
0443 e5fc | | Load 0x2,-0x4
0444 016f | o | Execute Variant_Record,Equal
0445 0f00 | | Execute_Immediate Equal,0x0
0446 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0447 e5fc | | Load 0x2,-0x4
0448 e5fe | | Load 0x2,-0x2
0449 00d8 | | Load_Top At_Offset_0
044a e212 | | Load 0x1,0x12
044b 0260 | ` | Execute Discrete,In_Type
044c 7001 |p | Jump_Nonzero 0x44e
044d 0801 | | Execute_Immediate Raise,0x1
044e e5ff | | Load 0x2,-0x1
044f 8217 | | Call 0x1,0x17
0450 e003 | | Load 0x0,0x3
0451 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0452 180f | | Execute Package,Field_Execute,Field_Number 0xf
0453 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0454 e5fc | | Load 0x2,-0x4
0455 e5fe | | Load 0x2,-0x2
0456 00d8 | | Load_Top At_Offset_0
0457 e212 | | Load 0x1,0x12
0458 0260 | ` | Execute Discrete,In_Type
0459 7001 |p | Jump_Nonzero 0x45b
045a 0801 | | Execute_Immediate Raise,0x1
045b e5ff | | Load 0x2,-0x1
045c 8217 | | Call 0x1,0x17
045d e003 | | Load 0x0,0x3
045e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
045f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0460 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0461 e5fc | | Load 0x2,-0x4
0462 e5fe | | Load 0x2,-0x2
0463 00d8 | | Load_Top At_Offset_0
0464 e212 | | Load 0x1,0x12
0465 0260 | ` | Execute Discrete,In_Type
0466 7001 |p | Jump_Nonzero 0x468
0467 0801 | | Execute_Immediate Raise,0x1
0468 e5ff | | Load 0x2,-0x1
0469 8217 | | Call 0x1,0x17
046a e003 | | Load 0x0,0x3
046b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
046c 180d | | Execute Package,Field_Execute,Field_Number 0xd
046d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
046e e5fc | | Load 0x2,-0x4
046f e5fe | | Load 0x2,-0x2
0470 00d8 | | Load_Top At_Offset_0
0471 e212 | | Load 0x1,0x12
0472 0260 | ` | Execute Discrete,In_Type
0473 7001 |p | Jump_Nonzero 0x475
0474 0801 | | Execute_Immediate Raise,0x1
0475 e5ff | | Load 0x2,-0x1
0476 8217 | | Call 0x1,0x17
0477 e003 | | Load 0x0,0x3
0478 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0479 180e | | Execute Package,Field_Execute,Field_Number 0xe
047a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
047b 00db | | Load_Top At_Offset_3
047c 00d8 | | Load_Top At_Offset_0
047d e212 | | Load 0x1,0x12
047e 0260 | ` | Execute Discrete,In_Type
047f 7001 |p | Jump_Nonzero 0x481
0480 0801 | | Execute_Immediate Raise,0x1
0481 00db | | Load_Top At_Offset_3
0482 8217 | | Call 0x1,0x17
0483 e5fc | | Load 0x2,-0x4
0484 016f | o | Execute Variant_Record,Equal
0485 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0486 0000 0000 | | .XXX[0x2]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b 4801 |H | Short_Literal 0x1
048c 4801 |H | Short_Literal 0x1
048d e221 | ! | Load 0x1,0x21
048e 035b | [ | Declare_Type Array,Constrained
048f 0337 | 7 | Declare_Variable Array
0490 e220 | | Load 0x1,0x20
0491 0322 | " | Declare_Variable Record
0492 e5ff | | Load 0x2,-0x1
0493 00d9 | | Load_Top At_Offset_1
0494 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0495 e5fe | | Load 0x2,-0x2
0496 00d9 | | Load_Top At_Offset_1
0497 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0498 e5fd | | Load 0x2,-0x3
0499 00d9 | | Load_Top At_Offset_1
049a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
049b 4801 |H | Short_Literal 0x1
049c 00da | | Load_Top At_Offset_2
049d 01d6 | | Execute Vector,Field_Write
049e 8229 | ) | Call 0x1,0x29
049f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
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 4801 |H | Short_Literal 0x1
04a4 4802 |H | Short_Literal 0x2
04a5 e221 | ! | Load 0x1,0x21
04a6 035b | [ | Declare_Type Array,Constrained
04a7 0337 | 7 | Declare_Variable Array
04a8 e220 | | Load 0x1,0x20
04a9 0322 | " | Declare_Variable Record
04aa e5ff | | Load 0x2,-0x1
04ab 00d9 | | Load_Top At_Offset_1
04ac 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04ad e5fe | | Load 0x2,-0x2
04ae 00d9 | | Load_Top At_Offset_1
04af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04b0 e5fd | | Load 0x2,-0x3
04b1 00d9 | | Load_Top At_Offset_1
04b2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04b3 4801 |H | Short_Literal 0x1
04b4 00da | | Load_Top At_Offset_2
04b5 01d6 | | Execute Vector,Field_Write
04b6 e220 | | Load 0x1,0x20
04b7 0322 | " | Declare_Variable Record
04b8 e5fc | | Load 0x2,-0x4
04b9 00d9 | | Load_Top At_Offset_1
04ba 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04bb e5fb | | Load 0x2,-0x5
04bc 00d9 | | Load_Top At_Offset_1
04bd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04be e5fa | | Load 0x2,-0x6
04bf 00d9 | | Load_Top At_Offset_1
04c0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04c1 4802 |H | Short_Literal 0x2
04c2 00da | | Load_Top At_Offset_2
04c3 01d6 | | Execute Vector,Field_Write
04c4 8229 | ) | Call 0x1,0x29
04c5 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
04c6 0000 0000 | | .XXX[0x2]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 4801 |H | Short_Literal 0x1
04cc 4803 |H | Short_Literal 0x3
04cd e221 | ! | Load 0x1,0x21
04ce 035b | [ | Declare_Type Array,Constrained
04cf 0337 | 7 | Declare_Variable Array
04d0 e220 | | Load 0x1,0x20
04d1 0322 | " | Declare_Variable Record
04d2 e5ff | | Load 0x2,-0x1
04d3 00d9 | | Load_Top At_Offset_1
04d4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04d5 e5fe | | Load 0x2,-0x2
04d6 00d9 | | Load_Top At_Offset_1
04d7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04d8 e5fd | | Load 0x2,-0x3
04d9 00d9 | | Load_Top At_Offset_1
04da 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04db 4801 |H | Short_Literal 0x1
04dc 00da | | Load_Top At_Offset_2
04dd 01d6 | | Execute Vector,Field_Write
04de e220 | | Load 0x1,0x20
04df 0322 | " | Declare_Variable Record
04e0 e5fc | | Load 0x2,-0x4
04e1 00d9 | | Load_Top At_Offset_1
04e2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04e3 e5fb | | Load 0x2,-0x5
04e4 00d9 | | Load_Top At_Offset_1
04e5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04e6 e5fa | | Load 0x2,-0x6
04e7 00d9 | | Load_Top At_Offset_1
04e8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04e9 4802 |H | Short_Literal 0x2
04ea 00da | | Load_Top At_Offset_2
04eb 01d6 | | Execute Vector,Field_Write
04ec e220 | | Load 0x1,0x20
04ed 0322 | " | Declare_Variable Record
04ee e5f9 | | Load 0x2,-0x7
04ef 00d9 | | Load_Top At_Offset_1
04f0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04f1 e5f8 | | Load 0x2,-0x8
04f2 00d9 | | Load_Top At_Offset_1
04f3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04f4 e5f7 | | Load 0x2,-0x9
04f5 00d9 | | Load_Top At_Offset_1
04f6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
04f7 4803 |H | Short_Literal 0x3
04f8 00da | | Load_Top At_Offset_2
04f9 01d6 | | Execute Vector,Field_Write
04fa 8229 | ) | Call 0x1,0x29
04fb 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
04fc 0000 0000 | | .BLANK 0000[0x4]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503 | | .CONST 0x0503 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0001 | | .CONST 0x0001 ; Number of locals
0503 BODY_0500:
0503 INIT_0500:
0503 4801 |H | Short_Literal 0x1
0504 4804 |H | Short_Literal 0x4
0505 e221 | ! | Load 0x1,0x21
0506 035b | [ | Declare_Type Array,Constrained
0507 0337 | 7 | Declare_Variable Array
0508 e220 | | Load 0x1,0x20
0509 0322 | " | Declare_Variable Record
050a e5ff | | Load 0x2,-0x1
050b 00d9 | | Load_Top At_Offset_1
050c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
050d e5fe | | Load 0x2,-0x2
050e 00d9 | | Load_Top At_Offset_1
050f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0510 e5fd | | Load 0x2,-0x3
0511 00d9 | | Load_Top At_Offset_1
0512 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0513 4801 |H | Short_Literal 0x1
0514 00da | | Load_Top At_Offset_2
0515 01d6 | | Execute Vector,Field_Write
0516 e220 | | Load 0x1,0x20
0517 0322 | " | Declare_Variable Record
0518 e5fc | | Load 0x2,-0x4
0519 00d9 | | Load_Top At_Offset_1
051a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
051b e5fb | | Load 0x2,-0x5
051c 00d9 | | Load_Top At_Offset_1
051d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
051e e5fa | | Load 0x2,-0x6
051f 00d9 | | Load_Top At_Offset_1
0520 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0521 4802 |H | Short_Literal 0x2
0522 00da | | Load_Top At_Offset_2
0523 01d6 | | Execute Vector,Field_Write
0524 e220 | | Load 0x1,0x20
0525 0322 | " | Declare_Variable Record
0526 e5f9 | | Load 0x2,-0x7
0527 00d9 | | Load_Top At_Offset_1
0528 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0529 e5f8 | | Load 0x2,-0x8
052a 00d9 | | Load_Top At_Offset_1
052b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
052c e5f7 | | Load 0x2,-0x9
052d 00d9 | | Load_Top At_Offset_1
052e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
052f 4803 |H | Short_Literal 0x3
0530 00da | | Load_Top At_Offset_2
0531 01d6 | | Execute Vector,Field_Write
0532 e220 | | Load 0x1,0x20
0533 0322 | " | Declare_Variable Record
0534 e5f6 | | Load 0x2,-0xa
0535 00d9 | | Load_Top At_Offset_1
0536 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0537 e5f5 | | Load 0x2,-0xb
0538 00d9 | | Load_Top At_Offset_1
0539 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
053a e5f4 | | Load 0x2,-0xc
053b 00d9 | | Load_Top At_Offset_1
053c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
053d 4804 |H | Short_Literal 0x4
053e 00da | | Load_Top At_Offset_2
053f 01d6 | | Execute Vector,Field_Write
0540 822b | + | Call 0x1,0x2b
0541 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc
0542 0000 0000 | | .BLANK 0000[0x6]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b | K | .CONST 0x054b ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0001 | | .CONST 0x0001 ; Number of locals
054b BODY_0548:
054b INIT_0548:
054b 4801 |H | Short_Literal 0x1
054c 4805 |H | Short_Literal 0x5
054d e221 | ! | Load 0x1,0x21
054e 035b | [ | Declare_Type Array,Constrained
054f 0337 | 7 | Declare_Variable Array
0550 e220 | | Load 0x1,0x20
0551 0322 | " | Declare_Variable Record
0552 e5ff | | Load 0x2,-0x1
0553 00d9 | | Load_Top At_Offset_1
0554 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0555 e5fe | | Load 0x2,-0x2
0556 00d9 | | Load_Top At_Offset_1
0557 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0558 e5fd | | Load 0x2,-0x3
0559 00d9 | | Load_Top At_Offset_1
055a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
055b 4801 |H | Short_Literal 0x1
055c 00da | | Load_Top At_Offset_2
055d 01d6 | | Execute Vector,Field_Write
055e e220 | | Load 0x1,0x20
055f 0322 | " | Declare_Variable Record
0560 e5fc | | Load 0x2,-0x4
0561 00d9 | | Load_Top At_Offset_1
0562 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0563 e5fb | | Load 0x2,-0x5
0564 00d9 | | Load_Top At_Offset_1
0565 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0566 e5fa | | Load 0x2,-0x6
0567 00d9 | | Load_Top At_Offset_1
0568 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0569 4802 |H | Short_Literal 0x2
056a 00da | | Load_Top At_Offset_2
056b 01d6 | | Execute Vector,Field_Write
056c e220 | | Load 0x1,0x20
056d 0322 | " | Declare_Variable Record
056e e5f9 | | Load 0x2,-0x7
056f 00d9 | | Load_Top At_Offset_1
0570 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0571 e5f8 | | Load 0x2,-0x8
0572 00d9 | | Load_Top At_Offset_1
0573 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0574 e5f7 | | Load 0x2,-0x9
0575 00d9 | | Load_Top At_Offset_1
0576 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0577 4803 |H | Short_Literal 0x3
0578 00da | | Load_Top At_Offset_2
0579 01d6 | | Execute Vector,Field_Write
057a e220 | | Load 0x1,0x20
057b 0322 | " | Declare_Variable Record
057c e5f6 | | Load 0x2,-0xa
057d 00d9 | | Load_Top At_Offset_1
057e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
057f e5f5 | | Load 0x2,-0xb
0580 00d9 | | Load_Top At_Offset_1
0581 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0582 e5f4 | | Load 0x2,-0xc
0583 00d9 | | Load_Top At_Offset_1
0584 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0585 4804 |H | Short_Literal 0x4
0586 00da | | Load_Top At_Offset_2
0587 01d6 | | Execute Vector,Field_Write
0588 e220 | | Load 0x1,0x20
0589 0322 | " | Declare_Variable Record
058a e5f3 | | Load 0x2,-0xd
058b 00d9 | | Load_Top At_Offset_1
058c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
058d e5f2 | | Load 0x2,-0xe
058e 00d9 | | Load_Top At_Offset_1
058f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0590 e5f1 | | Load 0x2,-0xf
0591 00d9 | | Load_Top At_Offset_1
0592 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0593 4805 |H | Short_Literal 0x5
0594 00da | | Load_Top At_Offset_2
0595 01d6 | | Execute Vector,Field_Write
0596 822b | + | Call 0x1,0x2b
0597 440f |D | Exit_Subprogram With_Value,New_Top_Offset 0xf
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a5 | | .CONST 0x05a5 ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0003 | | .CONST 0x0003 ; Number of locals
059b INIT_0598:
059b e214 | | Load 0x1,0x14
059c 02ff | | Declare_Variable Variant_Record
059d 00d8 | | Load_Top At_Offset_0
059e 1c00 | | Execute_Immediate Run_Utility,0x0
059f e213 | | Load 0x1,0x13
05a0 e002 | | Load 0x0,0x2
05a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a2 1c08 | | Execute_Immediate Run_Utility,0x8
05a3 00d8 | | Load_Top At_Offset_0
05a4 1c00 | | Execute_Immediate Run_Utility,0x0
05a5 BODY_0598:
05a5 00d8 | | Load_Top At_Offset_0
05a6 4800 |H | Short_Literal 0x0
05a7 e002 | | Load 0x0,0x2
05a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05a9 00d1 | | Pop_Control Pop_Count_1
05aa 00d8 | | Load_Top At_Offset_0
05ab e214 | | Load 0x1,0x14
05ac 0162 | b | Execute Variant_Record,Check_In_Type
05ad 00da | | Load_Top At_Offset_2
05ae 016d | m | Execute Variant_Record,Structure_Write
05af 00d9 | | Load_Top At_Offset_1
05b0 00ca | | Action Exit_Nullary_Function
05b1 0000 0000 | | .BLANK 0000[0x7]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e5fe | | Load 0x2,-0x2
05bc e5ff | | Load 0x2,-0x1
05bd 00d8 | | Load_Top At_Offset_0
05be e212 | | Load 0x1,0x12
05bf 0260 | ` | Execute Discrete,In_Type
05c0 7001 |p | Jump_Nonzero 0x5c2
05c1 0801 | | Execute_Immediate Raise,0x1
05c2 e7ff | | Load 0x3,-0x1
05c3 8217 | | Call 0x1,0x17
05c4 e003 | | Load 0x0,0x3
05c5 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
05c6 180f | | Execute Package,Field_Execute,Field_Number 0xf
05c7 e5fd | | Load 0x2,-0x3
05c8 e5ff | | Load 0x2,-0x1
05c9 00d8 | | Load_Top At_Offset_0
05ca e212 | | Load 0x1,0x12
05cb 0260 | ` | Execute Discrete,In_Type
05cc 7001 |p | Jump_Nonzero 0x5ce
05cd 0801 | | Execute_Immediate Raise,0x1
05ce e7ff | | Load 0x3,-0x1
05cf 8217 | | Call 0x1,0x17
05d0 e003 | | Load 0x0,0x3
05d1 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
05d2 180d | | Execute Package,Field_Execute,Field_Number 0xd
05d3 0279 | y | Execute Discrete,And
05d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00cf | | Action Mark_Auxiliary
05dc e5ff | | Load 0x2,-0x1
05dd 01d9 | | Execute Vector,Reverse_Bounds
05de 0263 | c | Execute Discrete,Above_Bound
05df 7018 |p | Jump_Nonzero 0x5f8
05e0 00d8 | | Load_Top At_Offset_0
05e1 e5ff | | Load 0x2,-0x1
05e2 01d5 | | Execute Vector,Field_Reference
05e3 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
05e4 00d9 | | Load_Top At_Offset_1
05e5 e5ff | | Load 0x2,-0x1
05e6 01d5 | | Execute Vector,Field_Reference
05e7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05e8 00da | | Load_Top At_Offset_2
05e9 e5ff | | Load 0x2,-0x1
05ea 01d5 | | Execute Vector,Field_Reference
05eb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05ec 00d8 | | Load_Top At_Offset_0
05ed e212 | | Load 0x1,0x12
05ee 0260 | ` | Execute Discrete,In_Type
05ef 7001 |p | Jump_Nonzero 0x5f1
05f0 0801 | | Execute_Immediate Raise,0x1
05f1 e7ff | | Load 0x3,-0x1
05f2 8236 | 6 | Call 0x1,0x36
05f3 7002 |p | Jump_Nonzero 0x5f6
05f4 4800 |H | Short_Literal 0x0
05f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f6 00c8 | | Action Pop_Auxiliary_Range
05f7 3fe8 |? | Loop_Increasing 0x5e0
05f8 00ce | | Action Pop_Auxiliary
05f9 4801 |H | Short_Literal 0x1
05fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05fb 0000 0000 | | .BLANK 0000[0x5]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603 | | .CONST 0x0603 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0001 | | .CONST 0x0001 ; Number of locals
0603 BODY_0600:
0603 INIT_0600:
0603 e5fd | | Load 0x2,-0x3
0604 e5fe | | Load 0x2,-0x2
0605 e5ff | | Load 0x2,-0x1
0606 00d8 | | Load_Top At_Offset_0
0607 e212 | | Load 0x1,0x12
0608 0260 | ` | Execute Discrete,In_Type
0609 7001 |p | Jump_Nonzero 0x60b
060a 0801 | | Execute_Immediate Raise,0x1
060b e7ff | | Load 0x3,-0x1
060c 8236 | 6 | Call 0x1,0x36
060d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
060e 0000 0000 | | .XXX[0x2]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613 | | .CONST 0x0613 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0001 | | .CONST 0x0001 ; Number of locals
0613 BODY_0610:
0613 INIT_0610:
0613 00cf | | Action Mark_Auxiliary
0614 e5ff | | Load 0x2,-0x1
0615 01d9 | | Execute Vector,Reverse_Bounds
0616 0263 | c | Execute Discrete,Above_Bound
0617 7018 |p | Jump_Nonzero 0x630
0618 00d8 | | Load_Top At_Offset_0
0619 e5ff | | Load 0x2,-0x1
061a 01d5 | | Execute Vector,Field_Reference
061b 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
061c 00d9 | | Load_Top At_Offset_1
061d e5ff | | Load 0x2,-0x1
061e 01d5 | | Execute Vector,Field_Reference
061f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0620 00da | | Load_Top At_Offset_2
0621 e5ff | | Load 0x2,-0x1
0622 01d5 | | Execute Vector,Field_Reference
0623 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0624 00d8 | | Load_Top At_Offset_0
0625 e212 | | Load 0x1,0x12
0626 0260 | ` | Execute Discrete,In_Type
0627 7001 |p | Jump_Nonzero 0x629
0628 0801 | | Execute_Immediate Raise,0x1
0629 e7ff | | Load 0x3,-0x1
062a 8236 | 6 | Call 0x1,0x36
062b 7002 |p | Jump_Nonzero 0x62e
062c 4800 |H | Short_Literal 0x0
062d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
062e 00c8 | | Action Pop_Auxiliary_Range
062f 3fe8 |? | Loop_Increasing 0x618
0630 00ce | | Action Pop_Auxiliary
0631 4801 |H | Short_Literal 0x1
0632 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0633 0000 0000 | | .BLANK 0000[0x5]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b | ; | .CONST 0x063b ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0001 | | .CONST 0x0001 ; Number of locals
063b BODY_0638:
063b INIT_0638:
063b e5ff | | Load 0x2,-0x1
063c 00d8 | | Load_Top At_Offset_0
063d e212 | | Load 0x1,0x12
063e 0260 | ` | Execute Discrete,In_Type
063f 7001 |p | Jump_Nonzero 0x641
0640 0801 | | Execute_Immediate Raise,0x1
0641 e7fe | | Load 0x3,-0x2
0642 8217 | | Call 0x1,0x17
0643 e5ff | | Load 0x2,-0x1
0644 00d8 | | Load_Top At_Offset_0
0645 e212 | | Load 0x1,0x12
0646 0260 | ` | Execute Discrete,In_Type
0647 7001 |p | Jump_Nonzero 0x649
0648 0801 | | Execute_Immediate Raise,0x1
0649 e7ff | | Load 0x3,-0x1
064a 8217 | | Call 0x1,0x17
064b e003 | | Load 0x0,0x3
064c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
064d 180d | | Execute Package,Field_Execute,Field_Number 0xd
064e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
064f 0000 | | .XXX[0x1]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 e5ff | | Load 0x2,-0x1
0654 00d8 | | Load_Top At_Offset_0
0655 e212 | | Load 0x1,0x12
0656 0260 | ` | Execute Discrete,In_Type
0657 7001 |p | Jump_Nonzero 0x659
0658 0801 | | Execute_Immediate Raise,0x1
0659 e7fe | | Load 0x3,-0x2
065a 8217 | | Call 0x1,0x17
065b e5ff | | Load 0x2,-0x1
065c 00d8 | | Load_Top At_Offset_0
065d e212 | | Load 0x1,0x12
065e 0260 | ` | Execute Discrete,In_Type
065f 7001 |p | Jump_Nonzero 0x661
0660 0801 | | Execute_Immediate Raise,0x1
0661 e7ff | | Load 0x3,-0x1
0662 8217 | | Call 0x1,0x17
0663 e003 | | Load 0x0,0x3
0664 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0665 180f | | Execute Package,Field_Execute,Field_Number 0xf
0666 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0667 0000 | | .XXX[0x1]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b 4608 |F | Jump_Case 0x9
066c 7808 |x | Jump 0x675 ; case 0x0
066d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
066e 780a |x | Jump 0x679 ; case 0x2
066f 7809 |x | Jump 0x679 ; case 0x3
0670 7808 |x | Jump 0x679 ; case 0x4
0671 7807 |x | Jump 0x679 ; case 0x5
0672 7806 |x | Jump 0x679 ; case 0x6
0673 7805 |x | Jump 0x679 ; case 0x7
0674 7804 |x | Jump 0x679 ; case 0x8
0675 00da | | Load_Top At_Offset_2
0676 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0677 1c00 | | Execute_Immediate Run_Utility,0x0
0678 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0679 0869 | i | Execute_Immediate Raise,0x69
067a ; --------------------------------------------------------------------------------------
067a ; STRING TABLE
067a ; --------------------------------------------------------------------------------------
067a 000e | | .STRTAB 0x000e->0x0681 ; "GREATER"
067b 0013 | | .STRTAB 0x0013->0x0684 ; "LESS"
067c 0015 | | .STRTAB 0x0015->0x0686 ; "EQUAL"
067d 0018 | | .STRTAB 0x0018->0x0689 ; "GREATER_EQUAL"
067e 0023 | # | .STRTAB 0x0023->0x068f ; "LESS_EQUAL"
067f 002b | + | .STRTAB 0x002b->0x0694 ; "NOT_EQUAL"
0680 0032 | 2 | .STREND 0x0032->0x0699
0681 4752 4541 |GREA| .STRTAB_STRINGS
0699 0000 0000 | | .BLANK 0000[0x7]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; Debug Table
06a0 ; --------------------------------------------------------------------------------------
06a0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xe683,0x0000,0x0001,0x002e
06a6 000b 075e | ^| .DBG4T 0x000b,0x075e,0xc000,0x0000
06aa 006f 0782 | o | .DBG4T 0x006f,0x0782,0xc000,0x0000
06ae 00cb 0000 | | .DBG4T 0x00cb,0x0000,0x1005,0x0000
06b2 00e3 0000 | | .DBG4T 0x00e3,0x0000,0x1005,0x0000
06b6 00fb 07a6 | | .DBG4T 0x00fb,0x07a6,0x1002,0x0000
06ba 010b 07a9 | | .DBG4T 0x010b,0x07a9,0x1001,0x0000
06be 012b 07b1 | + | .DBG4T 0x012b,0x07b1,0x1001,0x0000
06c2 013b 07b5 | ; | .DBG4T 0x013b,0x07b5,0x1001,0x0000
06c6 0153 07ba | S | .DBG4T 0x0153,0x07ba,0x1001,0x0000
06ca 015b 07bd | [ | .DBG4T 0x015b,0x07bd,0x1001,0x0000
06ce 0163 07c0 | c | .DBG4T 0x0163,0x07c0,0x1002,0x0000
06d2 016b 07c3 | k | .DBG4T 0x016b,0x07c3,0x1002,0x0000
06d6 0173 0000 | s | .DBG4T 0x0173,0x0000,0x1005,0x0000
06da 019b 0000 | | .DBG4T 0x019b,0x0000,0x1005,0x0000
06de 01b3 07c6 | | .DBG4T 0x01b3,0x07c6,0x1002,0x0000
06e2 01d3 07cb | | .DBG4T 0x01d3,0x07cb,0x1002,0x0000
06e6 01eb 07d2 | | .DBG4T 0x01eb,0x07d2,0x1002,0x0000
06ea 0203 07d5 | | .DBG4T 0x0203,0x07d5,0x1002,0x0000
06ee 022b 07d8 | + | .DBG4T 0x022b,0x07d8,0x1002,0x0000
06f2 0273 07db | s | .DBG4T 0x0273,0x07db,0x1002,0x0000
06f6 02ab 07de | | .DBG4T 0x02ab,0x07de,0x1002,0x0000
06fa 02fb 07e1 | | .DBG4T 0x02fb,0x07e1,0x1002,0x0000
06fe 034b 07ef | K | .DBG4T 0x034b,0x07ef,0x1002,0x0000
0702 0373 07f4 | s | .DBG4T 0x0373,0x07f4,0x1002,0x0000
0706 0393 07f9 | | .DBG4T 0x0393,0x07f9,0x1002,0x0000
070a 03b3 07fe | | .DBG4T 0x03b3,0x07fe,0x1002,0x0000
070e 03d3 0803 | | .DBG4T 0x03d3,0x0803,0x1001,0x0000
0712 03db 0806 | | .DBG4T 0x03db,0x0806,0x1001,0x0000
0716 03e3 0809 | | .DBG4T 0x03e3,0x0809,0x1001,0x0000
071a 03eb 080c | | .DBG4T 0x03eb,0x080c,0x1001,0x0000
071e 03f3 080f | | .DBG4T 0x03f3,0x080f,0x3802,0x0002
0722 0413 0813 | | .DBG4T 0x0413,0x0813,0x3802,0x0002
0726 0433 0817 | 3 | .DBG4T 0x0433,0x0817,0x1002,0x4000
072a 048b 0827 | '| .DBG4T 0x048b,0x0827,0x1002,0x0000
072e 04a3 082a | *| .DBG4T 0x04a3,0x082a,0x1002,0x0000
0732 04cb 082d | -| .DBG4T 0x04cb,0x082d,0x1002,0x0000
0736 0503 0830 | 0| .DBG4T 0x0503,0x0830,0x1002,0x0000
073a 054b 0833 | K 3| .DBG4T 0x054b,0x0833,0x1002,0x0000
073e 059b 0836 | 6| .DBG4T 0x059b,0x0836,0x1002,0x0000
0742 05bb 083d | =| .DBG4T 0x05bb,0x083d,0x1002,0x0000
0746 05db 0840 | @| .DBG4T 0x05db,0x0840,0x1002,0x0000
074a 0603 0846 | F| .DBG4T 0x0603,0x0846,0x1002,0x0000
074e 0613 0849 | I| .DBG4T 0x0613,0x0849,0x1002,0x0000
0752 063b 084f | ; O| .DBG4T 0x063b,0x084f,0x1002,0x0000
0756 0653 0852 | S R| .DBG4T 0x0653,0x0852,0x1002,0x0000
075a 066b 0000 | k | .DBG4T 0x066b,0x0000,0x1005,0x0000
075e ; --------------------------------------------------------------------------------------
075e ; Debug chain
075e ; --------------------------------------------------------------------------------------
075e 0022 0000 | " | .DBGLEN 0x0022,0x0000
0760 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0015,0x001d,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0039,0x0041,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c
0782 ; --------------------------------------------------------------------------------------
0782 ; Debug chain
0782 ; --------------------------------------------------------------------------------------
0782 0022 0000 | " | .DBGLEN 0x0022,0x0000
0784 006f 007d | o }| .DBGLNO 0x006f,0x007d,0x007f,0x0081,0x0083,0x0085,0x0087,0x0089,0x008b,0x008d,0x008f,0x0091,0x0093,0x0095,0x0097,0x0099,0x009b,0x009d,0x009f,0x00a1,0x00a3,0x00a5,0x00a7,0x00a9,0x00ab,0x00ad,0x00af,0x00b1,0x00b3,0x00b5,0x00b7,0x00b9,0x00bb,0x00bd
07a6 ; --------------------------------------------------------------------------------------
07a6 ; Debug chain
07a6 ; --------------------------------------------------------------------------------------
07a6 0000 0001 | | .DBGLEN 0x0000,0x0001
07a8 00fb | | .DBGLNO 0x00fb
07a9 ; --------------------------------------------------------------------------------------
07a9 ; Debug chain
07a9 ; --------------------------------------------------------------------------------------
07a9 0001 0005 | | .DBGLEN 0x0001,0x0005
07ab 010b 010f | | .DBGLNO 0x010b,0x010f,0x0114,0x011b,0x011f,0x0124
07b1 ; --------------------------------------------------------------------------------------
07b1 ; Debug chain
07b1 ; --------------------------------------------------------------------------------------
07b1 0001 0001 | | .DBGLEN 0x0001,0x0001
07b3 012b 012f | + /| .DBGLNO 0x012b,0x012f
07b5 ; --------------------------------------------------------------------------------------
07b5 ; Debug chain
07b5 ; --------------------------------------------------------------------------------------
07b5 0001 0002 | | .DBGLEN 0x0001,0x0002
07b7 013b 0140 | ; @| .DBGLNO 0x013b,0x0140,0x0144
07ba ; --------------------------------------------------------------------------------------
07ba ; Debug chain
07ba ; --------------------------------------------------------------------------------------
07ba 0000 0001 | | .DBGLEN 0x0000,0x0001
07bc 0153 | S | .DBGLNO 0x0153
07bd ; --------------------------------------------------------------------------------------
07bd ; Debug chain
07bd ; --------------------------------------------------------------------------------------
07bd 0000 0001 | | .DBGLEN 0x0000,0x0001
07bf 015b | [ | .DBGLNO 0x015b
07c0 ; --------------------------------------------------------------------------------------
07c0 ; Debug chain
07c0 ; --------------------------------------------------------------------------------------
07c0 0000 0001 | | .DBGLEN 0x0000,0x0001
07c2 0163 | c | .DBGLNO 0x0163
07c3 ; --------------------------------------------------------------------------------------
07c3 ; Debug chain
07c3 ; --------------------------------------------------------------------------------------
07c3 0000 0001 | | .DBGLEN 0x0000,0x0001
07c5 016b | k | .DBGLNO 0x016b
07c6 ; --------------------------------------------------------------------------------------
07c6 ; Debug chain
07c6 ; --------------------------------------------------------------------------------------
07c6 0002 0001 | | .DBGLEN 0x0002,0x0001
07c8 01b3 01b5 | | .DBGLNO 0x01b3,0x01b5,0x01bf
07cb ; --------------------------------------------------------------------------------------
07cb ; Debug chain
07cb ; --------------------------------------------------------------------------------------
07cb 0001 0004 | | .DBGLEN 0x0001,0x0004
07cd 01d3 01d8 | | .DBGLNO 0x01d3,0x01d8,0x01dc,0x01e0,0x01e2
07d2 ; --------------------------------------------------------------------------------------
07d2 ; Debug chain
07d2 ; --------------------------------------------------------------------------------------
07d2 0000 0001 | | .DBGLEN 0x0000,0x0001
07d4 01eb | | .DBGLNO 0x01eb
07d5 ; --------------------------------------------------------------------------------------
07d5 ; Debug chain
07d5 ; --------------------------------------------------------------------------------------
07d5 0000 0001 | | .DBGLEN 0x0000,0x0001
07d7 0203 | | .DBGLNO 0x0203
07d8 ; --------------------------------------------------------------------------------------
07d8 ; Debug chain
07d8 ; --------------------------------------------------------------------------------------
07d8 0000 0001 | | .DBGLEN 0x0000,0x0001
07da 022b | + | .DBGLNO 0x022b
07db ; --------------------------------------------------------------------------------------
07db ; Debug chain
07db ; --------------------------------------------------------------------------------------
07db 0000 0001 | | .DBGLEN 0x0000,0x0001
07dd 0273 | s | .DBGLNO 0x0273
07de ; --------------------------------------------------------------------------------------
07de ; Debug chain
07de ; --------------------------------------------------------------------------------------
07de 0000 0001 | | .DBGLEN 0x0000,0x0001
07e0 02ab | | .DBGLNO 0x02ab
07e1 ; --------------------------------------------------------------------------------------
07e1 ; Debug chain
07e1 ; --------------------------------------------------------------------------------------
07e1 0006 0006 | | .DBGLEN 0x0006,0x0006
07e3 02fb 02fd | | .DBGLNO 0x02fb,0x02fd,0x0301,0x0307,0x0309,0x0313,0x031d,0x0327,0x0329,0x0335,0x033a,0x033f
07ef ; --------------------------------------------------------------------------------------
07ef ; Debug chain
07ef ; --------------------------------------------------------------------------------------
07ef 0002 0001 | | .DBGLEN 0x0002,0x0001
07f1 034b 034d | K M| .DBGLNO 0x034b,0x034d,0x0357
07f4 ; --------------------------------------------------------------------------------------
07f4 ; Debug chain
07f4 ; --------------------------------------------------------------------------------------
07f4 0002 0001 | | .DBGLEN 0x0002,0x0001
07f6 0373 0375 | s u| .DBGLNO 0x0373,0x0375,0x037f
07f9 ; --------------------------------------------------------------------------------------
07f9 ; Debug chain
07f9 ; --------------------------------------------------------------------------------------
07f9 0002 0001 | | .DBGLEN 0x0002,0x0001
07fb 0393 0395 | | .DBGLNO 0x0393,0x0395,0x039f
07fe ; --------------------------------------------------------------------------------------
07fe ; Debug chain
07fe ; --------------------------------------------------------------------------------------
07fe 0002 0001 | | .DBGLEN 0x0002,0x0001
0800 03b3 03b5 | | .DBGLNO 0x03b3,0x03b5,0x03bf
0803 ; --------------------------------------------------------------------------------------
0803 ; Debug chain
0803 ; --------------------------------------------------------------------------------------
0803 0000 0001 | | .DBGLEN 0x0000,0x0001
0805 03d3 | | .DBGLNO 0x03d3
0806 ; --------------------------------------------------------------------------------------
0806 ; Debug chain
0806 ; --------------------------------------------------------------------------------------
0806 0000 0001 | | .DBGLEN 0x0000,0x0001
0808 03db | | .DBGLNO 0x03db
0809 ; --------------------------------------------------------------------------------------
0809 ; Debug chain
0809 ; --------------------------------------------------------------------------------------
0809 0000 0001 | | .DBGLEN 0x0000,0x0001
080b 03e3 | | .DBGLNO 0x03e3
080c ; --------------------------------------------------------------------------------------
080c ; Debug chain
080c ; --------------------------------------------------------------------------------------
080c 0000 0001 | | .DBGLEN 0x0000,0x0001
080e 03eb | | .DBGLNO 0x03eb
080f ; --------------------------------------------------------------------------------------
080f ; Debug chain
080f ; --------------------------------------------------------------------------------------
080f 0001 0001 | | .DBGLEN 0x0001,0x0001
0811 03f3 03fd | | .DBGLNO 0x03f3,0x03fd
0813 ; --------------------------------------------------------------------------------------
0813 ; Debug chain
0813 ; --------------------------------------------------------------------------------------
0813 0001 0001 | | .DBGLEN 0x0001,0x0001
0815 0413 041d | | .DBGLNO 0x0413,0x041d
0817 ; --------------------------------------------------------------------------------------
0817 ; Debug chain
0817 ; --------------------------------------------------------------------------------------
0817 0000 0007 | | .DBGLEN 0x0000,0x0007
0819 0433 043b | 3 ;| .DBGLNO 0x0433,0x043b,0x0447,0x0454,0x0461,0x046e,0x047b
0820 0001 0007 | | .XXX[0x7]
0822 0002 0003 | |
0824 0004 0005 | |
0826 0006 | |
0827 ; --------------------------------------------------------------------------------------
0827 ; Debug chain
0827 ; --------------------------------------------------------------------------------------
0827 0000 0001 | | .DBGLEN 0x0000,0x0001
0829 048b | | .DBGLNO 0x048b
082a ; --------------------------------------------------------------------------------------
082a ; Debug chain
082a ; --------------------------------------------------------------------------------------
082a 0000 0001 | | .DBGLEN 0x0000,0x0001
082c 04a3 | | .DBGLNO 0x04a3
082d ; --------------------------------------------------------------------------------------
082d ; Debug chain
082d ; --------------------------------------------------------------------------------------
082d 0000 0001 | | .DBGLEN 0x0000,0x0001
082f 04cb | | .DBGLNO 0x04cb
0830 ; --------------------------------------------------------------------------------------
0830 ; Debug chain
0830 ; --------------------------------------------------------------------------------------
0830 0000 0001 | | .DBGLEN 0x0000,0x0001
0832 0503 | | .DBGLNO 0x0503
0833 ; --------------------------------------------------------------------------------------
0833 ; Debug chain
0833 ; --------------------------------------------------------------------------------------
0833 0000 0001 | | .DBGLEN 0x0000,0x0001
0835 054b | K | .DBGLNO 0x054b
0836 ; --------------------------------------------------------------------------------------
0836 ; Debug chain
0836 ; --------------------------------------------------------------------------------------
0836 0002 0003 | | .DBGLEN 0x0002,0x0003
0838 059b 059f | | .DBGLNO 0x059b,0x059f,0x05a5,0x05aa,0x05af
083d ; --------------------------------------------------------------------------------------
083d ; Debug chain
083d ; --------------------------------------------------------------------------------------
083d 0000 0001 | | .DBGLEN 0x0000,0x0001
083f 05bb | | .DBGLNO 0x05bb
0840 ; --------------------------------------------------------------------------------------
0840 ; Debug chain
0840 ; --------------------------------------------------------------------------------------
0840 0000 0004 | | .DBGLEN 0x0000,0x0004
0842 05dc 05e0 | | .DBGLNO 0x05dc,0x05e0,0x05f4,0x05f9
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug chain
0846 ; --------------------------------------------------------------------------------------
0846 0000 0001 | | .DBGLEN 0x0000,0x0001
0848 0603 | | .DBGLNO 0x0603
0849 ; --------------------------------------------------------------------------------------
0849 ; Debug chain
0849 ; --------------------------------------------------------------------------------------
0849 0000 0004 | | .DBGLEN 0x0000,0x0004
084b 0614 0618 | | .DBGLNO 0x0614,0x0618,0x062c,0x0631
084f ; --------------------------------------------------------------------------------------
084f ; Debug chain
084f ; --------------------------------------------------------------------------------------
084f 0000 0001 | | .DBGLEN 0x0000,0x0001
0851 063b | ; | .DBGLNO 0x063b
0852 ; --------------------------------------------------------------------------------------
0852 ; Debug chain
0852 ; --------------------------------------------------------------------------------------
0852 0000 0001 | | .DBGLEN 0x0000,0x0001
0854 0653 | S | .DBGLNO 0x0653
0855 0000 0000 | | .BLANK 0000[0x1ab]