|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0548 | H | .CONST 0x0548 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0048 | H | .CONST 0x0048 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000d 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
000f 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
0011 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
001c c216 | | Store 0x1,0x16
001d 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
001f c217 | | Store 0x1,0x17
0020 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
0022 c211 | | Store 0x1,0x11
0023 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated
0025 c212 | | Store 0x1,0x12
0026 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated
0028 c213 | | Store 0x1,0x13
0029 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated
002b c214 | | Store 0x1,0x14
002c 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated
002e c215 | | Store 0x1,0x15
002f 00bf | | Action Accept_Activation
0030 029d 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call
0032 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0033 00c7 | | Action Elaborate_Subprogram
0034 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0035 00c7 | | Action Elaborate_Subprogram
0036 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0037 00c7 | | Action Elaborate_Subprogram
0038 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0039 00c7 | | Action Elaborate_Subprogram
003a 1d16 | | Execute_Immediate Reference_Lex_1,0x16
003b 00c7 | | Action Elaborate_Subprogram
003c 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003d 00c7 | | Action Elaborate_Subprogram
003e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
003f 00c7 | | Action Elaborate_Subprogram
0040 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0041 00c7 | | Action Elaborate_Subprogram
0042 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0043 00c7 | | Action Elaborate_Subprogram
0044 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0045 00c7 | | Action Elaborate_Subprogram
0046 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0047 00c7 | | Action Elaborate_Subprogram
0048 BODY_0008:
0048 00bc | | Action Signal_Activated
0049 00bb | | Action Signal_Completion
004a 0000 0000 | | .BLANK 0000[0x6]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 005a | Z | .CONST 0x005a ; Address of begin
0051 0092 | | .CONST 0x0092 ; Address of exception handler
0052 0003 | | .CONST 0x0003 ; Number of locals
0053 INIT_0050:
0053 e001 | | Load 0x0,0x1
0054 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0055 02c7 | | Declare_Variable Any
0056 00d8 | | Load_Top At_Offset_0
0057 1c00 | | Execute_Immediate Run_Utility,0x0
0058 e002 | | Load 0x0,0x2
0059 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005a BODY_0050:
005a e5f5 | | Load 0x2,-0xb
005b e002 | | Load 0x0,0x2
005c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
005e 00d8 | | Load_Top At_Offset_0
005f e002 | | Load 0x0,0x2
0060 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0061 6816 |h | Jump_Zero 0x78
0062 e003 | | Load 0x0,0x3
0063 180e | | Execute Package,Field_Execute,Field_Number 0xe
0064 4801 |H | Short_Literal 0x1
0065 4801 |H | Short_Literal 0x1
0066 e004 | | Load 0x0,0x4
0067 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0068 035b | [ | Declare_Type Array,Constrained
0069 0337 | 7 | Declare_Variable Array
006a e5f5 | | Load 0x2,-0xb
006b e005 | | Load 0x0,0x5
006c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
006d e004 | | Load 0x0,0x4
006e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
006f 0119 | | Execute Any,Check_In_Formal_Type
0070 4801 |H | Short_Literal 0x1
0071 00da | | Load_Top At_Offset_2
0072 01d6 | | Execute Vector,Field_Write
0073 6048 |`H | Indirect_Literal Discrete,0xbc,{0x00000000, 0x000081b9}
0074 e006 | | Load 0x0,0x6
0075 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0076 4800 |H | Short_Literal 0x0
0077 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
0078 00d9 | | Load_Top At_Offset_1
0079 e5f6 | | Load 0x2,-0xa
007a e5f7 | | Load 0x2,-0x9
007b e5f8 | | Load 0x2,-0x8
007c e5f9 | | Load 0x2,-0x7
007d e5fa | | Load 0x2,-0x6
007e e5fb | | Load 0x2,-0x5
007f e5fc | | Load 0x2,-0x4
0080 e5fd | | Load 0x2,-0x3
0081 e5fe | | Load 0x2,-0x2
0082 e5ff | | Load 0x2,-0x1
0083 e403 | | Load 0x2,0x3
0084 e007 | | Load 0x0,0x7
0085 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0086 00d8 | | Load_Top At_Offset_0
0087 e007 | | Load 0x0,0x7
0088 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0089 7003 |p | Jump_Nonzero 0x8d
008a e008 | | Load 0x0,0x8
008b 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
008c 0257 | W | Execute Discrete,Raise
008d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
008e c402 | | Store 0x2,0x2
008f 00d9 | | Load_Top At_Offset_1
0090 8218 | | Call 0x1,0x18
0091 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
0092 TRAP_0050:
0092 4884 |H | Short_Literal 0x84
0093 010f | | Execute Exception,Equal
0094 7004 |p | Jump_Nonzero 0x99
0095 e008 | | Load 0x0,0x8
0096 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0097 010f | | Execute Exception,Equal
0098 6816 |h | Jump_Zero 0xaf
0099 e003 | | Load 0x0,0x3
009a 180e | | Execute Package,Field_Execute,Field_Number 0xe
009b 4801 |H | Short_Literal 0x1
009c 4801 |H | Short_Literal 0x1
009d e004 | | Load 0x0,0x4
009e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
009f 035b | [ | Declare_Type Array,Constrained
00a0 0337 | 7 | Declare_Variable Array
00a1 e5f5 | | Load 0x2,-0xb
00a2 e005 | | Load 0x0,0x5
00a3 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
00a4 e004 | | Load 0x0,0x4
00a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a6 0119 | | Execute Any,Check_In_Formal_Type
00a7 4801 |H | Short_Literal 0x1
00a8 00da | | Load_Top At_Offset_2
00a9 01d6 | | Execute Vector,Field_Write
00aa 600d |` | Indirect_Literal Discrete,0xb8,{0x00000000, 0x000081bb}
00ab e006 | | Load 0x0,0x6
00ac 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00ad 4800 |H | Short_Literal 0x0
00ae 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
00af e006 | | Load 0x0,0x6
00b0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00b1 010f | | Execute Exception,Equal
00b2 6802 |h | Jump_Zero 0xb5
00b3 4800 |H | Short_Literal 0x0
00b4 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
00b5 0100 | | Execute Exception,Raise
00b6 0000 0000 | | .XXX[0x2]
00b8 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
00bc 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00ca | | .CONST 0x00ca ; Address of begin
00c1 0102 | | .CONST 0x0102 ; Address of exception handler
00c2 0003 | | .CONST 0x0003 ; Number of locals
00c3 INIT_00c0:
00c3 e001 | | Load 0x0,0x1
00c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c5 02c7 | | Declare_Variable Any
00c6 00d8 | | Load_Top At_Offset_0
00c7 1c00 | | Execute_Immediate Run_Utility,0x0
00c8 e002 | | Load 0x0,0x2
00c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ca BODY_00c0:
00ca e5f5 | | Load 0x2,-0xb
00cb e002 | | Load 0x0,0x2
00cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00cd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
00ce 00d8 | | Load_Top At_Offset_0
00cf e002 | | Load 0x0,0x2
00d0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d1 6816 |h | Jump_Zero 0xe8
00d2 e003 | | Load 0x0,0x3
00d3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d4 4801 |H | Short_Literal 0x1
00d5 4801 |H | Short_Literal 0x1
00d6 e004 | | Load 0x0,0x4
00d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d8 035b | [ | Declare_Type Array,Constrained
00d9 0337 | 7 | Declare_Variable Array
00da e5f5 | | Load 0x2,-0xb
00db e005 | | Load 0x0,0x5
00dc 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
00dd e004 | | Load 0x0,0x4
00de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00df 0119 | | Execute Any,Check_In_Formal_Type
00e0 4801 |H | Short_Literal 0x1
00e1 00da | | Load_Top At_Offset_2
00e2 01d6 | | Execute Vector,Field_Write
00e3 67d8 |g | Indirect_Literal Discrete,0xbc,{0x00000000, 0x000081b9}
00e4 e006 | | Load 0x0,0x6
00e5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
00e6 4800 |H | Short_Literal 0x0
00e7 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
00e8 00d9 | | Load_Top At_Offset_1
00e9 e5f6 | | Load 0x2,-0xa
00ea e5f7 | | Load 0x2,-0x9
00eb e5f8 | | Load 0x2,-0x8
00ec e5f9 | | Load 0x2,-0x7
00ed e5fa | | Load 0x2,-0x6
00ee e5fb | | Load 0x2,-0x5
00ef e5fc | | Load 0x2,-0x4
00f0 e5fd | | Load 0x2,-0x3
00f1 e5fe | | Load 0x2,-0x2
00f2 e5ff | | Load 0x2,-0x1
00f3 e403 | | Load 0x2,0x3
00f4 e007 | | Load 0x0,0x7
00f5 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00f6 00d8 | | Load_Top At_Offset_0
00f7 e007 | | Load 0x0,0x7
00f8 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00f9 7003 |p | Jump_Nonzero 0xfd
00fa e008 | | Load 0x0,0x8
00fb 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00fc 0257 | W | Execute Discrete,Raise
00fd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00fe c402 | | Store 0x2,0x2
00ff 00d9 | | Load_Top At_Offset_1
0100 8218 | | Call 0x1,0x18
0101 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
0102 TRAP_00c0:
0102 4884 |H | Short_Literal 0x84
0103 010f | | Execute Exception,Equal
0104 7004 |p | Jump_Nonzero 0x109
0105 e008 | | Load 0x0,0x8
0106 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0107 010f | | Execute Exception,Equal
0108 6816 |h | Jump_Zero 0x11f
0109 e003 | | Load 0x0,0x3
010a 180e | | Execute Package,Field_Execute,Field_Number 0xe
010b 4801 |H | Short_Literal 0x1
010c 4801 |H | Short_Literal 0x1
010d e004 | | Load 0x0,0x4
010e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010f 035b | [ | Declare_Type Array,Constrained
0110 0337 | 7 | Declare_Variable Array
0111 e5f5 | | Load 0x2,-0xb
0112 e005 | | Load 0x0,0x5
0113 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0114 e004 | | Load 0x0,0x4
0115 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0116 0119 | | Execute Any,Check_In_Formal_Type
0117 4801 |H | Short_Literal 0x1
0118 00da | | Load_Top At_Offset_2
0119 01d6 | | Execute Vector,Field_Write
011a 679d |g | Indirect_Literal Discrete,0xb8,{0x00000000, 0x000081bb}
011b e006 | | Load 0x0,0x6
011c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
011d 4800 |H | Short_Literal 0x0
011e 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
011f e006 | | Load 0x0,0x6
0120 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0121 010f | | Execute Exception,Equal
0122 6802 |h | Jump_Zero 0x125
0123 4800 |H | Short_Literal 0x0
0124 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
0125 0100 | | Execute Exception,Raise
0126 0000 0000 | | .XXX[0x2]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0132 | 2 | .CONST 0x0132 ; Address of begin
0129 0165 | e | .CONST 0x0165 ; Address of exception handler
012a 0003 | | .CONST 0x0003 ; Number of locals
012b INIT_0128:
012b e001 | | Load 0x0,0x1
012c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
012d 02c7 | | Declare_Variable Any
012e 00d8 | | Load_Top At_Offset_0
012f 1c00 | | Execute_Immediate Run_Utility,0x0
0130 e002 | | Load 0x0,0x2
0131 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0132 BODY_0128:
0132 e5fa | | Load 0x2,-0x6
0133 e002 | | Load 0x0,0x2
0134 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0135 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0136 00d8 | | Load_Top At_Offset_0
0137 e002 | | Load 0x0,0x2
0138 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0139 6816 |h | Jump_Zero 0x150
013a e003 | | Load 0x0,0x3
013b 180e | | Execute Package,Field_Execute,Field_Number 0xe
013c 4801 |H | Short_Literal 0x1
013d 4801 |H | Short_Literal 0x1
013e e004 | | Load 0x0,0x4
013f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0140 035b | [ | Declare_Type Array,Constrained
0141 0337 | 7 | Declare_Variable Array
0142 e5fa | | Load 0x2,-0x6
0143 e005 | | Load 0x0,0x5
0144 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0145 e004 | | Load 0x0,0x4
0146 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0147 0119 | | Execute Any,Check_In_Formal_Type
0148 4801 |H | Short_Literal 0x1
0149 00da | | Load_Top At_Offset_2
014a 01d6 | | Execute Vector,Field_Write
014b 6044 |`D | Indirect_Literal Discrete,0x190,{0x00000000, 0x000081b9}
014c e006 | | Load 0x0,0x6
014d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
014e 4800 |H | Short_Literal 0x0
014f 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0150 00d9 | | Load_Top At_Offset_1
0151 e5fb | | Load 0x2,-0x5
0152 e5fc | | Load 0x2,-0x4
0153 e5fd | | Load 0x2,-0x3
0154 e5fe | | Load 0x2,-0x2
0155 e5ff | | Load 0x2,-0x1
0156 e403 | | Load 0x2,0x3
0157 e007 | | Load 0x0,0x7
0158 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0159 00d8 | | Load_Top At_Offset_0
015a e007 | | Load 0x0,0x7
015b 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
015c 7003 |p | Jump_Nonzero 0x160
015d e008 | | Load 0x0,0x8
015e 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
015f 0257 | W | Execute Discrete,Raise
0160 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0161 c402 | | Store 0x2,0x2
0162 00d9 | | Load_Top At_Offset_1
0163 8218 | | Call 0x1,0x18
0164 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0165 TRAP_0128:
0165 4884 |H | Short_Literal 0x84
0166 010f | | Execute Exception,Equal
0167 7004 |p | Jump_Nonzero 0x16c
0168 e008 | | Load 0x0,0x8
0169 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
016a 010f | | Execute Exception,Equal
016b 6816 |h | Jump_Zero 0x182
016c e003 | | Load 0x0,0x3
016d 180e | | Execute Package,Field_Execute,Field_Number 0xe
016e 4801 |H | Short_Literal 0x1
016f 4801 |H | Short_Literal 0x1
0170 e004 | | Load 0x0,0x4
0171 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0172 035b | [ | Declare_Type Array,Constrained
0173 0337 | 7 | Declare_Variable Array
0174 e5fa | | Load 0x2,-0x6
0175 e005 | | Load 0x0,0x5
0176 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0177 e004 | | Load 0x0,0x4
0178 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0179 0119 | | Execute Any,Check_In_Formal_Type
017a 4801 |H | Short_Literal 0x1
017b 00da | | Load_Top At_Offset_2
017c 01d6 | | Execute Vector,Field_Write
017d 600e |` | Indirect_Literal Discrete,0x18c,{0x00000000, 0x000081bb}
017e e006 | | Load 0x0,0x6
017f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0180 4800 |H | Short_Literal 0x0
0181 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0182 e006 | | Load 0x0,0x6
0183 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0184 010f | | Execute Exception,Equal
0185 6802 |h | Jump_Zero 0x188
0186 4800 |H | Short_Literal 0x0
0187 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0188 0100 | | Execute Exception,Raise
0189 0000 0000 | | .XXX[0x3]
018b 0000 | |
018c 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
0190 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
0194 0000 0000 | | .BLANK 0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a2 | | .CONST 0x01a2 ; Address of begin
0199 01d5 | | .CONST 0x01d5 ; Address of exception handler
019a 0003 | | .CONST 0x0003 ; Number of locals
019b INIT_0198:
019b e001 | | Load 0x0,0x1
019c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
019d 02c7 | | Declare_Variable Any
019e 00d8 | | Load_Top At_Offset_0
019f 1c00 | | Execute_Immediate Run_Utility,0x0
01a0 e002 | | Load 0x0,0x2
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 BODY_0198:
01a2 e5fa | | Load 0x2,-0x6
01a3 e002 | | Load 0x0,0x2
01a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a5 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01a6 00d8 | | Load_Top At_Offset_0
01a7 e002 | | Load 0x0,0x2
01a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a9 6816 |h | Jump_Zero 0x1c0
01aa e003 | | Load 0x0,0x3
01ab 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ac 4801 |H | Short_Literal 0x1
01ad 4801 |H | Short_Literal 0x1
01ae e004 | | Load 0x0,0x4
01af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b0 035b | [ | Declare_Type Array,Constrained
01b1 0337 | 7 | Declare_Variable Array
01b2 e5fa | | Load 0x2,-0x6
01b3 e005 | | Load 0x0,0x5
01b4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01b5 e004 | | Load 0x0,0x4
01b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b7 0119 | | Execute Any,Check_In_Formal_Type
01b8 4801 |H | Short_Literal 0x1
01b9 00da | | Load_Top At_Offset_2
01ba 01d6 | | Execute Vector,Field_Write
01bb 67d4 |g | Indirect_Literal Discrete,0x190,{0x00000000, 0x000081b9}
01bc e006 | | Load 0x0,0x6
01bd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01be 4800 |H | Short_Literal 0x0
01bf 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
01c0 00d9 | | Load_Top At_Offset_1
01c1 e5fb | | Load 0x2,-0x5
01c2 e5fc | | Load 0x2,-0x4
01c3 e5fd | | Load 0x2,-0x3
01c4 e5fe | | Load 0x2,-0x2
01c5 e5ff | | Load 0x2,-0x1
01c6 e403 | | Load 0x2,0x3
01c7 e007 | | Load 0x0,0x7
01c8 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01c9 00d8 | | Load_Top At_Offset_0
01ca e007 | | Load 0x0,0x7
01cb 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
01cc 7003 |p | Jump_Nonzero 0x1d0
01cd e008 | | Load 0x0,0x8
01ce 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
01cf 0257 | W | Execute Discrete,Raise
01d0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01d1 c402 | | Store 0x2,0x2
01d2 00d9 | | Load_Top At_Offset_1
01d3 8218 | | Call 0x1,0x18
01d4 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
01d5 TRAP_0198:
01d5 4884 |H | Short_Literal 0x84
01d6 010f | | Execute Exception,Equal
01d7 7004 |p | Jump_Nonzero 0x1dc
01d8 e008 | | Load 0x0,0x8
01d9 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
01da 010f | | Execute Exception,Equal
01db 6816 |h | Jump_Zero 0x1f2
01dc e003 | | Load 0x0,0x3
01dd 180e | | Execute Package,Field_Execute,Field_Number 0xe
01de 4801 |H | Short_Literal 0x1
01df 4801 |H | Short_Literal 0x1
01e0 e004 | | Load 0x0,0x4
01e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e2 035b | [ | Declare_Type Array,Constrained
01e3 0337 | 7 | Declare_Variable Array
01e4 e5fa | | Load 0x2,-0x6
01e5 e005 | | Load 0x0,0x5
01e6 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01e7 e004 | | Load 0x0,0x4
01e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e9 0119 | | Execute Any,Check_In_Formal_Type
01ea 4801 |H | Short_Literal 0x1
01eb 00da | | Load_Top At_Offset_2
01ec 01d6 | | Execute Vector,Field_Write
01ed 679e |g | Indirect_Literal Discrete,0x18c,{0x00000000, 0x000081bb}
01ee e006 | | Load 0x0,0x6
01ef 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01f0 4800 |H | Short_Literal 0x0
01f1 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
01f2 e006 | | Load 0x0,0x6
01f3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01f4 010f | | Execute Exception,Equal
01f5 6802 |h | Jump_Zero 0x1f8
01f6 4800 |H | Short_Literal 0x0
01f7 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
01f8 0100 | | Execute Exception,Raise
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020a | | .CONST 0x020a ; Address of begin
0201 023a | : | .CONST 0x023a ; Address of exception handler
0202 0003 | | .CONST 0x0003 ; Number of locals
0203 INIT_0200:
0203 e001 | | Load 0x0,0x1
0204 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0205 02c7 | | Declare_Variable Any
0206 00d8 | | Load_Top At_Offset_0
0207 1c00 | | Execute_Immediate Run_Utility,0x0
0208 e002 | | Load 0x0,0x2
0209 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020a BODY_0200:
020a e5fd | | Load 0x2,-0x3
020b e002 | | Load 0x0,0x2
020c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
020d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
020e 00d8 | | Load_Top At_Offset_0
020f e002 | | Load 0x0,0x2
0210 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0211 6816 |h | Jump_Zero 0x228
0212 e003 | | Load 0x0,0x3
0213 180e | | Execute Package,Field_Execute,Field_Number 0xe
0214 4801 |H | Short_Literal 0x1
0215 4801 |H | Short_Literal 0x1
0216 e004 | | Load 0x0,0x4
0217 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0218 035b | [ | Declare_Type Array,Constrained
0219 0337 | 7 | Declare_Variable Array
021a e5fd | | Load 0x2,-0x3
021b e005 | | Load 0x0,0x5
021c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
021d e004 | | Load 0x0,0x4
021e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021f 0119 | | Execute Any,Check_In_Formal_Type
0220 4801 |H | Short_Literal 0x1
0221 00da | | Load_Top At_Offset_2
0222 01d6 | | Execute Vector,Field_Write
0223 6040 |`@ | Indirect_Literal Discrete,0x264,{0x00000000, 0x000081b9}
0224 e006 | | Load 0x0,0x6
0225 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0226 4800 |H | Short_Literal 0x0
0227 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0228 00d9 | | Load_Top At_Offset_1
0229 e5fe | | Load 0x2,-0x2
022a e5ff | | Load 0x2,-0x1
022b 00db | | Load_Top At_Offset_3
022c e007 | | Load 0x0,0x7
022d 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
022e 00d8 | | Load_Top At_Offset_0
022f e007 | | Load 0x0,0x7
0230 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0231 7003 |p | Jump_Nonzero 0x235
0232 e008 | | Load 0x0,0x8
0233 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0234 0257 | W | Execute Discrete,Raise
0235 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0236 c402 | | Store 0x2,0x2
0237 00d9 | | Load_Top At_Offset_1
0238 8218 | | Call 0x1,0x18
0239 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
023a TRAP_0200:
023a 4884 |H | Short_Literal 0x84
023b 010f | | Execute Exception,Equal
023c 7004 |p | Jump_Nonzero 0x241
023d e008 | | Load 0x0,0x8
023e 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
023f 010f | | Execute Exception,Equal
0240 6816 |h | Jump_Zero 0x257
0241 e003 | | Load 0x0,0x3
0242 180e | | Execute Package,Field_Execute,Field_Number 0xe
0243 4801 |H | Short_Literal 0x1
0244 4801 |H | Short_Literal 0x1
0245 e004 | | Load 0x0,0x4
0246 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0247 035b | [ | Declare_Type Array,Constrained
0248 0337 | 7 | Declare_Variable Array
0249 e5fd | | Load 0x2,-0x3
024a e005 | | Load 0x0,0x5
024b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
024c e004 | | Load 0x0,0x4
024d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024e 0119 | | Execute Any,Check_In_Formal_Type
024f 4801 |H | Short_Literal 0x1
0250 00da | | Load_Top At_Offset_2
0251 01d6 | | Execute Vector,Field_Write
0252 600d |` | Indirect_Literal Discrete,0x260,{0x00000000, 0x000081bb}
0253 e006 | | Load 0x0,0x6
0254 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0255 4800 |H | Short_Literal 0x0
0256 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0257 e006 | | Load 0x0,0x6
0258 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0259 010f | | Execute Exception,Equal
025a 6802 |h | Jump_Zero 0x25d
025b 4800 |H | Short_Literal 0x0
025c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
025d 0100 | | Execute Exception,Raise
025e 0000 0000 | | .XXX[0x2]
0260 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
0264 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0272 | r | .CONST 0x0272 ; Address of begin
0269 02a2 | | .CONST 0x02a2 ; Address of exception handler
026a 0003 | | .CONST 0x0003 ; Number of locals
026b INIT_0268:
026b e001 | | Load 0x0,0x1
026c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026d 02c7 | | Declare_Variable Any
026e 00d8 | | Load_Top At_Offset_0
026f 1c00 | | Execute_Immediate Run_Utility,0x0
0270 e002 | | Load 0x0,0x2
0271 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0272 BODY_0268:
0272 e5fd | | Load 0x2,-0x3
0273 e002 | | Load 0x0,0x2
0274 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0275 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0276 00d8 | | Load_Top At_Offset_0
0277 e002 | | Load 0x0,0x2
0278 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0279 6816 |h | Jump_Zero 0x290
027a e003 | | Load 0x0,0x3
027b 180e | | Execute Package,Field_Execute,Field_Number 0xe
027c 4801 |H | Short_Literal 0x1
027d 4801 |H | Short_Literal 0x1
027e e004 | | Load 0x0,0x4
027f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0280 035b | [ | Declare_Type Array,Constrained
0281 0337 | 7 | Declare_Variable Array
0282 e5fd | | Load 0x2,-0x3
0283 e005 | | Load 0x0,0x5
0284 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0285 e004 | | Load 0x0,0x4
0286 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0287 0119 | | Execute Any,Check_In_Formal_Type
0288 4801 |H | Short_Literal 0x1
0289 00da | | Load_Top At_Offset_2
028a 01d6 | | Execute Vector,Field_Write
028b 67d8 |g | Indirect_Literal Discrete,0x264,{0x00000000, 0x000081b9}
028c e006 | | Load 0x0,0x6
028d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
028e 4800 |H | Short_Literal 0x0
028f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0290 00d9 | | Load_Top At_Offset_1
0291 e5fe | | Load 0x2,-0x2
0292 e5ff | | Load 0x2,-0x1
0293 00db | | Load_Top At_Offset_3
0294 e007 | | Load 0x0,0x7
0295 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0296 00d8 | | Load_Top At_Offset_0
0297 e007 | | Load 0x0,0x7
0298 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0299 7003 |p | Jump_Nonzero 0x29d
029a e008 | | Load 0x0,0x8
029b 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
029c 0257 | W | Execute Discrete,Raise
029d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
029e c402 | | Store 0x2,0x2
029f 00d9 | | Load_Top At_Offset_1
02a0 8218 | | Call 0x1,0x18
02a1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02a2 TRAP_0268:
02a2 4884 |H | Short_Literal 0x84
02a3 010f | | Execute Exception,Equal
02a4 7004 |p | Jump_Nonzero 0x2a9
02a5 e008 | | Load 0x0,0x8
02a6 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
02a7 010f | | Execute Exception,Equal
02a8 6816 |h | Jump_Zero 0x2bf
02a9 e003 | | Load 0x0,0x3
02aa 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ab 4801 |H | Short_Literal 0x1
02ac 4801 |H | Short_Literal 0x1
02ad e004 | | Load 0x0,0x4
02ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02af 035b | [ | Declare_Type Array,Constrained
02b0 0337 | 7 | Declare_Variable Array
02b1 e5fd | | Load 0x2,-0x3
02b2 e005 | | Load 0x0,0x5
02b3 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
02b4 e004 | | Load 0x0,0x4
02b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b6 0119 | | Execute Any,Check_In_Formal_Type
02b7 4801 |H | Short_Literal 0x1
02b8 00da | | Load_Top At_Offset_2
02b9 01d6 | | Execute Vector,Field_Write
02ba 67a5 |g | Indirect_Literal Discrete,0x260,{0x00000000, 0x000081bb}
02bb e006 | | Load 0x0,0x6
02bc 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02bd 4800 |H | Short_Literal 0x0
02be 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02bf e006 | | Load 0x0,0x6
02c0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02c1 010f | | Execute Exception,Equal
02c2 6802 |h | Jump_Zero 0x2c5
02c3 4800 |H | Short_Literal 0x0
02c4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02c5 0100 | | Execute Exception,Raise
02c6 0000 0000 | | .XXX[0x2]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02d2 | | .CONST 0x02d2 ; Address of begin
02c9 0308 | | .CONST 0x0308 ; Address of exception handler
02ca 0003 | | .CONST 0x0003 ; Number of locals
02cb INIT_02c8:
02cb e001 | | Load 0x0,0x1
02cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02cd 02c7 | | Declare_Variable Any
02ce 00d8 | | Load_Top At_Offset_0
02cf 1c00 | | Execute_Immediate Run_Utility,0x0
02d0 e002 | | Load 0x0,0x2
02d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d2 BODY_02c8:
02d2 e5f7 | | Load 0x2,-0x9
02d3 e002 | | Load 0x0,0x2
02d4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d5 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02d6 00d8 | | Load_Top At_Offset_0
02d7 e002 | | Load 0x0,0x2
02d8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d9 6816 |h | Jump_Zero 0x2f0
02da e003 | | Load 0x0,0x3
02db 180e | | Execute Package,Field_Execute,Field_Number 0xe
02dc 4801 |H | Short_Literal 0x1
02dd 4801 |H | Short_Literal 0x1
02de e004 | | Load 0x0,0x4
02df 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02e0 035b | [ | Declare_Type Array,Constrained
02e1 0337 | 7 | Declare_Variable Array
02e2 e5f7 | | Load 0x2,-0x9
02e3 e005 | | Load 0x0,0x5
02e4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
02e5 e004 | | Load 0x0,0x4
02e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e7 0119 | | Execute Any,Check_In_Formal_Type
02e8 4801 |H | Short_Literal 0x1
02e9 00da | | Load_Top At_Offset_2
02ea 01d6 | | Execute Vector,Field_Write
02eb 6044 |`D | Indirect_Literal Discrete,0x330,{0x00000000, 0x000081b9}
02ec e006 | | Load 0x0,0x6
02ed 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02ee 4800 |H | Short_Literal 0x0
02ef 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
02f0 00d9 | | Load_Top At_Offset_1
02f1 e5f8 | | Load 0x2,-0x8
02f2 e5f9 | | Load 0x2,-0x7
02f3 e5fa | | Load 0x2,-0x6
02f4 e5fb | | Load 0x2,-0x5
02f5 e5fc | | Load 0x2,-0x4
02f6 e5fd | | Load 0x2,-0x3
02f7 e5fe | | Load 0x2,-0x2
02f8 e5ff | | Load 0x2,-0x1
02f9 e403 | | Load 0x2,0x3
02fa e007 | | Load 0x0,0x7
02fb 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
02fc 00d8 | | Load_Top At_Offset_0
02fd e007 | | Load 0x0,0x7
02fe 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
02ff 7003 |p | Jump_Nonzero 0x303
0300 e008 | | Load 0x0,0x8
0301 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0302 0257 | W | Execute Discrete,Raise
0303 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0304 c402 | | Store 0x2,0x2
0305 00d9 | | Load_Top At_Offset_1
0306 8218 | | Call 0x1,0x18
0307 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
0308 TRAP_02c8:
0308 4884 |H | Short_Literal 0x84
0309 010f | | Execute Exception,Equal
030a 7004 |p | Jump_Nonzero 0x30f
030b e008 | | Load 0x0,0x8
030c 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
030d 010f | | Execute Exception,Equal
030e 6816 |h | Jump_Zero 0x325
030f e003 | | Load 0x0,0x3
0310 180e | | Execute Package,Field_Execute,Field_Number 0xe
0311 4801 |H | Short_Literal 0x1
0312 4801 |H | Short_Literal 0x1
0313 e004 | | Load 0x0,0x4
0314 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0315 035b | [ | Declare_Type Array,Constrained
0316 0337 | 7 | Declare_Variable Array
0317 e5f7 | | Load 0x2,-0x9
0318 e005 | | Load 0x0,0x5
0319 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
031a e004 | | Load 0x0,0x4
031b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
031c 0119 | | Execute Any,Check_In_Formal_Type
031d 4801 |H | Short_Literal 0x1
031e 00da | | Load_Top At_Offset_2
031f 01d6 | | Execute Vector,Field_Write
0320 600b |` | Indirect_Literal Discrete,0x32c,{0x00000000, 0x000081bb}
0321 e006 | | Load 0x0,0x6
0322 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0323 4800 |H | Short_Literal 0x0
0324 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
0325 e006 | | Load 0x0,0x6
0326 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0327 010f | | Execute Exception,Equal
0328 6802 |h | Jump_Zero 0x32b
0329 4800 |H | Short_Literal 0x0
032a 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
032b 0100 | | Execute Exception,Raise
032c 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
0330 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
0334 0000 0000 | | .BLANK 0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0342 | B | .CONST 0x0342 ; Address of begin
0339 0378 | x | .CONST 0x0378 ; Address of exception handler
033a 0003 | | .CONST 0x0003 ; Number of locals
033b INIT_0338:
033b e001 | | Load 0x0,0x1
033c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033d 02c7 | | Declare_Variable Any
033e 00d8 | | Load_Top At_Offset_0
033f 1c00 | | Execute_Immediate Run_Utility,0x0
0340 e002 | | Load 0x0,0x2
0341 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0342 BODY_0338:
0342 e5f7 | | Load 0x2,-0x9
0343 e002 | | Load 0x0,0x2
0344 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0345 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0346 00d8 | | Load_Top At_Offset_0
0347 e002 | | Load 0x0,0x2
0348 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0349 6816 |h | Jump_Zero 0x360
034a e003 | | Load 0x0,0x3
034b 180e | | Execute Package,Field_Execute,Field_Number 0xe
034c 4801 |H | Short_Literal 0x1
034d 4801 |H | Short_Literal 0x1
034e e004 | | Load 0x0,0x4
034f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0350 035b | [ | Declare_Type Array,Constrained
0351 0337 | 7 | Declare_Variable Array
0352 e5f7 | | Load 0x2,-0x9
0353 e005 | | Load 0x0,0x5
0354 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0355 e004 | | Load 0x0,0x4
0356 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0357 0119 | | Execute Any,Check_In_Formal_Type
0358 4801 |H | Short_Literal 0x1
0359 00da | | Load_Top At_Offset_2
035a 01d6 | | Execute Vector,Field_Write
035b 67d4 |g | Indirect_Literal Discrete,0x330,{0x00000000, 0x000081b9}
035c e006 | | Load 0x0,0x6
035d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
035e 4800 |H | Short_Literal 0x0
035f 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
0360 00d9 | | Load_Top At_Offset_1
0361 e5f8 | | Load 0x2,-0x8
0362 e5f9 | | Load 0x2,-0x7
0363 e5fa | | Load 0x2,-0x6
0364 e5fb | | Load 0x2,-0x5
0365 e5fc | | Load 0x2,-0x4
0366 e5fd | | Load 0x2,-0x3
0367 e5fe | | Load 0x2,-0x2
0368 e5ff | | Load 0x2,-0x1
0369 e403 | | Load 0x2,0x3
036a e007 | | Load 0x0,0x7
036b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
036c 00d8 | | Load_Top At_Offset_0
036d e007 | | Load 0x0,0x7
036e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
036f 7003 |p | Jump_Nonzero 0x373
0370 e008 | | Load 0x0,0x8
0371 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0372 0257 | W | Execute Discrete,Raise
0373 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0374 c402 | | Store 0x2,0x2
0375 00d9 | | Load_Top At_Offset_1
0376 8218 | | Call 0x1,0x18
0377 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
0378 TRAP_0338:
0378 4884 |H | Short_Literal 0x84
0379 010f | | Execute Exception,Equal
037a 7004 |p | Jump_Nonzero 0x37f
037b e008 | | Load 0x0,0x8
037c 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
037d 010f | | Execute Exception,Equal
037e 6816 |h | Jump_Zero 0x395
037f e003 | | Load 0x0,0x3
0380 180e | | Execute Package,Field_Execute,Field_Number 0xe
0381 4801 |H | Short_Literal 0x1
0382 4801 |H | Short_Literal 0x1
0383 e004 | | Load 0x0,0x4
0384 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0385 035b | [ | Declare_Type Array,Constrained
0386 0337 | 7 | Declare_Variable Array
0387 e5f7 | | Load 0x2,-0x9
0388 e005 | | Load 0x0,0x5
0389 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
038a e004 | | Load 0x0,0x4
038b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
038c 0119 | | Execute Any,Check_In_Formal_Type
038d 4801 |H | Short_Literal 0x1
038e 00da | | Load_Top At_Offset_2
038f 01d6 | | Execute Vector,Field_Write
0390 679b |g | Indirect_Literal Discrete,0x32c,{0x00000000, 0x000081bb}
0391 e006 | | Load 0x0,0x6
0392 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0393 4800 |H | Short_Literal 0x0
0394 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
0395 e006 | | Load 0x0,0x6
0396 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0397 010f | | Execute Exception,Equal
0398 6802 |h | Jump_Zero 0x39b
0399 4800 |H | Short_Literal 0x0
039a 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
039b 0100 | | Execute Exception,Raise
039c 0000 0000 | | .BLANK 0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a5 | | .CONST 0x03a5 ; Address of begin
03a1 03d2 | | .CONST 0x03d2 ; Address of exception handler
03a2 0002 | | .CONST 0x0002 ; Number of locals
03a3 INIT_03a0:
03a3 e002 | | Load 0x0,0x2
03a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03a5 BODY_03a0:
03a5 e5fc | | Load 0x2,-0x4
03a6 e002 | | Load 0x0,0x2
03a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
03a9 00d8 | | Load_Top At_Offset_0
03aa e002 | | Load 0x0,0x2
03ab 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03ac 6816 |h | Jump_Zero 0x3c3
03ad e003 | | Load 0x0,0x3
03ae 180e | | Execute Package,Field_Execute,Field_Number 0xe
03af 4801 |H | Short_Literal 0x1
03b0 4801 |H | Short_Literal 0x1
03b1 e004 | | Load 0x0,0x4
03b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03b3 035b | [ | Declare_Type Array,Constrained
03b4 0337 | 7 | Declare_Variable Array
03b5 e5fc | | Load 0x2,-0x4
03b6 e005 | | Load 0x0,0x5
03b7 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
03b8 e004 | | Load 0x0,0x4
03b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ba 0119 | | Execute Any,Check_In_Formal_Type
03bb 4801 |H | Short_Literal 0x1
03bc 00da | | Load_Top At_Offset_2
03bd 01d6 | | Execute Vector,Field_Write
03be 603d |`= | Indirect_Literal Discrete,0x3fc,{0x00000000, 0x000081b9}
03bf e006 | | Load 0x0,0x6
03c0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03c1 00ea | | Load_Encached Null_String_Cache
03c2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
03c3 e5fd | | Load 0x2,-0x3
03c4 e5fe | | Load 0x2,-0x2
03c5 e5ff | | Load 0x2,-0x1
03c6 00db | | Load_Top At_Offset_3
03c7 e007 | | Load 0x0,0x7
03c8 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
03c9 00d8 | | Load_Top At_Offset_0
03ca e007 | | Load 0x0,0x7
03cb 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
03cc 7003 |p | Jump_Nonzero 0x3d0
03cd e008 | | Load 0x0,0x8
03ce 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
03cf 0257 | W | Execute Discrete,Raise
03d0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03d1 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
03d2 TRAP_03a0:
03d2 4884 |H | Short_Literal 0x84
03d3 010f | | Execute Exception,Equal
03d4 7004 |p | Jump_Nonzero 0x3d9
03d5 e008 | | Load 0x0,0x8
03d6 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
03d7 010f | | Execute Exception,Equal
03d8 6816 |h | Jump_Zero 0x3ef
03d9 e003 | | Load 0x0,0x3
03da 180e | | Execute Package,Field_Execute,Field_Number 0xe
03db 4801 |H | Short_Literal 0x1
03dc 4801 |H | Short_Literal 0x1
03dd e004 | | Load 0x0,0x4
03de 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03df 035b | [ | Declare_Type Array,Constrained
03e0 0337 | 7 | Declare_Variable Array
03e1 e5fc | | Load 0x2,-0x4
03e2 e005 | | Load 0x0,0x5
03e3 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
03e4 e004 | | Load 0x0,0x4
03e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e6 0119 | | Execute Any,Check_In_Formal_Type
03e7 4801 |H | Short_Literal 0x1
03e8 00da | | Load_Top At_Offset_2
03e9 01d6 | | Execute Vector,Field_Write
03ea 600d |` | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x000081bb}
03eb e006 | | Load 0x0,0x6
03ec 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03ed 00ea | | Load_Encached Null_String_Cache
03ee 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
03ef e006 | | Load 0x0,0x6
03f0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03f1 010f | | Execute Exception,Equal
03f2 6802 |h | Jump_Zero 0x3f5
03f3 00ea | | Load_Encached Null_String_Cache
03f4 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
03f5 0100 | | Execute Exception,Raise
03f6 0000 0000 | | .XXX[0x2]
03f8 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
03fc 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 040a | | .CONST 0x040a ; Address of begin
0401 043b | ; | .CONST 0x043b ; Address of exception handler
0402 0003 | | .CONST 0x0003 ; Number of locals
0403 INIT_0400:
0403 e001 | | Load 0x0,0x1
0404 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0405 02c7 | | Declare_Variable Any
0406 00d8 | | Load_Top At_Offset_0
0407 1c00 | | Execute_Immediate Run_Utility,0x0
0408 e002 | | Load 0x0,0x2
0409 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040a BODY_0400:
040a e5fc | | Load 0x2,-0x4
040b e002 | | Load 0x0,0x2
040c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
040d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
040e 00d8 | | Load_Top At_Offset_0
040f e002 | | Load 0x0,0x2
0410 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0411 6816 |h | Jump_Zero 0x428
0412 e003 | | Load 0x0,0x3
0413 180e | | Execute Package,Field_Execute,Field_Number 0xe
0414 4801 |H | Short_Literal 0x1
0415 4801 |H | Short_Literal 0x1
0416 e004 | | Load 0x0,0x4
0417 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0418 035b | [ | Declare_Type Array,Constrained
0419 0337 | 7 | Declare_Variable Array
041a e5fc | | Load 0x2,-0x4
041b e005 | | Load 0x0,0x5
041c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
041d e004 | | Load 0x0,0x4
041e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041f 0119 | | Execute Any,Check_In_Formal_Type
0420 4801 |H | Short_Literal 0x1
0421 00da | | Load_Top At_Offset_2
0422 01d6 | | Execute Vector,Field_Write
0423 67d8 |g | Indirect_Literal Discrete,0x3fc,{0x00000000, 0x000081b9}
0424 e006 | | Load 0x0,0x6
0425 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0426 4800 |H | Short_Literal 0x0
0427 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0428 00d9 | | Load_Top At_Offset_1
0429 e5fd | | Load 0x2,-0x3
042a e5fe | | Load 0x2,-0x2
042b e5ff | | Load 0x2,-0x1
042c e403 | | Load 0x2,0x3
042d e007 | | Load 0x0,0x7
042e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
042f 00d8 | | Load_Top At_Offset_0
0430 e007 | | Load 0x0,0x7
0431 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0432 7003 |p | Jump_Nonzero 0x436
0433 e008 | | Load 0x0,0x8
0434 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0435 0257 | W | Execute Discrete,Raise
0436 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0437 c402 | | Store 0x2,0x2
0438 00d9 | | Load_Top At_Offset_1
0439 8218 | | Call 0x1,0x18
043a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
043b TRAP_0400:
043b 4884 |H | Short_Literal 0x84
043c 010f | | Execute Exception,Equal
043d 7004 |p | Jump_Nonzero 0x442
043e e008 | | Load 0x0,0x8
043f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0440 010f | | Execute Exception,Equal
0441 6816 |h | Jump_Zero 0x458
0442 e003 | | Load 0x0,0x3
0443 180e | | Execute Package,Field_Execute,Field_Number 0xe
0444 4801 |H | Short_Literal 0x1
0445 4801 |H | Short_Literal 0x1
0446 e004 | | Load 0x0,0x4
0447 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0448 035b | [ | Declare_Type Array,Constrained
0449 0337 | 7 | Declare_Variable Array
044a e5fc | | Load 0x2,-0x4
044b e005 | | Load 0x0,0x5
044c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
044d e004 | | Load 0x0,0x4
044e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
044f 0119 | | Execute Any,Check_In_Formal_Type
0450 4801 |H | Short_Literal 0x1
0451 00da | | Load_Top At_Offset_2
0452 01d6 | | Execute Vector,Field_Write
0453 67a4 |g | Indirect_Literal Discrete,0x3f8,{0x00000000, 0x000081bb}
0454 e006 | | Load 0x0,0x6
0455 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0456 4800 |H | Short_Literal 0x0
0457 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0458 e006 | | Load 0x0,0x6
0459 1b17 | | Execute Package,Field_Read,Field_Number 0x17
045a 010f | | Execute Exception,Equal
045b 6802 |h | Jump_Zero 0x45e
045c 4800 |H | Short_Literal 0x0
045d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
045e 0100 | | Execute Exception,Raise
045f 0000 | | .XXX[0x1]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046a | j | .CONST 0x046a ; Address of begin
0461 049b | | .CONST 0x049b ; Address of exception handler
0462 0003 | | .CONST 0x0003 ; Number of locals
0463 INIT_0460:
0463 e001 | | Load 0x0,0x1
0464 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0465 02c7 | | Declare_Variable Any
0466 00d8 | | Load_Top At_Offset_0
0467 1c00 | | Execute_Immediate Run_Utility,0x0
0468 e002 | | Load 0x0,0x2
0469 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046a BODY_0460:
046a e5fc | | Load 0x2,-0x4
046b e002 | | Load 0x0,0x2
046c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
046d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
046e 00d8 | | Load_Top At_Offset_0
046f e002 | | Load 0x0,0x2
0470 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0471 6816 |h | Jump_Zero 0x488
0472 e003 | | Load 0x0,0x3
0473 180e | | Execute Package,Field_Execute,Field_Number 0xe
0474 4801 |H | Short_Literal 0x1
0475 4801 |H | Short_Literal 0x1
0476 e004 | | Load 0x0,0x4
0477 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0478 035b | [ | Declare_Type Array,Constrained
0479 0337 | 7 | Declare_Variable Array
047a e5fc | | Load 0x2,-0x4
047b e005 | | Load 0x0,0x5
047c 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
047d e004 | | Load 0x0,0x4
047e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
047f 0119 | | Execute Any,Check_In_Formal_Type
0480 4801 |H | Short_Literal 0x1
0481 00da | | Load_Top At_Offset_2
0482 01d6 | | Execute Vector,Field_Write
0483 6040 |`@ | Indirect_Literal Discrete,0x4c4,{0x00000000, 0x000081b9}
0484 e006 | | Load 0x0,0x6
0485 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0486 4800 |H | Short_Literal 0x0
0487 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0488 00d9 | | Load_Top At_Offset_1
0489 e5fd | | Load 0x2,-0x3
048a e5fe | | Load 0x2,-0x2
048b e5ff | | Load 0x2,-0x1
048c e403 | | Load 0x2,0x3
048d e007 | | Load 0x0,0x7
048e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
048f 00d8 | | Load_Top At_Offset_0
0490 e007 | | Load 0x0,0x7
0491 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0492 7003 |p | Jump_Nonzero 0x496
0493 e008 | | Load 0x0,0x8
0494 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0495 0257 | W | Execute Discrete,Raise
0496 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0497 c402 | | Store 0x2,0x2
0498 00d9 | | Load_Top At_Offset_1
0499 8218 | | Call 0x1,0x18
049a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
049b TRAP_0460:
049b 4884 |H | Short_Literal 0x84
049c 010f | | Execute Exception,Equal
049d 7004 |p | Jump_Nonzero 0x4a2
049e e008 | | Load 0x0,0x8
049f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
04a0 010f | | Execute Exception,Equal
04a1 6816 |h | Jump_Zero 0x4b8
04a2 e003 | | Load 0x0,0x3
04a3 180e | | Execute Package,Field_Execute,Field_Number 0xe
04a4 4801 |H | Short_Literal 0x1
04a5 4801 |H | Short_Literal 0x1
04a6 e004 | | Load 0x0,0x4
04a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a8 035b | [ | Declare_Type Array,Constrained
04a9 0337 | 7 | Declare_Variable Array
04aa e5fc | | Load 0x2,-0x4
04ab e005 | | Load 0x0,0x5
04ac 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
04ad e004 | | Load 0x0,0x4
04ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04af 0119 | | Execute Any,Check_In_Formal_Type
04b0 4801 |H | Short_Literal 0x1
04b1 00da | | Load_Top At_Offset_2
04b2 01d6 | | Execute Vector,Field_Write
04b3 600c |` | Indirect_Literal Discrete,0x4c0,{0x00000000, 0x000081bb}
04b4 e006 | | Load 0x0,0x6
04b5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04b6 4800 |H | Short_Literal 0x0
04b7 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
04b8 e006 | | Load 0x0,0x6
04b9 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04ba 010f | | Execute Exception,Equal
04bb 6802 |h | Jump_Zero 0x4be
04bc 4800 |H | Short_Literal 0x0
04bd 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
04be 0100 | | Execute Exception,Raise
04bf 0000 | | .XXX[0x1]
04c0 0000 0000 | | .LITERAL {0x00000000, 0x000081bb}
04c4 0000 0000 | | .LITERAL {0x00000000, 0x000081b9}
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 00da | | Load_Top At_Offset_2
04cc e001 | | Load 0x0,0x1
04cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04ce 4603 |F | Jump_Case 0x4
04cf 7819 |x | Jump 0x4e9 ; case 0x0
04d0 7830 |x0 | Jump 0x501 ; case 0x1
04d1 7847 |xG | Jump 0x519 ; case 0x2
04d2 7800 |x | Jump 0x4d3 ; case 0x3
04d3 4801 |H | Short_Literal 0x1
04d4 4801 |H | Short_Literal 0x1
04d5 e004 | | Load 0x0,0x4
04d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04d7 035b | [ | Declare_Type Array,Constrained
04d8 0337 | 7 | Declare_Variable Array
04d9 00db | | Load_Top At_Offset_3
04da e001 | | Load 0x0,0x1
04db 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04dc e004 | | Load 0x0,0x4
04dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04de e004 | | Load 0x0,0x4
04df 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04e0 0119 | | Execute Any,Check_In_Formal_Type
04e1 4801 |H | Short_Literal 0x1
04e2 00da | | Load_Top At_Offset_2
04e3 01d6 | | Execute Vector,Field_Write
04e4 605b |`[ | Indirect_Literal Discrete,0x540,{0x00000000, 0x000081be}
04e5 e006 | | Load 0x0,0x6
04e6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
04e7 4800 |H | Short_Literal 0x0
04e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04e9 e003 | | Load 0x0,0x3
04ea 180e | | Execute Package,Field_Execute,Field_Number 0xe
04eb 4801 |H | Short_Literal 0x1
04ec 4801 |H | Short_Literal 0x1
04ed e004 | | Load 0x0,0x4
04ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ef 035b | [ | Declare_Type Array,Constrained
04f0 0337 | 7 | Declare_Variable Array
04f1 e5ff | | Load 0x2,-0x1
04f2 e001 | | Load 0x0,0x1
04f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04f4 e004 | | Load 0x0,0x4
04f5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04f6 e004 | | Load 0x0,0x4
04f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04f8 0119 | | Execute Any,Check_In_Formal_Type
04f9 4801 |H | Short_Literal 0x1
04fa 00da | | Load_Top At_Offset_2
04fb 01d6 | | Execute Vector,Field_Write
04fc 603f |`? | Indirect_Literal Discrete,0x53c,{0x00000000, 0x000081ba}
04fd e006 | | Load 0x0,0x6
04fe 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04ff 4801 |H | Short_Literal 0x1
0500 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0501 e003 | | Load 0x0,0x3
0502 180e | | Execute Package,Field_Execute,Field_Number 0xe
0503 4801 |H | Short_Literal 0x1
0504 4801 |H | Short_Literal 0x1
0505 e004 | | Load 0x0,0x4
0506 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0507 035b | [ | Declare_Type Array,Constrained
0508 0337 | 7 | Declare_Variable Array
0509 e5ff | | Load 0x2,-0x1
050a e001 | | Load 0x0,0x1
050b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
050c e004 | | Load 0x0,0x4
050d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
050e e004 | | Load 0x0,0x4
050f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0510 0119 | | Execute Any,Check_In_Formal_Type
0511 4801 |H | Short_Literal 0x1
0512 00da | | Load_Top At_Offset_2
0513 01d6 | | Execute Vector,Field_Write
0514 6023 |`# | Indirect_Literal Discrete,0x538,{0x00000000, 0x000081bc}
0515 e006 | | Load 0x0,0x6
0516 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0517 4801 |H | Short_Literal 0x1
0518 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0519 e003 | | Load 0x0,0x3
051a 180e | | Execute Package,Field_Execute,Field_Number 0xe
051b 4801 |H | Short_Literal 0x1
051c 4801 |H | Short_Literal 0x1
051d e004 | | Load 0x0,0x4
051e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
051f 035b | [ | Declare_Type Array,Constrained
0520 0337 | 7 | Declare_Variable Array
0521 e5ff | | Load 0x2,-0x1
0522 e001 | | Load 0x0,0x1
0523 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0524 e004 | | Load 0x0,0x4
0525 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0526 e004 | | Load 0x0,0x4
0527 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0528 0119 | | Execute Any,Check_In_Formal_Type
0529 4801 |H | Short_Literal 0x1
052a 00da | | Load_Top At_Offset_2
052b 01d6 | | Execute Vector,Field_Write
052c 6007 |` | Indirect_Literal Discrete,0x534,{0x00000000, 0x000081bd}
052d e006 | | Load 0x0,0x6
052e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
052f 4800 |H | Short_Literal 0x0
0530 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0531 0000 0000 | | .XXX[0x3]
0533 0000 | |
0534 0000 0000 | | .LITERAL {0x00000000, 0x000081bd}
0538 0000 0000 | | .LITERAL {0x00000000, 0x000081bc}
053c 0000 0000 | | .LITERAL {0x00000000, 0x000081ba}
0540 0000 0000 | | .LITERAL {0x00000000, 0x000081be}
0544 0000 0000 | | .BLANK 0000[0x4]
0548 ; --------------------------------------------------------------------------------------
0548 ; Debug Table
0548 ; --------------------------------------------------------------------------------------
0548 0004 000d | | .DEBUG4 0x0004,0x000d,0xf681,0x0000,0x0001,0x0000
054e 4084 0540 |@ @| .XXX[0x6]
0550 0000 0000 | |
0552 0002 3b1a | ; |
0554 0000 0000 | | .BLANK 0000[0x6]
055a 0118 2c02 | , | .XXX[0x19]
055c 5dfd 4000 |] @ |
055e 0000 0820 | |
0560 0025 de58 | % X|
0562 0004 b76f | o|
0564 8000 0000 | |
0566 0000 12eb | |
0568 4e00 0213 |N |
056a 2a04 bc84 |* |
056c 8000 0000 | |
056e 0000 0000 | |
0570 0219 2804 | ( |
0572 bbcb | |
0573 0000 0000 | | .BLANK 0000[0x6]
0579 0202 f604 | | .XXX[0x31]
057b bbfa 8000 | |
057d 0000 4bb8 | K |
057f 3419 2009 |4 |
0581 7909 0000 |y |
0583 0000 975a | Z|
0585 7025 de58 |p% X|
0587 096e df00 | n |
0589 0042 6100 | Ba |
058b 9790 9000 | |
058d 0000 0000 | |
058f 0000 0044 | D|
0591 aa00 0000 | |
0593 0000 0000 | |
0595 0978 9902 | x |
0597 5dfd 4097 |] @ |
0599 6960 0000 |i` |
059b 0000 0004 | |
059d 1938 0985 | 8 |
059f b402 601c | ` |
05a1 c097 a710 | |
05a3 25fe 4c09 |% L |
05a5 8003 0000 | |
05a7 4324 4097 |C$@ |
05a9 9cd0 | |
05aa 0000 0000 | | .BLANK 0000[0x7]
05b1 0008 32d8 | 2 | .XXX[0x4f]
05b3 12ff 2600 | & |
05b5 0000 012f | /|
05b7 7800 4bf9 |x K |
05b9 a013 01fa | |
05bb 0000 9989 | |
05bd 012f 6380 | /c |
05bf 0000 0012 | |
05c1 f8c8 04be | |
05c3 7f00 0000 | |
05c5 0000 09a8 | |
05c7 5812 f780 |X |
05c9 0000 0000 | |
05cb b200 0000 | |
05cd 0000 0000 | |
05cf 0002 762e | v.|
05d1 04bd e000 | |
05d3 0000 002c | ,|
05d5 c020 067b | {|
05d7 540e a409 |T |
05d9 7f34 0000 | 4 |
05db 0000 97de | |
05dd e025 f996 | % |
05df 762e 04be |v. |
05e1 ba80 0000 | |
05e3 002d 0000 | - |
05e5 0000 04d4 | |
05e7 2c09 7d75 |, }u|
05e9 0000 0000 | |
05eb 5a80 802f |Z /|
05ed 9310 0013 | |
05ef 02ed 0000 | |
05f1 0000 97d7 | |
05f3 5844 9812 |XD |
05f5 f638 0000 | 8 |
05f7 0001 2fdf | / |
05f9 f099 7025 | p%|
05fb e734 0000 | 4 |
05fd 0002 5ec0 | ^ |
05ff 4000 |@ |