|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 11264 (0x2c00)
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 1470 | p | .CONST 0x1470 ; 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 800d | | .CONST 0x800d ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0382 | | .CONST 0x0382 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 00b5 | | .CONST 0x00b5 ; Number of locals
000b INIT_0008:
000b 00e5 | | Load_Encached Long_Integer_Cache
000c 0129 | ) | Execute Any,Make_Visible
000d 00e6 | | Load_Encached Float_Cache
000e 0129 | ) | Execute Any,Make_Visible
000f 029a 0393 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0390
0011 029a 039b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0398
0013 029a 03a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a0
0015 029a 03ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a8
0017 029a 03bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03b8
0019 029a 03cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03c8
001b 029a 03d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03d0
001d 029a 03db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03d8
001f 029a 03eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03e8
0021 029a 03fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03f8
0023 029a 040b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0408
0025 029a 041b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0418
0027 029a 042b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0428
0029 029a 043b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0438
002b 029a 044b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0448
002d 029a 045b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0458
002f 6358 |cX | Indirect_Literal Discrete,0x388,{0xffffffff, 0x80000001}
0030 6353 |cS | Indirect_Literal Discrete,0x384,{0x00000000, 0x7fffffff}
0031 00e5 | | Load_Encached Long_Integer_Cache
0032 03f9 | | Declare_Type Discrete,Constrained,Visible
0033 00e4 | | Load_Encached Positive_Cache
0034 0266 | f | Execute Discrete,Bounds
0035 00da | | Load_Top At_Offset_2
0036 02a0 | | Declare_Subprogram Null_Subprogram
0037 4801 |H | Short_Literal 0x1
0038 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0039 029a 0463 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0460
003b 029a 0473 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0470
003d 029a 047b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0478
003f 029a 0483 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0480
0041 029a 0493 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0490
0043 029a 049b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0498
0045 029a 04ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04a8
0047 029a 04cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04c8
0049 029a 0513 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0510
004b 029a 051b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0518
004d 029a 0543 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0540
004f 029a 0553 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0550
0051 029a 0573 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0570
0053 029a 0593 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0590
0055 029a 05bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05b8
0057 029a 05cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05c8
0059 029a 05d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05d0
005b 029a 05db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05d8
005d 00e3 | | Load_Encached Natural_Cache
005e 00d8 | | Load_Top At_Offset_0
005f e220 | | Load 0x1,0x20
0060 00d8 | | Load_Top At_Offset_0
0061 029f 13db | | Declare_Subprogram For_Call,INIT_13d8
0063 4800 |H | Short_Literal 0x0
0064 4802 |H | Short_Literal 0x2
0065 4800 |H | Short_Literal 0x0
0066 4800 |H | Short_Literal 0x0
0067 4802 |H | Short_Literal 0x2
0068 4802 |H | Short_Literal 0x2
0069 031e | | Declare_Type Variant_Record,Defined,Visible
006a 029a 05e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05e0
006c 029a 05eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05e8
006e 029a 0613 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0610
0070 029a 065b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0658
0072 4fff |O | Short_Literal 0x7ff
0073 4801 |H | Short_Literal 0x1
0074 00e5 | | Load_Encached Long_Integer_Cache
0075 03f9 | | Declare_Type Discrete,Constrained,Visible
0076 029a 068b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0688
0078 029a 0693 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0690
007a 029a 06e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_06e0
007c 029a 06eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_06e8
007e 029a 06f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_06f0
0080 029a 06fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_06f8
0082 00e4 | | Load_Encached Positive_Cache
0083 00d8 | | Load_Top At_Offset_0
0084 4800 |H | Short_Literal 0x0
0085 4802 |H | Short_Literal 0x2
0086 4802 |H | Short_Literal 0x2
0087 4804 |H | Short_Literal 0x4
0088 0319 | | Declare_Type Variant_Record,Incomplete,Visible
0089 029f 13ab | | Declare_Subprogram For_Call,INIT_13a8
008b 00d9 | | Load_Top At_Offset_1
008c 012a | * | Execute Any,Change_Utility
008d 0007 | | Action Break_Optional
008e 029a 0703 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0700
0090 029a 0713 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0710
0092 029a 071b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0718
0094 029a 0723 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0720
0096 029a 0733 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0730
0098 029a 073b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0738
009a 029a 074b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0748
009c 029a 075b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0758
009e 029a 0773 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0770
00a0 029a 078b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0788
00a2 029a 079b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0798
00a4 029a 07ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_07a8
00a6 029a 07eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_07e8
00a8 029a 07fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_07f8
00aa 029a 080b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0808
00ac 029a 081b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0818
00ae 029a 082b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0828
00b0 029a 083b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0838
00b2 029a 084b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0848
00b4 029a 085b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0858
00b6 029a 0863 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0860
00b8 029a 0873 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0870
00ba 029a 087b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0878
00bc 029a 0883 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0880
00be 029a 088b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0888
00c0 029a 0893 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0890
00c2 029a 089b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0898
00c4 029a 08a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08a0
00c6 029a 08ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08a8
00c8 029a 08b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08b0
00ca 00e4 | | Load_Encached Positive_Cache
00cb 0266 | f | Execute Discrete,Bounds
00cc 00e1 | | Load_Encached Boolean_Cache
00cd 02a0 | | Declare_Subprogram Null_Subprogram
00ce 4801 |H | Short_Literal 0x1
00cf 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
00d0 00d8 | | Load_Top At_Offset_0
00d1 0129 | ) | Execute Any,Make_Visible
00d2 00d9 | | Load_Top At_Offset_1
00d3 0129 | ) | Execute Any,Make_Visible
00d4 00e4 | | Load_Encached Positive_Cache
00d5 00d8 | | Load_Top At_Offset_0
00d6 00d8 | | Load_Top At_Offset_0
00d7 e238 | 8 | Load 0x1,0x38
00d8 00e2 | | Load_Encached Integer_Cache
00d9 e260 | ` | Load 0x1,0x60
00da e23f | ? | Load 0x1,0x3f
00db 029f 141b | | Declare_Subprogram For_Call,INIT_1418
00dd 4800 |H | Short_Literal 0x0
00de 4802 |H | Short_Literal 0x2
00df 4802 |H | Short_Literal 0x2
00e0 4800 |H | Short_Literal 0x0
00e1 4802 |H | Short_Literal 0x2
00e2 4803 |H | Short_Literal 0x3
00e3 0316 | | Declare_Type Variant_Record,Defined_Incomplete,Visible
00e4 029a 08bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08b8
00e6 029a 08cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08c8
00e8 029a 08e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08e0
00ea 029a 08eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_08e8
00ec 029a 090b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0908
00ee 4800 |H | Short_Literal 0x0
00ef e001 | | Load 0x0,0x1
00f0 02a0 | | Declare_Subprogram Null_Subprogram
00f1 038f | | Declare_Type Package,Defined,Visible
00f2 0386 | | Declare_Variable Package,Visible
00f3 00d8 | | Load_Top At_Offset_0
00f4 1916 | | Execute Package,Field_Reference,Field_Number 0x16
00f5 0129 | ) | Execute Any,Make_Visible
00f6 00d9 | | Load_Top At_Offset_1
00f7 1915 | | Execute Package,Field_Reference,Field_Number 0x15
00f8 0129 | ) | Execute Any,Make_Visible
00f9 00da | | Load_Top At_Offset_2
00fa 1918 | | Execute Package,Field_Reference,Field_Number 0x18
00fb 0129 | ) | Execute Any,Make_Visible
00fc 00db | | Load_Top At_Offset_3
00fd 190e | | Execute Package,Field_Reference,Field_Number 0xe
00fe 0129 | ) | Execute Any,Make_Visible
00ff e267 | g | Load 0x1,0x67
0100 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0101 0129 | ) | Execute Any,Make_Visible
0102 e267 | g | Load 0x1,0x67
0103 190d | | Execute Package,Field_Reference,Field_Number 0xd
0104 0129 | ) | Execute Any,Make_Visible
0105 e267 | g | Load 0x1,0x67
0106 190f | | Execute Package,Field_Reference,Field_Number 0xf
0107 0129 | ) | Execute Any,Make_Visible
0108 e267 | g | Load 0x1,0x67
0109 1917 | | Execute Package,Field_Reference,Field_Number 0x17
010a 0129 | ) | Execute Any,Make_Visible
010b 029c 0923 | #| Declare_Subprogram For_Outer_Call,Visible,INIT_0920
010d e267 | g | Load 0x1,0x67
010e 1919 | | Execute Package,Field_Reference,Field_Number 0x19
010f 0129 | ) | Execute Any,Make_Visible
0110 e267 | g | Load 0x1,0x67
0111 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0112 0129 | ) | Execute Any,Make_Visible
0113 e267 | g | Load 0x1,0x67
0114 191b | | Execute Package,Field_Reference,Field_Number 0x1b
0115 0129 | ) | Execute Any,Make_Visible
0116 e267 | g | Load 0x1,0x67
0117 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0118 0129 | ) | Execute Any,Make_Visible
0119 e267 | g | Load 0x1,0x67
011a 1912 | | Execute Package,Field_Reference,Field_Number 0x12
011b 0129 | ) | Execute Any,Make_Visible
011c e267 | g | Load 0x1,0x67
011d 191d | | Execute Package,Field_Reference,Field_Number 0x1d
011e 0129 | ) | Execute Any,Make_Visible
011f e267 | g | Load 0x1,0x67
0120 191e | | Execute Package,Field_Reference,Field_Number 0x1e
0121 0129 | ) | Execute Any,Make_Visible
0122 e267 | g | Load 0x1,0x67
0123 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0124 0129 | ) | Execute Any,Make_Visible
0125 e267 | g | Load 0x1,0x67
0126 1920 | | Execute Package,Field_Reference,Field_Number 0x20
0127 0129 | ) | Execute Any,Make_Visible
0128 e267 | g | Load 0x1,0x67
0129 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
012a 0129 | ) | Execute Any,Make_Visible
012b e267 | g | Load 0x1,0x67
012c 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
012d 0129 | ) | Execute Any,Make_Visible
012e e267 | g | Load 0x1,0x67
012f 1926 | & | Execute Package,Field_Reference,Field_Number 0x26
0130 0129 | ) | Execute Any,Make_Visible
0131 e267 | g | Load 0x1,0x67
0132 1922 | " | Execute Package,Field_Reference,Field_Number 0x22
0133 0129 | ) | Execute Any,Make_Visible
0134 e267 | g | Load 0x1,0x67
0135 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
0136 0129 | ) | Execute Any,Make_Visible
0137 e267 | g | Load 0x1,0x67
0138 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24
0139 0129 | ) | Execute Any,Make_Visible
013a e267 | g | Load 0x1,0x67
013b 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27
013c 0129 | ) | Execute Any,Make_Visible
013d e267 | g | Load 0x1,0x67
013e 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29
013f 0129 | ) | Execute Any,Make_Visible
0140 e267 | g | Load 0x1,0x67
0141 1928 | ( | Execute Package,Field_Reference,Field_Number 0x28
0142 0129 | ) | Execute Any,Make_Visible
0143 e267 | g | Load 0x1,0x67
0144 192c | , | Execute Package,Field_Reference,Field_Number 0x2c
0145 0129 | ) | Execute Any,Make_Visible
0146 e267 | g | Load 0x1,0x67
0147 192e | . | Execute Package,Field_Reference,Field_Number 0x2e
0148 0129 | ) | Execute Any,Make_Visible
0149 e267 | g | Load 0x1,0x67
014a 192a | * | Execute Package,Field_Reference,Field_Number 0x2a
014b 0129 | ) | Execute Any,Make_Visible
014c e267 | g | Load 0x1,0x67
014d 192f | / | Execute Package,Field_Reference,Field_Number 0x2f
014e 0129 | ) | Execute Any,Make_Visible
014f e267 | g | Load 0x1,0x67
0150 1930 | 0 | Execute Package,Field_Reference,Field_Number 0x30
0151 0129 | ) | Execute Any,Make_Visible
0152 e267 | g | Load 0x1,0x67
0153 1931 | 1 | Execute Package,Field_Reference,Field_Number 0x31
0154 0129 | ) | Execute Any,Make_Visible
0155 e267 | g | Load 0x1,0x67
0156 193a | : | Execute Package,Field_Reference,Field_Number 0x3a
0157 0129 | ) | Execute Any,Make_Visible
0158 e267 | g | Load 0x1,0x67
0159 193b | ; | Execute Package,Field_Reference,Field_Number 0x3b
015a 0129 | ) | Execute Any,Make_Visible
015b e267 | g | Load 0x1,0x67
015c 1932 | 2 | Execute Package,Field_Reference,Field_Number 0x32
015d 0129 | ) | Execute Any,Make_Visible
015e e267 | g | Load 0x1,0x67
015f 1933 | 3 | Execute Package,Field_Reference,Field_Number 0x33
0160 0129 | ) | Execute Any,Make_Visible
0161 e267 | g | Load 0x1,0x67
0162 1934 | 4 | Execute Package,Field_Reference,Field_Number 0x34
0163 0129 | ) | Execute Any,Make_Visible
0164 e267 | g | Load 0x1,0x67
0165 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36
0166 0129 | ) | Execute Any,Make_Visible
0167 e267 | g | Load 0x1,0x67
0168 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38
0169 0129 | ) | Execute Any,Make_Visible
016a e267 | g | Load 0x1,0x67
016b 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37
016c 0129 | ) | Execute Any,Make_Visible
016d e267 | g | Load 0x1,0x67
016e 1939 | 9 | Execute Package,Field_Reference,Field_Number 0x39
016f 0129 | ) | Execute Any,Make_Visible
0170 e267 | g | Load 0x1,0x67
0171 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35
0172 0129 | ) | Execute Any,Make_Visible
0173 e220 | | Load 0x1,0x20
0174 00d8 | | Load_Top At_Offset_0
0175 029f 13ab | | Declare_Subprogram For_Call,INIT_13a8
0177 4800 |H | Short_Literal 0x0
0178 4802 |H | Short_Literal 0x2
0179 4800 |H | Short_Literal 0x0
017a e23f | ? | Load 0x1,0x3f
017b 0307 | | Complete_Type Variant_Record,By_Defining
017c e261 | a | Load 0x1,0x61
017d 0303 | | Complete_Type Variant_Record,By_Component_Completion
017e 00bf | | Action Accept_Activation
017f 4800 |H | Short_Literal 0x0
0180 4802 |H | Short_Literal 0x2
0181 029f 092b | +| Declare_Subprogram For_Call,INIT_0928
0183 03fd | | Declare_Type Discrete,Defined
0184 4801 |H | Short_Literal 0x1
0185 4800 |H | Short_Literal 0x0
0186 e220 | | Load 0x1,0x20
0187 035b | [ | Declare_Type Array,Constrained
0188 0337 | 7 | Declare_Variable Array
0189 00d8 | | Load_Top At_Offset_0
018a 0335 | 5 | Declare_Variable Array,Duplicate
018b 00cd | | Action Spare6_Action
018c 00d9 | | Load_Top At_Offset_1
018d 01d4 | | Execute Vector,Structure_Write
018e 4801 |H | Short_Literal 0x1
018f 4801 |H | Short_Literal 0x1
0190 e220 | | Load 0x1,0x20
0191 035b | [ | Declare_Type Array,Constrained
0192 0337 | 7 | Declare_Variable Array
0193 4800 |H | Short_Literal 0x0
0194 4801 |H | Short_Literal 0x1
0195 00da | | Load_Top At_Offset_2
0196 01d6 | | Execute Vector,Field_Write
0197 4801 |H | Short_Literal 0x1
0198 4801 |H | Short_Literal 0x1
0199 e220 | | Load 0x1,0x20
019a 035b | [ | Declare_Type Array,Constrained
019b 0337 | 7 | Declare_Variable Array
019c 4801 |H | Short_Literal 0x1
019d 4801 |H | Short_Literal 0x1
019e 00da | | Load_Top At_Offset_2
019f 01d6 | | Execute Vector,Field_Write
01a0 4801 |H | Short_Literal 0x1
01a1 4801 |H | Short_Literal 0x1
01a2 e220 | | Load 0x1,0x20
01a3 035b | [ | Declare_Type Array,Constrained
01a4 0337 | 7 | Declare_Variable Array
01a5 4802 |H | Short_Literal 0x2
01a6 4801 |H | Short_Literal 0x1
01a7 00da | | Load_Top At_Offset_2
01a8 01d6 | | Execute Vector,Field_Write
01a9 4801 |H | Short_Literal 0x1
01aa 4801 |H | Short_Literal 0x1
01ab e220 | | Load 0x1,0x20
01ac 035b | [ | Declare_Type Array,Constrained
01ad 0337 | 7 | Declare_Variable Array
01ae 480a |H | Short_Literal 0xa
01af 4801 |H | Short_Literal 0x1
01b0 00da | | Load_Top At_Offset_2
01b1 01d6 | | Execute Vector,Field_Write
01b2 4801 |H | Short_Literal 0x1
01b3 4801 |H | Short_Literal 0x1
01b4 e23f | ? | Load 0x1,0x3f
01b5 1c08 | | Execute_Immediate Run_Utility,0x8
01b6 e295 | | Load 0x1,0x95
01b7 00d9 | | Load_Top At_Offset_1
01b8 00d8 | | Load_Top At_Offset_0
01b9 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01ba 00da | | Load_Top At_Offset_2
01bb 01da | | Execute Vector,Bounds
01bc 00da | | Load_Top At_Offset_2
01bd 01da | | Execute Vector,Bounds
01be 00da | | Load_Top At_Offset_2
01bf 027f | | Execute Discrete,Equal
01c0 7001 |p | Jump_Nonzero 0x1c2
01c1 08e0 | | Execute_Immediate Raise,0xe0
01c2 00cd | | Action Spare6_Action
01c3 027f | | Execute Discrete,Equal
01c4 7001 |p | Jump_Nonzero 0x1c6
01c5 08e0 | | Execute_Immediate Raise,0xe0
01c6 00d2 | | Pop_Control Pop_Count_2
01c7 00d9 | | Load_Top At_Offset_1
01c8 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
01c9 00db | | Load_Top At_Offset_3
01ca 00d9 | | Load_Top At_Offset_1
01cb 00d8 | | Load_Top At_Offset_0
01cc 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
01cd 00da | | Load_Top At_Offset_2
01ce 01da | | Execute Vector,Bounds
01cf 00da | | Load_Top At_Offset_2
01d0 01da | | Execute Vector,Bounds
01d1 00da | | Load_Top At_Offset_2
01d2 027f | | Execute Discrete,Equal
01d3 7001 |p | Jump_Nonzero 0x1d5
01d4 08e0 | | Execute_Immediate Raise,0xe0
01d5 00cd | | Action Spare6_Action
01d6 027f | | Execute Discrete,Equal
01d7 7001 |p | Jump_Nonzero 0x1d9
01d8 08e0 | | Execute_Immediate Raise,0xe0
01d9 00d2 | | Pop_Control Pop_Count_2
01da 00d9 | | Load_Top At_Offset_1
01db 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
01dc 4801 |H | Short_Literal 0x1
01dd 4801 |H | Short_Literal 0x1
01de e23f | ? | Load 0x1,0x3f
01df 1c08 | | Execute_Immediate Run_Utility,0x8
01e0 e296 | | Load 0x1,0x96
01e1 00d9 | | Load_Top At_Offset_1
01e2 00d8 | | Load_Top At_Offset_0
01e3 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
01e4 00da | | Load_Top At_Offset_2
01e5 01da | | Execute Vector,Bounds
01e6 00da | | Load_Top At_Offset_2
01e7 01da | | Execute Vector,Bounds
01e8 00da | | Load_Top At_Offset_2
01e9 027f | | Execute Discrete,Equal
01ea 7001 |p | Jump_Nonzero 0x1ec
01eb 08e0 | | Execute_Immediate Raise,0xe0
01ec 00cd | | Action Spare6_Action
01ed 027f | | Execute Discrete,Equal
01ee 7001 |p | Jump_Nonzero 0x1f0
01ef 08e0 | | Execute_Immediate Raise,0xe0
01f0 00d2 | | Pop_Control Pop_Count_2
01f1 00d9 | | Load_Top At_Offset_1
01f2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
01f3 00db | | Load_Top At_Offset_3
01f4 00d9 | | Load_Top At_Offset_1
01f5 00d8 | | Load_Top At_Offset_0
01f6 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
01f7 00da | | Load_Top At_Offset_2
01f8 01da | | Execute Vector,Bounds
01f9 00da | | Load_Top At_Offset_2
01fa 01da | | Execute Vector,Bounds
01fb 00da | | Load_Top At_Offset_2
01fc 027f | | Execute Discrete,Equal
01fd 7001 |p | Jump_Nonzero 0x1ff
01fe 08e0 | | Execute_Immediate Raise,0xe0
01ff 00cd | | Action Spare6_Action
0200 027f | | Execute Discrete,Equal
0201 7001 |p | Jump_Nonzero 0x203
0202 08e0 | | Execute_Immediate Raise,0xe0
0203 00d2 | | Pop_Control Pop_Count_2
0204 00d9 | | Load_Top At_Offset_1
0205 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0206 4801 |H | Short_Literal 0x1
0207 4801 |H | Short_Literal 0x1
0208 e23f | ? | Load 0x1,0x3f
0209 1c08 | | Execute_Immediate Run_Utility,0x8
020a e296 | | Load 0x1,0x96
020b 00d9 | | Load_Top At_Offset_1
020c 00d8 | | Load_Top At_Offset_0
020d 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
020e 00da | | Load_Top At_Offset_2
020f 01da | | Execute Vector,Bounds
0210 00da | | Load_Top At_Offset_2
0211 01da | | Execute Vector,Bounds
0212 00da | | Load_Top At_Offset_2
0213 027f | | Execute Discrete,Equal
0214 7001 |p | Jump_Nonzero 0x216
0215 08e0 | | Execute_Immediate Raise,0xe0
0216 00cd | | Action Spare6_Action
0217 027f | | Execute Discrete,Equal
0218 7001 |p | Jump_Nonzero 0x21a
0219 08e0 | | Execute_Immediate Raise,0xe0
021a 00d2 | | Pop_Control Pop_Count_2
021b 00d9 | | Load_Top At_Offset_1
021c 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
021d e296 | | Load 0x1,0x96
021e 00d9 | | Load_Top At_Offset_1
021f 00d8 | | Load_Top At_Offset_0
0220 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0221 00da | | Load_Top At_Offset_2
0222 01da | | Execute Vector,Bounds
0223 00da | | Load_Top At_Offset_2
0224 01da | | Execute Vector,Bounds
0225 00da | | Load_Top At_Offset_2
0226 027f | | Execute Discrete,Equal
0227 7001 |p | Jump_Nonzero 0x229
0228 08e0 | | Execute_Immediate Raise,0xe0
0229 00cd | | Action Spare6_Action
022a 027f | | Execute Discrete,Equal
022b 7001 |p | Jump_Nonzero 0x22d
022c 08e0 | | Execute_Immediate Raise,0xe0
022d 00d2 | | Pop_Control Pop_Count_2
022e 00d9 | | Load_Top At_Offset_1
022f 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0230 4801 |H | Short_Literal 0x1
0231 4801 |H | Short_Literal 0x1
0232 e23f | ? | Load 0x1,0x3f
0233 1c08 | | Execute_Immediate Run_Utility,0x8
0234 e297 | | Load 0x1,0x97
0235 00d9 | | Load_Top At_Offset_1
0236 00d8 | | Load_Top At_Offset_0
0237 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0238 00da | | Load_Top At_Offset_2
0239 01da | | Execute Vector,Bounds
023a 00da | | Load_Top At_Offset_2
023b 01da | | Execute Vector,Bounds
023c 00da | | Load_Top At_Offset_2
023d 027f | | Execute Discrete,Equal
023e 7001 |p | Jump_Nonzero 0x240
023f 08e0 | | Execute_Immediate Raise,0xe0
0240 00cd | | Action Spare6_Action
0241 027f | | Execute Discrete,Equal
0242 7001 |p | Jump_Nonzero 0x244
0243 08e0 | | Execute_Immediate Raise,0xe0
0244 00d2 | | Pop_Control Pop_Count_2
0245 00d9 | | Load_Top At_Offset_1
0246 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0247 e296 | | Load 0x1,0x96
0248 00d9 | | Load_Top At_Offset_1
0249 00d8 | | Load_Top At_Offset_0
024a 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
024b 00da | | Load_Top At_Offset_2
024c 01da | | Execute Vector,Bounds
024d 00da | | Load_Top At_Offset_2
024e 01da | | Execute Vector,Bounds
024f 00da | | Load_Top At_Offset_2
0250 027f | | Execute Discrete,Equal
0251 7001 |p | Jump_Nonzero 0x253
0252 08e0 | | Execute_Immediate Raise,0xe0
0253 00cd | | Action Spare6_Action
0254 027f | | Execute Discrete,Equal
0255 7001 |p | Jump_Nonzero 0x257
0256 08e0 | | Execute_Immediate Raise,0xe0
0257 00d2 | | Pop_Control Pop_Count_2
0258 00d9 | | Load_Top At_Offset_1
0259 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
025a 4801 |H | Short_Literal 0x1
025b 4801 |H | Short_Literal 0x1
025c e23f | ? | Load 0x1,0x3f
025d 1c08 | | Execute_Immediate Run_Utility,0x8
025e e298 | | Load 0x1,0x98
025f 00d9 | | Load_Top At_Offset_1
0260 00d8 | | Load_Top At_Offset_0
0261 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0262 00da | | Load_Top At_Offset_2
0263 01da | | Execute Vector,Bounds
0264 00da | | Load_Top At_Offset_2
0265 01da | | Execute Vector,Bounds
0266 00da | | Load_Top At_Offset_2
0267 027f | | Execute Discrete,Equal
0268 7001 |p | Jump_Nonzero 0x26a
0269 08e0 | | Execute_Immediate Raise,0xe0
026a 00cd | | Action Spare6_Action
026b 027f | | Execute Discrete,Equal
026c 7001 |p | Jump_Nonzero 0x26e
026d 08e0 | | Execute_Immediate Raise,0xe0
026e 00d2 | | Pop_Control Pop_Count_2
026f 00d9 | | Load_Top At_Offset_1
0270 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0271 e296 | | Load 0x1,0x96
0272 00d9 | | Load_Top At_Offset_1
0273 00d8 | | Load_Top At_Offset_0
0274 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0275 00da | | Load_Top At_Offset_2
0276 01da | | Execute Vector,Bounds
0277 00da | | Load_Top At_Offset_2
0278 01da | | Execute Vector,Bounds
0279 00da | | Load_Top At_Offset_2
027a 027f | | Execute Discrete,Equal
027b 7001 |p | Jump_Nonzero 0x27d
027c 08e0 | | Execute_Immediate Raise,0xe0
027d 00cd | | Action Spare6_Action
027e 027f | | Execute Discrete,Equal
027f 7001 |p | Jump_Nonzero 0x281
0280 08e0 | | Execute_Immediate Raise,0xe0
0281 00d2 | | Pop_Control Pop_Count_2
0282 00d9 | | Load_Top At_Offset_1
0283 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0284 e267 | g | Load 0x1,0x67
0285 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0286 0007 | | Action Break_Optional
0287 e267 | g | Load 0x1,0x67
0288 192f | / | Execute Package,Field_Reference,Field_Number 0x2f
0289 0007 | | Action Break_Optional
028a 029d 0953 | S| Declare_Subprogram For_Outer_Call,INIT_0950
028c 1d14 | | Execute_Immediate Reference_Lex_1,0x14
028d 00c7 | | Action Elaborate_Subprogram
028e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
028f 00c7 | | Action Elaborate_Subprogram
0290 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0291 00c7 | | Action Elaborate_Subprogram
0292 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0293 00c7 | | Action Elaborate_Subprogram
0294 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0295 00c7 | | Action Elaborate_Subprogram
0296 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0297 00c7 | | Action Elaborate_Subprogram
0298 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0299 00c7 | | Action Elaborate_Subprogram
029a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
029b 00c7 | | Action Elaborate_Subprogram
029c 1d13 | | Execute_Immediate Reference_Lex_1,0x13
029d 00c7 | | Action Elaborate_Subprogram
029e 1d0f | | Execute_Immediate Reference_Lex_1,0xf
029f 00c7 | | Action Elaborate_Subprogram
02a0 1d10 | | Execute_Immediate Reference_Lex_1,0x10
02a1 00c7 | | Action Elaborate_Subprogram
02a2 1d11 | | Execute_Immediate Reference_Lex_1,0x11
02a3 00c7 | | Action Elaborate_Subprogram
02a4 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
02a5 00c7 | | Action Elaborate_Subprogram
02a6 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
02a7 00c7 | | Action Elaborate_Subprogram
02a8 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
02a9 00c7 | | Action Elaborate_Subprogram
02aa 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
02ab 00c7 | | Action Elaborate_Subprogram
02ac 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
02ad 00c7 | | Action Elaborate_Subprogram
02ae 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
02af 00c7 | | Action Elaborate_Subprogram
02b0 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
02b1 00c7 | | Action Elaborate_Subprogram
02b2 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
02b3 00c7 | | Action Elaborate_Subprogram
02b4 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
02b5 00c7 | | Action Elaborate_Subprogram
02b6 1d52 | R | Execute_Immediate Reference_Lex_1,0x52
02b7 00c7 | | Action Elaborate_Subprogram
02b8 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
02b9 00c7 | | Action Elaborate_Subprogram
02ba 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
02bb 00c7 | | Action Elaborate_Subprogram
02bc 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
02bd 00c7 | | Action Elaborate_Subprogram
02be 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
02bf 00c7 | | Action Elaborate_Subprogram
02c0 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
02c1 00c7 | | Action Elaborate_Subprogram
02c2 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
02c3 00c7 | | Action Elaborate_Subprogram
02c4 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
02c5 00c7 | | Action Elaborate_Subprogram
02c6 029d 095b | [| Declare_Subprogram For_Outer_Call,INIT_0958
02c8 029d 098b | | Declare_Subprogram For_Outer_Call,INIT_0988
02ca 029d 09bb | | Declare_Subprogram For_Outer_Call,INIT_09b8
02cc 029d 09fb | | Declare_Subprogram For_Outer_Call,INIT_09f8
02ce 029d 0a1b | | Declare_Subprogram For_Outer_Call,INIT_0a18
02d0 029d 0a4b | K| Declare_Subprogram For_Outer_Call,INIT_0a48
02d2 029d 0a9b | | Declare_Subprogram For_Outer_Call,INIT_0a98
02d4 029d 0acb | | Declare_Subprogram For_Outer_Call,INIT_0ac8
02d6 029d 0bb3 | | Declare_Subprogram For_Outer_Call,INIT_0bb0
02d8 029d 0bcb | | Declare_Subprogram For_Outer_Call,INIT_0bc8
02da 029d 0bf3 | | Declare_Subprogram For_Outer_Call,INIT_0bf0
02dc 029d 0c53 | S| Declare_Subprogram For_Outer_Call,INIT_0c50
02de 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
02df 00c7 | | Action Elaborate_Subprogram
02e0 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
02e1 00c7 | | Action Elaborate_Subprogram
02e2 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
02e3 00c7 | | Action Elaborate_Subprogram
02e4 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
02e5 00c7 | | Action Elaborate_Subprogram
02e6 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
02e7 00c7 | | Action Elaborate_Subprogram
02e8 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
02e9 00c7 | | Action Elaborate_Subprogram
02ea 029d 0ccb | | Declare_Subprogram For_Outer_Call,INIT_0cc8
02ec 029d 0d1b | | Declare_Subprogram For_Outer_Call,INIT_0d18
02ee 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
02ef 00c7 | | Action Elaborate_Subprogram
02f0 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
02f1 00c7 | | Action Elaborate_Subprogram
02f2 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
02f3 00c7 | | Action Elaborate_Subprogram
02f4 029d 0d8b | | Declare_Subprogram For_Outer_Call,INIT_0d88
02f6 029d 0da3 | | Declare_Subprogram For_Outer_Call,INIT_0da0
02f8 029d 0dd3 | | Declare_Subprogram For_Outer_Call,INIT_0dd0
02fa 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
02fb 00c7 | | Action Elaborate_Subprogram
02fc 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
02fd 00c7 | | Action Elaborate_Subprogram
02fe 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
02ff 00c7 | | Action Elaborate_Subprogram
0300 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0301 00c7 | | Action Elaborate_Subprogram
0302 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0303 00c7 | | Action Elaborate_Subprogram
0304 029d 0e1b | | Declare_Subprogram For_Outer_Call,INIT_0e18
0306 029d 0e2b | +| Declare_Subprogram For_Outer_Call,INIT_0e28
0308 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
0309 00c7 | | Action Elaborate_Subprogram
030a 029d 0e5b | [| Declare_Subprogram For_Outer_Call,INIT_0e58
030c 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
030d 00c7 | | Action Elaborate_Subprogram
030e 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
030f 00c7 | | Action Elaborate_Subprogram
0310 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
0311 00c7 | | Action Elaborate_Subprogram
0312 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
0313 00c7 | | Action Elaborate_Subprogram
0314 029d 0e73 | s| Declare_Subprogram For_Outer_Call,INIT_0e70
0316 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
0317 00c7 | | Action Elaborate_Subprogram
0318 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
0319 00c7 | | Action Elaborate_Subprogram
031a 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
031b 00c7 | | Action Elaborate_Subprogram
031c 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
031d 00c7 | | Action Elaborate_Subprogram
031e 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
031f 00c7 | | Action Elaborate_Subprogram
0320 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
0321 00c7 | | Action Elaborate_Subprogram
0322 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
0323 00c7 | | Action Elaborate_Subprogram
0324 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
0325 00c7 | | Action Elaborate_Subprogram
0326 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
0327 00c7 | | Action Elaborate_Subprogram
0328 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
0329 00c7 | | Action Elaborate_Subprogram
032a 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
032b 00c7 | | Action Elaborate_Subprogram
032c 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
032d 00c7 | | Action Elaborate_Subprogram
032e 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
032f 00c7 | | Action Elaborate_Subprogram
0330 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
0331 00c7 | | Action Elaborate_Subprogram
0332 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0333 00c7 | | Action Elaborate_Subprogram
0334 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
0335 00c7 | | Action Elaborate_Subprogram
0336 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
0337 00c7 | | Action Elaborate_Subprogram
0338 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
0339 00c7 | | Action Elaborate_Subprogram
033a 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51
033b 00c7 | | Action Elaborate_Subprogram
033c 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
033d 00c7 | | Action Elaborate_Subprogram
033e 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
033f 00c7 | | Action Elaborate_Subprogram
0340 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0341 00c7 | | Action Elaborate_Subprogram
0342 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
0343 00c7 | | Action Elaborate_Subprogram
0344 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0345 00c7 | | Action Elaborate_Subprogram
0346 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0347 00c7 | | Action Elaborate_Subprogram
0348 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0349 00c7 | | Action Elaborate_Subprogram
034a 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
034b 00c7 | | Action Elaborate_Subprogram
034c 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
034d 00c7 | | Action Elaborate_Subprogram
034e 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
034f 00c7 | | Action Elaborate_Subprogram
0350 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
0351 00c7 | | Action Elaborate_Subprogram
0352 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
0353 00c7 | | Action Elaborate_Subprogram
0354 00b6 | | Action Make_Scope
0355 e002 | | Load 0x0,0x2
0356 e003 | | Load 0x0,0x3
0357 e004 | | Load 0x0,0x4
0358 e005 | | Load 0x0,0x5
0359 e006 | | Load 0x0,0x6
035a e007 | | Load 0x0,0x7
035b e008 | | Load 0x0,0x8
035c e009 | | Load 0x0,0x9
035d e00a | | Load 0x0,0xa
035e e00b | | Load 0x0,0xb
035f e00c | | Load 0x0,0xc
0360 e00d | | Load 0x0,0xd
0361 e00e | | Load 0x0,0xe
0362 e00f | | Load 0x0,0xf
0363 1da4 | | Execute_Immediate Reference_Lex_1,0xa4
0364 1d9e | | Execute_Immediate Reference_Lex_1,0x9e
0365 e298 | | Load 0x1,0x98
0366 1da1 | | Execute_Immediate Reference_Lex_1,0xa1
0367 e010 | | Load 0x0,0x10
0368 a011 | | Reference 0x0,0x11
0369 e012 | | Load 0x0,0x12
036a e013 | | Load 0x0,0x13
036b e014 | | Load 0x0,0x14
036c e015 | | Load 0x0,0x15
036d e296 | | Load 0x1,0x96
036e e295 | | Load 0x1,0x95
036f e29a | | Load 0x1,0x9a
0370 e29c | | Load 0x1,0x9c
0371 e299 | | Load 0x1,0x99
0372 1db5 | | Execute_Immediate Reference_Lex_1,0xb5
0373 e29d | | Load 0x1,0x9d
0374 e016 | | Load 0x0,0x16
0375 e29b | | Load 0x1,0x9b
0376 1db2 | | Execute_Immediate Reference_Lex_1,0xb2
0377 1db3 | | Execute_Immediate Reference_Lex_1,0xb3
0378 1da9 | | Execute_Immediate Reference_Lex_1,0xa9
0379 e294 | | Load 0x1,0x94
037a 1dac | | Execute_Immediate Reference_Lex_1,0xac
037b 1da3 | | Execute_Immediate Reference_Lex_1,0xa3
037c e297 | | Load 0x1,0x97
037d 4829 |H) | Short_Literal 0x29
037e e267 | g | Load 0x1,0x67
037f 020e | | Execute Module,Augment_Imports
0380 e267 | g | Load 0x1,0x67
0381 020f | | Execute Module,Activate
0382 BODY_0008:
0382 00bc | | Action Signal_Activated
0383 00bb | | Action Signal_Completion
0384 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0388 ffff ffff | | .LITERAL {0xffffffff, 0x80000001}
038c 0000 0000 | | .BLANK 0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2
0394 0237 | 7 | Execute Float,Convert_From_Discrete
0395 e5fe | | Load 0x2,-0x2
0396 023b | ; | Execute Float,Times
0397 4402 |D | Exit_Subprogram With_Result,0x2
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 00da | | Load_Top At_Offset_2
039c e5fe | | Load 0x2,-0x2
039d 0237 | 7 | Execute Float,Convert_From_Discrete
039e 023b | ; | Execute Float,Times
039f 4402 |D | Exit_Subprogram With_Result,0x2
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 00da | | Load_Top At_Offset_2
03a4 e5fe | | Load 0x2,-0x2
03a5 0237 | 7 | Execute Float,Convert_From_Discrete
03a6 023a | : | Execute Float,Divide
03a7 4402 |D | Exit_Subprogram With_Result,0x2
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00da | | Load_Top At_Offset_2
03ac e5fe | | Load 0x2,-0x2
03ad 027b | { | Execute Discrete,Greater_Equal
03ae 6804 |h | Jump_Zero 0x3b3
03af 00da | | Load_Top At_Offset_2
03b0 e5fd | | Load 0x2,-0x3
03b1 027a | z | Execute Discrete,Less_Equal
03b2 4403 |D | Exit_Subprogram With_Result,0x3
03b3 4800 |H | Short_Literal 0x0
03b4 4403 |D | Exit_Subprogram With_Result,0x3
03b5 0000 0000 | | .XXX[0x3]
03b7 0000 | |
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 00da | | Load_Top At_Offset_2
03bc e5fe | | Load 0x2,-0x2
03bd 0243 | C | Execute Float,Greater_Equal
03be 6804 |h | Jump_Zero 0x3c3
03bf 00da | | Load_Top At_Offset_2
03c0 e5fd | | Load 0x2,-0x3
03c1 0242 | B | Execute Float,Less_Equal
03c2 4403 |D | Exit_Subprogram With_Result,0x3
03c3 4800 |H | Short_Literal 0x0
03c4 4403 |D | Exit_Subprogram With_Result,0x3
03c5 0000 0000 | | .XXX[0x3]
03c7 0000 | |
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 4800 |H | Short_Literal 0x0
03cc 00ca | | Action Exit_Nullary_Function
03cd 0000 0000 | | .XXX[0x3]
03cf 0000 | |
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 4801 |H | Short_Literal 0x1
03d4 00ca | | Action Exit_Nullary_Function
03d5 0000 0000 | | .XXX[0x3]
03d7 0000 | |
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 5804 |X | Indirect_Literal Float,0x3e0,0.0
03dc 00ca | | Action Exit_Nullary_Function
03dd 0000 0000 | | .XXX[0x3]
03df 0000 | |
03e0 0000 0000 | | .DBL 0.0
03e2 0000 0000 | |
03e4 0000 0000 | | .BLANK 0000[0x4]
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 5804 |X | Indirect_Literal Float,0x3f0,1.0
03ec 00ca | | Action Exit_Nullary_Function
03ed 0000 0000 | | .XXX[0x3]
03ef 0000 | |
03f0 3ff0 0000 |? | .DBL 1.0
03f2 0000 0000 | |
03f4 0000 0000 | | .BLANK 0000[0x4]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb | | .CONST 0x03fb ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0001 | | .CONST 0x0001 ; Number of locals
03fb BODY_03f8:
03fb INIT_03f8:
03fb 6004 |` | Indirect_Literal Discrete,0x400,{0x7fffffff, 0xffffffff}
03fc 00ca | | Action Exit_Nullary_Function
03fd 0000 0000 | | .XXX[0x3]
03ff 0000 | |
0400 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
0404 0000 0000 | | .BLANK 0000[0x4]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b | | .CONST 0x040b ; Address of begin
0409 0004 | | .CONST 0x0004 ; Address of exception handler
040a 0001 | | .CONST 0x0001 ; Number of locals
040b BODY_0408:
040b INIT_0408:
040b 6004 |` | Indirect_Literal Discrete,0x410,{0x80000000, 0x00000000}
040c 00ca | | Action Exit_Nullary_Function
040d 0000 0000 | | .XXX[0x3]
040f 0000 | |
0410 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
0414 0000 0000 | | .BLANK 0000[0x4]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b | | .CONST 0x041b ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0001 | | .CONST 0x0001 ; Number of locals
041b BODY_0418:
041b INIT_0418:
041b 5804 |X | Indirect_Literal Float,0x420,-1.7976931348623157e+308
041c 00ca | | Action Exit_Nullary_Function
041d 0000 0000 | | .XXX[0x3]
041f 0000 | |
0420 ffef ffff | | .DBL -1.7976931348623157e+308
0422 ffff ffff | |
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 5804 |X | Indirect_Literal Float,0x430,1.7976931348623157e+308
042c 00ca | | Action Exit_Nullary_Function
042d 0000 0000 | | .XXX[0x3]
042f 0000 | |
0430 7fef ffff | | .DBL 1.7976931348623157e+308
0432 ffff ffff | |
0434 0000 0000 | | .BLANK 0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b e20d | | Load 0x1,0xd
043c 012c | , | Execute Any,Size
043d 00d8 | | Load_Top At_Offset_0
043e 00e2 | | Load_Encached Integer_Cache
043f 0260 | ` | Execute Discrete,In_Type
0440 7001 |p | Jump_Nonzero 0x442
0441 0801 | | Execute_Immediate Raise,0x1
0442 00ca | | Action Exit_Nullary_Function
0443 0000 0000 | | .BLANK 0000[0x5]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b e20e | | Load 0x1,0xe
044c 012c | , | Execute Any,Size
044d 00d8 | | Load_Top At_Offset_0
044e 00e2 | | Load_Encached Integer_Cache
044f 0260 | ` | Execute Discrete,In_Type
0450 7001 |p | Jump_Nonzero 0x452
0451 0801 | | Execute_Immediate Raise,0x1
0452 00ca | | Action Exit_Nullary_Function
0453 0000 0000 | | .BLANK 0000[0x5]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b 4835 |H5 | Short_Literal 0x35
045c 00ca | | Action Exit_Nullary_Function
045d 0000 0000 | | .XXX[0x3]
045f 0000 | |
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463 | c | .CONST 0x0463 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0001 | | .CONST 0x0001 ; Number of locals
0463 BODY_0460:
0463 INIT_0460:
0463 00db | | Load_Top At_Offset_3
0464 00db | | Load_Top At_Offset_3
0465 823a | : | Call 0x1,0x3a
0466 4fff |O | Short_Literal 0x7ff
0467 027f | | Execute Discrete,Equal
0468 4402 |D | Exit_Subprogram With_Result,0x2
0469 0000 0000 | | .BLANK 0000[0x7]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473 | s | .CONST 0x0473 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0001 | | .CONST 0x0001 ; Number of locals
0473 BODY_0470:
0473 INIT_0470:
0473 00db | | Load_Top At_Offset_3
0474 00db | | Load_Top At_Offset_3
0475 823a | : | Call 0x1,0x3a
0476 0e01 | | Execute_Immediate Not_Equal,0x1
0477 4402 |D | Exit_Subprogram With_Result,0x2
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b | { | .CONST 0x047b ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0001 | | .CONST 0x0001 ; Number of locals
047b BODY_0478:
047b INIT_0478:
047b 00db | | Load_Top At_Offset_3
047c 00db | | Load_Top At_Offset_3
047d 823a | : | Call 0x1,0x3a
047e 0f01 | | Execute_Immediate Equal,0x1
047f 4402 |D | Exit_Subprogram With_Result,0x2
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483 | | .CONST 0x0483 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0001 | | .CONST 0x0001 ; Number of locals
0483 BODY_0480:
0483 INIT_0480:
0483 00db | | Load_Top At_Offset_3
0484 00db | | Load_Top At_Offset_3
0485 823a | : | Call 0x1,0x3a
0486 4fff |O | Short_Literal 0x7ff
0487 027e | ~ | Execute Discrete,Not_Equal
0488 4402 |D | Exit_Subprogram With_Result,0x2
0489 0000 0000 | | .BLANK 0000[0x7]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493 | | .CONST 0x0493 ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0001 | | .CONST 0x0001 ; Number of locals
0493 BODY_0490:
0493 INIT_0490:
0493 00da | | Load_Top At_Offset_2
0494 0335 | 5 | Declare_Variable Array,Duplicate
0495 00cd | | Action Spare6_Action
0496 4401 |D | Exit_Subprogram With_Result,0x1
0497 0000 | | .XXX[0x1]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b | | .CONST 0x049b ; Address of begin
0499 0004 | | .CONST 0x0004 ; Address of exception handler
049a 0001 | | .CONST 0x0001 ; Number of locals
049b BODY_0498:
049b INIT_0498:
049b 4801 |H | Short_Literal 0x1
049c 00db | | Load_Top At_Offset_3
049d 01d7 | | Execute Vector,Field_Read
049e 0275 | u | Execute Discrete,Unary_Minus
049f 4802 |H | Short_Literal 0x2
04a0 e5ff | | Load 0x2,-0x1
04a1 01dc | | Execute Vector,Last
04a2 e5ff | | Load 0x2,-0x1
04a3 01cf | | Execute Vector,Slice_Read
04a4 01ca | | Execute Vector,Prepend
04a5 4401 |D | Exit_Subprogram With_Result,0x1
04a6 0000 0000 | | .XXX[0x2]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b9 | | .CONST 0x04b9 ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0002 | | .CONST 0x0002 ; Number of locals
04ab INIT_04a8:
04ab 4801 |H | Short_Literal 0x1
04ac 00db | | Load_Top At_Offset_3
04ad 01db | | Execute Vector,Length
04ae 00d8 | | Load_Top At_Offset_0
04af 00e2 | | Load_Encached Integer_Cache
04b0 0260 | ` | Execute Discrete,In_Type
04b1 7001 |p | Jump_Nonzero 0x4b3
04b2 0801 | | Execute_Immediate Raise,0x1
04b3 e220 | | Load 0x1,0x20
04b4 035b | [ | Declare_Type Array,Constrained
04b5 0337 | 7 | Declare_Variable Array
04b6 00db | | Load_Top At_Offset_3
04b7 00d9 | | Load_Top At_Offset_1
04b8 01d4 | | Execute Vector,Structure_Write
04b9 BODY_04a8:
04b9 4801 |H | Short_Literal 0x1
04ba 00d9 | | Load_Top At_Offset_1
04bb 01d7 | | Execute Vector,Field_Read
04bc 0274 | t | Execute Discrete,Absolute_Value
04bd 4801 |H | Short_Literal 0x1
04be 00da | | Load_Top At_Offset_2
04bf 01d6 | | Execute Vector,Field_Write
04c0 00d8 | | Load_Top At_Offset_0
04c1 e220 | | Load 0x1,0x20
04c2 01c6 | | Execute Vector,Convert_To_Formal
04c3 4401 |D | Exit_Subprogram With_Result,0x1
04c4 0000 0000 | | .BLANK 0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04d4 | | .CONST 0x04d4 ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0009 | | .CONST 0x0009 ; Number of locals
04cb INIT_04c8:
04cb 00e2 | | Load_Encached Integer_Cache
04cc 00e5 | | Load_Encached Long_Integer_Cache
04cd 03e9 | | Declare_Variable Discrete,Duplicate
04ce 00e2 | | Load_Encached Integer_Cache
04cf 03e9 | | Declare_Variable Discrete,Duplicate
04d0 00e1 | | Load_Encached Boolean_Cache
04d1 03e9 | | Declare_Variable Discrete,Duplicate
04d2 029f 0ea3 | | Declare_Subprogram For_Call,INIT_0ea0
04d4 BODY_04c8:
04d4 e5ff | | Load 0x2,-0x1
04d5 01db | | Execute Vector,Length
04d6 c405 | | Store 0x2,0x5
04d7 e5fe | | Load 0x2,-0x2
04d8 01db | | Execute Vector,Length
04d9 c406 | | Store 0x2,0x6
04da e405 | | Load 0x2,0x5
04db 0f01 | | Execute_Immediate Equal,0x1
04dc 680c |h | Jump_Zero 0x4e9
04dd 00db | | Load_Top At_Offset_3
04de 0f01 | | Execute_Immediate Equal,0x1
04df 6809 |h | Jump_Zero 0x4e9
04e0 4801 |H | Short_Literal 0x1
04e1 e5ff | | Load 0x2,-0x1
04e2 01d7 | | Execute Vector,Field_Read
04e3 4801 |H | Short_Literal 0x1
04e4 e5fe | | Load 0x2,-0x2
04e5 01d7 | | Execute Vector,Field_Read
04e6 0273 | s | Execute Discrete,Plus
04e7 82a0 | | Call 0x1,0xa0
04e8 4402 |D | Exit_Subprogram With_Result,0x2
04e9 e405 | | Load 0x2,0x5
04ea 0f01 | | Execute_Immediate Equal,0x1
04eb 6808 |h | Jump_Zero 0x4f4
04ec 4801 |H | Short_Literal 0x1
04ed e5ff | | Load 0x2,-0x1
04ee 01d7 | | Execute Vector,Field_Read
04ef 7004 |p | Jump_Nonzero 0x4f4
04f0 e5fe | | Load 0x2,-0x2
04f1 0335 | 5 | Declare_Variable Array,Duplicate
04f2 00cd | | Action Spare6_Action
04f3 4402 |D | Exit_Subprogram With_Result,0x2
04f4 00db | | Load_Top At_Offset_3
04f5 0f01 | | Execute_Immediate Equal,0x1
04f6 6808 |h | Jump_Zero 0x4ff
04f7 4801 |H | Short_Literal 0x1
04f8 e5fe | | Load 0x2,-0x2
04f9 01d7 | | Execute Vector,Field_Read
04fa 7004 |p | Jump_Nonzero 0x4ff
04fb e5ff | | Load 0x2,-0x1
04fc 0335 | 5 | Declare_Variable Array,Duplicate
04fd 00cd | | Action Spare6_Action
04fe 4402 |D | Exit_Subprogram With_Result,0x2
04ff e405 | | Load 0x2,0x5
0500 e406 | | Load 0x2,0x6
0501 027c | | | Execute Discrete,Less
0502 6804 |h | Jump_Zero 0x507
0503 00db | | Load_Top At_Offset_3
0504 0a01 | | Execute_Immediate Plus,0x1
0505 c402 | | Store 0x2,0x2
0506 7803 |x | Jump 0x50a
0507 e405 | | Load 0x2,0x5
0508 0a01 | | Execute_Immediate Plus,0x1
0509 c402 | | Store 0x2,0x2
050a 8409 | | Call 0x2,0x9
050b 0831 | 1 | Execute_Immediate Raise,0x31
050c 0000 0000 | | .BLANK 0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513 | | .CONST 0x0513 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0001 | | .CONST 0x0001 ; Number of locals
0513 BODY_0510:
0513 INIT_0510:
0513 00db | | Load_Top At_Offset_3
0514 8226 | & | Call 0x1,0x26
0515 00db | | Load_Top At_Offset_3
0516 8228 | ( | Call 0x1,0x28
0517 4402 |D | Exit_Subprogram With_Result,0x2
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 052a | * | .CONST 0x052a ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0003 | | .CONST 0x0003 ; Number of locals
051b INIT_0518:
051b 4801 |H | Short_Literal 0x1
051c 00db | | Load_Top At_Offset_3
051d 01db | | Execute Vector,Length
051e e5fe | | Load 0x2,-0x2
051f 01db | | Execute Vector,Length
0520 0273 | s | Execute Discrete,Plus
0521 00d8 | | Load_Top At_Offset_0
0522 00e2 | | Load_Encached Integer_Cache
0523 0260 | ` | Execute Discrete,In_Type
0524 7001 |p | Jump_Nonzero 0x526
0525 0801 | | Execute_Immediate Raise,0x1
0526 e220 | | Load 0x1,0x20
0527 035b | [ | Declare_Type Array,Constrained
0528 0337 | 7 | Declare_Variable Array
0529 00e2 | | Load_Encached Integer_Cache
052a BODY_0518:
052a 00d9 | | Load_Top At_Offset_1
052b e5fe | | Load 0x2,-0x2
052c e5ff | | Load 0x2,-0x1
052d 82ae | | Call 0x1,0xae
052e 00d1 | | Pop_Control Pop_Count_1
052f 00e2 | | Load_Encached Integer_Cache
0530 00da | | Load_Top At_Offset_2
0531 4800 |H | Short_Literal 0x0
0532 82a3 | | Call 0x1,0xa3
0533 00d1 | | Pop_Control Pop_Count_1
0534 0059 | Y | Store_Top Discrete,At_Offset_1
0535 4801 |H | Short_Literal 0x1
0536 00d9 | | Load_Top At_Offset_1
0537 00db | | Load_Top At_Offset_3
0538 01cf | | Execute Vector,Slice_Read
0539 e220 | | Load 0x1,0x20
053a 01c6 | | Execute Vector,Convert_To_Formal
053b 4402 |D | Exit_Subprogram With_Result,0x2
053c 0000 0000 | | .BLANK 0000[0x4]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543 | C | .CONST 0x0543 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0001 | | .CONST 0x0001 ; Number of locals
0543 BODY_0540:
0543 INIT_0540:
0543 4800 |H | Short_Literal 0x0
0544 e5fe | | Load 0x2,-0x2
0545 e5ff | | Load 0x2,-0x1
0546 82a8 | | Call 0x1,0xa8
0547 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0548 4402 |D | Exit_Subprogram With_Result,0x2
0549 0000 0000 | | .BLANK 0000[0x7]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0556 | V | .CONST 0x0556 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0002 | | .CONST 0x0002 ; Number of locals
0553 INIT_0550:
0553 00db | | Load_Top At_Offset_3
0554 00db | | Load_Top At_Offset_3
0555 822d | - | Call 0x1,0x2d
0556 BODY_0550:
0556 4801 |H | Short_Literal 0x1
0557 e5ff | | Load 0x2,-0x1
0558 01d7 | | Execute Vector,Field_Read
0559 0d00 | | Execute_Immediate Less,0x0
055a 4801 |H | Short_Literal 0x1
055b e5fe | | Load 0x2,-0x2
055c 01d7 | | Execute Vector,Field_Read
055d 0d00 | | Execute_Immediate Less,0x0
055e 027f | | Execute Discrete,Equal
055f 7004 |p | Jump_Nonzero 0x564
0560 4801 |H | Short_Literal 0x1
0561 00d9 | | Load_Top At_Offset_1
0562 01d7 | | Execute Vector,Field_Read
0563 7002 |p | Jump_Nonzero 0x566
0564 00d8 | | Load_Top At_Offset_0
0565 4402 |D | Exit_Subprogram With_Result,0x2
0566 00d8 | | Load_Top At_Offset_0
0567 e5fe | | Load 0x2,-0x2
0568 8228 | ( | Call 0x1,0x28
0569 4402 |D | Exit_Subprogram With_Result,0x2
056a 0000 0000 | | .BLANK 0000[0x6]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 00da | | Load_Top At_Offset_2
0574 01db | | Execute Vector,Length
0575 0f01 | | Execute_Immediate Equal,0x1
0576 680d |h | Jump_Zero 0x584
0577 00db | | Load_Top At_Offset_3
0578 01db | | Execute Vector,Length
0579 0f01 | | Execute_Immediate Equal,0x1
057a 6809 |h | Jump_Zero 0x584
057b 4801 |H | Short_Literal 0x1
057c 00db | | Load_Top At_Offset_3
057d 01d7 | | Execute Vector,Field_Read
057e 4801 |H | Short_Literal 0x1
057f e5fe | | Load 0x2,-0x2
0580 01d7 | | Execute Vector,Field_Read
0581 026f | o | Execute Discrete,Remainder
0582 82a0 | | Call 0x1,0xa0
0583 4402 |D | Exit_Subprogram With_Result,0x2
0584 4801 |H | Short_Literal 0x1
0585 e5fe | | Load 0x2,-0x2
0586 e5ff | | Load 0x2,-0x1
0587 82a8 | | Call 0x1,0xa8
0588 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0589 4402 |D | Exit_Subprogram With_Result,0x2
058a 0000 0000 | | .BLANK 0000[0x6]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 05a3 | | .CONST 0x05a3 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0003 | | .CONST 0x0003 ; Number of locals
0593 INIT_0590:
0593 4801 |H | Short_Literal 0x1
0594 00db | | Load_Top At_Offset_3
0595 01db | | Execute Vector,Length
0596 e5fe | | Load 0x2,-0x2
0597 0274 | t | Execute Discrete,Absolute_Value
0598 82af | | Call 0x1,0xaf
0599 0271 | q | Execute Discrete,Times
059a 00d8 | | Load_Top At_Offset_0
059b 00e2 | | Load_Encached Integer_Cache
059c 0260 | ` | Execute Discrete,In_Type
059d 7001 |p | Jump_Nonzero 0x59f
059e 0801 | | Execute_Immediate Raise,0x1
059f e220 | | Load 0x1,0x20
05a0 035b | [ | Declare_Type Array,Constrained
05a1 0337 | 7 | Declare_Variable Array
05a2 00e2 | | Load_Encached Integer_Cache
05a3 BODY_0590:
05a3 00d9 | | Load_Top At_Offset_1
05a4 e5fe | | Load 0x2,-0x2
05a5 e5ff | | Load 0x2,-0x1
05a6 82b1 | | Call 0x1,0xb1
05a7 00d1 | | Pop_Control Pop_Count_1
05a8 00e2 | | Load_Encached Integer_Cache
05a9 00da | | Load_Top At_Offset_2
05aa 4800 |H | Short_Literal 0x0
05ab 82a3 | | Call 0x1,0xa3
05ac 00d1 | | Pop_Control Pop_Count_1
05ad 0059 | Y | Store_Top Discrete,At_Offset_1
05ae 4801 |H | Short_Literal 0x1
05af 00d9 | | Load_Top At_Offset_1
05b0 00db | | Load_Top At_Offset_3
05b1 01cf | | Execute Vector,Slice_Read
05b2 e220 | | Load 0x1,0x20
05b3 01c6 | | Execute Vector,Convert_To_Formal
05b4 4402 |D | Exit_Subprogram With_Result,0x2
05b5 0000 0000 | | .XXX[0x3]
05b7 0000 | |
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 00db | | Load_Top At_Offset_3
05bc 00db | | Load_Top At_Offset_3
05bd 8224 | $ | Call 0x1,0x24
05be 6804 |h | Jump_Zero 0x5c3
05bf e5fd | | Load 0x2,-0x3
05c0 00db | | Load_Top At_Offset_3
05c1 8222 | " | Call 0x1,0x22
05c2 4403 |D | Exit_Subprogram With_Result,0x3
05c3 4800 |H | Short_Literal 0x0
05c4 4403 |D | Exit_Subprogram With_Result,0x3
05c5 0000 0000 | | .XXX[0x3]
05c7 0000 | |
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb | | .CONST 0x05cb ; Address of begin
05c9 0004 | | .CONST 0x0004 ; Address of exception handler
05ca 0001 | | .CONST 0x0001 ; Number of locals
05cb BODY_05c8:
05cb INIT_05c8:
05cb 00db | | Load_Top At_Offset_3
05cc 00db | | Load_Top At_Offset_3
05cd 829e | | Call 0x1,0x9e
05ce 822a | * | Call 0x1,0x2a
05cf 4402 |D | Exit_Subprogram With_Result,0x2
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3 | | .CONST 0x05d3 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0001 | | .CONST 0x0001 ; Number of locals
05d3 BODY_05d0:
05d3 INIT_05d0:
05d3 00db | | Load_Top At_Offset_3
05d4 829e | | Call 0x1,0x9e
05d5 00db | | Load_Top At_Offset_3
05d6 822a | * | Call 0x1,0x2a
05d7 4402 |D | Exit_Subprogram With_Result,0x2
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 00db | | Load_Top At_Offset_3
05dc 829e | | Call 0x1,0x9e
05dd 00db | | Load_Top At_Offset_3
05de 822b | + | Call 0x1,0x2b
05df 4402 |D | Exit_Subprogram With_Result,0x2
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3 | | .CONST 0x05e3 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0001 | | .CONST 0x0001 ; Number of locals
05e3 BODY_05e0:
05e3 INIT_05e0:
05e3 4802 |H | Short_Literal 0x2
05e4 e5fe | | Load 0x2,-0x2
05e5 e5ff | | Load 0x2,-0x1
05e6 82a8 | | Call 0x1,0xa8
05e7 4402 |D | Exit_Subprogram With_Result,0x2
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05fe | | .CONST 0x05fe ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0002 | | .CONST 0x0002 ; Number of locals
05eb INIT_05e8:
05eb 4801 |H | Short_Literal 0x1
05ec e5fe | | Load 0x2,-0x2
05ed 01db | | Execute Vector,Length
05ee 00d8 | | Load_Top At_Offset_0
05ef 00e2 | | Load_Encached Integer_Cache
05f0 0260 | ` | Execute Discrete,In_Type
05f1 7001 |p | Jump_Nonzero 0x5f3
05f2 0801 | | Execute_Immediate Raise,0x1
05f3 e5ff | | Load 0x2,-0x1
05f4 01db | | Execute Vector,Length
05f5 00d8 | | Load_Top At_Offset_0
05f6 00e2 | | Load_Encached Integer_Cache
05f7 0260 | ` | Execute Discrete,In_Type
05f8 7001 |p | Jump_Nonzero 0x5fa
05f9 0801 | | Execute_Immediate Raise,0x1
05fa 82b2 | | Call 0x1,0xb2
05fb e220 | | Load 0x1,0x20
05fc 035b | [ | Declare_Type Array,Constrained
05fd 0337 | 7 | Declare_Variable Array
05fe BODY_05e8:
05fe 00d8 | | Load_Top At_Offset_0
05ff e5fe | | Load 0x2,-0x2
0600 e5ff | | Load 0x2,-0x1
0601 82b3 | | Call 0x1,0xb3
0602 00d1 | | Pop_Control Pop_Count_1
0603 4800 |H | Short_Literal 0x0
0604 00d9 | | Load_Top At_Offset_1
0605 82a4 | | Call 0x1,0xa4
0606 e220 | | Load 0x1,0x20
0607 01c6 | | Execute Vector,Convert_To_Formal
0608 4402 |D | Exit_Subprogram With_Result,0x2
0609 0000 0000 | | .BLANK 0000[0x7]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0622 | " | .CONST 0x0622 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0004 | | .CONST 0x0004 ; Number of locals
0613 INIT_0610:
0613 481f |H | Short_Literal 0x1f
0614 00db | | Load_Top At_Offset_3
0615 01db | | Execute Vector,Length
0616 0271 | q | Execute Discrete,Times
0617 00e5 | | Load_Encached Long_Integer_Cache
0618 03f1 | | Declare_Variable Discrete,With_Value
0619 4801 |H | Short_Literal 0x1
061a e5ff | | Load 0x2,-0x1
061b 01d7 | | Execute Vector,Field_Read
061c 0274 | t | Execute Discrete,Absolute_Value
061d 00e5 | | Load_Encached Long_Integer_Cache
061e 03f1 | | Declare_Variable Discrete,With_Value
061f 6034 |`4 | Indirect_Literal Discrete,0x654,{0x00000000, 0x80000000}
0620 00e5 | | Load_Encached Long_Integer_Cache
0621 03f1 | | Declare_Variable Discrete,With_Value
0622 BODY_0610:
0622 00d9 | | Load_Top At_Offset_1
0623 7001 |p | Jump_Nonzero 0x625
0624 08e0 | | Execute_Immediate Raise,0xe0
0625 00cf | | Action Mark_Auxiliary
0626 7807 |x | Jump 0x62e
0627 00d9 | | Load_Top At_Offset_1
0628 09ff | | Execute_Immediate Binary_Scale,-0x1
0629 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
062a 00db | | Load_Top At_Offset_3
062b 0aff | | Execute_Immediate Plus,-0x1
062c a402 | | Store_Unchecked 0x2,0x2
062d 00c9 | | Action Pop_Auxiliary_Loop
062e 00d9 | | Load_Top At_Offset_1
062f 00db | | Load_Top At_Offset_3
0630 027d | } | Execute Discrete,Greater
0631 77f5 |w | Jump_Nonzero 0x627
0632 00ce | | Action Pop_Auxiliary
0633 00d8 | | Load_Top At_Offset_0
0634 00da | | Load_Top At_Offset_2
0635 027c | | | Execute Discrete,Less
0636 6803 |h | Jump_Zero 0x63a
0637 00da | | Load_Top At_Offset_2
0638 0a01 | | Execute_Immediate Plus,0x1
0639 4401 |D | Exit_Subprogram With_Result,0x1
063a 00cf | | Action Mark_Auxiliary
063b e5ff | | Load 0x2,-0x1
063c 01dc | | Execute Vector,Last
063d e5ff | | Load 0x2,-0x1
063e 01dd | | Execute Vector,First
063f 0a01 | | Execute_Immediate Plus,0x1
0640 00d8 | | Load_Top At_Offset_0
0641 00e2 | | Load_Encached Integer_Cache
0642 0260 | ` | Execute Discrete,In_Type
0643 7001 |p | Jump_Nonzero 0x645
0644 0801 | | Execute_Immediate Raise,0x1
0645 0263 | c | Execute Discrete,Above_Bound
0646 7009 |p | Jump_Nonzero 0x650
0647 00d8 | | Load_Top At_Offset_0
0648 e5ff | | Load 0x2,-0x1
0649 01d7 | | Execute Vector,Field_Read
064a 6803 |h | Jump_Zero 0x64e
064b e402 | | Load 0x2,0x2
064c 0a01 | | Execute_Immediate Plus,0x1
064d 4401 |D | Exit_Subprogram With_Result,0x1
064e 00c8 | | Action Pop_Auxiliary_Range
064f 3ff7 |? | Loop_Increasing 0x647
0650 00ce | | Action Pop_Auxiliary
0651 00da | | Load_Top At_Offset_2
0652 4401 |D | Exit_Subprogram With_Result,0x1
0653 0000 | | .XXX[0x1]
0654 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 0668 | h | .CONST 0x0668 ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0004 | | .CONST 0x0004 ; Number of locals
065b INIT_0658:
065b 00da | | Load_Top At_Offset_2
065c 8227 | ' | Call 0x1,0x27
065d 00d8 | | Load_Top At_Offset_0
065e 8236 | 6 | Call 0x1,0x36
065f 0237 | 7 | Execute Float,Convert_From_Discrete
0660 5823 |X# | Indirect_Literal Float,0x684,0.30102999566
0661 023b | ; | Execute Float,Times
0662 0235 | 5 | Execute Float,Round_To_Discrete
0663 00e5 | | Load_Encached Long_Integer_Cache
0664 025e | ^ | Execute Discrete,Convert
0665 00e5 | | Load_Encached Long_Integer_Cache
0666 03f1 | | Declare_Variable Discrete,With_Value
0667 e238 | 8 | Load 0x1,0x38
0668 BODY_0658:
0668 00cf | | Action Mark_Auxiliary
0669 00db | | Load_Top At_Offset_3
066a 00db | | Load_Top At_Offset_3
066b 00d8 | | Load_Top At_Offset_0
066c 00e2 | | Load_Encached Integer_Cache
066d 0260 | ` | Execute Discrete,In_Type
066e 7001 |p | Jump_Nonzero 0x670
066f 0801 | | Execute_Immediate Raise,0x1
0670 e298 | | Load 0x1,0x98
0671 822e | . | Call 0x1,0x2e
0672 823a | : | Call 0x1,0x3a
0673 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0674 00d9 | | Load_Top At_Offset_1
0675 0d01 | | Execute_Immediate Less,0x1
0676 7005 |p | Jump_Nonzero 0x67c
0677 00da | | Load_Top At_Offset_2
0678 0aff | | Execute_Immediate Plus,-0x1
0679 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
067a 00c9 | | Action Pop_Auxiliary_Loop
067b 7fed | | Jump 0x669
067c 00ce | | Action Pop_Auxiliary
067d 00d9 | | Load_Top At_Offset_1
067e 00d9 | | Load_Top At_Offset_1
067f 0273 | s | Execute Discrete,Plus
0680 4401 |D | Exit_Subprogram With_Result,0x1
0681 0000 0000 | | .XXX[0x3]
0683 0000 | |
0684 3fd3 4413 |? D | .DBL 0.30102999566
0686 509e 61d8 |P a |
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b 4801 |H | Short_Literal 0x1
068c 00db | | Load_Top At_Offset_3
068d 01d7 | | Execute Vector,Field_Read
068e 82b4 | | Call 0x1,0xb4
068f 4401 |D | Exit_Subprogram With_Result,0x1
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0693 | | .CONST 0x0693 ; Address of begin
0691 0004 | | .CONST 0x0004 ; Address of exception handler
0692 0001 | | .CONST 0x0001 ; Number of locals
0693 BODY_0690:
0693 INIT_0690:
0693 00da | | Load_Top At_Offset_2
0694 01db | | Execute Vector,Length
0695 e5fe | | Load 0x2,-0x2
0696 01db | | Execute Vector,Length
0697 027f | | Execute Discrete,Equal
0698 6831 |h1 | Jump_Zero 0x6ca
0699 00cf | | Action Mark_Auxiliary
069a 00db | | Load_Top At_Offset_3
069b 01d9 | | Execute Vector,Reverse_Bounds
069c 0263 | c | Execute Discrete,Above_Bound
069d 7029 |p) | Jump_Nonzero 0x6c7
069e 00d8 | | Load_Top At_Offset_0
069f e5ff | | Load 0x2,-0x1
06a0 01d7 | | Execute Vector,Field_Read
06a1 00d9 | | Load_Top At_Offset_1
06a2 e5fe | | Load 0x2,-0x2
06a3 01d7 | | Execute Vector,Field_Read
06a4 027e | ~ | Execute Discrete,Not_Equal
06a5 681f |h | Jump_Zero 0x6c5
06a6 00d8 | | Load_Top At_Offset_0
06a7 0f01 | | Execute_Immediate Equal,0x1
06a8 6809 |h | Jump_Zero 0x6b2
06a9 4801 |H | Short_Literal 0x1
06aa e5ff | | Load 0x2,-0x1
06ab 01d7 | | Execute Vector,Field_Read
06ac 4801 |H | Short_Literal 0x1
06ad e5fe | | Load 0x2,-0x2
06ae 01d7 | | Execute Vector,Field_Read
06af 0272 | r | Execute Discrete,Minus
06b0 82b4 | | Call 0x1,0xb4
06b1 4402 |D | Exit_Subprogram With_Result,0x2
06b2 4801 |H | Short_Literal 0x1
06b3 e5ff | | Load 0x2,-0x1
06b4 01d7 | | Execute Vector,Field_Read
06b5 82b4 | | Call 0x1,0xb4
06b6 00d9 | | Load_Top At_Offset_1
06b7 e5ff | | Load 0x2,-0x1
06b8 01d7 | | Execute Vector,Field_Read
06b9 0271 | q | Execute Discrete,Times
06ba 4801 |H | Short_Literal 0x1
06bb e5fe | | Load 0x2,-0x2
06bc 01d7 | | Execute Vector,Field_Read
06bd 82b4 | | Call 0x1,0xb4
06be 00da | | Load_Top At_Offset_2
06bf e5fe | | Load 0x2,-0x2
06c0 01d7 | | Execute Vector,Field_Read
06c1 0271 | q | Execute Discrete,Times
06c2 0272 | r | Execute Discrete,Minus
06c3 82b4 | | Call 0x1,0xb4
06c4 4402 |D | Exit_Subprogram With_Result,0x2
06c5 00c8 | | Action Pop_Auxiliary_Range
06c6 3fd7 |? | Loop_Increasing 0x69e
06c7 00ce | | Action Pop_Auxiliary
06c8 4800 |H | Short_Literal 0x0
06c9 4402 |D | Exit_Subprogram With_Result,0x2
06ca 4801 |H | Short_Literal 0x1
06cb 00db | | Load_Top At_Offset_3
06cc 01d7 | | Execute Vector,Field_Read
06cd 82b4 | | Call 0x1,0xb4
06ce 00db | | Load_Top At_Offset_3
06cf 01db | | Execute Vector,Length
06d0 0271 | q | Execute Discrete,Times
06d1 4801 |H | Short_Literal 0x1
06d2 e5fe | | Load 0x2,-0x2
06d3 01d7 | | Execute Vector,Field_Read
06d4 82b4 | | Call 0x1,0xb4
06d5 e5fe | | Load 0x2,-0x2
06d6 01db | | Execute Vector,Length
06d7 0271 | q | Execute Discrete,Times
06d8 0272 | r | Execute Discrete,Minus
06d9 82b4 | | Call 0x1,0xb4
06da 4402 |D | Exit_Subprogram With_Result,0x2
06db 0000 0000 | | .BLANK 0000[0x5]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3 | | .CONST 0x06e3 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0001 | | .CONST 0x0001 ; Number of locals
06e3 BODY_06e0:
06e3 INIT_06e0:
06e3 e295 | | Load 0x1,0x95
06e4 00ca | | Action Exit_Nullary_Function
06e5 0000 0000 | | .XXX[0x3]
06e7 0000 | |
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb | | .CONST 0x06eb ; Address of begin
06e9 0004 | | .CONST 0x0004 ; Address of exception handler
06ea 0001 | | .CONST 0x0001 ; Number of locals
06eb BODY_06e8:
06eb INIT_06e8:
06eb e296 | | Load 0x1,0x96
06ec 00ca | | Action Exit_Nullary_Function
06ed 0000 0000 | | .XXX[0x3]
06ef 0000 | |
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3 | | .CONST 0x06f3 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0001 | | .CONST 0x0001 ; Number of locals
06f3 BODY_06f0:
06f3 INIT_06f0:
06f3 e297 | | Load 0x1,0x97
06f4 00ca | | Action Exit_Nullary_Function
06f5 0000 0000 | | .XXX[0x3]
06f7 0000 | |
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb | | .CONST 0x06fb ; Address of begin
06f9 0004 | | .CONST 0x0004 ; Address of exception handler
06fa 0001 | | .CONST 0x0001 ; Number of locals
06fb BODY_06f8:
06fb INIT_06f8:
06fb e298 | | Load 0x1,0x98
06fc 00ca | | Action Exit_Nullary_Function
06fd 0000 0000 | | .XXX[0x3]
06ff 0000 | |
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703 | | .CONST 0x0703 ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0001 | | .CONST 0x0001 ; Number of locals
0703 BODY_0700:
0703 INIT_0700:
0703 00db | | Load_Top At_Offset_3
0704 00db | | Load_Top At_Offset_3
0705 8254 | T | Call 0x1,0x54
0706 4fff |O | Short_Literal 0x7ff
0707 027f | | Execute Discrete,Equal
0708 4402 |D | Exit_Subprogram With_Result,0x2
0709 0000 0000 | | .BLANK 0000[0x7]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713 | | .CONST 0x0713 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0001 | | .CONST 0x0001 ; Number of locals
0713 BODY_0710:
0713 INIT_0710:
0713 00db | | Load_Top At_Offset_3
0714 00db | | Load_Top At_Offset_3
0715 8254 | T | Call 0x1,0x54
0716 0e01 | | Execute_Immediate Not_Equal,0x1
0717 4402 |D | Exit_Subprogram With_Result,0x2
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b | | .CONST 0x071b ; Address of begin
0719 0004 | | .CONST 0x0004 ; Address of exception handler
071a 0001 | | .CONST 0x0001 ; Number of locals
071b BODY_0718:
071b INIT_0718:
071b 00db | | Load_Top At_Offset_3
071c 00db | | Load_Top At_Offset_3
071d 8254 | T | Call 0x1,0x54
071e 0f01 | | Execute_Immediate Equal,0x1
071f 4402 |D | Exit_Subprogram With_Result,0x2
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 INIT_0720:
0723 00db | | Load_Top At_Offset_3
0724 00db | | Load_Top At_Offset_3
0725 8254 | T | Call 0x1,0x54
0726 4fff |O | Short_Literal 0x7ff
0727 027e | ~ | Execute Discrete,Not_Equal
0728 4402 |D | Exit_Subprogram With_Result,0x2
0729 0000 0000 | | .BLANK 0000[0x7]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733 | 3 | .CONST 0x0733 ; Address of begin
0731 0004 | | .CONST 0x0004 ; Address of exception handler
0732 0001 | | .CONST 0x0001 ; Number of locals
0733 BODY_0730:
0733 INIT_0730:
0733 00da | | Load_Top At_Offset_2
0734 02fd | | Declare_Variable Variant_Record,Duplicate
0735 00cd | | Action Spare6_Action
0736 4401 |D | Exit_Subprogram With_Result,0x1
0737 0000 | | .XXX[0x1]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b | ; | .CONST 0x073b ; Address of begin
0739 0004 | | .CONST 0x0004 ; Address of exception handler
073a 0001 | | .CONST 0x0001 ; Number of locals
073b BODY_0738:
073b INIT_0738:
073b 00da | | Load_Top At_Offset_2
073c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
073d 00db | | Load_Top At_Offset_3
073e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
073f 8226 | & | Call 0x1,0x26
0740 82b5 | | Call 0x1,0xb5
0741 4401 |D | Exit_Subprogram With_Result,0x1
0742 0000 0000 | | .BLANK 0000[0x6]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074b | K | .CONST 0x074b ; Address of begin
0749 0004 | | .CONST 0x0004 ; Address of exception handler
074a 0001 | | .CONST 0x0001 ; Number of locals
074b BODY_0748:
074b INIT_0748:
074b 00da | | Load_Top At_Offset_2
074c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
074d 00db | | Load_Top At_Offset_3
074e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
074f 8227 | ' | Call 0x1,0x27
0750 82b5 | | Call 0x1,0xb5
0751 4401 |D | Exit_Subprogram With_Result,0x1
0752 0000 0000 | | .BLANK 0000[0x6]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b | [ | .CONST 0x075b ; Address of begin
0759 0004 | | .CONST 0x0004 ; Address of exception handler
075a 0001 | | .CONST 0x0001 ; Number of locals
075b BODY_0758:
075b INIT_0758:
075b 00db | | Load_Top At_Offset_3
075c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
075d 00db | | Load_Top At_Offset_3
075e 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
075f 822a | * | Call 0x1,0x2a
0760 00db | | Load_Top At_Offset_3
0761 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0762 e5fe | | Load 0x2,-0x2
0763 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0764 822a | * | Call 0x1,0x2a
0765 e5fe | | Load 0x2,-0x2
0766 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0767 e5ff | | Load 0x2,-0x1
0768 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0769 822a | * | Call 0x1,0x2a
076a 8228 | ( | Call 0x1,0x28
076b 829f | | Call 0x1,0x9f
076c 4402 |D | Exit_Subprogram With_Result,0x2
076d 0000 0000 | | .XXX[0x3]
076f 0000 | |
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773 | s | .CONST 0x0773 ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0001 | | .CONST 0x0001 ; Number of locals
0773 BODY_0770:
0773 INIT_0770:
0773 00db | | Load_Top At_Offset_3
0774 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0775 00db | | Load_Top At_Offset_3
0776 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0777 822a | * | Call 0x1,0x2a
0778 00db | | Load_Top At_Offset_3
0779 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
077a e5fe | | Load 0x2,-0x2
077b 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
077c 822a | * | Call 0x1,0x2a
077d e5fe | | Load 0x2,-0x2
077e 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
077f e5ff | | Load 0x2,-0x1
0780 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0781 822a | * | Call 0x1,0x2a
0782 8229 | ) | Call 0x1,0x29
0783 829f | | Call 0x1,0x9f
0784 4402 |D | Exit_Subprogram With_Result,0x2
0785 0000 0000 | | .XXX[0x3]
0787 0000 | |
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b | | .CONST 0x078b ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0001 | | .CONST 0x0001 ; Number of locals
078b BODY_0788:
078b INIT_0788:
078b 00db | | Load_Top At_Offset_3
078c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
078d 00db | | Load_Top At_Offset_3
078e 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
078f 822a | * | Call 0x1,0x2a
0790 e5fe | | Load 0x2,-0x2
0791 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0792 e5ff | | Load 0x2,-0x1
0793 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0794 822a | * | Call 0x1,0x2a
0795 829f | | Call 0x1,0x9f
0796 4402 |D | Exit_Subprogram With_Result,0x2
0797 0000 | | .XXX[0x1]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b | | .CONST 0x079b ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0001 | | .CONST 0x0001 ; Number of locals
079b BODY_0798:
079b INIT_0798:
079b 00db | | Load_Top At_Offset_3
079c 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
079d 00db | | Load_Top At_Offset_3
079e 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
079f 822a | * | Call 0x1,0x2a
07a0 e5fe | | Load 0x2,-0x2
07a1 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07a2 e5ff | | Load 0x2,-0x1
07a3 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07a4 822a | * | Call 0x1,0x2a
07a5 829f | | Call 0x1,0x9f
07a6 4402 |D | Exit_Subprogram With_Result,0x2
07a7 0000 | | .XXX[0x1]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab 00db | | Load_Top At_Offset_3
07ac 7002 |p | Jump_Nonzero 0x7af
07ad e29b | | Load 0x1,0x9b
07ae 4402 |D | Exit_Subprogram With_Result,0x2
07af 00db | | Load_Top At_Offset_3
07b0 0c01 | | Execute_Immediate Greater_Equal,0x1
07b1 6811 |h | Jump_Zero 0x7c3
07b2 00db | | Load_Top At_Offset_3
07b3 0f01 | | Execute_Immediate Equal,0x1
07b4 6804 |h | Jump_Zero 0x7b9
07b5 00da | | Load_Top At_Offset_2
07b6 02fd | | Declare_Variable Variant_Record,Duplicate
07b7 00cd | | Action Spare6_Action
07b8 4402 |D | Exit_Subprogram With_Result,0x2
07b9 00db | | Load_Top At_Offset_3
07ba 00db | | Load_Top At_Offset_3
07bb 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07bc 822e | . | Call 0x1,0x2e
07bd e5fe | | Load 0x2,-0x2
07be e5ff | | Load 0x2,-0x1
07bf 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07c0 822e | . | Call 0x1,0x2e
07c1 829f | | Call 0x1,0x9f
07c2 4402 |D | Exit_Subprogram With_Result,0x2
07c3 00db | | Load_Top At_Offset_3
07c4 4fff |O | Short_Literal 0x7ff
07c5 027f | | Execute Discrete,Equal
07c6 6814 |h | Jump_Zero 0x7db
07c7 4801 |H | Short_Literal 0x1
07c8 00db | | Load_Top At_Offset_3
07c9 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07ca 01d7 | | Execute Vector,Field_Read
07cb 0c01 | | Execute_Immediate Greater_Equal,0x1
07cc 6806 |h | Jump_Zero 0x7d3
07cd 00da | | Load_Top At_Offset_2
07ce 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07cf 00db | | Load_Top At_Offset_3
07d0 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07d1 82b5 | | Call 0x1,0xb5
07d2 4402 |D | Exit_Subprogram With_Result,0x2
07d3 00da | | Load_Top At_Offset_2
07d4 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07d5 8226 | & | Call 0x1,0x26
07d6 00db | | Load_Top At_Offset_3
07d7 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07d8 8226 | & | Call 0x1,0x26
07d9 82b5 | | Call 0x1,0xb5
07da 4402 |D | Exit_Subprogram With_Result,0x2
07db 00db | | Load_Top At_Offset_3
07dc 0275 | u | Execute Discrete,Unary_Minus
07dd 00db | | Load_Top At_Offset_3
07de 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07df 822e | . | Call 0x1,0x2e
07e0 e5fe | | Load 0x2,-0x2
07e1 0275 | u | Execute Discrete,Unary_Minus
07e2 e5ff | | Load 0x2,-0x1
07e3 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07e4 822e | . | Call 0x1,0x2e
07e5 829f | | Call 0x1,0x9f
07e6 4402 |D | Exit_Subprogram With_Result,0x2
07e7 0000 | | .XXX[0x1]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07eb | | .CONST 0x07eb ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0001 | | .CONST 0x0001 ; Number of locals
07eb BODY_07e8:
07eb INIT_07e8:
07eb 00db | | Load_Top At_Offset_3
07ec 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07ed 00db | | Load_Top At_Offset_3
07ee e5fe | | Load 0x2,-0x2
07ef 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
07f0 822a | * | Call 0x1,0x2a
07f1 829f | | Call 0x1,0x9f
07f2 4402 |D | Exit_Subprogram With_Result,0x2
07f3 0000 0000 | | .BLANK 0000[0x5]
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 07fb | | .CONST 0x07fb ; Address of begin
07f9 0004 | | .CONST 0x0004 ; Address of exception handler
07fa 0001 | | .CONST 0x0001 ; Number of locals
07fb BODY_07f8:
07fb INIT_07f8:
07fb 00da | | Load_Top At_Offset_2
07fc 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
07fd e5fe | | Load 0x2,-0x2
07fe e5ff | | Load 0x2,-0x1
07ff 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0800 822a | * | Call 0x1,0x2a
0801 829f | | Call 0x1,0x9f
0802 4402 |D | Exit_Subprogram With_Result,0x2
0803 0000 0000 | | .BLANK 0000[0x5]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080b | | .CONST 0x080b ; Address of begin
0809 0004 | | .CONST 0x0004 ; Address of exception handler
080a 0001 | | .CONST 0x0001 ; Number of locals
080b BODY_0808:
080b INIT_0808:
080b 00db | | Load_Top At_Offset_3
080c 00db | | Load_Top At_Offset_3
080d 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
080e 822a | * | Call 0x1,0x2a
080f 00db | | Load_Top At_Offset_3
0810 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0811 829f | | Call 0x1,0x9f
0812 4402 |D | Exit_Subprogram With_Result,0x2
0813 0000 0000 | | .BLANK 0000[0x5]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081b | | .CONST 0x081b ; Address of begin
0819 0004 | | .CONST 0x0004 ; Address of exception handler
081a 0001 | | .CONST 0x0001 ; Number of locals
081b BODY_0818:
081b INIT_0818:
081b 00db | | Load_Top At_Offset_3
081c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
081d e5fe | | Load 0x2,-0x2
081e 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
081f e5ff | | Load 0x2,-0x1
0820 8230 | 0 | Call 0x1,0x30
0821 829f | | Call 0x1,0x9f
0822 4402 |D | Exit_Subprogram With_Result,0x2
0823 0000 0000 | | .BLANK 0000[0x5]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b | + | .CONST 0x082b ; Address of begin
0829 0004 | | .CONST 0x0004 ; Address of exception handler
082a 0001 | | .CONST 0x0001 ; Number of locals
082b BODY_0828:
082b INIT_0828:
082b 00da | | Load_Top At_Offset_2
082c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
082d e5fe | | Load 0x2,-0x2
082e e5ff | | Load 0x2,-0x1
082f 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0830 8231 | 1 | Call 0x1,0x31
0831 829f | | Call 0x1,0x9f
0832 4402 |D | Exit_Subprogram With_Result,0x2
0833 0000 0000 | | .BLANK 0000[0x5]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 083b | ; | .CONST 0x083b ; Address of begin
0839 0004 | | .CONST 0x0004 ; Address of exception handler
083a 0001 | | .CONST 0x0001 ; Number of locals
083b BODY_0838:
083b INIT_0838:
083b 00da | | Load_Top At_Offset_2
083c 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
083d e5fe | | Load 0x2,-0x2
083e 8230 | 0 | Call 0x1,0x30
083f 00db | | Load_Top At_Offset_3
0840 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0841 829f | | Call 0x1,0x9f
0842 4402 |D | Exit_Subprogram With_Result,0x2
0843 0000 0000 | | .BLANK 0000[0x5]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 084b | K | .CONST 0x084b ; Address of begin
0849 0004 | | .CONST 0x0004 ; Address of exception handler
084a 0001 | | .CONST 0x0001 ; Number of locals
084b BODY_0848:
084b INIT_0848:
084b 00db | | Load_Top At_Offset_3
084c 00db | | Load_Top At_Offset_3
084d 8243 | C | Call 0x1,0x43
084e 6804 |h | Jump_Zero 0x853
084f e5fd | | Load 0x2,-0x3
0850 00db | | Load_Top At_Offset_3
0851 8241 | A | Call 0x1,0x41
0852 4403 |D | Exit_Subprogram With_Result,0x3
0853 4800 |H | Short_Literal 0x0
0854 4403 |D | Exit_Subprogram With_Result,0x3
0855 0000 0000 | | .XXX[0x3]
0857 0000 | |
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b | [ | .CONST 0x085b ; Address of begin
0859 0004 | | .CONST 0x0004 ; Address of exception handler
085a 0001 | | .CONST 0x0001 ; Number of locals
085b BODY_0858:
085b INIT_0858:
085b 00da | | Load_Top At_Offset_2
085c 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
085d 8239 | 9 | Call 0x1,0x39
085e 4401 |D | Exit_Subprogram With_Result,0x1
085f 0000 | | .XXX[0x1]
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 0863 | c | .CONST 0x0863 ; Address of begin
0861 0004 | | .CONST 0x0004 ; Address of exception handler
0862 0001 | | .CONST 0x0001 ; Number of locals
0863 BODY_0860:
0863 INIT_0860:
0863 00da | | Load_Top At_Offset_2
0864 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0865 e5fe | | Load 0x2,-0x2
0866 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0867 822a | * | Call 0x1,0x2a
0868 e5fe | | Load 0x2,-0x2
0869 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
086a e5ff | | Load 0x2,-0x1
086b 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
086c 822a | * | Call 0x1,0x2a
086d 823a | : | Call 0x1,0x3a
086e 4402 |D | Exit_Subprogram With_Result,0x2
086f 0000 | | .XXX[0x1]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873 | s | .CONST 0x0873 ; Address of begin
0871 0004 | | .CONST 0x0004 ; Address of exception handler
0872 0001 | | .CONST 0x0001 ; Number of locals
0873 BODY_0870:
0873 INIT_0870:
0873 00da | | Load_Top At_Offset_2
0874 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0875 0335 | 5 | Declare_Variable Array,Duplicate
0876 00cd | | Action Spare6_Action
0877 4401 |D | Exit_Subprogram With_Result,0x1
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087b | { | .CONST 0x087b ; Address of begin
0879 0004 | | .CONST 0x0004 ; Address of exception handler
087a 0001 | | .CONST 0x0001 ; Number of locals
087b BODY_0878:
087b INIT_0878:
087b 00da | | Load_Top At_Offset_2
087c 8255 | U | Call 0x1,0x55
087d e267 | g | Load 0x1,0x67
087e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
087f 4401 |D | Exit_Subprogram With_Result,0x1
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0883 | | .CONST 0x0883 ; Address of begin
0881 0004 | | .CONST 0x0004 ; Address of exception handler
0882 0001 | | .CONST 0x0001 ; Number of locals
0883 BODY_0880:
0883 INIT_0880:
0883 00da | | Load_Top At_Offset_2
0884 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0885 0335 | 5 | Declare_Variable Array,Duplicate
0886 00cd | | Action Spare6_Action
0887 4401 |D | Exit_Subprogram With_Result,0x1
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b | | .CONST 0x088b ; Address of begin
0889 0004 | | .CONST 0x0004 ; Address of exception handler
088a 0001 | | .CONST 0x0001 ; Number of locals
088b BODY_0888:
088b INIT_0888:
088b 00da | | Load_Top At_Offset_2
088c 8257 | W | Call 0x1,0x57
088d e267 | g | Load 0x1,0x67
088e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
088f 4401 |D | Exit_Subprogram With_Result,0x1
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 0893 | | .CONST 0x0893 ; Address of begin
0891 0004 | | .CONST 0x0004 ; Address of exception handler
0892 0001 | | .CONST 0x0001 ; Number of locals
0893 BODY_0890:
0893 INIT_0890:
0893 e299 | | Load 0x1,0x99
0894 00ca | | Action Exit_Nullary_Function
0895 0000 0000 | | .XXX[0x3]
0897 0000 | |
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 089b | | .CONST 0x089b ; Address of begin
0899 0004 | | .CONST 0x0004 ; Address of exception handler
089a 0001 | | .CONST 0x0001 ; Number of locals
089b BODY_0898:
089b INIT_0898:
089b e29a | | Load 0x1,0x9a
089c 00ca | | Action Exit_Nullary_Function
089d 0000 0000 | | .XXX[0x3]
089f 0000 | |
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a3 | | .CONST 0x08a3 ; Address of begin
08a1 0004 | | .CONST 0x0004 ; Address of exception handler
08a2 0001 | | .CONST 0x0001 ; Number of locals
08a3 BODY_08a0:
08a3 INIT_08a0:
08a3 e29b | | Load 0x1,0x9b
08a4 00ca | | Action Exit_Nullary_Function
08a5 0000 0000 | | .XXX[0x3]
08a7 0000 | |
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08ab | | .CONST 0x08ab ; Address of begin
08a9 0004 | | .CONST 0x0004 ; Address of exception handler
08aa 0001 | | .CONST 0x0001 ; Number of locals
08ab BODY_08a8:
08ab INIT_08a8:
08ab e29c | | Load 0x1,0x9c
08ac 00ca | | Action Exit_Nullary_Function
08ad 0000 0000 | | .XXX[0x3]
08af 0000 | |
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b3 | | .CONST 0x08b3 ; Address of begin
08b1 0004 | | .CONST 0x0004 ; Address of exception handler
08b2 0001 | | .CONST 0x0001 ; Number of locals
08b3 BODY_08b0:
08b3 INIT_08b0:
08b3 e29d | | Load 0x1,0x9d
08b4 00ca | | Action Exit_Nullary_Function
08b5 0000 0000 | | .XXX[0x3]
08b7 0000 | |
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08bb | | .CONST 0x08bb ; Address of begin
08b9 0004 | | .CONST 0x0004 ; Address of exception handler
08ba 0001 | | .CONST 0x0001 ; Number of locals
08bb BODY_08b8:
08bb INIT_08b8:
08bb 4801 |H | Short_Literal 0x1
08bc 00db | | Load_Top At_Offset_3
08bd 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
08be 01d7 | | Execute Vector,Field_Read
08bf 0f01 | | Execute_Immediate Equal,0x1
08c0 6805 |h | Jump_Zero 0x8c6
08c1 00da | | Load_Top At_Offset_2
08c2 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
08c3 01db | | Execute Vector,Length
08c4 0f01 | | Execute_Immediate Equal,0x1
08c5 4401 |D | Exit_Subprogram With_Result,0x1
08c6 4800 |H | Short_Literal 0x0
08c7 4401 |D | Exit_Subprogram With_Result,0x1
08c8 ; --------------------------------------------------------------------------------------
08c8 ; SUBPROGRAM
08c8 ; --------------------------------------------------------------------------------------
08c8 08cb | | .CONST 0x08cb ; Address of begin
08c9 0004 | | .CONST 0x0004 ; Address of exception handler
08ca 0001 | | .CONST 0x0001 ; Number of locals
08cb BODY_08c8:
08cb INIT_08c8:
08cb 4801 |H | Short_Literal 0x1
08cc 00db | | Load_Top At_Offset_3
08cd 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
08ce 01d7 | | Execute Vector,Field_Read
08cf 0274 | t | Execute Discrete,Absolute_Value
08d0 0f01 | | Execute_Immediate Equal,0x1
08d1 6805 |h | Jump_Zero 0x8d7
08d2 00da | | Load_Top At_Offset_2
08d3 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
08d4 01db | | Execute Vector,Length
08d5 0f01 | | Execute_Immediate Equal,0x1
08d6 4401 |D | Exit_Subprogram With_Result,0x1
08d7 4800 |H | Short_Literal 0x0
08d8 4401 |D | Exit_Subprogram With_Result,0x1
08d9 0000 0000 | | .BLANK 0000[0x7]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e3 | | .CONST 0x08e3 ; Address of begin
08e1 0004 | | .CONST 0x0004 ; Address of exception handler
08e2 0001 | | .CONST 0x0001 ; Number of locals
08e3 BODY_08e0:
08e3 INIT_08e0:
08e3 e296 | | Load 0x1,0x96
08e4 00db | | Load_Top At_Offset_3
08e5 8265 | e | Call 0x1,0x65
08e6 82b5 | | Call 0x1,0xb5
08e7 4401 |D | Exit_Subprogram With_Result,0x1
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08eb | | .CONST 0x08eb ; Address of begin
08e9 0004 | | .CONST 0x0004 ; Address of exception handler
08ea 0001 | | .CONST 0x0001 ; Number of locals
08eb BODY_08e8:
08eb INIT_08e8:
08eb 00da | | Load_Top At_Offset_2
08ec 8262 | b | Call 0x1,0x62
08ed 6805 |h | Jump_Zero 0x8f3
08ee 00da | | Load_Top At_Offset_2
08ef 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
08f0 0335 | 5 | Declare_Variable Array,Duplicate
08f1 00cd | | Action Spare6_Action
08f2 4401 |D | Exit_Subprogram With_Result,0x1
08f3 00da | | Load_Top At_Offset_2
08f4 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
08f5 00db | | Load_Top At_Offset_3
08f6 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
08f7 8227 | ' | Call 0x1,0x27
08f8 8221 | ! | Call 0x1,0x21
08f9 6802 |h | Jump_Zero 0x8fc
08fa e295 | | Load 0x1,0x95
08fb 4401 |D | Exit_Subprogram With_Result,0x1
08fc 00da | | Load_Top At_Offset_2
08fd 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
08fe 00db | | Load_Top At_Offset_3
08ff 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0900 822b | + | Call 0x1,0x2b
0901 4401 |D | Exit_Subprogram With_Result,0x1
0902 0000 0000 | | .BLANK 0000[0x6]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090b | | .CONST 0x090b ; Address of begin
0909 0004 | | .CONST 0x0004 ; Address of exception handler
090a 0001 | | .CONST 0x0001 ; Number of locals
090b BODY_0908:
090b INIT_0908:
090b 00da | | Load_Top At_Offset_2
090c 8262 | b | Call 0x1,0x62
090d 6802 |h | Jump_Zero 0x910
090e e299 | | Load 0x1,0x99
090f 4401 |D | Exit_Subprogram With_Result,0x1
0910 00da | | Load_Top At_Offset_2
0911 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0912 00db | | Load_Top At_Offset_3
0913 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0914 e5ff | | Load 0x2,-0x1
0915 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0916 822d | - | Call 0x1,0x2d
0917 829f | | Call 0x1,0x9f
0918 4401 |D | Exit_Subprogram With_Result,0x1
0919 0000 0000 | | .BLANK 0000[0x7]
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0923 | # | .CONST 0x0923 ; Address of begin
0921 0004 | | .CONST 0x0004 ; Address of exception handler
0922 0001 | | .CONST 0x0001 ; Number of locals
0923 BODY_0920:
0923 INIT_0920:
0923 00da | | Load_Top At_Offset_2
0924 00e0 | | Load_Encached Standard_Cache
0925 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0926 4401 |D | Exit_Subprogram With_Result,0x1
0927 0000 | | .XXX[0x1]
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 092b | + | .CONST 0x092b ; Address of begin
0929 0004 | | .CONST 0x0004 ; Address of exception handler
092a 0001 | | .CONST 0x0001 ; Number of locals
092b BODY_0928:
092b INIT_0928:
092b 4607 |F | Jump_Case 0x7
092c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
092d 7806 |x | Jump 0x934 ; case 0x1
092e 7809 |x | Jump 0x938 ; case 0x2
092f 780d |x | Jump 0x93d ; case 0x3
0930 7810 |x | Jump 0x941 ; case 0x4
0931 7811 |x | Jump 0x943 ; case 0x5
0932 7812 |x | Jump 0x945 ; case 0x6
0933 7815 |x | Jump 0x949 ; case 0x7
0934 00da | | Load_Top At_Offset_2
0935 0091 145d | ]| Action Push_String_Extended_Indexed,0x145d ; "QUOTIENT"
0937 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0938 00db | | Load_Top At_Offset_3
0939 00db | | Load_Top At_Offset_3
093a 00e0 | | Load_Encached Standard_Cache
093b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
093c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
093d 00da | | Load_Top At_Offset_2
093e 00e0 | | Load_Encached Standard_Cache
093f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0940 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0941 00db | | Load_Top At_Offset_3
0942 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0943 00db | | Load_Top At_Offset_3
0944 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0945 e293 | | Load 0x1,0x93
0946 00dc | | Load_Top At_Offset_4
0947 0267 | g | Execute Discrete,Predecessor
0948 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0949 e293 | | Load 0x1,0x93
094a 00dc | | Load_Top At_Offset_4
094b 0268 | h | Execute Discrete,Successor
094c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
094d 0000 0000 | | .XXX[0x3]
094f 0000 | |
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953 | S | .CONST 0x0953 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0001 | | .CONST 0x0001 ; Number of locals
0953 BODY_0950:
0953 INIT_0950:
0953 00da | | Load_Top At_Offset_2
0954 e267 | g | Load 0x1,0x67
0955 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0956 4401 |D | Exit_Subprogram With_Result,0x1
0957 0000 | | .XXX[0x1]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 0962 | b | .CONST 0x0962 ; Address of begin
0959 0004 | | .CONST 0x0004 ; Address of exception handler
095a 0002 | | .CONST 0x0002 ; Number of locals
095b INIT_0958:
095b 00db | | Load_Top At_Offset_3
095c 01dc | | Execute Vector,Last
095d 00db | | Load_Top At_Offset_3
095e 01db | | Execute Vector,Length
095f 0272 | r | Execute Discrete,Minus
0960 00e2 | | Load_Encached Integer_Cache
0961 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0962 BODY_0958:
0962 e5fe | | Load 0x2,-0x2
0963 01db | | Execute Vector,Length
0964 0c01 | | Execute_Immediate Greater_Equal,0x1
0965 6820 |h | Jump_Zero 0x986
0966 00db | | Load_Top At_Offset_3
0967 00d9 | | Load_Top At_Offset_1
0968 0a01 | | Execute_Immediate Plus,0x1
0969 00d8 | | Load_Top At_Offset_0
096a 00e2 | | Load_Encached Integer_Cache
096b 0260 | ` | Execute Discrete,In_Type
096c 7001 |p | Jump_Nonzero 0x96e
096d 0801 | | Execute_Immediate Raise,0x1
096e e5fe | | Load 0x2,-0x2
096f 01dc | | Execute Vector,Last
0970 e5fe | | Load 0x2,-0x2
0971 01ce | | Execute Vector,Slice_Write
0972 e5fe | | Load 0x2,-0x2
0973 01dd | | Execute Vector,First
0974 00d9 | | Load_Top At_Offset_1
0975 e220 | | Load 0x1,0x20
0976 035b | [ | Declare_Type Array,Constrained
0977 0337 | 7 | Declare_Variable Array
0978 00d8 | | Load_Top At_Offset_0
0979 01d9 | | Execute Vector,Reverse_Bounds
097a 0263 | c | Execute Discrete,Above_Bound
097b 7005 |p | Jump_Nonzero 0x981
097c 4800 |H | Short_Literal 0x0
097d 00d9 | | Load_Top At_Offset_1
097e e403 | | Load 0x2,0x3
097f 01d6 | | Execute Vector,Field_Write
0980 3ffb |? | Loop_Increasing 0x97c
0981 e5fe | | Load 0x2,-0x2
0982 01dd | | Execute Vector,First
0983 00da | | Load_Top At_Offset_2
0984 e5fe | | Load 0x2,-0x2
0985 01ce | | Execute Vector,Slice_Write
0986 4502 |E | Exit_Subprogram 0x2
0987 0000 | | .XXX[0x1]
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 098b | | .CONST 0x098b ; Address of begin
0989 0004 | | .CONST 0x0004 ; Address of exception handler
098a 0001 | | .CONST 0x0001 ; Number of locals
098b BODY_0988:
098b INIT_0988:
098b 00db | | Load_Top At_Offset_3
098c 01db | | Execute Vector,Length
098d 0c01 | | Execute_Immediate Greater_Equal,0x1
098e 6828 |h( | Jump_Zero 0x9b7
098f 00da | | Load_Top At_Offset_2
0990 e5fe | | Load 0x2,-0x2
0991 01dc | | Execute Vector,Last
0992 e5fe | | Load 0x2,-0x2
0993 01d6 | | Execute Vector,Field_Write
0994 00db | | Load_Top At_Offset_3
0995 e5fe | | Load 0x2,-0x2
0996 01dd | | Execute Vector,First
0997 e5fe | | Load 0x2,-0x2
0998 01dc | | Execute Vector,Last
0999 0aff | | Execute_Immediate Plus,-0x1
099a 00d8 | | Load_Top At_Offset_0
099b 00e2 | | Load_Encached Integer_Cache
099c 0260 | ` | Execute Discrete,In_Type
099d 7001 |p | Jump_Nonzero 0x99f
099e 0801 | | Execute_Immediate Raise,0x1
099f 00d9 | | Load_Top At_Offset_1
09a0 00d9 | | Load_Top At_Offset_1
09a1 e402 | | Load 0x2,0x2
09a2 035b | [ | Declare_Type Array,Constrained
09a3 00db | | Load_Top At_Offset_3
09a4 01cd | | Execute Vector,Slice_Reference
09a5 00d8 | | Load_Top At_Offset_0
09a6 0335 | 5 | Declare_Variable Array,Duplicate
09a7 00cd | | Action Spare6_Action
09a8 00d9 | | Load_Top At_Offset_1
09a9 01d9 | | Execute Vector,Reverse_Bounds
09aa 0263 | c | Execute Discrete,Above_Bound
09ab 7005 |p | Jump_Nonzero 0x9b1
09ac 4800 |H | Short_Literal 0x0
09ad 00d9 | | Load_Top At_Offset_1
09ae e406 | | Load 0x2,0x6
09af 01d6 | | Execute Vector,Field_Write
09b0 3ffb |? | Loop_Increasing 0x9ac
09b1 00cd | | Action Spare6_Action
09b2 00da | | Load_Top At_Offset_2
09b3 00da | | Load_Top At_Offset_2
09b4 e402 | | Load 0x2,0x2
09b5 01ce | | Execute Vector,Slice_Write
09b6 00d3 | | Pop_Control Pop_Count_3
09b7 4502 |E | Exit_Subprogram 0x2
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bb | | .CONST 0x09bb ; Address of begin
09b9 0004 | | .CONST 0x0004 ; Address of exception handler
09ba 0001 | | .CONST 0x0001 ; Number of locals
09bb BODY_09b8:
09bb INIT_09b8:
09bb 4801 |H | Short_Literal 0x1
09bc e5fe | | Load 0x2,-0x2
09bd 01d7 | | Execute Vector,Field_Read
09be 702a |p* | Jump_Nonzero 0x9e9
09bf 4801 |H | Short_Literal 0x1
09c0 a5fd | | Store_Unchecked 0x2,-0x3
09c1 00cf | | Action Mark_Auxiliary
09c2 e5fe | | Load 0x2,-0x2
09c3 01dc | | Execute Vector,Last
09c4 4802 |H | Short_Literal 0x2
09c5 0263 | c | Execute Discrete,Above_Bound
09c6 7020 |p | Jump_Nonzero 0x9e7
09c7 00d8 | | Load_Top At_Offset_0
09c8 e5fe | | Load 0x2,-0x2
09c9 01d7 | | Execute Vector,Field_Read
09ca 681a |h | Jump_Zero 0x9e5
09cb 00d8 | | Load_Top At_Offset_0
09cc e5fe | | Load 0x2,-0x2
09cd 01dc | | Execute Vector,Last
09ce e5fe | | Load 0x2,-0x2
09cf 01cf | | Execute Vector,Slice_Read
09d0 4801 |H | Short_Literal 0x1
09d1 e5fe | | Load 0x2,-0x2
09d2 01dc | | Execute Vector,Last
09d3 00db | | Load_Top At_Offset_3
09d4 0272 | r | Execute Discrete,Minus
09d5 0a01 | | Execute_Immediate Plus,0x1
09d6 00d8 | | Load_Top At_Offset_0
09d7 00e2 | | Load_Encached Integer_Cache
09d8 0260 | ` | Execute Discrete,In_Type
09d9 7001 |p | Jump_Nonzero 0x9db
09da 0801 | | Execute_Immediate Raise,0x1
09db e5fe | | Load 0x2,-0x2
09dc 01ce | | Execute Vector,Slice_Write
09dd e5fe | | Load 0x2,-0x2
09de 01dc | | Execute Vector,Last
09df 00d9 | | Load_Top At_Offset_1
09e0 0272 | r | Execute Discrete,Minus
09e1 0a01 | | Execute_Immediate Plus,0x1
09e2 c5fd | | Store 0x2,-0x3
09e3 00d2 | | Pop_Control Pop_Count_2
09e4 7802 |x | Jump 0x9e7
09e5 00c8 | | Action Pop_Auxiliary_Range
09e6 3fe0 |? | Loop_Increasing 0x9c7
09e7 00ce | | Action Pop_Auxiliary
09e8 7803 |x | Jump 0x9ec
09e9 00db | | Load_Top At_Offset_3
09ea 01dc | | Execute Vector,Last
09eb a5fd | | Store_Unchecked 0x2,-0x3
09ec 00da | | Load_Top At_Offset_2
09ed 6807 |h | Jump_Zero 0x9f5
09ee 4801 |H | Short_Literal 0x1
09ef e5fe | | Load 0x2,-0x2
09f0 01d7 | | Execute Vector,Field_Read
09f1 0275 | u | Execute Discrete,Unary_Minus
09f2 4801 |H | Short_Literal 0x1
09f3 e5fe | | Load 0x2,-0x2
09f4 01d6 | | Execute Vector,Field_Write
09f5 4502 |E | Exit_Subprogram 0x2
09f6 0000 0000 | | .XXX[0x2]
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 09fd | | .CONST 0x09fd ; Address of begin
09f9 0004 | | .CONST 0x0004 ; Address of exception handler
09fa 0002 | | .CONST 0x0002 ; Number of locals
09fb INIT_09f8:
09fb 029f 0f8b | | Declare_Subprogram For_Call,INIT_0f88
09fd BODY_09f8:
09fd 00cf | | Action Mark_Auxiliary
09fe e5ff | | Load 0x2,-0x1
09ff 01d9 | | Execute Vector,Reverse_Bounds
0a00 0263 | c | Execute Discrete,Above_Bound
0a01 700e |p | Jump_Nonzero 0xa10
0a02 00d8 | | Load_Top At_Offset_0
0a03 e5ff | | Load 0x2,-0x1
0a04 01d7 | | Execute Vector,Field_Read
0a05 6808 |h | Jump_Zero 0xa0e
0a06 00d8 | | Load_Top At_Offset_0
0a07 0f01 | | Execute_Immediate Equal,0x1
0a08 6804 |h | Jump_Zero 0xa0d
0a09 e5fe | | Load 0x2,-0x2
0a0a 7002 |p | Jump_Nonzero 0xa0d
0a0b e5ff | | Load 0x2,-0x1
0a0c 4402 |D | Exit_Subprogram With_Result,0x2
0a0d 8402 | | Call 0x2,0x2
0a0e 00c8 | | Action Pop_Auxiliary_Range
0a0f 3ff2 |? | Loop_Increasing 0xa02
0a10 00ce | | Action Pop_Auxiliary
0a11 e295 | | Load 0x1,0x95
0a12 4402 |D | Exit_Subprogram With_Result,0x2
0a13 0000 0000 | | .BLANK 0000[0x5]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a1b | | .CONST 0x0a1b ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0001 | | .CONST 0x0001 ; Number of locals
0a1b BODY_0a18:
0a1b INIT_0a18:
0a1b 00da | | Load_Top At_Offset_2
0a1c 01db | | Execute Vector,Length
0a1d e5fe | | Load 0x2,-0x2
0a1e 01db | | Execute Vector,Length
0a1f e233 | 3 | Load 0x1,0x33
0a20 1c08 | | Execute_Immediate Run_Utility,0x8
0a21 00db | | Load_Top At_Offset_3
0a22 00d9 | | Load_Top At_Offset_1
0a23 00d8 | | Load_Top At_Offset_0
0a24 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0a25 00da | | Load_Top At_Offset_2
0a26 01da | | Execute Vector,Bounds
0a27 00da | | Load_Top At_Offset_2
0a28 01da | | Execute Vector,Bounds
0a29 00da | | Load_Top At_Offset_2
0a2a 027f | | Execute Discrete,Equal
0a2b 7001 |p | Jump_Nonzero 0xa2d
0a2c 08e0 | | Execute_Immediate Raise,0xe0
0a2d 00cd | | Action Spare6_Action
0a2e 027f | | Execute Discrete,Equal
0a2f 7001 |p | Jump_Nonzero 0xa31
0a30 08e0 | | Execute_Immediate Raise,0xe0
0a31 00d2 | | Pop_Control Pop_Count_2
0a32 00d9 | | Load_Top At_Offset_1
0a33 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a34 e5fe | | Load 0x2,-0x2
0a35 00d9 | | Load_Top At_Offset_1
0a36 00d8 | | Load_Top At_Offset_0
0a37 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0a38 00da | | Load_Top At_Offset_2
0a39 01da | | Execute Vector,Bounds
0a3a 00da | | Load_Top At_Offset_2
0a3b 01da | | Execute Vector,Bounds
0a3c 00da | | Load_Top At_Offset_2
0a3d 027f | | Execute Discrete,Equal
0a3e 7001 |p | Jump_Nonzero 0xa40
0a3f 08e0 | | Execute_Immediate Raise,0xe0
0a40 00cd | | Action Spare6_Action
0a41 027f | | Execute Discrete,Equal
0a42 7001 |p | Jump_Nonzero 0xa44
0a43 08e0 | | Execute_Immediate Raise,0xe0
0a44 00d2 | | Pop_Control Pop_Count_2
0a45 00d9 | | Load_Top At_Offset_1
0a46 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0a47 4402 |D | Exit_Subprogram With_Result,0x2
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a5c | \ | .CONST 0x0a5c ; Address of begin
0a49 0004 | | .CONST 0x0004 ; Address of exception handler
0a4a 0004 | | .CONST 0x0004 ; Number of locals
0a4b INIT_0a48:
0a4b 4801 |H | Short_Literal 0x1
0a4c 00db | | Load_Top At_Offset_3
0a4d 01db | | Execute Vector,Length
0a4e 00d8 | | Load_Top At_Offset_0
0a4f 00e2 | | Load_Encached Integer_Cache
0a50 0260 | ` | Execute Discrete,In_Type
0a51 7001 |p | Jump_Nonzero 0xa53
0a52 0801 | | Execute_Immediate Raise,0x1
0a53 e220 | | Load 0x1,0x20
0a54 035b | [ | Declare_Type Array,Constrained
0a55 0337 | 7 | Declare_Variable Array
0a56 00db | | Load_Top At_Offset_3
0a57 00d9 | | Load_Top At_Offset_1
0a58 01d4 | | Execute Vector,Structure_Write
0a59 e21f | | Load 0x1,0x1f
0a5a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a5b 00e5 | | Load_Encached Long_Integer_Cache
0a5c BODY_0a48:
0a5c 4801 |H | Short_Literal 0x1
0a5d 00db | | Load_Top At_Offset_3
0a5e 01d7 | | Execute Vector,Field_Read
0a5f 0274 | t | Execute Discrete,Absolute_Value
0a60 4801 |H | Short_Literal 0x1
0a61 e402 | | Load 0x2,0x2
0a62 01d6 | | Execute Vector,Field_Write
0a63 00da | | Load_Top At_Offset_2
0a64 01db | | Execute Vector,Length
0a65 0c02 | | Execute_Immediate Greater_Equal,0x2
0a66 6807 |h | Jump_Zero 0xa6e
0a67 4802 |H | Short_Literal 0x2
0a68 00db | | Load_Top At_Offset_3
0a69 01d7 | | Execute Vector,Field_Read
0a6a 0274 | t | Execute Discrete,Absolute_Value
0a6b 4802 |H | Short_Literal 0x2
0a6c e402 | | Load 0x2,0x2
0a6d 01d6 | | Execute Vector,Field_Write
0a6e e5fe | | Load 0x2,-0x2
0a6f 0e01 | | Execute_Immediate Not_Equal,0x1
0a70 6819 |h | Jump_Zero 0xa8a
0a71 00cf | | Action Mark_Auxiliary
0a72 00db | | Load_Top At_Offset_3
0a73 01da | | Execute Vector,Bounds
0a74 0264 | d | Execute Discrete,Below_Bound
0a75 7013 |p | Jump_Nonzero 0xa89
0a76 00d8 | | Load_Top At_Offset_0
0a77 e402 | | Load 0x2,0x2
0a78 01d7 | | Execute Vector,Field_Read
0a79 e5fe | | Load 0x2,-0x2
0a7a 0271 | q | Execute Discrete,Times
0a7b e403 | | Load 0x2,0x3
0a7c 0273 | s | Execute Discrete,Plus
0a7d a404 | | Store_Unchecked 0x2,0x4
0a7e 00db | | Load_Top At_Offset_3
0a7f 6010 |` | Indirect_Literal Discrete,0xa90,{0x00000000, 0x80000000}
0a80 026f | o | Execute Discrete,Remainder
0a81 00d9 | | Load_Top At_Offset_1
0a82 e402 | | Load 0x2,0x2
0a83 01d6 | | Execute Vector,Field_Write
0a84 00db | | Load_Top At_Offset_3
0a85 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0a86 c403 | | Store 0x2,0x3
0a87 00c8 | | Action Pop_Auxiliary_Range
0a88 37ed |7 | Loop_Decreasing 0xa76
0a89 00ce | | Action Pop_Auxiliary
0a8a 00da | | Load_Top At_Offset_2
0a8b e220 | | Load 0x1,0x20
0a8c 01c6 | | Execute Vector,Convert_To_Formal
0a8d 4402 |D | Exit_Subprogram With_Result,0x2
0a8e 0000 0000 | | .XXX[0x2]
0a90 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0a94 0000 0000 | | .BLANK 0000[0x4]
0a98 ; --------------------------------------------------------------------------------------
0a98 ; SUBPROGRAM
0a98 ; --------------------------------------------------------------------------------------
0a98 0aa2 | | .CONST 0x0aa2 ; Address of begin
0a99 0004 | | .CONST 0x0004 ; Address of exception handler
0a9a 0004 | | .CONST 0x0004 ; Number of locals
0a9b INIT_0a98:
0a9b e21f | | Load 0x1,0x1f
0a9c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a9d e5fe | | Load 0x2,-0x2
0a9e 0274 | t | Execute Discrete,Absolute_Value
0a9f e21f | | Load 0x1,0x1f
0aa0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0aa1 00e5 | | Load_Encached Long_Integer_Cache
0aa2 BODY_0a98:
0aa2 4801 |H | Short_Literal 0x1
0aa3 e5ff | | Load 0x2,-0x1
0aa4 01d7 | | Execute Vector,Field_Read
0aa5 0274 | t | Execute Discrete,Absolute_Value
0aa6 4801 |H | Short_Literal 0x1
0aa7 e5ff | | Load 0x2,-0x1
0aa8 01d6 | | Execute Vector,Field_Write
0aa9 00d9 | | Load_Top At_Offset_1
0aaa 0e01 | | Execute_Immediate Not_Equal,0x1
0aab 6819 |h | Jump_Zero 0xac5
0aac 00cf | | Action Mark_Auxiliary
0aad e5ff | | Load 0x2,-0x1
0aae 01d9 | | Execute Vector,Reverse_Bounds
0aaf 0263 | c | Execute Discrete,Above_Bound
0ab0 7013 |p | Jump_Nonzero 0xac4
0ab1 e402 | | Load 0x2,0x2
0ab2 091f | | Execute_Immediate Binary_Scale,0x1f
0ab3 00d9 | | Load_Top At_Offset_1
0ab4 e5ff | | Load 0x2,-0x1
0ab5 01d7 | | Execute Vector,Field_Read
0ab6 0273 | s | Execute Discrete,Plus
0ab7 a404 | | Store_Unchecked 0x2,0x4
0ab8 00db | | Load_Top At_Offset_3
0ab9 e403 | | Load 0x2,0x3
0aba 0270 | p | Execute Discrete,Divide
0abb 00d9 | | Load_Top At_Offset_1
0abc e5ff | | Load 0x2,-0x1
0abd 01d6 | | Execute Vector,Field_Write
0abe 00db | | Load_Top At_Offset_3
0abf e403 | | Load 0x2,0x3
0ac0 026f | o | Execute Discrete,Remainder
0ac1 c402 | | Store 0x2,0x2
0ac2 00c8 | | Action Pop_Auxiliary_Range
0ac3 3fed |? | Loop_Increasing 0xab1
0ac4 00ce | | Action Pop_Auxiliary
0ac5 00da | | Load_Top At_Offset_2
0ac6 a5fe | | Store_Unchecked 0x2,-0x2
0ac7 4501 |E | Exit_Subprogram 0x1
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0ae5 | | .CONST 0x0ae5 ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0007 | | .CONST 0x0007 ; Number of locals
0acb INIT_0ac8:
0acb 00da | | Load_Top At_Offset_2
0acc 01db | | Execute Vector,Length
0acd 00e2 | | Load_Encached Integer_Cache
0ace 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0acf e5fe | | Load 0x2,-0x2
0ad0 01db | | Execute Vector,Length
0ad1 00e2 | | Load_Encached Integer_Cache
0ad2 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0ad3 4801 |H | Short_Literal 0x1
0ad4 e5ff | | Load 0x2,-0x1
0ad5 01d7 | | Execute Vector,Field_Read
0ad6 0d00 | | Execute_Immediate Less,0x0
0ad7 00e1 | | Load_Encached Boolean_Cache
0ad8 03f1 | | Declare_Variable Discrete,With_Value
0ad9 00d8 | | Load_Top At_Offset_0
0ada 4801 |H | Short_Literal 0x1
0adb e5fe | | Load 0x2,-0x2
0adc 01d7 | | Execute Vector,Field_Read
0add 0d00 | | Execute_Immediate Less,0x0
0ade 0277 | w | Execute Discrete,Xor
0adf 00e1 | | Load_Encached Boolean_Cache
0ae0 03f1 | | Declare_Variable Discrete,With_Value
0ae1 029f 0fb3 | | Declare_Subprogram For_Call,INIT_0fb0
0ae3 029f 102b | +| Declare_Subprogram For_Call,INIT_1028
0ae5 BODY_0ac8:
0ae5 e402 | | Load 0x2,0x2
0ae6 0f01 | | Execute_Immediate Equal,0x1
0ae7 68c1 |h | Jump_Zero 0xba9
0ae8 e403 | | Load 0x2,0x3
0ae9 0f01 | | Execute_Immediate Equal,0x1
0aea 68be |h | Jump_Zero 0xba9
0aeb e5fd | | Load 0x2,-0x3
0aec 4602 |F | Jump_Case 0x2
0aed 7849 |xI | Jump 0xb37 ; case 0x0
0aee 7881 |x | Jump 0xb70 ; case 0x1
0aef 7800 |x | Jump 0xaf0 ; case 0x2
0af0 4801 |H | Short_Literal 0x1
0af1 4801 |H | Short_Literal 0x1
0af2 e233 | 3 | Load 0x1,0x33
0af3 1c08 | | Execute_Immediate Run_Utility,0x8
0af4 4801 |H | Short_Literal 0x1
0af5 4801 |H | Short_Literal 0x1
0af6 e220 | | Load 0x1,0x20
0af7 035b | [ | Declare_Type Array,Constrained
0af8 0337 | 7 | Declare_Variable Array
0af9 4801 |H | Short_Literal 0x1
0afa e5ff | | Load 0x2,-0x1
0afb 01d7 | | Execute Vector,Field_Read
0afc 4801 |H | Short_Literal 0x1
0afd e5fe | | Load 0x2,-0x2
0afe 01d7 | | Execute Vector,Field_Read
0aff 0270 | p | Execute Discrete,Divide
0b00 4801 |H | Short_Literal 0x1
0b01 00da | | Load_Top At_Offset_2
0b02 01d6 | | Execute Vector,Field_Write
0b03 00d9 | | Load_Top At_Offset_1
0b04 00d8 | | Load_Top At_Offset_0
0b05 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0b06 00da | | Load_Top At_Offset_2
0b07 01da | | Execute Vector,Bounds
0b08 00da | | Load_Top At_Offset_2
0b09 01da | | Execute Vector,Bounds
0b0a 00da | | Load_Top At_Offset_2
0b0b 027f | | Execute Discrete,Equal
0b0c 7001 |p | Jump_Nonzero 0xb0e
0b0d 08e0 | | Execute_Immediate Raise,0xe0
0b0e 00cd | | Action Spare6_Action
0b0f 027f | | Execute Discrete,Equal
0b10 7001 |p | Jump_Nonzero 0xb12
0b11 08e0 | | Execute_Immediate Raise,0xe0
0b12 00d2 | | Pop_Control Pop_Count_2
0b13 00d9 | | Load_Top At_Offset_1
0b14 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b15 4801 |H | Short_Literal 0x1
0b16 4801 |H | Short_Literal 0x1
0b17 e220 | | Load 0x1,0x20
0b18 035b | [ | Declare_Type Array,Constrained
0b19 0337 | 7 | Declare_Variable Array
0b1a 4801 |H | Short_Literal 0x1
0b1b e5ff | | Load 0x2,-0x1
0b1c 01d7 | | Execute Vector,Field_Read
0b1d 4801 |H | Short_Literal 0x1
0b1e e5fe | | Load 0x2,-0x2
0b1f 01d7 | | Execute Vector,Field_Read
0b20 026e | n | Execute Discrete,Modulo
0b21 4801 |H | Short_Literal 0x1
0b22 00da | | Load_Top At_Offset_2
0b23 01d6 | | Execute Vector,Field_Write
0b24 00d9 | | Load_Top At_Offset_1
0b25 00d8 | | Load_Top At_Offset_0
0b26 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0b27 00da | | Load_Top At_Offset_2
0b28 01da | | Execute Vector,Bounds
0b29 00da | | Load_Top At_Offset_2
0b2a 01da | | Execute Vector,Bounds
0b2b 00da | | Load_Top At_Offset_2
0b2c 027f | | Execute Discrete,Equal
0b2d 7001 |p | Jump_Nonzero 0xb2f
0b2e 08e0 | | Execute_Immediate Raise,0xe0
0b2f 00cd | | Action Spare6_Action
0b30 027f | | Execute Discrete,Equal
0b31 7001 |p | Jump_Nonzero 0xb33
0b32 08e0 | | Execute_Immediate Raise,0xe0
0b33 00d2 | | Pop_Control Pop_Count_2
0b34 00d9 | | Load_Top At_Offset_1
0b35 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0b36 4403 |D | Exit_Subprogram With_Result,0x3
0b37 4801 |H | Short_Literal 0x1
0b38 4800 |H | Short_Literal 0x0
0b39 e233 | 3 | Load 0x1,0x33
0b3a 1c08 | | Execute_Immediate Run_Utility,0x8
0b3b 4801 |H | Short_Literal 0x1
0b3c 4801 |H | Short_Literal 0x1
0b3d e220 | | Load 0x1,0x20
0b3e 035b | [ | Declare_Type Array,Constrained
0b3f 0337 | 7 | Declare_Variable Array
0b40 4801 |H | Short_Literal 0x1
0b41 e5ff | | Load 0x2,-0x1
0b42 01d7 | | Execute Vector,Field_Read
0b43 4801 |H | Short_Literal 0x1
0b44 e5fe | | Load 0x2,-0x2
0b45 01d7 | | Execute Vector,Field_Read
0b46 0270 | p | Execute Discrete,Divide
0b47 4801 |H | Short_Literal 0x1
0b48 00da | | Load_Top At_Offset_2
0b49 01d6 | | Execute Vector,Field_Write
0b4a 00d9 | | Load_Top At_Offset_1
0b4b 00d8 | | Load_Top At_Offset_0
0b4c 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0b4d 00da | | Load_Top At_Offset_2
0b4e 01da | | Execute Vector,Bounds
0b4f 00da | | Load_Top At_Offset_2
0b50 01da | | Execute Vector,Bounds
0b51 00da | | Load_Top At_Offset_2
0b52 027f | | Execute Discrete,Equal
0b53 7001 |p | Jump_Nonzero 0xb55
0b54 08e0 | | Execute_Immediate Raise,0xe0
0b55 00cd | | Action Spare6_Action
0b56 027f | | Execute Discrete,Equal
0b57 7001 |p | Jump_Nonzero 0xb59
0b58 08e0 | | Execute_Immediate Raise,0xe0
0b59 00d2 | | Pop_Control Pop_Count_2
0b5a 00d9 | | Load_Top At_Offset_1
0b5b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b5c e294 | | Load 0x1,0x94
0b5d 00d9 | | Load_Top At_Offset_1
0b5e 00d8 | | Load_Top At_Offset_0
0b5f 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0b60 00da | | Load_Top At_Offset_2
0b61 01da | | Execute Vector,Bounds
0b62 00da | | Load_Top At_Offset_2
0b63 01da | | Execute Vector,Bounds
0b64 00da | | Load_Top At_Offset_2
0b65 027f | | Execute Discrete,Equal
0b66 7001 |p | Jump_Nonzero 0xb68
0b67 08e0 | | Execute_Immediate Raise,0xe0
0b68 00cd | | Action Spare6_Action
0b69 027f | | Execute Discrete,Equal
0b6a 7001 |p | Jump_Nonzero 0xb6c
0b6b 08e0 | | Execute_Immediate Raise,0xe0
0b6c 00d2 | | Pop_Control Pop_Count_2
0b6d 00d9 | | Load_Top At_Offset_1
0b6e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0b6f 4403 |D | Exit_Subprogram With_Result,0x3
0b70 4800 |H | Short_Literal 0x0
0b71 4801 |H | Short_Literal 0x1
0b72 e233 | 3 | Load 0x1,0x33
0b73 1c08 | | Execute_Immediate Run_Utility,0x8
0b74 e294 | | Load 0x1,0x94
0b75 00d9 | | Load_Top At_Offset_1
0b76 00d8 | | Load_Top At_Offset_0
0b77 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0b78 00da | | Load_Top At_Offset_2
0b79 01da | | Execute Vector,Bounds
0b7a 00da | | Load_Top At_Offset_2
0b7b 01da | | Execute Vector,Bounds
0b7c 00da | | Load_Top At_Offset_2
0b7d 027f | | Execute Discrete,Equal
0b7e 7001 |p | Jump_Nonzero 0xb80
0b7f 08e0 | | Execute_Immediate Raise,0xe0
0b80 00cd | | Action Spare6_Action
0b81 027f | | Execute Discrete,Equal
0b82 7001 |p | Jump_Nonzero 0xb84
0b83 08e0 | | Execute_Immediate Raise,0xe0
0b84 00d2 | | Pop_Control Pop_Count_2
0b85 00d9 | | Load_Top At_Offset_1
0b86 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b87 4801 |H | Short_Literal 0x1
0b88 4801 |H | Short_Literal 0x1
0b89 e220 | | Load 0x1,0x20
0b8a 035b | [ | Declare_Type Array,Constrained
0b8b 0337 | 7 | Declare_Variable Array
0b8c 4801 |H | Short_Literal 0x1
0b8d e5ff | | Load 0x2,-0x1
0b8e 01d7 | | Execute Vector,Field_Read
0b8f 4801 |H | Short_Literal 0x1
0b90 e5fe | | Load 0x2,-0x2
0b91 01d7 | | Execute Vector,Field_Read
0b92 026f | o | Execute Discrete,Remainder
0b93 4801 |H | Short_Literal 0x1
0b94 00da | | Load_Top At_Offset_2
0b95 01d6 | | Execute Vector,Field_Write
0b96 00d9 | | Load_Top At_Offset_1
0b97 00d8 | | Load_Top At_Offset_0
0b98 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0b99 00da | | Load_Top At_Offset_2
0b9a 01da | | Execute Vector,Bounds
0b9b 00da | | Load_Top At_Offset_2
0b9c 01da | | Execute Vector,Bounds
0b9d 00da | | Load_Top At_Offset_2
0b9e 027f | | Execute Discrete,Equal
0b9f 7001 |p | Jump_Nonzero 0xba1
0ba0 08e0 | | Execute_Immediate Raise,0xe0
0ba1 00cd | | Action Spare6_Action
0ba2 027f | | Execute Discrete,Equal
0ba3 7001 |p | Jump_Nonzero 0xba5
0ba4 08e0 | | Execute_Immediate Raise,0xe0
0ba5 00d2 | | Pop_Control Pop_Count_2
0ba6 00d9 | | Load_Top At_Offset_1
0ba7 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0ba8 4403 |D | Exit_Subprogram With_Result,0x3
0ba9 e403 | | Load 0x2,0x3
0baa 0f01 | | Execute_Immediate Equal,0x1
0bab 6801 |h | Jump_Zero 0xbad
0bac 8406 | | Call 0x2,0x6
0bad 8407 | | Call 0x2,0x7
0bae 0831 | 1 | Execute_Immediate Raise,0x31
0baf 0000 | | .XXX[0x1]
0bb0 ; --------------------------------------------------------------------------------------
0bb0 ; SUBPROGRAM
0bb0 ; --------------------------------------------------------------------------------------
0bb0 0bb3 | | .CONST 0x0bb3 ; Address of begin
0bb1 0004 | | .CONST 0x0004 ; Address of exception handler
0bb2 0001 | | .CONST 0x0001 ; Number of locals
0bb3 BODY_0bb0:
0bb3 INIT_0bb0:
0bb3 00cf | | Action Mark_Auxiliary
0bb4 00db | | Load_Top At_Offset_3
0bb5 01d9 | | Execute Vector,Reverse_Bounds
0bb6 0263 | c | Execute Discrete,Above_Bound
0bb7 7008 |p | Jump_Nonzero 0xbc0
0bb8 00d8 | | Load_Top At_Offset_0
0bb9 e5ff | | Load 0x2,-0x1
0bba 01d7 | | Execute Vector,Field_Read
0bbb 6802 |h | Jump_Zero 0xbbe
0bbc 00d8 | | Load_Top At_Offset_0
0bbd 4401 |D | Exit_Subprogram With_Result,0x1
0bbe 00c8 | | Action Pop_Auxiliary_Range
0bbf 3ff8 |? | Loop_Increasing 0xbb8
0bc0 00ce | | Action Pop_Auxiliary
0bc1 00da | | Load_Top At_Offset_2
0bc2 01dc | | Execute Vector,Last
0bc3 4401 |D | Exit_Subprogram With_Result,0x1
0bc4 0000 0000 | | .BLANK 0000[0x4]
0bc8 ; --------------------------------------------------------------------------------------
0bc8 ; SUBPROGRAM
0bc8 ; --------------------------------------------------------------------------------------
0bc8 0bce | | .CONST 0x0bce ; Address of begin
0bc9 0004 | | .CONST 0x0004 ; Address of exception handler
0bca 0003 | | .CONST 0x0003 ; Number of locals
0bcb INIT_0bc8:
0bcb e21f | | Load 0x1,0x1f
0bcc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0bcd 00e5 | | Load_Encached Long_Integer_Cache
0bce BODY_0bc8:
0bce 00cf | | Action Mark_Auxiliary
0bcf e5fe | | Load 0x2,-0x2
0bd0 01da | | Execute Vector,Bounds
0bd1 0264 | d | Execute Discrete,Below_Bound
0bd2 7013 |p | Jump_Nonzero 0xbe6
0bd3 00d8 | | Load_Top At_Offset_0
0bd4 e5fe | | Load 0x2,-0x2
0bd5 01d7 | | Execute Vector,Field_Read
0bd6 e5ff | | Load 0x2,-0x1
0bd7 0271 | q | Execute Discrete,Times
0bd8 e402 | | Load 0x2,0x2
0bd9 0273 | s | Execute Discrete,Plus
0bda a403 | | Store_Unchecked 0x2,0x3
0bdb 00db | | Load_Top At_Offset_3
0bdc 600b |` | Indirect_Literal Discrete,0xbe8,{0x00000000, 0x80000000}
0bdd 026f | o | Execute Discrete,Remainder
0bde 00d9 | | Load_Top At_Offset_1
0bdf e5fe | | Load 0x2,-0x2
0be0 01d6 | | Execute Vector,Field_Write
0be1 00db | | Load_Top At_Offset_3
0be2 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0be3 c402 | | Store 0x2,0x2
0be4 00c8 | | Action Pop_Auxiliary_Range
0be5 37ed |7 | Loop_Decreasing 0xbd3
0be6 4502 |E | Exit_Subprogram 0x2
0be7 0000 | | .XXX[0x1]
0be8 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0bec 0000 0000 | | .BLANK 0000[0x4]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0c09 | | .CONST 0x0c09 ; Address of begin
0bf1 0004 | | .CONST 0x0004 ; Address of exception handler
0bf2 0006 | | .CONST 0x0006 ; Number of locals
0bf3 INIT_0bf0:
0bf3 e21f | | Load 0x1,0x1f
0bf4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0bf5 e5fe | | Load 0x2,-0x2
0bf6 0274 | t | Execute Discrete,Absolute_Value
0bf7 e21f | | Load 0x1,0x1f
0bf8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0bf9 00e5 | | Load_Encached Long_Integer_Cache
0bfa 4801 |H | Short_Literal 0x1
0bfb e5ff | | Load 0x2,-0x1
0bfc 01db | | Execute Vector,Length
0bfd 00d8 | | Load_Top At_Offset_0
0bfe 00e2 | | Load_Encached Integer_Cache
0bff 0260 | ` | Execute Discrete,In_Type
0c00 7001 |p | Jump_Nonzero 0xc02
0c01 0801 | | Execute_Immediate Raise,0x1
0c02 e220 | | Load 0x1,0x20
0c03 035b | [ | Declare_Type Array,Constrained
0c04 0337 | 7 | Declare_Variable Array
0c05 e5ff | | Load 0x2,-0x1
0c06 00d9 | | Load_Top At_Offset_1
0c07 01d4 | | Execute Vector,Structure_Write
0c08 00e2 | | Load_Encached Integer_Cache
0c09 BODY_0bf0:
0c09 4801 |H | Short_Literal 0x1
0c0a 00da | | Load_Top At_Offset_2
0c0b 01d7 | | Execute Vector,Field_Read
0c0c 0274 | t | Execute Discrete,Absolute_Value
0c0d 4801 |H | Short_Literal 0x1
0c0e 00db | | Load_Top At_Offset_3
0c0f 01d6 | | Execute Vector,Field_Write
0c10 00cf | | Action Mark_Auxiliary
0c11 00da | | Load_Top At_Offset_2
0c12 01d9 | | Execute Vector,Reverse_Bounds
0c13 0263 | c | Execute Discrete,Above_Bound
0c14 7013 |p | Jump_Nonzero 0xc28
0c15 e402 | | Load 0x2,0x2
0c16 091f | | Execute_Immediate Binary_Scale,0x1f
0c17 00d9 | | Load_Top At_Offset_1
0c18 e405 | | Load 0x2,0x5
0c19 01d7 | | Execute Vector,Field_Read
0c1a 0273 | s | Execute Discrete,Plus
0c1b a404 | | Store_Unchecked 0x2,0x4
0c1c e404 | | Load 0x2,0x4
0c1d e403 | | Load 0x2,0x3
0c1e 0270 | p | Execute Discrete,Divide
0c1f 00d9 | | Load_Top At_Offset_1
0c20 e405 | | Load 0x2,0x5
0c21 01d6 | | Execute Vector,Field_Write
0c22 e404 | | Load 0x2,0x4
0c23 e403 | | Load 0x2,0x3
0c24 026f | o | Execute Discrete,Remainder
0c25 c402 | | Store 0x2,0x2
0c26 00c8 | | Action Pop_Auxiliary_Range
0c27 3fed |? | Loop_Increasing 0xc15
0c28 00ce | | Action Pop_Auxiliary
0c29 e5ff | | Load 0x2,-0x1
0c2a 01dd | | Execute Vector,First
0c2b e5ff | | Load 0x2,-0x1
0c2c 01d7 | | Execute Vector,Field_Read
0c2d 0d00 | | Execute_Immediate Less,0x0
0c2e e5fe | | Load 0x2,-0x2
0c2f 0d00 | | Execute_Immediate Less,0x0
0c30 0277 | w | Execute Discrete,Xor
0c31 680a |h | Jump_Zero 0xc3c
0c32 00d9 | | Load_Top At_Offset_1
0c33 82a9 | | Call 0x1,0xa9
0c34 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0c35 00d8 | | Load_Top At_Offset_0
0c36 00da | | Load_Top At_Offset_2
0c37 01d7 | | Execute Vector,Field_Read
0c38 0275 | u | Execute Discrete,Unary_Minus
0c39 00d9 | | Load_Top At_Offset_1
0c3a 00db | | Load_Top At_Offset_3
0c3b 01d6 | | Execute Vector,Field_Write
0c3c e5ff | | Load 0x2,-0x1
0c3d 01dd | | Execute Vector,First
0c3e e5ff | | Load 0x2,-0x1
0c3f 01d7 | | Execute Vector,Field_Read
0c40 0d00 | | Execute_Immediate Less,0x0
0c41 6803 |h | Jump_Zero 0xc45
0c42 e402 | | Load 0x2,0x2
0c43 0275 | u | Execute Discrete,Unary_Minus
0c44 c402 | | Store 0x2,0x2
0c45 e5fd | | Load 0x2,-0x3
0c46 00da | | Load_Top At_Offset_2
0c47 82a1 | | Call 0x1,0xa1
0c48 00d1 | | Pop_Control Pop_Count_1
0c49 e5fc | | Load 0x2,-0x4
0c4a e402 | | Load 0x2,0x2
0c4b 82a2 | | Call 0x1,0xa2
0c4c 4503 |E | Exit_Subprogram 0x3
0c4d 0000 0000 | | .XXX[0x3]
0c4f 0000 | |
0c50 ; --------------------------------------------------------------------------------------
0c50 ; SUBPROGRAM
0c50 ; --------------------------------------------------------------------------------------
0c50 0c7a | z | .CONST 0x0c7a ; Address of begin
0c51 0004 | | .CONST 0x0004 ; Address of exception handler
0c52 0009 | | .CONST 0x0009 ; Number of locals
0c53 INIT_0c50:
0c53 00da | | Load_Top At_Offset_2
0c54 82a9 | | Call 0x1,0xa9
0c55 00e2 | | Load_Encached Integer_Cache
0c56 03f1 | | Declare_Variable Discrete,With_Value
0c57 e5fe | | Load 0x2,-0x2
0c58 82a9 | | Call 0x1,0xa9
0c59 00e2 | | Load_Encached Integer_Cache
0c5a 03f1 | | Declare_Variable Discrete,With_Value
0c5b e5ff | | Load 0x2,-0x1
0c5c 01dc | | Execute Vector,Last
0c5d 00da | | Load_Top At_Offset_2
0c5e 0272 | r | Execute Discrete,Minus
0c5f 0a01 | | Execute_Immediate Plus,0x1
0c60 00e2 | | Load_Encached Integer_Cache
0c61 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0c62 e5fe | | Load 0x2,-0x2
0c63 01dc | | Execute Vector,Last
0c64 00da | | Load_Top At_Offset_2
0c65 0272 | r | Execute Discrete,Minus
0c66 0a01 | | Execute_Immediate Plus,0x1
0c67 00e2 | | Load_Encached Integer_Cache
0c68 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0c69 00db | | Load_Top At_Offset_3
0c6a e5ff | | Load 0x2,-0x1
0c6b 01d7 | | Execute Vector,Field_Read
0c6c 0d00 | | Execute_Immediate Less,0x0
0c6d 00e1 | | Load_Encached Boolean_Cache
0c6e 03f1 | | Declare_Variable Discrete,With_Value
0c6f 00d8 | | Load_Top At_Offset_0
0c70 e403 | | Load 0x2,0x3
0c71 e5fe | | Load 0x2,-0x2
0c72 01d7 | | Execute Vector,Field_Read
0c73 0d00 | | Execute_Immediate Less,0x0
0c74 0277 | w | Execute Discrete,Xor
0c75 00e1 | | Load_Encached Boolean_Cache
0c76 03f1 | | Declare_Variable Discrete,With_Value
0c77 00e5 | | Load_Encached Long_Integer_Cache
0c78 029f 1163 | c| Declare_Subprogram For_Call,INIT_1160
0c7a BODY_0c50:
0c7a e404 | | Load 0x2,0x4
0c7b 0f01 | | Execute_Immediate Equal,0x1
0c7c 6827 |h' | Jump_Zero 0xca4
0c7d e405 | | Load 0x2,0x5
0c7e 0f01 | | Execute_Immediate Equal,0x1
0c7f 6824 |h$ | Jump_Zero 0xca4
0c80 e5fd | | Load 0x2,-0x3
0c81 e402 | | Load 0x2,0x2
0c82 e5ff | | Load 0x2,-0x1
0c83 01d7 | | Execute Vector,Field_Read
0c84 e403 | | Load 0x2,0x3
0c85 e5fe | | Load 0x2,-0x2
0c86 01d7 | | Execute Vector,Field_Read
0c87 0270 | p | Execute Discrete,Divide
0c88 00d8 | | Load_Top At_Offset_0
0c89 e21f | | Load 0x1,0x1f
0c8a 0260 | ` | Execute Discrete,In_Type
0c8b 7001 |p | Jump_Nonzero 0xc8d
0c8c 0801 | | Execute_Immediate Raise,0x1
0c8d 82a2 | | Call 0x1,0xa2
0c8e 00d1 | | Pop_Control Pop_Count_1
0c8f e402 | | Load 0x2,0x2
0c90 e5ff | | Load 0x2,-0x1
0c91 01d7 | | Execute Vector,Field_Read
0c92 e403 | | Load 0x2,0x3
0c93 e5fe | | Load 0x2,-0x2
0c94 01d7 | | Execute Vector,Field_Read
0c95 026f | o | Execute Discrete,Remainder
0c96 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0c97 e5fc | | Load 0x2,-0x4
0c98 00da | | Load_Top At_Offset_2
0c99 00d8 | | Load_Top At_Offset_0
0c9a e21f | | Load 0x1,0x1f
0c9b 0260 | ` | Execute Discrete,In_Type
0c9c 7001 |p | Jump_Nonzero 0xc9e
0c9d 0801 | | Execute_Immediate Raise,0x1
0c9e 82a2 | | Call 0x1,0xa2
0c9f 00d1 | | Pop_Control Pop_Count_1
0ca0 00d9 | | Load_Top At_Offset_1
0ca1 0f00 | | Execute_Immediate Equal,0x0
0ca2 a5fb | | Store_Unchecked 0x2,-0x5
0ca3 4503 |E | Exit_Subprogram 0x3
0ca4 e405 | | Load 0x2,0x5
0ca5 0f01 | | Execute_Immediate Equal,0x1
0ca6 6819 |h | Jump_Zero 0xcc0
0ca7 e5fc | | Load 0x2,-0x4
0ca8 e5fd | | Load 0x2,-0x3
0ca9 e403 | | Load 0x2,0x3
0caa e5fe | | Load 0x2,-0x2
0cab 01d7 | | Execute Vector,Field_Read
0cac e402 | | Load 0x2,0x2
0cad e5ff | | Load 0x2,-0x1
0cae 01dc | | Execute Vector,Last
0caf e5ff | | Load 0x2,-0x1
0cb0 01cf | | Execute Vector,Slice_Read
0cb1 82ab | | Call 0x1,0xab
0cb2 00d2 | | Pop_Control Pop_Count_2
0cb3 e5fc | | Load 0x2,-0x4
0cb4 01db | | Execute Vector,Length
0cb5 0c01 | | Execute_Immediate Greater_Equal,0x1
0cb6 6806 |h | Jump_Zero 0xcbd
0cb7 e5fc | | Load 0x2,-0x4
0cb8 01dc | | Execute Vector,Last
0cb9 e5fc | | Load 0x2,-0x4
0cba 01d7 | | Execute Vector,Field_Read
0cbb 0f00 | | Execute_Immediate Equal,0x0
0cbc 7801 |x | Jump 0xcbe
0cbd 4800 |H | Short_Literal 0x0
0cbe a5fb | | Store_Unchecked 0x2,-0x5
0cbf 4503 |E | Exit_Subprogram 0x3
0cc0 8409 | | Call 0x2,0x9
0cc1 4503 |E | Exit_Subprogram 0x3
0cc2 0000 0000 | | .BLANK 0000[0x6]
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; SUBPROGRAM
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0cde | | .CONST 0x0cde ; Address of begin
0cc9 0004 | | .CONST 0x0004 ; Address of exception handler
0cca 0005 | | .CONST 0x0005 ; Number of locals
0ccb INIT_0cc8:
0ccb 00da | | Load_Top At_Offset_2
0ccc 82a9 | | Call 0x1,0xa9
0ccd 00e2 | | Load_Encached Integer_Cache
0cce 03f1 | | Declare_Variable Discrete,With_Value
0ccf 00d8 | | Load_Top At_Offset_0
0cd0 e5ff | | Load 0x2,-0x1
0cd1 01dc | | Execute Vector,Last
0cd2 0a01 | | Execute_Immediate Plus,0x1
0cd3 00d8 | | Load_Top At_Offset_0
0cd4 00e2 | | Load_Encached Integer_Cache
0cd5 0260 | ` | Execute Discrete,In_Type
0cd6 7001 |p | Jump_Nonzero 0xcd8
0cd7 0801 | | Execute_Immediate Raise,0x1
0cd8 e220 | | Load 0x1,0x20
0cd9 035b | [ | Declare_Type Array,Constrained
0cda 0337 | 7 | Declare_Variable Array
0cdb e21f | | Load 0x1,0x1f
0cdc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cdd 00e5 | | Load_Encached Long_Integer_Cache
0cde BODY_0cc8:
0cde 00cf | | Action Mark_Auxiliary
0cdf e402 | | Load 0x2,0x2
0ce0 e5ff | | Load 0x2,-0x1
0ce1 01dc | | Execute Vector,Last
0ce2 0264 | d | Execute Discrete,Below_Bound
0ce3 7015 |p | Jump_Nonzero 0xcf9
0ce4 00d8 | | Load_Top At_Offset_0
0ce5 e5ff | | Load 0x2,-0x1
0ce6 01d7 | | Execute Vector,Field_Read
0ce7 e5fe | | Load 0x2,-0x2
0ce8 0271 | q | Execute Discrete,Times
0ce9 0274 | t | Execute Discrete,Absolute_Value
0cea e404 | | Load 0x2,0x4
0ceb 0273 | s | Execute Discrete,Plus
0cec a405 | | Store_Unchecked 0x2,0x5
0ced 00db | | Load_Top At_Offset_3
0cee 6025 |`% | Indirect_Literal Discrete,0xd14,{0x00000000, 0x80000000}
0cef 026f | o | Execute Discrete,Remainder
0cf0 00d9 | | Load_Top At_Offset_1
0cf1 0a01 | | Execute_Immediate Plus,0x1
0cf2 e403 | | Load 0x2,0x3
0cf3 01d6 | | Execute Vector,Field_Write
0cf4 00db | | Load_Top At_Offset_3
0cf5 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0cf6 c404 | | Store 0x2,0x4
0cf7 00c8 | | Action Pop_Auxiliary_Range
0cf8 37eb |7 | Loop_Decreasing 0xce4
0cf9 00ce | | Action Pop_Auxiliary
0cfa 00d9 | | Load_Top At_Offset_1
0cfb e402 | | Load 0x2,0x2
0cfc e403 | | Load 0x2,0x3
0cfd 01d6 | | Execute Vector,Field_Write
0cfe 00db | | Load_Top At_Offset_3
0cff e5ff | | Load 0x2,-0x1
0d00 01d7 | | Execute Vector,Field_Read
0d01 0d00 | | Execute_Immediate Less,0x0
0d02 e5fe | | Load 0x2,-0x2
0d03 0d00 | | Execute_Immediate Less,0x0
0d04 0277 | w | Execute Discrete,Xor
0d05 680a |h | Jump_Zero 0xd10
0d06 00da | | Load_Top At_Offset_2
0d07 82a9 | | Call 0x1,0xa9
0d08 a402 | | Store_Unchecked 0x2,0x2
0d09 00db | | Load_Top At_Offset_3
0d0a 00db | | Load_Top At_Offset_3
0d0b 01d7 | | Execute Vector,Field_Read
0d0c 0275 | u | Execute Discrete,Unary_Minus
0d0d e402 | | Load 0x2,0x2
0d0e e403 | | Load 0x2,0x3
0d0f 01d6 | | Execute Vector,Field_Write
0d10 e5fd | | Load 0x2,-0x3
0d11 00db | | Load_Top At_Offset_3
0d12 82a1 | | Call 0x1,0xa1
0d13 4503 |E | Exit_Subprogram 0x3
0d14 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0d18 ; --------------------------------------------------------------------------------------
0d18 ; SUBPROGRAM
0d18 ; --------------------------------------------------------------------------------------
0d18 0d33 | 3 | .CONST 0x0d33 ; Address of begin
0d19 0004 | | .CONST 0x0004 ; Address of exception handler
0d1a 0006 | | .CONST 0x0006 ; Number of locals
0d1b INIT_0d18:
0d1b 00da | | Load_Top At_Offset_2
0d1c 82a9 | | Call 0x1,0xa9
0d1d 00e2 | | Load_Encached Integer_Cache
0d1e 03f1 | | Declare_Variable Discrete,With_Value
0d1f e5fe | | Load 0x2,-0x2
0d20 82a9 | | Call 0x1,0xa9
0d21 00e2 | | Load_Encached Integer_Cache
0d22 03f1 | | Declare_Variable Discrete,With_Value
0d23 e5ff | | Load 0x2,-0x1
0d24 01dc | | Execute Vector,Last
0d25 00da | | Load_Top At_Offset_2
0d26 0272 | r | Execute Discrete,Minus
0d27 0a01 | | Execute_Immediate Plus,0x1
0d28 00e2 | | Load_Encached Integer_Cache
0d29 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0d2a e5fe | | Load 0x2,-0x2
0d2b 01dc | | Execute Vector,Last
0d2c 00da | | Load_Top At_Offset_2
0d2d 0272 | r | Execute Discrete,Minus
0d2e 0a01 | | Execute_Immediate Plus,0x1
0d2f 00e2 | | Load_Encached Integer_Cache
0d30 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0d31 029f 12db | | Declare_Subprogram For_Call,INIT_12d8
0d33 BODY_0d18:
0d33 00da | | Load_Top At_Offset_2
0d34 0f01 | | Execute_Immediate Equal,0x1
0d35 682e |h. | Jump_Zero 0xd64
0d36 e402 | | Load 0x2,0x2
0d37 e5ff | | Load 0x2,-0x1
0d38 01d7 | | Execute Vector,Field_Read
0d39 7005 |p | Jump_Nonzero 0xd3f
0d3a e5fd | | Load 0x2,-0x3
0d3b 4800 |H | Short_Literal 0x0
0d3c 82a2 | | Call 0x1,0xa2
0d3d 00d1 | | Pop_Control Pop_Count_1
0d3e 4503 |E | Exit_Subprogram 0x3
0d3f e402 | | Load 0x2,0x2
0d40 e5ff | | Load 0x2,-0x1
0d41 01d7 | | Execute Vector,Field_Read
0d42 0f01 | | Execute_Immediate Equal,0x1
0d43 6805 |h | Jump_Zero 0xd49
0d44 e5fd | | Load 0x2,-0x3
0d45 e5fe | | Load 0x2,-0x2
0d46 82a1 | | Call 0x1,0xa1
0d47 00d1 | | Pop_Control Pop_Count_1
0d48 4503 |E | Exit_Subprogram 0x3
0d49 00d9 | | Load_Top At_Offset_1
0d4a 0f01 | | Execute_Immediate Equal,0x1
0d4b 680c |h | Jump_Zero 0xd58
0d4c e5fd | | Load 0x2,-0x3
0d4d e402 | | Load 0x2,0x2
0d4e e5ff | | Load 0x2,-0x1
0d4f 01d7 | | Execute Vector,Field_Read
0d50 e403 | | Load 0x2,0x3
0d51 e5fe | | Load 0x2,-0x2
0d52 01d7 | | Execute Vector,Field_Read
0d53 0271 | q | Execute Discrete,Times
0d54 82a0 | | Call 0x1,0xa0
0d55 82a1 | | Call 0x1,0xa1
0d56 00d1 | | Pop_Control Pop_Count_1
0d57 4503 |E | Exit_Subprogram 0x3
0d58 e5fd | | Load 0x2,-0x3
0d59 e402 | | Load 0x2,0x2
0d5a e5ff | | Load 0x2,-0x1
0d5b 01d7 | | Execute Vector,Field_Read
0d5c e403 | | Load 0x2,0x3
0d5d e5fe | | Load 0x2,-0x2
0d5e 01dc | | Execute Vector,Last
0d5f e5fe | | Load 0x2,-0x2
0d60 01cf | | Execute Vector,Slice_Read
0d61 82ad | | Call 0x1,0xad
0d62 00d1 | | Pop_Control Pop_Count_1
0d63 4503 |E | Exit_Subprogram 0x3
0d64 00d9 | | Load_Top At_Offset_1
0d65 0f01 | | Execute_Immediate Equal,0x1
0d66 681f |h | Jump_Zero 0xd86
0d67 00db | | Load_Top At_Offset_3
0d68 e5fe | | Load 0x2,-0x2
0d69 01d7 | | Execute Vector,Field_Read
0d6a 7005 |p | Jump_Nonzero 0xd70
0d6b e5fd | | Load 0x2,-0x3
0d6c 4800 |H | Short_Literal 0x0
0d6d 82a2 | | Call 0x1,0xa2
0d6e 00d1 | | Pop_Control Pop_Count_1
0d6f 4503 |E | Exit_Subprogram 0x3
0d70 00db | | Load_Top At_Offset_3
0d71 e5fe | | Load 0x2,-0x2
0d72 01d7 | | Execute Vector,Field_Read
0d73 0f01 | | Execute_Immediate Equal,0x1
0d74 6805 |h | Jump_Zero 0xd7a
0d75 e5fd | | Load 0x2,-0x3
0d76 e5ff | | Load 0x2,-0x1
0d77 82a1 | | Call 0x1,0xa1
0d78 00d1 | | Pop_Control Pop_Count_1
0d79 4503 |E | Exit_Subprogram 0x3
0d7a e5fd | | Load 0x2,-0x3
0d7b e403 | | Load 0x2,0x3
0d7c e5fe | | Load 0x2,-0x2
0d7d 01d7 | | Execute Vector,Field_Read
0d7e e402 | | Load 0x2,0x2
0d7f e5ff | | Load 0x2,-0x1
0d80 01dc | | Execute Vector,Last
0d81 e5ff | | Load 0x2,-0x1
0d82 01cf | | Execute Vector,Slice_Read
0d83 82ad | | Call 0x1,0xad
0d84 00d1 | | Pop_Control Pop_Count_1
0d85 4503 |E | Exit_Subprogram 0x3
0d86 8406 | | Call 0x2,0x6
0d87 4503 |E | Exit_Subprogram 0x3
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d8d | | .CONST 0x0d8d ; Address of begin
0d89 0004 | | .CONST 0x0004 ; Address of exception handler
0d8a 0002 | | .CONST 0x0002 ; Number of locals
0d8b INIT_0d88:
0d8b 00e2 | | Load_Encached Integer_Cache
0d8c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0d8d BODY_0d88:
0d8d 00cf | | Action Mark_Auxiliary
0d8e 7805 |x | Jump 0xd94
0d8f 00d9 | | Load_Top At_Offset_1
0d90 00da | | Load_Top At_Offset_2
0d91 0273 | s | Execute Discrete,Plus
0d92 005a | Z | Store_Top Discrete,At_Offset_2
0d93 00c9 | | Action Pop_Auxiliary_Loop
0d94 00d9 | | Load_Top At_Offset_1
0d95 e5ff | | Load 0x2,-0x1
0d96 027c | | | Execute Discrete,Less
0d97 77f7 |w | Jump_Nonzero 0xd8f
0d98 00ce | | Action Pop_Auxiliary
0d99 00d8 | | Load_Top At_Offset_0
0d9a 4401 |D | Exit_Subprogram With_Result,0x1
0d9b 0000 0000 | | .BLANK 0000[0x5]
0da0 ; --------------------------------------------------------------------------------------
0da0 ; SUBPROGRAM
0da0 ; --------------------------------------------------------------------------------------
0da0 0dbe | | .CONST 0x0dbe ; Address of begin
0da1 0004 | | .CONST 0x0004 ; Address of exception handler
0da2 0002 | | .CONST 0x0002 ; Number of locals
0da3 INIT_0da0:
0da3 4801 |H | Short_Literal 0x1
0da4 00db | | Load_Top At_Offset_3
0da5 0a1f | | Execute_Immediate Plus,0x1f
0da6 481f |H | Short_Literal 0x1f
0da7 0270 | p | Execute Discrete,Divide
0da8 00d8 | | Load_Top At_Offset_0
0da9 00e2 | | Load_Encached Integer_Cache
0daa 0260 | ` | Execute Discrete,In_Type
0dab 7001 |p | Jump_Nonzero 0xdad
0dac 0801 | | Execute_Immediate Raise,0x1
0dad e220 | | Load 0x1,0x20
0dae 035b | [ | Declare_Type Array,Constrained
0daf 0337 | 7 | Declare_Variable Array
0db0 00d8 | | Load_Top At_Offset_0
0db1 0335 | 5 | Declare_Variable Array,Duplicate
0db2 00cd | | Action Spare6_Action
0db3 00d9 | | Load_Top At_Offset_1
0db4 01d9 | | Execute Vector,Reverse_Bounds
0db5 0263 | c | Execute Discrete,Above_Bound
0db6 7005 |p | Jump_Nonzero 0xdbc
0db7 4800 |H | Short_Literal 0x0
0db8 00d9 | | Load_Top At_Offset_1
0db9 e403 | | Load 0x2,0x3
0dba 01d6 | | Execute Vector,Field_Write
0dbb 3ffb |? | Loop_Increasing 0xdb7
0dbc 00d9 | | Load_Top At_Offset_1
0dbd 01d4 | | Execute Vector,Structure_Write
0dbe BODY_0da0:
0dbe 4802 |H | Short_Literal 0x2
0dbf e5ff | | Load 0x2,-0x1
0dc0 481f |H | Short_Literal 0x1f
0dc1 026e | n | Execute Discrete,Modulo
0dc2 026d | m | Execute Discrete,Exponentiate
0dc3 4801 |H | Short_Literal 0x1
0dc4 00da | | Load_Top At_Offset_2
0dc5 01d6 | | Execute Vector,Field_Write
0dc6 00d8 | | Load_Top At_Offset_0
0dc7 e220 | | Load 0x1,0x20
0dc8 01c6 | | Execute Vector,Convert_To_Formal
0dc9 4401 |D | Exit_Subprogram With_Result,0x1
0dca 0000 0000 | | .BLANK 0000[0x6]
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; SUBPROGRAM
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0de0 | | .CONST 0x0de0 ; Address of begin
0dd1 0004 | | .CONST 0x0004 ; Address of exception handler
0dd2 0004 | | .CONST 0x0004 ; Number of locals
0dd3 INIT_0dd0:
0dd3 00da | | Load_Top At_Offset_2
0dd4 82a9 | | Call 0x1,0xa9
0dd5 00e2 | | Load_Encached Integer_Cache
0dd6 03f1 | | Declare_Variable Discrete,With_Value
0dd7 00db | | Load_Top At_Offset_3
0dd8 01db | | Execute Vector,Length
0dd9 00d9 | | Load_Top At_Offset_1
0dda 0272 | r | Execute Discrete,Minus
0ddb 0a01 | | Execute_Immediate Plus,0x1
0ddc 00e2 | | Load_Encached Integer_Cache
0ddd 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0dde 029f 1353 | S| Declare_Subprogram For_Call,INIT_1350
0de0 BODY_0dd0:
0de0 e5fe | | Load 0x2,-0x2
0de1 0d00 | | Execute_Immediate Less,0x0
0de2 6801 |h | Jump_Zero 0xde4
0de3 08e0 | | Execute_Immediate Raise,0xe0
0de4 e5fe | | Load 0x2,-0x2
0de5 7005 |p | Jump_Nonzero 0xdeb
0de6 e5fd | | Load 0x2,-0x3
0de7 4801 |H | Short_Literal 0x1
0de8 82a2 | | Call 0x1,0xa2
0de9 00d1 | | Pop_Control Pop_Count_1
0dea 4503 |E | Exit_Subprogram 0x3
0deb e5fe | | Load 0x2,-0x2
0dec 6027 |`' | Indirect_Literal Discrete,0xe14,{0x00000000, 0x000014a0}
0ded 027d | } | Execute Discrete,Greater
0dee 6801 |h | Jump_Zero 0xdf0
0def 08e1 | | Execute_Immediate Raise,0xe1
0df0 00d9 | | Load_Top At_Offset_1
0df1 0f01 | | Execute_Immediate Equal,0x1
0df2 6810 |h | Jump_Zero 0xe03
0df3 00da | | Load_Top At_Offset_2
0df4 e5ff | | Load 0x2,-0x1
0df5 01d7 | | Execute Vector,Field_Read
0df6 0f01 | | Execute_Immediate Equal,0x1
0df7 7004 |p | Jump_Nonzero 0xdfc
0df8 00da | | Load_Top At_Offset_2
0df9 e5ff | | Load 0x2,-0x1
0dfa 01d7 | | Execute Vector,Field_Read
0dfb 7007 |p | Jump_Nonzero 0xe03
0dfc e5fd | | Load 0x2,-0x3
0dfd 00db | | Load_Top At_Offset_3
0dfe e5ff | | Load 0x2,-0x1
0dff 01d7 | | Execute Vector,Field_Read
0e00 82a2 | | Call 0x1,0xa2
0e01 00d1 | | Pop_Control Pop_Count_1
0e02 4503 |E | Exit_Subprogram 0x3
0e03 00d9 | | Load_Top At_Offset_1
0e04 0f01 | | Execute_Immediate Equal,0x1
0e05 680b |h | Jump_Zero 0xe11
0e06 00da | | Load_Top At_Offset_2
0e07 e5ff | | Load 0x2,-0x1
0e08 01d7 | | Execute Vector,Field_Read
0e09 0f02 | | Execute_Immediate Equal,0x2
0e0a 6806 |h | Jump_Zero 0xe11
0e0b e5fd | | Load 0x2,-0x3
0e0c e5fe | | Load 0x2,-0x2
0e0d 82b0 | | Call 0x1,0xb0
0e0e 82a1 | | Call 0x1,0xa1
0e0f 00d1 | | Pop_Control Pop_Count_1
0e10 4503 |E | Exit_Subprogram 0x3
0e11 8404 | | Call 0x2,0x4
0e12 4503 |E | Exit_Subprogram 0x3
0e13 0000 | | .XXX[0x1]
0e14 0000 0000 | | .LITERAL {0x00000000, 0x000014a0}
0e18 ; --------------------------------------------------------------------------------------
0e18 ; SUBPROGRAM
0e18 ; --------------------------------------------------------------------------------------
0e18 0e1b | | .CONST 0x0e1b ; Address of begin
0e19 0004 | | .CONST 0x0004 ; Address of exception handler
0e1a 0001 | | .CONST 0x0001 ; Number of locals
0e1b BODY_0e18:
0e1b INIT_0e18:
0e1b 00da | | Load_Top At_Offset_2
0e1c e5fe | | Load 0x2,-0x2
0e1d 027d | } | Execute Discrete,Greater
0e1e 6802 |h | Jump_Zero 0xe21
0e1f 00da | | Load_Top At_Offset_2
0e20 4402 |D | Exit_Subprogram With_Result,0x2
0e21 00db | | Load_Top At_Offset_3
0e22 4402 |D | Exit_Subprogram With_Result,0x2
0e23 0000 0000 | | .BLANK 0000[0x5]
0e28 ; --------------------------------------------------------------------------------------
0e28 ; SUBPROGRAM
0e28 ; --------------------------------------------------------------------------------------
0e28 0e36 | 6 | .CONST 0x0e36 ; Address of begin
0e29 0004 | | .CONST 0x0004 ; Address of exception handler
0e2a 0004 | | .CONST 0x0004 ; Number of locals
0e2b INIT_0e28:
0e2b e5fd | | Load 0x2,-0x3
0e2c 01da | | Execute Vector,Bounds
0e2d e220 | | Load 0x1,0x20
0e2e 035b | [ | Declare_Type Array,Constrained
0e2f 0337 | 7 | Declare_Variable Array
0e30 e5fd | | Load 0x2,-0x3
0e31 01da | | Execute Vector,Bounds
0e32 e220 | | Load 0x1,0x20
0e33 035b | [ | Declare_Type Array,Constrained
0e34 0337 | 7 | Declare_Variable Array
0e35 00e1 | | Load_Encached Boolean_Cache
0e36 BODY_0e28:
0e36 00d9 | | Load_Top At_Offset_1
0e37 e5ff | | Load 0x2,-0x1
0e38 8227 | ' | Call 0x1,0x27
0e39 82a1 | | Call 0x1,0xa1
0e3a 00d1 | | Pop_Control Pop_Count_1
0e3b e5fd | | Load 0x2,-0x3
0e3c e5fe | | Load 0x2,-0x2
0e3d 8227 | ' | Call 0x1,0x27
0e3e 82a1 | | Call 0x1,0xa1
0e3f 00d1 | | Pop_Control Pop_Count_1
0e40 00cf | | Action Mark_Auxiliary
0e41 00e1 | | Load_Encached Boolean_Cache
0e42 e402 | | Load 0x2,0x2
0e43 e294 | | Load 0x1,0x94
0e44 e5fd | | Load 0x2,-0x3
0e45 e403 | | Load 0x2,0x3
0e46 82ac | | Call 0x1,0xac
0e47 00d2 | | Pop_Control Pop_Count_2
0e48 005a | Z | Store_Top Discrete,At_Offset_2
0e49 00d9 | | Load_Top At_Offset_1
0e4a 7008 |p | Jump_Nonzero 0xe53
0e4b e5fd | | Load 0x2,-0x3
0e4c 00db | | Load_Top At_Offset_3
0e4d 01d4 | | Execute Vector,Structure_Write
0e4e 00db | | Load_Top At_Offset_3
0e4f e5fd | | Load 0x2,-0x3
0e50 01d4 | | Execute Vector,Structure_Write
0e51 00c9 | | Action Pop_Auxiliary_Loop
0e52 7fee | | Jump 0xe41
0e53 4503 |E | Exit_Subprogram 0x3
0e54 0000 0000 | | .BLANK 0000[0x4]
0e58 ; --------------------------------------------------------------------------------------
0e58 ; SUBPROGRAM
0e58 ; --------------------------------------------------------------------------------------
0e58 0e5b | [ | .CONST 0x0e5b ; Address of begin
0e59 0004 | | .CONST 0x0004 ; Address of exception handler
0e5a 0001 | | .CONST 0x0001 ; Number of locals
0e5b BODY_0e58:
0e5b INIT_0e58:
0e5b 00da | | Load_Top At_Offset_2
0e5c 00d8 | | Load_Top At_Offset_0
0e5d 600e |` | Indirect_Literal Discrete,0xe6c,{0x80000000, 0x00000000}
0e5e 4fff |O | Short_Literal 0x7ff
0e5f 0262 | b | Execute Discrete,In_Range
0e60 7003 |p | Jump_Nonzero 0xe64
0e61 6805 |h | Jump_Zero 0xe67
0e62 4801 |H | Short_Literal 0x1
0e63 4401 |D | Exit_Subprogram With_Result,0x1
0e64 00d1 | | Pop_Control Pop_Count_1
0e65 4fff |O | Short_Literal 0x7ff
0e66 4401 |D | Exit_Subprogram With_Result,0x1
0e67 4800 |H | Short_Literal 0x0
0e68 4401 |D | Exit_Subprogram With_Result,0x1
0e69 0000 0000 | | .XXX[0x3]
0e6b 0000 | |
0e6c 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
0e70 ; --------------------------------------------------------------------------------------
0e70 ; SUBPROGRAM
0e70 ; --------------------------------------------------------------------------------------
0e70 0e73 | s | .CONST 0x0e73 ; Address of begin
0e71 0004 | | .CONST 0x0004 ; Address of exception handler
0e72 0001 | | .CONST 0x0001 ; Number of locals
0e73 BODY_0e70:
0e73 INIT_0e70:
0e73 00da | | Load_Top At_Offset_2
0e74 01db | | Execute Vector,Length
0e75 e5fe | | Load 0x2,-0x2
0e76 01db | | Execute Vector,Length
0e77 e23f | ? | Load 0x1,0x3f
0e78 1c08 | | Execute_Immediate Run_Utility,0x8
0e79 00db | | Load_Top At_Offset_3
0e7a 00d9 | | Load_Top At_Offset_1
0e7b 00d8 | | Load_Top At_Offset_0
0e7c 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0e7d 00da | | Load_Top At_Offset_2
0e7e 01da | | Execute Vector,Bounds
0e7f 00da | | Load_Top At_Offset_2
0e80 01da | | Execute Vector,Bounds
0e81 00da | | Load_Top At_Offset_2
0e82 027f | | Execute Discrete,Equal
0e83 7001 |p | Jump_Nonzero 0xe85
0e84 08e0 | | Execute_Immediate Raise,0xe0
0e85 00cd | | Action Spare6_Action
0e86 027f | | Execute Discrete,Equal
0e87 7001 |p | Jump_Nonzero 0xe89
0e88 08e0 | | Execute_Immediate Raise,0xe0
0e89 00d2 | | Pop_Control Pop_Count_2
0e8a 00d9 | | Load_Top At_Offset_1
0e8b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0e8c e5fe | | Load 0x2,-0x2
0e8d 00d9 | | Load_Top At_Offset_1
0e8e 00d8 | | Load_Top At_Offset_0
0e8f 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
0e90 00da | | Load_Top At_Offset_2
0e91 01da | | Execute Vector,Bounds
0e92 00da | | Load_Top At_Offset_2
0e93 01da | | Execute Vector,Bounds
0e94 00da | | Load_Top At_Offset_2
0e95 027f | | Execute Discrete,Equal
0e96 7001 |p | Jump_Nonzero 0xe98
0e97 08e0 | | Execute_Immediate Raise,0xe0
0e98 00cd | | Action Spare6_Action
0e99 027f | | Execute Discrete,Equal
0e9a 7001 |p | Jump_Nonzero 0xe9c
0e9b 08e0 | | Execute_Immediate Raise,0xe0
0e9c 00d2 | | Pop_Control Pop_Count_2
0e9d 00d9 | | Load_Top At_Offset_1
0e9e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0e9f 4402 |D | Exit_Subprogram With_Result,0x2
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ead | | .CONST 0x0ead ; Address of begin
0ea1 0004 | | .CONST 0x0004 ; Address of exception handler
0ea2 0003 | | .CONST 0x0003 ; Number of locals
0ea3 INIT_0ea0:
0ea3 4801 |H | Short_Literal 0x1
0ea4 e402 | | Load 0x2,0x2
0ea5 e220 | | Load 0x1,0x20
0ea6 035b | [ | Declare_Type Array,Constrained
0ea7 0337 | 7 | Declare_Variable Array
0ea8 4801 |H | Short_Literal 0x1
0ea9 e402 | | Load 0x2,0x2
0eaa e220 | | Load 0x1,0x20
0eab 035b | [ | Declare_Type Array,Constrained
0eac 0337 | 7 | Declare_Variable Array
0ead BODY_0ea0:
0ead 4801 |H | Short_Literal 0x1
0eae e5ff | | Load 0x2,-0x1
0eaf 01d7 | | Execute Vector,Field_Read
0eb0 0d00 | | Execute_Immediate Less,0x0
0eb1 a407 | | Store_Unchecked 0x2,0x7
0eb2 4801 |H | Short_Literal 0x1
0eb3 e5fe | | Load 0x2,-0x2
0eb4 01d7 | | Execute Vector,Field_Read
0eb5 0d00 | | Execute_Immediate Less,0x0
0eb6 a408 | | Store_Unchecked 0x2,0x8
0eb7 4801 |H | Short_Literal 0x1
0eb8 e5ff | | Load 0x2,-0x1
0eb9 01d7 | | Execute Vector,Field_Read
0eba 0274 | t | Execute Discrete,Absolute_Value
0ebb 4801 |H | Short_Literal 0x1
0ebc e402 | | Load 0x2,0x2
0ebd e405 | | Load 0x2,0x5
0ebe 0272 | r | Execute Discrete,Minus
0ebf e220 | | Load 0x1,0x20
0ec0 035b | [ | Declare_Type Array,Constrained
0ec1 0337 | 7 | Declare_Variable Array
0ec2 00d8 | | Load_Top At_Offset_0
0ec3 01dc | | Execute Vector,Last
0ec4 4801 |H | Short_Literal 0x1
0ec5 0263 | c | Execute Discrete,Above_Bound
0ec6 7005 |p | Jump_Nonzero 0xecc
0ec7 4800 |H | Short_Literal 0x0
0ec8 00d9 | | Load_Top At_Offset_1
0ec9 e605 | | Load 0x3,0x5
0eca 01d6 | | Execute Vector,Field_Write
0ecb 3ffb |? | Loop_Increasing 0xec7
0ecc 01cb | | Execute Vector,Append
0ecd 4802 |H | Short_Literal 0x2
0ece e405 | | Load 0x2,0x5
0ecf e5ff | | Load 0x2,-0x1
0ed0 01cf | | Execute Vector,Slice_Read
0ed1 01cc | | Execute Vector,Catenate
0ed2 00da | | Load_Top At_Offset_2
0ed3 01d4 | | Execute Vector,Structure_Write
0ed4 4801 |H | Short_Literal 0x1
0ed5 e5fe | | Load 0x2,-0x2
0ed6 01d7 | | Execute Vector,Field_Read
0ed7 0274 | t | Execute Discrete,Absolute_Value
0ed8 4801 |H | Short_Literal 0x1
0ed9 e402 | | Load 0x2,0x2
0eda e406 | | Load 0x2,0x6
0edb 0272 | r | Execute Discrete,Minus
0edc e220 | | Load 0x1,0x20
0edd 035b | [ | Declare_Type Array,Constrained
0ede 0337 | 7 | Declare_Variable Array
0edf 00d8 | | Load_Top At_Offset_0
0ee0 01dc | | Execute Vector,Last
0ee1 4801 |H | Short_Literal 0x1
0ee2 0263 | c | Execute Discrete,Above_Bound
0ee3 7005 |p | Jump_Nonzero 0xee9
0ee4 4800 |H | Short_Literal 0x0
0ee5 00d9 | | Load_Top At_Offset_1
0ee6 e605 | | Load 0x3,0x5
0ee7 01d6 | | Execute Vector,Field_Write
0ee8 3ffb |? | Loop_Increasing 0xee4
0ee9 01cb | | Execute Vector,Append
0eea 4802 |H | Short_Literal 0x2
0eeb e406 | | Load 0x2,0x6
0eec e5fe | | Load 0x2,-0x2
0eed 01cf | | Execute Vector,Slice_Read
0eee 01cc | | Execute Vector,Catenate
0eef 00d9 | | Load_Top At_Offset_1
0ef0 01d4 | | Execute Vector,Structure_Write
0ef1 e407 | | Load 0x2,0x7
0ef2 e408 | | Load 0x2,0x8
0ef3 027f | | Execute Discrete,Equal
0ef4 682c |h, | Jump_Zero 0xf21
0ef5 4800 |H | Short_Literal 0x0
0ef6 a403 | | Store_Unchecked 0x2,0x3
0ef7 00cf | | Action Mark_Auxiliary
0ef8 4801 |H | Short_Literal 0x1
0ef9 e402 | | Load 0x2,0x2
0efa 0264 | d | Execute Discrete,Below_Bound
0efb 701d |p | Jump_Nonzero 0xf19
0efc 00d8 | | Load_Top At_Offset_0
0efd e602 | | Load 0x3,0x2
0efe 01d7 | | Execute Vector,Field_Read
0eff 00d9 | | Load_Top At_Offset_1
0f00 e603 | | Load 0x3,0x3
0f01 01d7 | | Execute Vector,Field_Read
0f02 0273 | s | Execute Discrete,Plus
0f03 e403 | | Load 0x2,0x3
0f04 0273 | s | Execute Discrete,Plus
0f05 a404 | | Store_Unchecked 0x2,0x4
0f06 e404 | | Load 0x2,0x4
0f07 6078 |`x | Indirect_Literal Discrete,0xf80,{0x00000000, 0x80000000}
0f08 027b | { | Execute Discrete,Greater_Equal
0f09 6807 |h | Jump_Zero 0xf11
0f0a e404 | | Load 0x2,0x4
0f0b 6070 |`p | Indirect_Literal Discrete,0xf7c,{0xffffffff, 0x80000000}
0f0c 0273 | s | Execute Discrete,Plus
0f0d a404 | | Store_Unchecked 0x2,0x4
0f0e 4801 |H | Short_Literal 0x1
0f0f a403 | | Store_Unchecked 0x2,0x3
0f10 7802 |x | Jump 0xf13
0f11 4800 |H | Short_Literal 0x0
0f12 a403 | | Store_Unchecked 0x2,0x3
0f13 e404 | | Load 0x2,0x4
0f14 00d9 | | Load_Top At_Offset_1
0f15 e602 | | Load 0x3,0x2
0f16 01d6 | | Execute Vector,Field_Write
0f17 00c8 | | Action Pop_Auxiliary_Range
0f18 37e3 |7 | Loop_Decreasing 0xefc
0f19 00ce | | Action Pop_Auxiliary
0f1a e407 | | Load 0x2,0x7
0f1b 00da | | Load_Top At_Offset_2
0f1c 82a4 | | Call 0x1,0xa4
0f1d e220 | | Load 0x1,0x20
0f1e 01c6 | | Execute Vector,Convert_To_Formal
0f1f 00cb | | Action Pop_Block_With_Result
0f20 4402 |D | Exit_Subprogram With_Result,0x2
0f21 4800 |H | Short_Literal 0x0
0f22 a403 | | Store_Unchecked 0x2,0x3
0f23 00cf | | Action Mark_Auxiliary
0f24 4801 |H | Short_Literal 0x1
0f25 e402 | | Load 0x2,0x2
0f26 0264 | d | Execute Discrete,Below_Bound
0f27 701c |p | Jump_Nonzero 0xf44
0f28 00d8 | | Load_Top At_Offset_0
0f29 e602 | | Load 0x3,0x2
0f2a 01d7 | | Execute Vector,Field_Read
0f2b 00d9 | | Load_Top At_Offset_1
0f2c e603 | | Load 0x3,0x3
0f2d 01d7 | | Execute Vector,Field_Read
0f2e 0272 | r | Execute Discrete,Minus
0f2f e403 | | Load 0x2,0x3
0f30 0273 | s | Execute Discrete,Plus
0f31 a404 | | Store_Unchecked 0x2,0x4
0f32 e404 | | Load 0x2,0x4
0f33 0d00 | | Execute_Immediate Less,0x0
0f34 6807 |h | Jump_Zero 0xf3c
0f35 e404 | | Load 0x2,0x4
0f36 6049 |`I | Indirect_Literal Discrete,0xf80,{0x00000000, 0x80000000}
0f37 0273 | s | Execute Discrete,Plus
0f38 a404 | | Store_Unchecked 0x2,0x4
0f39 4fff |O | Short_Literal 0x7ff
0f3a a403 | | Store_Unchecked 0x2,0x3
0f3b 7802 |x | Jump 0xf3e
0f3c 4800 |H | Short_Literal 0x0
0f3d a403 | | Store_Unchecked 0x2,0x3
0f3e e404 | | Load 0x2,0x4
0f3f 00d9 | | Load_Top At_Offset_1
0f40 e602 | | Load 0x3,0x2
0f41 01d6 | | Execute Vector,Field_Write
0f42 00c8 | | Action Pop_Auxiliary_Range
0f43 37e4 |7 | Loop_Decreasing 0xf28
0f44 00ce | | Action Pop_Auxiliary
0f45 e403 | | Load 0x2,0x3
0f46 7007 |p | Jump_Nonzero 0xf4e
0f47 e407 | | Load 0x2,0x7
0f48 00da | | Load_Top At_Offset_2
0f49 82a4 | | Call 0x1,0xa4
0f4a e220 | | Load 0x1,0x20
0f4b 01c6 | | Execute Vector,Convert_To_Formal
0f4c 00cb | | Action Pop_Block_With_Result
0f4d 4402 |D | Exit_Subprogram With_Result,0x2
0f4e 4801 |H | Short_Literal 0x1
0f4f a403 | | Store_Unchecked 0x2,0x3
0f50 00cf | | Action Mark_Auxiliary
0f51 4801 |H | Short_Literal 0x1
0f52 e402 | | Load 0x2,0x2
0f53 0264 | d | Execute Discrete,Below_Bound
0f54 7019 |p | Jump_Nonzero 0xf6e
0f55 6022 |`" | Indirect_Literal Discrete,0xf78,{0x00000000, 0x7fffffff}
0f56 00d9 | | Load_Top At_Offset_1
0f57 e602 | | Load 0x3,0x2
0f58 01d7 | | Execute Vector,Field_Read
0f59 0272 | r | Execute Discrete,Minus
0f5a e403 | | Load 0x2,0x3
0f5b 0273 | s | Execute Discrete,Plus
0f5c a404 | | Store_Unchecked 0x2,0x4
0f5d e404 | | Load 0x2,0x4
0f5e 6021 |`! | Indirect_Literal Discrete,0xf80,{0x00000000, 0x80000000}
0f5f 027f | | Execute Discrete,Equal
0f60 6805 |h | Jump_Zero 0xf66
0f61 4800 |H | Short_Literal 0x0
0f62 a404 | | Store_Unchecked 0x2,0x4
0f63 4801 |H | Short_Literal 0x1
0f64 a403 | | Store_Unchecked 0x2,0x3
0f65 7802 |x | Jump 0xf68
0f66 4800 |H | Short_Literal 0x0
0f67 a403 | | Store_Unchecked 0x2,0x3
0f68 e404 | | Load 0x2,0x4
0f69 00d9 | | Load_Top At_Offset_1
0f6a e602 | | Load 0x3,0x2
0f6b 01d6 | | Execute Vector,Field_Write
0f6c 00c8 | | Action Pop_Auxiliary_Range
0f6d 37e7 |7 | Loop_Decreasing 0xf55
0f6e 00ce | | Action Pop_Auxiliary
0f6f e408 | | Load 0x2,0x8
0f70 00da | | Load_Top At_Offset_2
0f71 82a4 | | Call 0x1,0xa4
0f72 e220 | | Load 0x1,0x20
0f73 01c6 | | Execute Vector,Convert_To_Formal
0f74 00cb | | Action Pop_Block_With_Result
0f75 4402 |D | Exit_Subprogram With_Result,0x2
0f76 0000 0000 | | .XXX[0x2]
0f78 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0f7c ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
0f80 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0f84 0000 0000 | | .BLANK 0000[0x4]
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0fa0 | | .CONST 0x0fa0 ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0002 | | .CONST 0x0002 ; Number of locals
0f8b INIT_0f88:
0f8b 4801 |H | Short_Literal 0x1
0f8c e5ff | | Load 0x2,-0x1
0f8d 01dc | | Execute Vector,Last
0f8e e405 | | Load 0x2,0x5
0f8f 0272 | r | Execute Discrete,Minus
0f90 0a01 | | Execute_Immediate Plus,0x1
0f91 00d8 | | Load_Top At_Offset_0
0f92 00e2 | | Load_Encached Integer_Cache
0f93 0260 | ` | Execute Discrete,In_Type
0f94 7001 |p | Jump_Nonzero 0xf96
0f95 0801 | | Execute_Immediate Raise,0x1
0f96 e220 | | Load 0x1,0x20
0f97 035b | [ | Declare_Type Array,Constrained
0f98 0337 | 7 | Declare_Variable Array
0f99 e405 | | Load 0x2,0x5
0f9a e5ff | | Load 0x2,-0x1
0f9b 01dc | | Execute Vector,Last
0f9c e5ff | | Load 0x2,-0x1
0f9d 01cf | | Execute Vector,Slice_Read
0f9e 00d9 | | Load_Top At_Offset_1
0f9f 01d4 | | Execute Vector,Structure_Write
0fa0 BODY_0f88:
0fa0 e5fe | | Load 0x2,-0x2
0fa1 6807 |h | Jump_Zero 0xfa9
0fa2 4801 |H | Short_Literal 0x1
0fa3 00d9 | | Load_Top At_Offset_1
0fa4 01d7 | | Execute Vector,Field_Read
0fa5 0275 | u | Execute Discrete,Unary_Minus
0fa6 4801 |H | Short_Literal 0x1
0fa7 00da | | Load_Top At_Offset_2
0fa8 01d6 | | Execute Vector,Field_Write
0fa9 00d8 | | Load_Top At_Offset_0
0faa e220 | | Load 0x1,0x20
0fab 01c6 | | Execute Vector,Convert_To_Formal
0fac 00cb | | Action Pop_Block_With_Result
0fad 4402 |D | Exit_Subprogram With_Result,0x2
0fae 0000 0000 | | .XXX[0x2]
0fb0 ; --------------------------------------------------------------------------------------
0fb0 ; SUBPROGRAM
0fb0 ; --------------------------------------------------------------------------------------
0fb0 0fc7 | | .CONST 0x0fc7 ; Address of begin
0fb1 0004 | | .CONST 0x0004 ; Address of exception handler
0fb2 0004 | | .CONST 0x0004 ; Number of locals
0fb3 INIT_0fb0:
0fb3 e5ff | | Load 0x2,-0x1
0fb4 01da | | Execute Vector,Bounds
0fb5 e220 | | Load 0x1,0x20
0fb6 035b | [ | Declare_Type Array,Constrained
0fb7 0337 | 7 | Declare_Variable Array
0fb8 e5ff | | Load 0x2,-0x1
0fb9 00d9 | | Load_Top At_Offset_1
0fba 01d4 | | Execute Vector,Structure_Write
0fbb 4801 |H | Short_Literal 0x1
0fbc e5fe | | Load 0x2,-0x2
0fbd 01d7 | | Execute Vector,Field_Read
0fbe 0274 | t | Execute Discrete,Absolute_Value
0fbf e21f | | Load 0x1,0x1f
0fc0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0fc1 4801 |H | Short_Literal 0x1
0fc2 e404 | | Load 0x2,0x4
0fc3 0901 | | Execute_Immediate Binary_Scale,0x1
0fc4 0272 | r | Execute Discrete,Minus
0fc5 e21f | | Load 0x1,0x1f
0fc6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0fc7 BODY_0fb0:
0fc7 00d9 | | Load_Top At_Offset_1
0fc8 00db | | Load_Top At_Offset_3
0fc9 82a7 | | Call 0x1,0xa7
0fca 00d1 | | Pop_Control Pop_Count_1
0fcb 005a | Z | Store_Top Discrete,At_Offset_2
0fcc e5fd | | Load 0x2,-0x3
0fcd 4602 |F | Jump_Case 0x2
0fce 7815 |x | Jump 0xfe4 ; case 0x0
0fcf 781d |x | Jump 0xfed ; case 0x1
0fd0 7800 |x | Jump 0xfd1 ; case 0x2
0fd1 4801 |H | Short_Literal 0x1
0fd2 4801 |H | Short_Literal 0x1
0fd3 e220 | | Load 0x1,0x20
0fd4 035b | [ | Declare_Type Array,Constrained
0fd5 0337 | 7 | Declare_Variable Array
0fd6 00d9 | | Load_Top At_Offset_1
0fd7 00db | | Load_Top At_Offset_3
0fd8 0271 | q | Execute Discrete,Times
0fd9 4801 |H | Short_Literal 0x1
0fda 00da | | Load_Top At_Offset_2
0fdb 01d6 | | Execute Vector,Field_Write
0fdc e405 | | Load 0x2,0x5
0fdd e602 | | Load 0x3,0x2
0fde 82a4 | | Call 0x1,0xa4
0fdf 82a5 | | Call 0x1,0xa5
0fe0 e233 | 3 | Load 0x1,0x33
0fe1 0165 | e | Execute Variant_Record,Convert
0fe2 00cb | | Action Pop_Block_With_Result
0fe3 4403 |D | Exit_Subprogram With_Result,0x3
0fe4 e294 | | Load 0x1,0x94
0fe5 e405 | | Load 0x2,0x5
0fe6 e602 | | Load 0x3,0x2
0fe7 82a4 | | Call 0x1,0xa4
0fe8 82a5 | | Call 0x1,0xa5
0fe9 e233 | 3 | Load 0x1,0x33
0fea 0165 | e | Execute Variant_Record,Convert
0feb 00cb | | Action Pop_Block_With_Result
0fec 4403 |D | Exit_Subprogram With_Result,0x3
0fed 4800 |H | Short_Literal 0x0
0fee 4801 |H | Short_Literal 0x1
0fef e233 | 3 | Load 0x1,0x33
0ff0 1c08 | | Execute_Immediate Run_Utility,0x8
0ff1 e294 | | Load 0x1,0x94
0ff2 00d9 | | Load_Top At_Offset_1
0ff3 00d8 | | Load_Top At_Offset_0
0ff4 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0ff5 00da | | Load_Top At_Offset_2
0ff6 01da | | Execute Vector,Bounds
0ff7 00da | | Load_Top At_Offset_2
0ff8 01da | | Execute Vector,Bounds
0ff9 00da | | Load_Top At_Offset_2
0ffa 027f | | Execute Discrete,Equal
0ffb 7001 |p | Jump_Nonzero 0xffd
0ffc 08e0 | | Execute_Immediate Raise,0xe0
0ffd 00cd | | Action Spare6_Action
0ffe 027f | | Execute Discrete,Equal
0fff 7001 |p | Jump_Nonzero 0x1001
1000 08e0 | | Execute_Immediate Raise,0xe0
1001 00d2 | | Pop_Control Pop_Count_2
1002 00d9 | | Load_Top At_Offset_1
1003 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1004 4801 |H | Short_Literal 0x1
1005 4801 |H | Short_Literal 0x1
1006 e220 | | Load 0x1,0x20
1007 035b | [ | Declare_Type Array,Constrained
1008 0337 | 7 | Declare_Variable Array
1009 00da | | Load_Top At_Offset_2
100a e603 | | Load 0x3,0x3
100b 0271 | q | Execute Discrete,Times
100c 4801 |H | Short_Literal 0x1
100d 00da | | Load_Top At_Offset_2
100e 01d6 | | Execute Vector,Field_Write
100f 00d9 | | Load_Top At_Offset_1
1010 00d8 | | Load_Top At_Offset_0
1011 2504 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x4
1012 00da | | Load_Top At_Offset_2
1013 01da | | Execute Vector,Bounds
1014 00da | | Load_Top At_Offset_2
1015 01da | | Execute Vector,Bounds
1016 00da | | Load_Top At_Offset_2
1017 027f | | Execute Discrete,Equal
1018 7001 |p | Jump_Nonzero 0x101a
1019 08e0 | | Execute_Immediate Raise,0xe0
101a 00cd | | Action Spare6_Action
101b 027f | | Execute Discrete,Equal
101c 7001 |p | Jump_Nonzero 0x101e
101d 08e0 | | Execute_Immediate Raise,0xe0
101e 00d2 | | Pop_Control Pop_Count_2
101f 00d9 | | Load_Top At_Offset_1
1020 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
1021 00cb | | Action Pop_Block_With_Result
1022 4403 |D | Exit_Subprogram With_Result,0x3
1023 0000 0000 | | .BLANK 0000[0x5]
1028 ; --------------------------------------------------------------------------------------
1028 ; SUBPROGRAM
1028 ; --------------------------------------------------------------------------------------
1028 1075 | u | .CONST 0x1075 ; Address of begin
1029 0004 | | .CONST 0x0004 ; Address of exception handler
102a 000b | | .CONST 0x000b ; Number of locals
102b INIT_1028:
102b 612c |a, | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
102c 4801 |H | Short_Literal 0x1
102d e5fe | | Load 0x2,-0x2
102e 01d7 | | Execute Vector,Field_Read
102f 0274 | t | Execute Discrete,Absolute_Value
1030 0a01 | | Execute_Immediate Plus,0x1
1031 0270 | p | Execute Discrete,Divide
1032 00e5 | | Load_Encached Long_Integer_Cache
1033 03f1 | | Declare_Variable Discrete,With_Value
1034 4801 |H | Short_Literal 0x1
1035 e402 | | Load 0x2,0x2
1036 0a01 | | Execute_Immediate Plus,0x1
1037 00d8 | | Load_Top At_Offset_0
1038 00e2 | | Load_Encached Integer_Cache
1039 0260 | ` | Execute Discrete,In_Type
103a 7001 |p | Jump_Nonzero 0x103c
103b 0801 | | Execute_Immediate Raise,0x1
103c e220 | | Load 0x1,0x20
103d 035b | [ | Declare_Type Array,Constrained
103e 0337 | 7 | Declare_Variable Array
103f 00d9 | | Load_Top At_Offset_1
1040 00d8 | | Load_Top At_Offset_0
1041 e21f | | Load 0x1,0x1f
1042 0260 | ` | Execute Discrete,In_Type
1043 7001 |p | Jump_Nonzero 0x1045
1044 0801 | | Execute_Immediate Raise,0x1
1045 4800 |H | Short_Literal 0x0
1046 e5ff | | Load 0x2,-0x1
1047 01ca | | Execute Vector,Prepend
1048 82a6 | | Call 0x1,0xa6
1049 00d9 | | Load_Top At_Offset_1
104a 01d4 | | Execute Vector,Structure_Write
104b 4801 |H | Short_Literal 0x1
104c e403 | | Load 0x2,0x3
104d e220 | | Load 0x1,0x20
104e 035b | [ | Declare_Type Array,Constrained
104f 0337 | 7 | Declare_Variable Array
1050 00da | | Load_Top At_Offset_2
1051 00d8 | | Load_Top At_Offset_0
1052 e21f | | Load 0x1,0x1f
1053 0260 | ` | Execute Discrete,In_Type
1054 7001 |p | Jump_Nonzero 0x1056
1055 0801 | | Execute_Immediate Raise,0x1
1056 e5fe | | Load 0x2,-0x2
1057 82a6 | | Call 0x1,0xa6
1058 00d9 | | Load_Top At_Offset_1
1059 01d4 | | Execute Vector,Structure_Write
105a 4801 |H | Short_Literal 0x1
105b 00d9 | | Load_Top At_Offset_1
105c 01d7 | | Execute Vector,Field_Read
105d 00e5 | | Load_Encached Long_Integer_Cache
105e 03f1 | | Declare_Variable Discrete,With_Value
105f 4802 |H | Short_Literal 0x2
1060 00da | | Load_Top At_Offset_2
1061 01d7 | | Execute Vector,Field_Read
1062 00e5 | | Load_Encached Long_Integer_Cache
1063 03f1 | | Declare_Variable Discrete,With_Value
1064 4801 |H | Short_Literal 0x1
1065 e402 | | Load 0x2,0x2
1066 e403 | | Load 0x2,0x3
1067 0272 | r | Execute Discrete,Minus
1068 0a01 | | Execute_Immediate Plus,0x1
1069 00d8 | | Load_Top At_Offset_0
106a 00e2 | | Load_Encached Integer_Cache
106b 0260 | ` | Execute Discrete,In_Type
106c 7001 |p | Jump_Nonzero 0x106e
106d 0801 | | Execute_Immediate Raise,0x1
106e e220 | | Load 0x1,0x20
106f 035b | [ | Declare_Type Array,Constrained
1070 0337 | 7 | Declare_Variable Array
1071 00e5 | | Load_Encached Long_Integer_Cache
1072 00e5 | | Load_Encached Long_Integer_Cache
1073 03e9 | | Declare_Variable Discrete,Duplicate
1074 00e5 | | Load_Encached Long_Integer_Cache
1075 BODY_1028:
1075 00cf | | Action Mark_Auxiliary
1076 e607 | | Load 0x3,0x7
1077 01d9 | | Execute Vector,Reverse_Bounds
1078 0263 | c | Execute Discrete,Above_Bound
1079 70a4 |p | Jump_Nonzero 0x111e
107a 00d8 | | Load_Top At_Offset_0
107b e603 | | Load 0x3,0x3
107c 01d7 | | Execute Vector,Field_Read
107d 091f | | Execute_Immediate Binary_Scale,0x1f
107e 00d9 | | Load_Top At_Offset_1
107f 0a01 | | Execute_Immediate Plus,0x1
1080 e603 | | Load 0x3,0x3
1081 01d7 | | Execute Vector,Field_Read
1082 0273 | s | Execute Discrete,Plus
1083 a60a | | Store_Unchecked 0x3,0xa
1084 00d8 | | Load_Top At_Offset_0
1085 e603 | | Load 0x3,0x3
1086 01d7 | | Execute Vector,Field_Read
1087 e605 | | Load 0x3,0x5
1088 027e | ~ | Execute Discrete,Not_Equal
1089 6805 |h | Jump_Zero 0x108f
108a e60a | | Load 0x3,0xa
108b e605 | | Load 0x3,0x5
108c 0270 | p | Execute Discrete,Divide
108d a60b | | Store_Unchecked 0x3,0xb
108e 7802 |x | Jump 0x1091
108f 60c4 |` | Indirect_Literal Discrete,0x1154,{0x00000000, 0x7fffffff}
1090 a60b | | Store_Unchecked 0x3,0xb
1091 00cf | | Action Mark_Auxiliary
1092 7804 |x | Jump 0x1097
1093 e60b | | Load 0x3,0xb
1094 0aff | | Execute_Immediate Plus,-0x1
1095 a60b | | Store_Unchecked 0x3,0xb
1096 00c9 | | Action Pop_Auxiliary_Loop
1097 e606 | | Load 0x3,0x6
1098 e60b | | Load 0x3,0xb
1099 0271 | q | Execute Discrete,Times
109a e60a | | Load 0x3,0xa
109b e60b | | Load 0x3,0xb
109c e605 | | Load 0x3,0x5
109d 0271 | q | Execute Discrete,Times
109e 0272 | r | Execute Discrete,Minus
109f 091f | | Execute_Immediate Binary_Scale,0x1f
10a0 00db | | Load_Top At_Offset_3
10a1 0a02 | | Execute_Immediate Plus,0x2
10a2 e603 | | Load 0x3,0x3
10a3 01d7 | | Execute Vector,Field_Read
10a4 0273 | s | Execute Discrete,Plus
10a5 027d | } | Execute Discrete,Greater
10a6 77ec |w | Jump_Nonzero 0x1093
10a7 00ce | | Action Pop_Auxiliary
10a8 4800 |H | Short_Literal 0x0
10a9 a609 | | Store_Unchecked 0x3,0x9
10aa 00cf | | Action Mark_Auxiliary
10ab e604 | | Load 0x3,0x4
10ac 01da | | Execute Vector,Bounds
10ad 0264 | d | Execute Discrete,Below_Bound
10ae 7027 |p' | Jump_Nonzero 0x10d6
10af 00db | | Load_Top At_Offset_3
10b0 00d9 | | Load_Top At_Offset_1
10b1 0273 | s | Execute Discrete,Plus
10b2 e603 | | Load 0x3,0x3
10b3 01d7 | | Execute Vector,Field_Read
10b4 e60b | | Load 0x3,0xb
10b5 00da | | Load_Top At_Offset_2
10b6 e604 | | Load 0x3,0x4
10b7 01d7 | | Execute Vector,Field_Read
10b8 0271 | q | Execute Discrete,Times
10b9 0272 | r | Execute Discrete,Minus
10ba e609 | | Load 0x3,0x9
10bb 0273 | s | Execute Discrete,Plus
10bc a60a | | Store_Unchecked 0x3,0xa
10bd e60a | | Load 0x3,0xa
10be 6099 |` | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
10bf 026f | o | Execute Discrete,Remainder
10c0 a608 | | Store_Unchecked 0x3,0x8
10c1 e60a | | Load 0x3,0xa
10c2 09e1 | | Execute_Immediate Binary_Scale,-0x1f
10c3 a609 | | Store_Unchecked 0x3,0x9
10c4 e608 | | Load 0x3,0x8
10c5 0d00 | | Execute_Immediate Less,0x0
10c6 6807 |h | Jump_Zero 0x10ce
10c7 e608 | | Load 0x3,0x8
10c8 608f |` | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
10c9 0273 | s | Execute Discrete,Plus
10ca a608 | | Store_Unchecked 0x3,0x8
10cb e609 | | Load 0x3,0x9
10cc 0aff | | Execute_Immediate Plus,-0x1
10cd a609 | | Store_Unchecked 0x3,0x9
10ce e608 | | Load 0x3,0x8
10cf e60e | | Load 0x3,0xe
10d0 00da | | Load_Top At_Offset_2
10d1 0273 | s | Execute Discrete,Plus
10d2 e603 | | Load 0x3,0x3
10d3 01d6 | | Execute Vector,Field_Write
10d4 00c8 | | Action Pop_Auxiliary_Range
10d5 37d9 |7 | Loop_Decreasing 0x10af
10d6 00ce | | Action Pop_Auxiliary
10d7 00d8 | | Load_Top At_Offset_0
10d8 e603 | | Load 0x3,0x3
10d9 01d7 | | Execute Vector,Field_Read
10da e609 | | Load 0x3,0x9
10db 0273 | s | Execute Discrete,Plus
10dc 00d9 | | Load_Top At_Offset_1
10dd e603 | | Load 0x3,0x3
10de 01d6 | | Execute Vector,Field_Write
10df 00d8 | | Load_Top At_Offset_0
10e0 e603 | | Load 0x3,0x3
10e1 01d7 | | Execute Vector,Field_Read
10e2 0d00 | | Execute_Immediate Less,0x0
10e3 6834 |h4 | Jump_Zero 0x1118
10e4 00db | | Load_Top At_Offset_3
10e5 0aff | | Execute_Immediate Plus,-0x1
10e6 a60b | | Store_Unchecked 0x3,0xb
10e7 4800 |H | Short_Literal 0x0
10e8 a609 | | Store_Unchecked 0x3,0x9
10e9 00cf | | Action Mark_Auxiliary
10ea e604 | | Load 0x3,0x4
10eb 01da | | Execute Vector,Bounds
10ec 0264 | d | Execute Discrete,Below_Bound
10ed 7021 |p! | Jump_Nonzero 0x110f
10ee 00db | | Load_Top At_Offset_3
10ef 00d9 | | Load_Top At_Offset_1
10f0 0273 | s | Execute Discrete,Plus
10f1 e603 | | Load 0x3,0x3
10f2 01d7 | | Execute Vector,Field_Read
10f3 00d9 | | Load_Top At_Offset_1
10f4 e604 | | Load 0x3,0x4
10f5 01d7 | | Execute Vector,Field_Read
10f6 0273 | s | Execute Discrete,Plus
10f7 e609 | | Load 0x3,0x9
10f8 0273 | s | Execute Discrete,Plus
10f9 a60a | | Store_Unchecked 0x3,0xa
10fa e60a | | Load 0x3,0xa
10fb 605c |`\ | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
10fc 027b | { | Execute Discrete,Greater_Equal
10fd 6807 |h | Jump_Zero 0x1105
10fe e60a | | Load 0x3,0xa
10ff 6050 |`P | Indirect_Literal Discrete,0x1150,{0xffffffff, 0x80000000}
1100 0273 | s | Execute Discrete,Plus
1101 a60a | | Store_Unchecked 0x3,0xa
1102 4801 |H | Short_Literal 0x1
1103 a609 | | Store_Unchecked 0x3,0x9
1104 7802 |x | Jump 0x1107
1105 4800 |H | Short_Literal 0x0
1106 a609 | | Store_Unchecked 0x3,0x9
1107 e60a | | Load 0x3,0xa
1108 e60e | | Load 0x3,0xe
1109 00da | | Load_Top At_Offset_2
110a 0273 | s | Execute Discrete,Plus
110b e603 | | Load 0x3,0x3
110c 01d6 | | Execute Vector,Field_Write
110d 00c8 | | Action Pop_Auxiliary_Range
110e 37df |7 | Loop_Decreasing 0x10ee
110f 00ce | | Action Pop_Auxiliary
1110 00d8 | | Load_Top At_Offset_0
1111 e603 | | Load 0x3,0x3
1112 01d7 | | Execute Vector,Field_Read
1113 e609 | | Load 0x3,0x9
1114 0273 | s | Execute Discrete,Plus
1115 00d9 | | Load_Top At_Offset_1
1116 e603 | | Load 0x3,0x3
1117 01d6 | | Execute Vector,Field_Write
1118 00db | | Load_Top At_Offset_3
1119 00d9 | | Load_Top At_Offset_1
111a e607 | | Load 0x3,0x7
111b 01d6 | | Execute Vector,Field_Write
111c 00c8 | | Action Pop_Auxiliary_Range
111d 3f5c |?\ | Loop_Increasing 0x107a
111e 00ce | | Action Pop_Auxiliary
111f e602 | | Load 0x3,0x2
1120 0c02 | | Execute_Immediate Greater_Equal,0x2
1121 6809 |h | Jump_Zero 0x112b
1122 e5fd | | Load 0x2,-0x3
1123 6807 |h | Jump_Zero 0x112b
1124 e602 | | Load 0x3,0x2
1125 e21f | | Load 0x1,0x1f
1126 025e | ^ | Execute Discrete,Convert
1127 e603 | | Load 0x3,0x3
1128 82a7 | | Call 0x1,0xa7
1129 00d1 | | Pop_Control Pop_Count_1
112a c602 | | Store 0x3,0x2
112b e5fd | | Load 0x2,-0x3
112c 4602 |F | Jump_Case 0x2
112d 780d |x | Jump 0x113b ; case 0x0
112e 7815 |x | Jump 0x1144 ; case 0x1
112f 7800 |x | Jump 0x1130 ; case 0x2
1130 e404 | | Load 0x2,0x4
1131 e603 | | Load 0x3,0x3
1132 82a4 | | Call 0x1,0xa4
1133 e405 | | Load 0x2,0x5
1134 e607 | | Load 0x3,0x7
1135 82a4 | | Call 0x1,0xa4
1136 82a5 | | Call 0x1,0xa5
1137 e233 | 3 | Load 0x1,0x33
1138 0165 | e | Execute Variant_Record,Convert
1139 00cb | | Action Pop_Block_With_Result
113a 4403 |D | Exit_Subprogram With_Result,0x3
113b e294 | | Load 0x1,0x94
113c e405 | | Load 0x2,0x5
113d e607 | | Load 0x3,0x7
113e 82a4 | | Call 0x1,0xa4
113f 82a5 | | Call 0x1,0xa5
1140 e233 | 3 | Load 0x1,0x33
1141 0165 | e | Execute Variant_Record,Convert
1142 00cb | | Action Pop_Block_With_Result
1143 4403 |D | Exit_Subprogram With_Result,0x3
1144 e404 | | Load 0x2,0x4
1145 e603 | | Load 0x3,0x3
1146 82a4 | | Call 0x1,0xa4
1147 e294 | | Load 0x1,0x94
1148 82a5 | | Call 0x1,0xa5
1149 e233 | 3 | Load 0x1,0x33
114a 0165 | e | Execute Variant_Record,Convert
114b 00cb | | Action Pop_Block_With_Result
114c 4403 |D | Exit_Subprogram With_Result,0x3
114d 0000 0000 | | .XXX[0x3]
114f 0000 | |
1150 ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
1154 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
1158 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
115c 0000 0000 | | .BLANK 0000[0x4]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 118f | | .CONST 0x118f ; Address of begin
1161 0004 | | .CONST 0x0004 ; Address of exception handler
1162 000b | | .CONST 0x000b ; Number of locals
1163 INIT_1160:
1163 67f4 |g | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
1164 e403 | | Load 0x2,0x3
1165 e5fe | | Load 0x2,-0x2
1166 01d7 | | Execute Vector,Field_Read
1167 0274 | t | Execute Discrete,Absolute_Value
1168 0a01 | | Execute_Immediate Plus,0x1
1169 0270 | p | Execute Discrete,Divide
116a 00e5 | | Load_Encached Long_Integer_Cache
116b 03f1 | | Declare_Variable Discrete,With_Value
116c 4801 |H | Short_Literal 0x1
116d e404 | | Load 0x2,0x4
116e 0a01 | | Execute_Immediate Plus,0x1
116f 00d8 | | Load_Top At_Offset_0
1170 00e2 | | Load_Encached Integer_Cache
1171 0260 | ` | Execute Discrete,In_Type
1172 7001 |p | Jump_Nonzero 0x1174
1173 0801 | | Execute_Immediate Raise,0x1
1174 e220 | | Load 0x1,0x20
1175 035b | [ | Declare_Type Array,Constrained
1176 0337 | 7 | Declare_Variable Array
1177 4801 |H | Short_Literal 0x1
1178 e405 | | Load 0x2,0x5
1179 e220 | | Load 0x1,0x20
117a 035b | [ | Declare_Type Array,Constrained
117b 0337 | 7 | Declare_Variable Array
117c 00e5 | | Load_Encached Long_Integer_Cache
117d 00e5 | | Load_Encached Long_Integer_Cache
117e 4801 |H | Short_Literal 0x1
117f e404 | | Load 0x2,0x4
1180 e405 | | Load 0x2,0x5
1181 0272 | r | Execute Discrete,Minus
1182 0a01 | | Execute_Immediate Plus,0x1
1183 00d8 | | Load_Top At_Offset_0
1184 00e2 | | Load_Encached Integer_Cache
1185 0260 | ` | Execute Discrete,In_Type
1186 7001 |p | Jump_Nonzero 0x1188
1187 0801 | | Execute_Immediate Raise,0x1
1188 e220 | | Load 0x1,0x20
1189 035b | [ | Declare_Type Array,Constrained
118a 0337 | 7 | Declare_Variable Array
118b 00e5 | | Load_Encached Long_Integer_Cache
118c 00e5 | | Load_Encached Long_Integer_Cache
118d 03e9 | | Declare_Variable Discrete,Duplicate
118e 00e5 | | Load_Encached Long_Integer_Cache
118f BODY_1160:
118f e603 | | Load 0x3,0x3
1190 e402 | | Load 0x2,0x2
1191 e5ff | | Load 0x2,-0x1
1192 01dc | | Execute Vector,Last
1193 e5ff | | Load 0x2,-0x1
1194 01cf | | Execute Vector,Slice_Read
1195 82a1 | | Call 0x1,0xa1
1196 00d1 | | Pop_Control Pop_Count_1
1197 e604 | | Load 0x3,0x4
1198 e403 | | Load 0x2,0x3
1199 e5fe | | Load 0x2,-0x2
119a 01dc | | Execute Vector,Last
119b e5fe | | Load 0x2,-0x2
119c 01cf | | Execute Vector,Slice_Read
119d 82a1 | | Call 0x1,0xa1
119e 00d1 | | Pop_Control Pop_Count_1
119f 4802 |H | Short_Literal 0x2
11a0 e603 | | Load 0x3,0x3
11a1 01d7 | | Execute Vector,Field_Read
11a2 0274 | t | Execute Discrete,Absolute_Value
11a3 4802 |H | Short_Literal 0x2
11a4 e603 | | Load 0x3,0x3
11a5 01d6 | | Execute Vector,Field_Write
11a6 4801 |H | Short_Literal 0x1
11a7 e604 | | Load 0x3,0x4
11a8 01d7 | | Execute Vector,Field_Read
11a9 0274 | t | Execute Discrete,Absolute_Value
11aa 4801 |H | Short_Literal 0x1
11ab e604 | | Load 0x3,0x4
11ac 01d6 | | Execute Vector,Field_Write
11ad e602 | | Load 0x3,0x2
11ae 0c02 | | Execute_Immediate Greater_Equal,0x2
11af 6812 |h | Jump_Zero 0x11c2
11b0 e603 | | Load 0x3,0x3
11b1 e602 | | Load 0x3,0x2
11b2 00d8 | | Load_Top At_Offset_0
11b3 e21f | | Load 0x1,0x1f
11b4 0260 | ` | Execute Discrete,In_Type
11b5 7001 |p | Jump_Nonzero 0x11b7
11b6 0801 | | Execute_Immediate Raise,0x1
11b7 82aa | | Call 0x1,0xaa
11b8 00d1 | | Pop_Control Pop_Count_1
11b9 e604 | | Load 0x3,0x4
11ba e602 | | Load 0x3,0x2
11bb 00d8 | | Load_Top At_Offset_0
11bc e21f | | Load 0x1,0x1f
11bd 0260 | ` | Execute Discrete,In_Type
11be 7001 |p | Jump_Nonzero 0x11c0
11bf 0801 | | Execute_Immediate Raise,0x1
11c0 82aa | | Call 0x1,0xaa
11c1 00d1 | | Pop_Control Pop_Count_1
11c2 4801 |H | Short_Literal 0x1
11c3 e604 | | Load 0x3,0x4
11c4 01d7 | | Execute Vector,Field_Read
11c5 a605 | | Store_Unchecked 0x3,0x5
11c6 4802 |H | Short_Literal 0x2
11c7 e604 | | Load 0x3,0x4
11c8 01d7 | | Execute Vector,Field_Read
11c9 a606 | | Store_Unchecked 0x3,0x6
11ca 00cf | | Action Mark_Auxiliary
11cb e607 | | Load 0x3,0x7
11cc 01d9 | | Execute Vector,Reverse_Bounds
11cd 0263 | c | Execute Discrete,Above_Bound
11ce 70a4 |p | Jump_Nonzero 0x1273
11cf 00d8 | | Load_Top At_Offset_0
11d0 e603 | | Load 0x3,0x3
11d1 01d7 | | Execute Vector,Field_Read
11d2 091f | | Execute_Immediate Binary_Scale,0x1f
11d3 00d9 | | Load_Top At_Offset_1
11d4 0a01 | | Execute_Immediate Plus,0x1
11d5 e603 | | Load 0x3,0x3
11d6 01d7 | | Execute Vector,Field_Read
11d7 0273 | s | Execute Discrete,Plus
11d8 a60a | | Store_Unchecked 0x3,0xa
11d9 00d8 | | Load_Top At_Offset_0
11da e603 | | Load 0x3,0x3
11db 01d7 | | Execute Vector,Field_Read
11dc e605 | | Load 0x3,0x5
11dd 027e | ~ | Execute Discrete,Not_Equal
11de 6805 |h | Jump_Zero 0x11e4
11df e60a | | Load 0x3,0xa
11e0 e605 | | Load 0x3,0x5
11e1 0270 | p | Execute Discrete,Divide
11e2 a60b | | Store_Unchecked 0x3,0xb
11e3 7802 |x | Jump 0x11e6
11e4 676f |go | Indirect_Literal Discrete,0x1154,{0x00000000, 0x7fffffff}
11e5 a60b | | Store_Unchecked 0x3,0xb
11e6 00cf | | Action Mark_Auxiliary
11e7 7804 |x | Jump 0x11ec
11e8 e60b | | Load 0x3,0xb
11e9 0aff | | Execute_Immediate Plus,-0x1
11ea a60b | | Store_Unchecked 0x3,0xb
11eb 00c9 | | Action Pop_Auxiliary_Loop
11ec e606 | | Load 0x3,0x6
11ed e60b | | Load 0x3,0xb
11ee 0271 | q | Execute Discrete,Times
11ef e60a | | Load 0x3,0xa
11f0 e60b | | Load 0x3,0xb
11f1 e605 | | Load 0x3,0x5
11f2 0271 | q | Execute Discrete,Times
11f3 0272 | r | Execute Discrete,Minus
11f4 091f | | Execute_Immediate Binary_Scale,0x1f
11f5 00db | | Load_Top At_Offset_3
11f6 0a02 | | Execute_Immediate Plus,0x2
11f7 e603 | | Load 0x3,0x3
11f8 01d7 | | Execute Vector,Field_Read
11f9 0273 | s | Execute Discrete,Plus
11fa 027d | } | Execute Discrete,Greater
11fb 77ec |w | Jump_Nonzero 0x11e8
11fc 00ce | | Action Pop_Auxiliary
11fd 4800 |H | Short_Literal 0x0
11fe a609 | | Store_Unchecked 0x3,0x9
11ff 00cf | | Action Mark_Auxiliary
1200 e604 | | Load 0x3,0x4
1201 01da | | Execute Vector,Bounds
1202 0264 | d | Execute Discrete,Below_Bound
1203 7027 |p' | Jump_Nonzero 0x122b
1204 00db | | Load_Top At_Offset_3
1205 00d9 | | Load_Top At_Offset_1
1206 0273 | s | Execute Discrete,Plus
1207 e603 | | Load 0x3,0x3
1208 01d7 | | Execute Vector,Field_Read
1209 e60b | | Load 0x3,0xb
120a 00da | | Load_Top At_Offset_2
120b e604 | | Load 0x3,0x4
120c 01d7 | | Execute Vector,Field_Read
120d 0271 | q | Execute Discrete,Times
120e 0272 | r | Execute Discrete,Minus
120f e609 | | Load 0x3,0x9
1210 0273 | s | Execute Discrete,Plus
1211 a60a | | Store_Unchecked 0x3,0xa
1212 e60a | | Load 0x3,0xa
1213 6744 |gD | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
1214 026f | o | Execute Discrete,Remainder
1215 a608 | | Store_Unchecked 0x3,0x8
1216 e60a | | Load 0x3,0xa
1217 09e1 | | Execute_Immediate Binary_Scale,-0x1f
1218 a609 | | Store_Unchecked 0x3,0x9
1219 e608 | | Load 0x3,0x8
121a 0d00 | | Execute_Immediate Less,0x0
121b 6807 |h | Jump_Zero 0x1223
121c e608 | | Load 0x3,0x8
121d 673a |g: | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
121e 0273 | s | Execute Discrete,Plus
121f a608 | | Store_Unchecked 0x3,0x8
1220 e609 | | Load 0x3,0x9
1221 0aff | | Execute_Immediate Plus,-0x1
1222 a609 | | Store_Unchecked 0x3,0x9
1223 e608 | | Load 0x3,0x8
1224 e60e | | Load 0x3,0xe
1225 00da | | Load_Top At_Offset_2
1226 0273 | s | Execute Discrete,Plus
1227 e603 | | Load 0x3,0x3
1228 01d6 | | Execute Vector,Field_Write
1229 00c8 | | Action Pop_Auxiliary_Range
122a 37d9 |7 | Loop_Decreasing 0x1204
122b 00ce | | Action Pop_Auxiliary
122c 00d8 | | Load_Top At_Offset_0
122d e603 | | Load 0x3,0x3
122e 01d7 | | Execute Vector,Field_Read
122f e609 | | Load 0x3,0x9
1230 0273 | s | Execute Discrete,Plus
1231 00d9 | | Load_Top At_Offset_1
1232 e603 | | Load 0x3,0x3
1233 01d6 | | Execute Vector,Field_Write
1234 00d8 | | Load_Top At_Offset_0
1235 e603 | | Load 0x3,0x3
1236 01d7 | | Execute Vector,Field_Read
1237 0d00 | | Execute_Immediate Less,0x0
1238 6834 |h4 | Jump_Zero 0x126d
1239 00db | | Load_Top At_Offset_3
123a 0aff | | Execute_Immediate Plus,-0x1
123b a60b | | Store_Unchecked 0x3,0xb
123c 4800 |H | Short_Literal 0x0
123d a609 | | Store_Unchecked 0x3,0x9
123e 00cf | | Action Mark_Auxiliary
123f e604 | | Load 0x3,0x4
1240 01da | | Execute Vector,Bounds
1241 0264 | d | Execute Discrete,Below_Bound
1242 7021 |p! | Jump_Nonzero 0x1264
1243 00db | | Load_Top At_Offset_3
1244 00d9 | | Load_Top At_Offset_1
1245 0273 | s | Execute Discrete,Plus
1246 e603 | | Load 0x3,0x3
1247 01d7 | | Execute Vector,Field_Read
1248 00d9 | | Load_Top At_Offset_1
1249 e604 | | Load 0x3,0x4
124a 01d7 | | Execute Vector,Field_Read
124b 0273 | s | Execute Discrete,Plus
124c e609 | | Load 0x3,0x9
124d 0273 | s | Execute Discrete,Plus
124e a60a | | Store_Unchecked 0x3,0xa
124f e60a | | Load 0x3,0xa
1250 6707 |g | Indirect_Literal Discrete,0x1158,{0x00000000, 0x80000000}
1251 027b | { | Execute Discrete,Greater_Equal
1252 6807 |h | Jump_Zero 0x125a
1253 e60a | | Load 0x3,0xa
1254 66fb |f | Indirect_Literal Discrete,0x1150,{0xffffffff, 0x80000000}
1255 0273 | s | Execute Discrete,Plus
1256 a60a | | Store_Unchecked 0x3,0xa
1257 4801 |H | Short_Literal 0x1
1258 a609 | | Store_Unchecked 0x3,0x9
1259 7802 |x | Jump 0x125c
125a 4800 |H | Short_Literal 0x0
125b a609 | | Store_Unchecked 0x3,0x9
125c e60a | | Load 0x3,0xa
125d e60e | | Load 0x3,0xe
125e 00da | | Load_Top At_Offset_2
125f 0273 | s | Execute Discrete,Plus
1260 e603 | | Load 0x3,0x3
1261 01d6 | | Execute Vector,Field_Write
1262 00c8 | | Action Pop_Auxiliary_Range
1263 37df |7 | Loop_Decreasing 0x1243
1264 00ce | | Action Pop_Auxiliary
1265 00d8 | | Load_Top At_Offset_0
1266 e603 | | Load 0x3,0x3
1267 01d7 | | Execute Vector,Field_Read
1268 e609 | | Load 0x3,0x9
1269 0273 | s | Execute Discrete,Plus
126a 00d9 | | Load_Top At_Offset_1
126b e603 | | Load 0x3,0x3
126c 01d6 | | Execute Vector,Field_Write
126d 00db | | Load_Top At_Offset_3
126e 00d9 | | Load_Top At_Offset_1
126f e607 | | Load 0x3,0x7
1270 01d6 | | Execute Vector,Field_Write
1271 00c8 | | Action Pop_Auxiliary_Range
1272 3f5c |?\ | Loop_Increasing 0x11cf
1273 00ce | | Action Pop_Auxiliary
1274 e407 | | Load 0x2,0x7
1275 680a |h | Jump_Zero 0x1280
1276 e607 | | Load 0x3,0x7
1277 82a9 | | Call 0x1,0xa9
1278 a402 | | Store_Unchecked 0x2,0x2
1279 e402 | | Load 0x2,0x2
127a e607 | | Load 0x3,0x7
127b 01d7 | | Execute Vector,Field_Read
127c 0275 | u | Execute Discrete,Unary_Minus
127d e402 | | Load 0x2,0x2
127e e607 | | Load 0x3,0x7
127f 01d6 | | Execute Vector,Field_Write
1280 e5fd | | Load 0x2,-0x3
1281 e607 | | Load 0x3,0x7
1282 82a1 | | Call 0x1,0xa1
1283 00d1 | | Pop_Control Pop_Count_1
1284 4800 |H | Short_Literal 0x0
1285 a5fb | | Store_Unchecked 0x2,-0x5
1286 e5fc | | Load 0x2,-0x4
1287 01db | | Execute Vector,Length
1288 0c01 | | Execute_Immediate Greater_Equal,0x1
1289 684d |hM | Jump_Zero 0x12d7
128a e603 | | Load 0x3,0x3
128b 82a9 | | Call 0x1,0xa9
128c a402 | | Store_Unchecked 0x2,0x2
128d e603 | | Load 0x3,0x3
128e 01dc | | Execute Vector,Last
128f e603 | | Load 0x3,0x3
1290 01d7 | | Execute Vector,Field_Read
1291 700c |p | Jump_Nonzero 0x129e
1292 e402 | | Load 0x2,0x2
1293 e603 | | Load 0x3,0x3
1294 01dc | | Execute Vector,Last
1295 027f | | Execute Discrete,Equal
1296 6807 |h | Jump_Zero 0x129e
1297 4801 |H | Short_Literal 0x1
1298 a5fb | | Store_Unchecked 0x2,-0x5
1299 e5fc | | Load 0x2,-0x4
129a 4800 |H | Short_Literal 0x0
129b 82a2 | | Call 0x1,0xa2
129c 00d1 | | Pop_Control Pop_Count_1
129d 7831 |x1 | Jump 0x12cf
129e 4800 |H | Short_Literal 0x0
129f a5fb | | Store_Unchecked 0x2,-0x5
12a0 e602 | | Load 0x3,0x2
12a1 0c02 | | Execute_Immediate Greater_Equal,0x2
12a2 6823 |h# | Jump_Zero 0x12c6
12a3 4800 |H | Short_Literal 0x0
12a4 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
12a5 00cf | | Action Mark_Auxiliary
12a6 e603 | | Load 0x3,0x3
12a7 01dc | | Execute Vector,Last
12a8 e402 | | Load 0x2,0x2
12a9 0263 | c | Execute Discrete,Above_Bound
12aa 7013 |p | Jump_Nonzero 0x12be
12ab e609 | | Load 0x3,0x9
12ac 091f | | Execute_Immediate Binary_Scale,0x1f
12ad 00d9 | | Load_Top At_Offset_1
12ae e603 | | Load 0x3,0x3
12af 01d7 | | Execute Vector,Field_Read
12b0 0273 | s | Execute Discrete,Plus
12b1 a60a | | Store_Unchecked 0x3,0xa
12b2 e60a | | Load 0x3,0xa
12b3 e602 | | Load 0x3,0x2
12b4 0270 | p | Execute Discrete,Divide
12b5 00d9 | | Load_Top At_Offset_1
12b6 e603 | | Load 0x3,0x3
12b7 01d6 | | Execute Vector,Field_Write
12b8 e60a | | Load 0x3,0xa
12b9 e602 | | Load 0x3,0x2
12ba 026f | o | Execute Discrete,Remainder
12bb a609 | | Store_Unchecked 0x3,0x9
12bc 00c8 | | Action Pop_Auxiliary_Range
12bd 3fed |? | Loop_Increasing 0x12ab
12be 00ce | | Action Pop_Auxiliary
12bf e402 | | Load 0x2,0x2
12c0 e603 | | Load 0x3,0x3
12c1 01dc | | Execute Vector,Last
12c2 e603 | | Load 0x3,0x3
12c3 01cf | | Execute Vector,Slice_Read
12c4 82a9 | | Call 0x1,0xa9
12c5 a402 | | Store_Unchecked 0x2,0x2
12c6 e406 | | Load 0x2,0x6
12c7 6807 |h | Jump_Zero 0x12cf
12c8 e402 | | Load 0x2,0x2
12c9 e603 | | Load 0x3,0x3
12ca 01d7 | | Execute Vector,Field_Read
12cb 0275 | u | Execute Discrete,Unary_Minus
12cc e402 | | Load 0x2,0x2
12cd e603 | | Load 0x3,0x3
12ce 01d6 | | Execute Vector,Field_Write
12cf e5fc | | Load 0x2,-0x4
12d0 4802 |H | Short_Literal 0x2
12d1 e603 | | Load 0x3,0x3
12d2 01dc | | Execute Vector,Last
12d3 e603 | | Load 0x3,0x3
12d4 01cf | | Execute Vector,Slice_Read
12d5 82a1 | | Call 0x1,0xa1
12d6 00d1 | | Pop_Control Pop_Count_1
12d7 4501 |E | Exit_Subprogram 0x1
12d8 ; --------------------------------------------------------------------------------------
12d8 ; SUBPROGRAM
12d8 ; --------------------------------------------------------------------------------------
12d8 12f7 | | .CONST 0x12f7 ; Address of begin
12d9 0004 | | .CONST 0x0004 ; Address of exception handler
12da 0004 | | .CONST 0x0004 ; Number of locals
12db INIT_12d8:
12db 4801 |H | Short_Literal 0x1
12dc e404 | | Load 0x2,0x4
12dd e405 | | Load 0x2,0x5
12de 0273 | s | Execute Discrete,Plus
12df 00d8 | | Load_Top At_Offset_0
12e0 00e2 | | Load_Encached Integer_Cache
12e1 0260 | ` | Execute Discrete,In_Type
12e2 7001 |p | Jump_Nonzero 0x12e4
12e3 0801 | | Execute_Immediate Raise,0x1
12e4 e220 | | Load 0x1,0x20
12e5 035b | [ | Declare_Type Array,Constrained
12e6 0337 | 7 | Declare_Variable Array
12e7 00d8 | | Load_Top At_Offset_0
12e8 0335 | 5 | Declare_Variable Array,Duplicate
12e9 00cd | | Action Spare6_Action
12ea 00d9 | | Load_Top At_Offset_1
12eb 01d9 | | Execute Vector,Reverse_Bounds
12ec 0263 | c | Execute Discrete,Above_Bound
12ed 7005 |p | Jump_Nonzero 0x12f3
12ee 4800 |H | Short_Literal 0x0
12ef 00d9 | | Load_Top At_Offset_1
12f0 e603 | | Load 0x3,0x3
12f1 01d6 | | Execute Vector,Field_Write
12f2 3ffb |? | Loop_Increasing 0x12ee
12f3 00d9 | | Load_Top At_Offset_1
12f4 01d4 | | Execute Vector,Structure_Write
12f5 00e5 | | Load_Encached Long_Integer_Cache
12f6 03e9 | | Declare_Variable Discrete,Duplicate
12f7 BODY_12d8:
12f7 00cf | | Action Mark_Auxiliary
12f8 4801 |H | Short_Literal 0x1
12f9 e405 | | Load 0x2,0x5
12fa 0264 | d | Execute Discrete,Below_Bound
12fb 7032 |p2 | Jump_Nonzero 0x132e
12fc 4800 |H | Short_Literal 0x0
12fd a603 | | Store_Unchecked 0x3,0x3
12fe 00cf | | Action Mark_Auxiliary
12ff 4801 |H | Short_Literal 0x1
1300 e404 | | Load 0x2,0x4
1301 0264 | d | Execute Discrete,Below_Bound
1302 7024 |p$ | Jump_Nonzero 0x1327
1303 e402 | | Load 0x2,0x2
1304 00d9 | | Load_Top At_Offset_1
1305 0273 | s | Execute Discrete,Plus
1306 0aff | | Execute_Immediate Plus,-0x1
1307 e5ff | | Load 0x2,-0x1
1308 01d7 | | Execute Vector,Field_Read
1309 e403 | | Load 0x2,0x3
130a e607 | | Load 0x3,0x7
130b 0273 | s | Execute Discrete,Plus
130c 0aff | | Execute_Immediate Plus,-0x1
130d e5fe | | Load 0x2,-0x2
130e 01d7 | | Execute Vector,Field_Read
130f 0271 | q | Execute Discrete,Times
1310 0274 | t | Execute Discrete,Absolute_Value
1311 00d9 | | Load_Top At_Offset_1
1312 e607 | | Load 0x3,0x7
1313 0273 | s | Execute Discrete,Plus
1314 e602 | | Load 0x3,0x2
1315 01d7 | | Execute Vector,Field_Read
1316 0273 | s | Execute Discrete,Plus
1317 e603 | | Load 0x3,0x3
1318 0273 | s | Execute Discrete,Plus
1319 a604 | | Store_Unchecked 0x3,0x4
131a e604 | | Load 0x3,0x4
131b 602c |`, | Indirect_Literal Discrete,0x1348,{0x00000000, 0x80000000}
131c 026f | o | Execute Discrete,Remainder
131d 00d9 | | Load_Top At_Offset_1
131e e607 | | Load 0x3,0x7
131f 0273 | s | Execute Discrete,Plus
1320 e602 | | Load 0x3,0x2
1321 01d6 | | Execute Vector,Field_Write
1322 e604 | | Load 0x3,0x4
1323 09e1 | | Execute_Immediate Binary_Scale,-0x1f
1324 a603 | | Store_Unchecked 0x3,0x3
1325 00c8 | | Action Pop_Auxiliary_Range
1326 37dc |7 | Loop_Decreasing 0x1303
1327 00ce | | Action Pop_Auxiliary
1328 e603 | | Load 0x3,0x3
1329 00d9 | | Load_Top At_Offset_1
132a e602 | | Load 0x3,0x2
132b 01d6 | | Execute Vector,Field_Write
132c 00c8 | | Action Pop_Auxiliary_Range
132d 37ce |7 | Loop_Decreasing 0x12fc
132e 00ce | | Action Pop_Auxiliary
132f e402 | | Load 0x2,0x2
1330 e5ff | | Load 0x2,-0x1
1331 01d7 | | Execute Vector,Field_Read
1332 0d00 | | Execute_Immediate Less,0x0
1333 e403 | | Load 0x2,0x3
1334 e5fe | | Load 0x2,-0x2
1335 01d7 | | Execute Vector,Field_Read
1336 0d00 | | Execute_Immediate Less,0x0
1337 0277 | w | Execute Discrete,Xor
1338 680a |h | Jump_Zero 0x1343
1339 00da | | Load_Top At_Offset_2
133a 82a9 | | Call 0x1,0xa9
133b a402 | | Store_Unchecked 0x2,0x2
133c e402 | | Load 0x2,0x2
133d 00db | | Load_Top At_Offset_3
133e 01d7 | | Execute Vector,Field_Read
133f 0275 | u | Execute Discrete,Unary_Minus
1340 e402 | | Load 0x2,0x2
1341 e602 | | Load 0x3,0x2
1342 01d6 | | Execute Vector,Field_Write
1343 e5fd | | Load 0x2,-0x3
1344 00db | | Load_Top At_Offset_3
1345 82a1 | | Call 0x1,0xa1
1346 4501 |E | Exit_Subprogram 0x1
1347 0000 | | .XXX[0x1]
1348 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
134c 0000 0000 | | .BLANK 0000[0x4]
1350 ; --------------------------------------------------------------------------------------
1350 ; SUBPROGRAM
1350 ; --------------------------------------------------------------------------------------
1350 1366 | f | .CONST 0x1366 ; Address of begin
1351 0004 | | .CONST 0x0004 ; Address of exception handler
1352 0005 | | .CONST 0x0005 ; Number of locals
1353 INIT_1350:
1353 e403 | | Load 0x2,0x3
1354 e5fe | | Load 0x2,-0x2
1355 82af | | Call 0x1,0xaf
1356 0271 | q | Execute Discrete,Times
1357 00e2 | | Load_Encached Integer_Cache
1358 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1359 4801 |H | Short_Literal 0x1
135a 00d9 | | Load_Top At_Offset_1
135b e220 | | Load 0x1,0x20
135c 035b | [ | Declare_Type Array,Constrained
135d 0337 | 7 | Declare_Variable Array
135e 4801 |H | Short_Literal 0x1
135f 00da | | Load_Top At_Offset_2
1360 e220 | | Load 0x1,0x20
1361 035b | [ | Declare_Type Array,Constrained
1362 0337 | 7 | Declare_Variable Array
1363 e5fe | | Load 0x2,-0x2
1364 00e2 | | Load_Encached Integer_Cache
1365 03f1 | | Declare_Variable Discrete,With_Value
1366 BODY_1350:
1366 00d9 | | Load_Top At_Offset_1
1367 e402 | | Load 0x2,0x2
1368 e5ff | | Load 0x2,-0x1
1369 01dc | | Execute Vector,Last
136a e5ff | | Load 0x2,-0x1
136b 01cf | | Execute Vector,Slice_Read
136c 8227 | ' | Call 0x1,0x27
136d 82a1 | | Call 0x1,0xa1
136e 00d1 | | Pop_Control Pop_Count_1
136f 00da | | Load_Top At_Offset_2
1370 4801 |H | Short_Literal 0x1
1371 82a2 | | Call 0x1,0xa2
1372 00d1 | | Pop_Control Pop_Count_1
1373 00cf | | Action Mark_Auxiliary
1374 00d9 | | Load_Top At_Offset_1
1375 4802 |H | Short_Literal 0x2
1376 026f | o | Execute Discrete,Remainder
1377 0f01 | | Execute_Immediate Equal,0x1
1378 6805 |h | Jump_Zero 0x137e
1379 00db | | Load_Top At_Offset_3
137a 00db | | Load_Top At_Offset_3
137b e603 | | Load 0x3,0x3
137c 82ae | | Call 0x1,0xae
137d 00d1 | | Pop_Control Pop_Count_1
137e 00d9 | | Load_Top At_Offset_1
137f 09ff | | Execute_Immediate Binary_Scale,-0x1
1380 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
1381 00d9 | | Load_Top At_Offset_1
1382 6807 |h | Jump_Zero 0x138a
1383 00da | | Load_Top At_Offset_2
1384 00db | | Load_Top At_Offset_3
1385 e604 | | Load 0x3,0x4
1386 82ae | | Call 0x1,0xae
1387 00d1 | | Pop_Control Pop_Count_1
1388 00c9 | | Action Pop_Auxiliary_Loop
1389 7fea | | Jump 0x1374
138a 00ce | | Action Pop_Auxiliary
138b e402 | | Load 0x2,0x2
138c e5ff | | Load 0x2,-0x1
138d 01d7 | | Execute Vector,Field_Read
138e 0d00 | | Execute_Immediate Less,0x0
138f 680f |h | Jump_Zero 0x139f
1390 e5fe | | Load 0x2,-0x2
1391 4802 |H | Short_Literal 0x2
1392 026f | o | Execute Discrete,Remainder
1393 0f01 | | Execute_Immediate Equal,0x1
1394 680a |h | Jump_Zero 0x139f
1395 00da | | Load_Top At_Offset_2
1396 82a9 | | Call 0x1,0xa9
1397 a402 | | Store_Unchecked 0x2,0x2
1398 e402 | | Load 0x2,0x2
1399 00db | | Load_Top At_Offset_3
139a 01d7 | | Execute Vector,Field_Read
139b 0275 | u | Execute Discrete,Unary_Minus
139c e402 | | Load 0x2,0x2
139d e603 | | Load 0x3,0x3
139e 01d6 | | Execute Vector,Field_Write
139f e5fd | | Load 0x2,-0x3
13a0 00db | | Load_Top At_Offset_3
13a1 82a1 | | Call 0x1,0xa1
13a2 4501 |E | Exit_Subprogram 0x1
13a3 0000 0000 | | .BLANK 0000[0x5]
13a8 ; --------------------------------------------------------------------------------------
13a8 ; SUBPROGRAM
13a8 ; SUBPROGRAM
13a8 ; --------------------------------------------------------------------------------------
13a8 13ab | | .CONST 0x13ab ; Address of begin
; Address of begin
13a9 0004 | | .CONST 0x0004 ; Address of exception handler
; Address of exception handler
13aa 0001 | | .CONST 0x0001 ; Number of locals
; Number of locals
13ab BODY_13a8:
13ab BODY_13a8:
13ab INIT_13a8:
13ab INIT_13a8:
13ab 4608 |F | Jump_Case 0x8
13ac 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
13ad 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
13ae 7824 |x$ | Jump 0x13d3 ; case 0x2
13af 7823 |x# | Jump 0x13d3 ; case 0x3
13b0 7822 |x" | Jump 0x13d3 ; case 0x4
13b1 7821 |x! | Jump 0x13d3 ; case 0x5
13b2 7820 |x | Jump 0x13d3 ; case 0x6
13b3 7801 |x | Jump 0x13b5 ; case 0x7
13b4 780e |x | Jump 0x13c3 ; case 0x8
13b5 e5fd | | Load 0x2,-0x3
13b6 e5fe | | Load 0x2,-0x2
13b7 4801 |H | Short_Literal 0x1
13b8 e5fd | | Load 0x2,-0x3
13b9 e220 | | Load 0x1,0x20
13ba 035b | [ | Declare_Type Array,Constrained
13bb 4801 |H | Short_Literal 0x1
13bc e5fe | | Load 0x2,-0x2
13bd e220 | | Load 0x1,0x20
13be 035b | [ | Declare_Type Array,Constrained
13bf 4802 |H | Short_Literal 0x2
13c0 e5ff | | Load 0x2,-0x1
13c1 031b | | Declare_Type Variant_Record,Constrained
13c2 4203 |B | Exit_Subprogram From_Utility,With_Result,0x3
13c3 e5fd | | Load 0x2,-0x3
13c4 e5fe | | Load 0x2,-0x2
13c5 e5ff | | Load 0x2,-0x1
13c6 02fc | | Declare_Variable Variant_Record,With_Constraint
13c7 4801 |H | Short_Literal 0x1
13c8 e5fd | | Load 0x2,-0x3
13c9 e220 | | Load 0x1,0x20
13ca 0334 | 4 | Declare_Variable Array,With_Constraint
13cb 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
13cc 4801 |H | Short_Literal 0x1
13cd e5fe | | Load 0x2,-0x2
13ce e220 | | Load 0x1,0x20
13cf 0334 | 4 | Declare_Variable Array,With_Constraint
13d0 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4
13d1 016a | j | Execute Variant_Record,Indirects_Appended
13d2 4203 |B | Exit_Subprogram From_Utility,With_Result,0x3
13d3 0869 | i | Execute_Immediate Raise,0x69
13d4 0000 0000 | | .BLANK 0000[0x4]
13d8 ; --------------------------------------------------------------------------------------
13d8 ; SUBPROGRAM
13d8 ; --------------------------------------------------------------------------------------
13d8 13db | | .CONST 0x13db ; Address of begin
13d9 0004 | | .CONST 0x0004 ; Address of exception handler
13da 0001 | | .CONST 0x0001 ; Number of locals
13db BODY_13d8:
13db INIT_13d8:
13db 4608 |F | Jump_Case 0x8
13dc 7808 |x | Jump 0x13e5 ; case 0x0
13dd 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
13de 7831 |x1 | Jump 0x1410 ; case 0x2
13df 7830 |x0 | Jump 0x1410 ; case 0x3
13e0 782f |x/ | Jump 0x1410 ; case 0x4
13e1 782e |x. | Jump 0x1410 ; case 0x5
13e2 782d |x- | Jump 0x1410 ; case 0x6
13e3 780e |x | Jump 0x13f2 ; case 0x7
13e4 781b |x | Jump 0x1400 ; case 0x8
13e5 00da | | Load_Top At_Offset_2
13e6 016c | l | Execute Variant_Record,Is_Constrained
13e7 7009 |p | Jump_Nonzero 0x13f1
13e8 00cf | | Action Mark_Auxiliary
13e9 4801 |H | Short_Literal 0x1
13ea 4801 |H | Short_Literal 0x1
13eb e5ff | | Load 0x2,-0x1
13ec 1c08 | | Execute_Immediate Run_Utility,0x8
13ed 00d8 | | Load_Top At_Offset_0
13ee 1c00 | | Execute_Immediate Run_Utility,0x0
13ef c5ff | | Store 0x2,-0x1
13f0 00ce | | Action Pop_Auxiliary
13f1 4302 |C | Exit_Subprogram From_Utility,0x2
13f2 e5fd | | Load 0x2,-0x3
13f3 e5fe | | Load 0x2,-0x2
13f4 4801 |H | Short_Literal 0x1
13f5 e5fd | | Load 0x2,-0x3
13f6 e220 | | Load 0x1,0x20
13f7 035b | [ | Declare_Type Array,Constrained
13f8 4801 |H | Short_Literal 0x1
13f9 e5fe | | Load 0x2,-0x2
13fa e220 | | Load 0x1,0x20
13fb 035b | [ | Declare_Type Array,Constrained
13fc 4802 |H | Short_Literal 0x2
13fd e5ff | | Load 0x2,-0x1
13fe 031b | | Declare_Type Variant_Record,Constrained
13ff 4203 |B | Exit_Subprogram From_Utility,With_Result,0x3
1400 e5fd | | Load 0x2,-0x3
1401 e5fe | | Load 0x2,-0x2
1402 e5ff | | Load 0x2,-0x1
1403 02fc | | Declare_Variable Variant_Record,With_Constraint
1404 4801 |H | Short_Literal 0x1
1405 e5fd | | Load 0x2,-0x3
1406 e220 | | Load 0x1,0x20
1407 0334 | 4 | Declare_Variable Array,With_Constraint
1408 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
1409 4801 |H | Short_Literal 0x1
140a e5fe | | Load 0x2,-0x2
140b e220 | | Load 0x1,0x20
140c 0334 | 4 | Declare_Variable Array,With_Constraint
140d 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4
140e 016a | j | Execute Variant_Record,Indirects_Appended
140f 4203 |B | Exit_Subprogram From_Utility,With_Result,0x3
1410 0869 | i | Execute_Immediate Raise,0x69
1411 0000 0000 | | .BLANK 0000[0x7]
1418 ; --------------------------------------------------------------------------------------
1418 ; SUBPROGRAM
1418 ; --------------------------------------------------------------------------------------
1418 141b | | .CONST 0x141b ; Address of begin
1419 0004 | | .CONST 0x0004 ; Address of exception handler
141a 0001 | | .CONST 0x0001 ; Number of locals
141b BODY_1418:
141b INIT_1418:
141b 4608 |F | Jump_Case 0x8
141c 7808 |x | Jump 0x1425 ; case 0x0
141d 781b |x | Jump 0x1439 ; case 0x1
141e 783d |x= | Jump 0x145c ; case 0x2
141f 783c |x< | Jump 0x145c ; case 0x3
1420 783b |x; | Jump 0x145c ; case 0x4
1421 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
1422 7839 |x9 | Jump 0x145c ; case 0x6
1423 7818 |x | Jump 0x143c ; case 0x7
1424 7826 |x& | Jump 0x144b ; case 0x8
1425 00da | | Load_Top At_Offset_2
1426 016c | l | Execute Variant_Record,Is_Constrained
1427 700b |p | Jump_Nonzero 0x1433
1428 00cf | | Action Mark_Auxiliary
1429 4801 |H | Short_Literal 0x1
142a 4801 |H | Short_Literal 0x1
142b 4801 |H | Short_Literal 0x1
142c e5ff | | Load 0x2,-0x1
142d 1c08 | | Execute_Immediate Run_Utility,0x8
142e 00d8 | | Load_Top At_Offset_0
142f 1c00 | | Execute_Immediate Run_Utility,0x0
1430 c5ff | | Store 0x2,-0x1
1431 00ce | | Action Pop_Auxiliary
1432 4302 |C | Exit_Subprogram From_Utility,0x2
1433 00da | | Load_Top At_Offset_2
1434 2207 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x7
1435 00da | | Load_Top At_Offset_2
1436 2507 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x7
1437 1c00 | | Execute_Immediate Run_Utility,0x0
1438 4302 |C | Exit_Subprogram From_Utility,0x2
1439 00da | | Load_Top At_Offset_2
143a 2207 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x7
143b 4302 |C | Exit_Subprogram From_Utility,0x2
143c e5fc | | Load 0x2,-0x4
143d e5fd | | Load 0x2,-0x3
143e e5fe | | Load 0x2,-0x2
143f 4801 |H | Short_Literal 0x1
1440 e5fc | | Load 0x2,-0x4
1441 e260 | ` | Load 0x1,0x60
1442 035b | [ | Declare_Type Array,Constrained
1443 e5fd | | Load 0x2,-0x3
1444 e5fe | | Load 0x2,-0x2
1445 e23f | ? | Load 0x1,0x3f
1446 1c07 | | Execute_Immediate Run_Utility,0x7
1447 4802 |H | Short_Literal 0x2
1448 e5ff | | Load 0x2,-0x1
1449 031b | | Declare_Type Variant_Record,Constrained
144a 4204 |B | Exit_Subprogram From_Utility,With_Result,0x4
144b e5fc | | Load 0x2,-0x4
144c e5fd | | Load 0x2,-0x3
144d e5fe | | Load 0x2,-0x2
144e e5ff | | Load 0x2,-0x1
144f 02fc | | Declare_Variable Variant_Record,With_Constraint
1450 4801 |H | Short_Literal 0x1
1451 e5fc | | Load 0x2,-0x4
1452 e260 | ` | Load 0x1,0x60
1453 0334 | 4 | Declare_Variable Array,With_Constraint
1454 2d06 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6
1455 e5fd | | Load 0x2,-0x3
1456 e5fe | | Load 0x2,-0x2
1457 e23f | ? | Load 0x1,0x3f
1458 1c08 | | Execute_Immediate Run_Utility,0x8
1459 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
145a 016a | j | Execute Variant_Record,Indirects_Appended
145b 4204 |B | Exit_Subprogram From_Utility,With_Result,0x4
145c 0869 | i | Execute_Immediate Raise,0x69
145d ; --------------------------------------------------------------------------------------
145d ; STRING TABLE
145d ; --------------------------------------------------------------------------------------
145d 0008 | | .STRTAB 0x0008->0x1461 ; "QUOTIENT"
145e 000e | | .STRTAB 0x000e->0x1465 ; "REMAINDER"
145f 0015 | | .STRTAB 0x0015->0x1469 ; "BOTH"
1460 0017 | | .STREND 0x0017->0x146b
1461 5155 4f54 |QUOT| .STRTAB_STRINGS
146c 0000 0000 | | .BLANK 0000[0x4]
1470 ; --------------------------------------------------------------------------------------
1470 ; Debug Table
1470 ; --------------------------------------------------------------------------------------
1470 0004 000d | | .DEBUG4 0x0004,0x000d,0x5095,0x0000,0x0001,0x0000
1476 0000 0000 | | .BLANK 0000[0x5]
147b 0635 8000 | 5 | .XXX[0x2]
147d 0000 0000 | | .BLANK 0000[0x7]
1484 0004 8580 | | .XXX[0x2]
1486 0000 0000 | | .BLANK 0000[0x8]
148e 0479 | y | .XXX[0x1]
148f 0000 0000 | | .BLANK 0000[0x6]
1495 0170 e000 | p | .XXX[0x2]
1497 0000 0000 | | .BLANK 0000[0x5]
149c 0049 a000 | I | .XXX[0x13]
149e 0000 e8c0 | |
14a0 0000 0000 | |
14a2 0000 000e | |
14a4 fc00 0000 | |
14a6 4688 08b0 |F |
14a8 0000 0000 | |
14aa 0005 2900 | ) |
14ac 0000 1018 | |
14ae 0200 | |
14af 0000 0000 | | .BLANK 0000[0x5]
14b4 0495 | | .XXX[0x1]
14b5 0000 0000 | | .BLANK 0000[0x8]
14bd 0005 e380 | | .XXX[0xc]
14bf 0000 0000 | |
14c1 0000 004e | N|
14c3 6800 0000 |h |
14c5 0000 0000 | |
14c7 0450 808e | P |
14c9 0000 0000 | | .BLANK 0000[0x5]
14ce 0144 e000 | D | .XXX[0x11]
14d0 0004 6380 | c |
14d2 8300 1b06 | |
14d4 0000 0041 | A|
14d6 5808 1000 |X |
14d8 ed00 0000 | |
14da 0000 0000 | |
14dc 000f ae02 | |
14de 4000 |@ |
14df 0000 0000 | | .BLANK 0000[0x4]
14e3 0003 e200 | | .XXX[0xa]
14e5 0000 1332 | 2|
14e7 0000 0041 | A|
14e9 0808 7000 | p |
14eb fd60 2500 | `% |
14ed 0000 0000 | | .BLANK 0000[0x7]
14f4 0158 c000 | X | .XXX[0x7]
14f6 0000 0000 | |
14f8 0000 11b6 | |
14fa 0248 | H |
14fb 0000 0000 | | .BLANK 0000[0x5]
1500 042c 8000 | , | .XXX[0x28]
1502 0000 0000 | |
1504 0000 4278 | Bx|
1506 0000 013f | ?|
1508 e000 0003 | |
150a f080 0000 | |
150c 145c 0000 | \ |
150e 005e c009 | ^ |
1510 c001 5760 | W`|
1512 0000 0401 | |
1514 0000 001a | |
1516 8200 0000 | |
1518 3fc0 0820 |? |
151a 0000 0000 | |
151c 0004 d180 | |
151e 0000 0ee2 | |
1520 0000 003d | =|
1522 b809 a000 | |
1524 0000 0000 | |
1526 0395 0084 | |
1528 0000 0000 | | .BLANK 0000[0x7]
152f 0004 4100 | A | .XXX[0x3]
1531 9300 | |
1532 0000 0000 | | .BLANK 0000[0x7]
1539 039a | | .XXX[0x1]
153a 0000 0000 | | .BLANK 0000[0x6]
1540 010c 6000 | ` | .XXX[0x2]
1542 0000 0000 | | .BLANK 0000[0x5]
1547 0043 c000 | C | .XXX[0x1c]
1549 0001 6660 | f`|
154b 0000 0655 | U|
154d 0097 0000 | |
154f 0000 0000 | |
1551 6498 0000 |d |
1553 00f4 4021 | @!|
1555 4005 7500 |@ u |
1557 0000 1634 | 4|
1559 0258 0044 | X D|
155b 6000 0000 |` |
155d 0000 0000 | |
155f 039e 0000 | |
1561 0015 7000 | p |
1563 0000 0000 | | .BLANK 0000[0x5]
1568 0005 6f80 | o | .XXX[0x2]
156a 0000 0000 | | .BLANK 0000[0x8]
1572 03aa 0089 | | .XXX[0x49]
1574 0010 6a00 | j |
1576 0000 4558 | EX|
1578 0000 0116 | |
157a a000 0004 | |
157c 7e00 0000 |~ |
157e 1242 0244 | B D|
1580 004b 6808 | Kh |
1582 6001 2fe0 |` / |
1584 0000 04eb | |
1586 8000 0014 | |
1588 7400 0000 |t |
158a 5208 09b0 |R |
158c 0153 8000 | S |
158e 0005 5280 | R |
1590 9500 160a | |
1592 0260 005a | ` Z|
1594 4008 f001 |@ |
1596 6ca0 0000 |l |
1598 05d5 0000 | |
159a 0017 ca00 | |
159c 0000 5f90 | _ |
159e 0000 0180 | |
15a0 e000 0006 | |
15a2 1b80 0000 | |
15a4 18ac 0000 | |
15a6 0063 b000 | c |
15a8 0001 9480 | |
15aa 0000 0663 | c|
15ac 0099 0019 | |
15ae ee02 7400 | t |
15b0 6878 0000 |hx |
15b2 01ab 4000 | @ |
15b4 0006 b580 | |
15b6 0000 1ae2 | |
15b8 0000 006c | l|
15ba 9000 | |
15bb 0000 0000 | | .BLANK 0000[0x45]