|
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_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1460 | ` | .CONST 0x1460 ; 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 037e | ~ | .CONST 0x037e ; 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 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated
0011 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
0013 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated
0015 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated
0017 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated
0019 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated
001b 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated
001d 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
001f 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
0021 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
0023 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated
0025 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
0027 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated
0029 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated
002b 029a 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Visible,Unelaborated
002d 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated
002f 6354 |cT | Indirect_Literal Discrete,0x384,{0xffffffff, 0x80000001}
0030 634f |cO | Indirect_Literal Discrete,0x380,{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 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated
003b 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated
003d 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated
003f 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated
0041 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated
0043 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated
0045 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated
0047 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated
0049 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated
004b 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated
004d 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated
004f 029a 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Visible,Unelaborated
0051 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated
0053 029a 058b | | Declare_Subprogram INIT_0588,For_Outer_Call,Visible,Unelaborated
0055 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated
0057 029a 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call,Visible,Unelaborated
0059 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated
005b 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated
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 13cb | | Declare_Subprogram INIT_13c8,For_Call
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 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Visible,Unelaborated
006c 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated
006e 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated
0070 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated
0072 4fff |O | Short_Literal -0x1
0073 4801 |H | Short_Literal 0x1
0074 00e5 | | Load_Encached Long_Integer_Cache
0075 03f9 | | Declare_Type Discrete,Constrained,Visible
0076 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated
0078 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated
007a 029a 06db | | Declare_Subprogram INIT_06d8,For_Outer_Call,Visible,Unelaborated
007c 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated
007e 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated
0080 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated
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 139b | | Declare_Subprogram INIT_1398,For_Call
008b 00d9 | | Load_Top At_Offset_1
008c 012a | * | Execute Any,Change_Utility
008d 0007 | | Action Break_Optional
008e 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated
0090 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated
0092 029a 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call,Visible,Unelaborated
0094 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated
0096 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated
0098 029a 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call,Visible,Unelaborated
009a 029a 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Visible,Unelaborated
009c 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated
009e 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated
00a0 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated
00a2 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated
00a4 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated
00a6 029a 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call,Visible,Unelaborated
00a8 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated
00aa 029a 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call,Visible,Unelaborated
00ac 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated
00ae 029a 0823 | #| Declare_Subprogram INIT_0820,For_Outer_Call,Visible,Unelaborated
00b0 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated
00b2 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated
00b4 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated
00b6 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated
00b8 029a 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call,Visible,Unelaborated
00ba 029a 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call,Visible,Unelaborated
00bc 029a 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call,Visible,Unelaborated
00be 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated
00c0 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated
00c2 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated
00c4 029a 089b | | Declare_Subprogram INIT_0898,For_Outer_Call,Visible,Unelaborated
00c6 029a 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call,Visible,Unelaborated
00c8 029a 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call,Visible,Unelaborated
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 140b | | Declare_Subprogram INIT_1408,For_Call
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 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call,Visible,Unelaborated
00e6 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated
00e8 029a 08db | | Declare_Subprogram INIT_08d8,For_Outer_Call,Visible,Unelaborated
00ea 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated
00ec 029a 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Visible,Unelaborated
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 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible
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 139b | | Declare_Subprogram INIT_1398,For_Call
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 0923 | #| Declare_Subprogram INIT_0920,For_Call
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 0334 | 4 | Declare_Variable Array,With_Constraint
0192 4800 |H | Short_Literal 0x0
0193 4801 |H | Short_Literal 0x1
0194 00da | | Load_Top At_Offset_2
0195 01d6 | | Execute Vector,Field_Write
0196 4801 |H | Short_Literal 0x1
0197 4801 |H | Short_Literal 0x1
0198 e220 | | Load 0x1,0x20
0199 0334 | 4 | Declare_Variable Array,With_Constraint
019a 4801 |H | Short_Literal 0x1
019b 4801 |H | Short_Literal 0x1
019c 00da | | Load_Top At_Offset_2
019d 01d6 | | Execute Vector,Field_Write
019e 4801 |H | Short_Literal 0x1
019f 4801 |H | Short_Literal 0x1
01a0 e220 | | Load 0x1,0x20
01a1 0334 | 4 | Declare_Variable Array,With_Constraint
01a2 4802 |H | Short_Literal 0x2
01a3 4801 |H | Short_Literal 0x1
01a4 00da | | Load_Top At_Offset_2
01a5 01d6 | | Execute Vector,Field_Write
01a6 4801 |H | Short_Literal 0x1
01a7 4801 |H | Short_Literal 0x1
01a8 e220 | | Load 0x1,0x20
01a9 0334 | 4 | Declare_Variable Array,With_Constraint
01aa 480a |H | Short_Literal 0xa
01ab 4801 |H | Short_Literal 0x1
01ac 00da | | Load_Top At_Offset_2
01ad 01d6 | | Execute Vector,Field_Write
01ae 4801 |H | Short_Literal 0x1
01af 4801 |H | Short_Literal 0x1
01b0 e23f | ? | Load 0x1,0x3f
01b1 1c08 | | Execute_Immediate Run_Utility,0x8
01b2 e295 | | Load 0x1,0x95
01b3 00d9 | | Load_Top At_Offset_1
01b4 00d8 | | Load_Top At_Offset_0
01b5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01b6 00da | | Load_Top At_Offset_2
01b7 01da | | Execute Vector,Bounds
01b8 00da | | Load_Top At_Offset_2
01b9 01da | | Execute Vector,Bounds
01ba 00da | | Load_Top At_Offset_2
01bb 027f | | Execute Discrete,Equal
01bc 7001 |p | Jump_Nonzero 0x1be
01bd 08e0 | | Execute_Immediate Raise,0xe0
01be 00cd | | Action Spare6_Action
01bf 027f | | Execute Discrete,Equal
01c0 7001 |p | Jump_Nonzero 0x1c2
01c1 08e0 | | Execute_Immediate Raise,0xe0
01c2 00d2 | | Pop_Control Pop_Count_2
01c3 00d9 | | Load_Top At_Offset_1
01c4 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
01c5 00db | | Load_Top At_Offset_3
01c6 00d9 | | Load_Top At_Offset_1
01c7 00d8 | | Load_Top At_Offset_0
01c8 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
01c9 00da | | Load_Top At_Offset_2
01ca 01da | | Execute Vector,Bounds
01cb 00da | | Load_Top At_Offset_2
01cc 01da | | Execute Vector,Bounds
01cd 00da | | Load_Top At_Offset_2
01ce 027f | | Execute Discrete,Equal
01cf 7001 |p | Jump_Nonzero 0x1d1
01d0 08e0 | | Execute_Immediate Raise,0xe0
01d1 00cd | | Action Spare6_Action
01d2 027f | | Execute Discrete,Equal
01d3 7001 |p | Jump_Nonzero 0x1d5
01d4 08e0 | | Execute_Immediate Raise,0xe0
01d5 00d2 | | Pop_Control Pop_Count_2
01d6 00d9 | | Load_Top At_Offset_1
01d7 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
01d8 4801 |H | Short_Literal 0x1
01d9 4801 |H | Short_Literal 0x1
01da e23f | ? | Load 0x1,0x3f
01db 1c08 | | Execute_Immediate Run_Utility,0x8
01dc e296 | | Load 0x1,0x96
01dd 00d9 | | Load_Top At_Offset_1
01de 00d8 | | Load_Top At_Offset_0
01df 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e0 00da | | Load_Top At_Offset_2
01e1 01da | | Execute Vector,Bounds
01e2 00da | | Load_Top At_Offset_2
01e3 01da | | Execute Vector,Bounds
01e4 00da | | Load_Top At_Offset_2
01e5 027f | | Execute Discrete,Equal
01e6 7001 |p | Jump_Nonzero 0x1e8
01e7 08e0 | | Execute_Immediate Raise,0xe0
01e8 00cd | | Action Spare6_Action
01e9 027f | | Execute Discrete,Equal
01ea 7001 |p | Jump_Nonzero 0x1ec
01eb 08e0 | | Execute_Immediate Raise,0xe0
01ec 00d2 | | Pop_Control Pop_Count_2
01ed 00d9 | | Load_Top At_Offset_1
01ee 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
01ef 00db | | Load_Top At_Offset_3
01f0 00d9 | | Load_Top At_Offset_1
01f1 00d8 | | Load_Top At_Offset_0
01f2 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
01f3 00da | | Load_Top At_Offset_2
01f4 01da | | Execute Vector,Bounds
01f5 00da | | Load_Top At_Offset_2
01f6 01da | | Execute Vector,Bounds
01f7 00da | | Load_Top At_Offset_2
01f8 027f | | Execute Discrete,Equal
01f9 7001 |p | Jump_Nonzero 0x1fb
01fa 08e0 | | Execute_Immediate Raise,0xe0
01fb 00cd | | Action Spare6_Action
01fc 027f | | Execute Discrete,Equal
01fd 7001 |p | Jump_Nonzero 0x1ff
01fe 08e0 | | Execute_Immediate Raise,0xe0
01ff 00d2 | | Pop_Control Pop_Count_2
0200 00d9 | | Load_Top At_Offset_1
0201 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0202 4801 |H | Short_Literal 0x1
0203 4801 |H | Short_Literal 0x1
0204 e23f | ? | Load 0x1,0x3f
0205 1c08 | | Execute_Immediate Run_Utility,0x8
0206 e296 | | Load 0x1,0x96
0207 00d9 | | Load_Top At_Offset_1
0208 00d8 | | Load_Top At_Offset_0
0209 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
020a 00da | | Load_Top At_Offset_2
020b 01da | | Execute Vector,Bounds
020c 00da | | Load_Top At_Offset_2
020d 01da | | Execute Vector,Bounds
020e 00da | | Load_Top At_Offset_2
020f 027f | | Execute Discrete,Equal
0210 7001 |p | Jump_Nonzero 0x212
0211 08e0 | | Execute_Immediate Raise,0xe0
0212 00cd | | Action Spare6_Action
0213 027f | | Execute Discrete,Equal
0214 7001 |p | Jump_Nonzero 0x216
0215 08e0 | | Execute_Immediate Raise,0xe0
0216 00d2 | | Pop_Control Pop_Count_2
0217 00d9 | | Load_Top At_Offset_1
0218 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0219 e296 | | Load 0x1,0x96
021a 00d9 | | Load_Top At_Offset_1
021b 00d8 | | Load_Top At_Offset_0
021c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
021d 00da | | Load_Top At_Offset_2
021e 01da | | Execute Vector,Bounds
021f 00da | | Load_Top At_Offset_2
0220 01da | | Execute Vector,Bounds
0221 00da | | Load_Top At_Offset_2
0222 027f | | Execute Discrete,Equal
0223 7001 |p | Jump_Nonzero 0x225
0224 08e0 | | Execute_Immediate Raise,0xe0
0225 00cd | | Action Spare6_Action
0226 027f | | Execute Discrete,Equal
0227 7001 |p | Jump_Nonzero 0x229
0228 08e0 | | Execute_Immediate Raise,0xe0
0229 00d2 | | Pop_Control Pop_Count_2
022a 00d9 | | Load_Top At_Offset_1
022b 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
022c 4801 |H | Short_Literal 0x1
022d 4801 |H | Short_Literal 0x1
022e e23f | ? | Load 0x1,0x3f
022f 1c08 | | Execute_Immediate Run_Utility,0x8
0230 e297 | | Load 0x1,0x97
0231 00d9 | | Load_Top At_Offset_1
0232 00d8 | | Load_Top At_Offset_0
0233 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0234 00da | | Load_Top At_Offset_2
0235 01da | | Execute Vector,Bounds
0236 00da | | Load_Top At_Offset_2
0237 01da | | Execute Vector,Bounds
0238 00da | | Load_Top At_Offset_2
0239 027f | | Execute Discrete,Equal
023a 7001 |p | Jump_Nonzero 0x23c
023b 08e0 | | Execute_Immediate Raise,0xe0
023c 00cd | | Action Spare6_Action
023d 027f | | Execute Discrete,Equal
023e 7001 |p | Jump_Nonzero 0x240
023f 08e0 | | Execute_Immediate Raise,0xe0
0240 00d2 | | Pop_Control Pop_Count_2
0241 00d9 | | Load_Top At_Offset_1
0242 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0243 e296 | | Load 0x1,0x96
0244 00d9 | | Load_Top At_Offset_1
0245 00d8 | | Load_Top At_Offset_0
0246 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0247 00da | | Load_Top At_Offset_2
0248 01da | | Execute Vector,Bounds
0249 00da | | Load_Top At_Offset_2
024a 01da | | Execute Vector,Bounds
024b 00da | | Load_Top At_Offset_2
024c 027f | | Execute Discrete,Equal
024d 7001 |p | Jump_Nonzero 0x24f
024e 08e0 | | Execute_Immediate Raise,0xe0
024f 00cd | | Action Spare6_Action
0250 027f | | Execute Discrete,Equal
0251 7001 |p | Jump_Nonzero 0x253
0252 08e0 | | Execute_Immediate Raise,0xe0
0253 00d2 | | Pop_Control Pop_Count_2
0254 00d9 | | Load_Top At_Offset_1
0255 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0256 4801 |H | Short_Literal 0x1
0257 4801 |H | Short_Literal 0x1
0258 e23f | ? | Load 0x1,0x3f
0259 1c08 | | Execute_Immediate Run_Utility,0x8
025a e298 | | Load 0x1,0x98
025b 00d9 | | Load_Top At_Offset_1
025c 00d8 | | Load_Top At_Offset_0
025d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
025e 00da | | Load_Top At_Offset_2
025f 01da | | Execute Vector,Bounds
0260 00da | | Load_Top At_Offset_2
0261 01da | | Execute Vector,Bounds
0262 00da | | Load_Top At_Offset_2
0263 027f | | Execute Discrete,Equal
0264 7001 |p | Jump_Nonzero 0x266
0265 08e0 | | Execute_Immediate Raise,0xe0
0266 00cd | | Action Spare6_Action
0267 027f | | Execute Discrete,Equal
0268 7001 |p | Jump_Nonzero 0x26a
0269 08e0 | | Execute_Immediate Raise,0xe0
026a 00d2 | | Pop_Control Pop_Count_2
026b 00d9 | | Load_Top At_Offset_1
026c 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
026d e296 | | Load 0x1,0x96
026e 00d9 | | Load_Top At_Offset_1
026f 00d8 | | Load_Top At_Offset_0
0270 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0271 00da | | Load_Top At_Offset_2
0272 01da | | Execute Vector,Bounds
0273 00da | | Load_Top At_Offset_2
0274 01da | | Execute Vector,Bounds
0275 00da | | Load_Top At_Offset_2
0276 027f | | Execute Discrete,Equal
0277 7001 |p | Jump_Nonzero 0x279
0278 08e0 | | Execute_Immediate Raise,0xe0
0279 00cd | | Action Spare6_Action
027a 027f | | Execute Discrete,Equal
027b 7001 |p | Jump_Nonzero 0x27d
027c 08e0 | | Execute_Immediate Raise,0xe0
027d 00d2 | | Pop_Control Pop_Count_2
027e 00d9 | | Load_Top At_Offset_1
027f 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0280 e267 | g | Load 0x1,0x67
0281 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0282 0007 | | Action Break_Optional
0283 e267 | g | Load 0x1,0x67
0284 192f | / | Execute Package,Field_Reference,Field_Number 0x2f
0285 0007 | | Action Break_Optional
0286 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call
0288 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0289 00c7 | | Action Elaborate_Subprogram
028a 1d15 | | Execute_Immediate Reference_Lex_1,0x15
028b 00c7 | | Action Elaborate_Subprogram
028c 1d12 | | Execute_Immediate Reference_Lex_1,0x12
028d 00c7 | | Action Elaborate_Subprogram
028e 1d18 | | Execute_Immediate Reference_Lex_1,0x18
028f 00c7 | | Action Elaborate_Subprogram
0290 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0291 00c7 | | Action Elaborate_Subprogram
0292 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0293 00c7 | | Action Elaborate_Subprogram
0294 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0295 00c7 | | Action Elaborate_Subprogram
0296 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0297 00c7 | | Action Elaborate_Subprogram
0298 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0299 00c7 | | Action Elaborate_Subprogram
029a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
029b 00c7 | | Action Elaborate_Subprogram
029c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
029d 00c7 | | Action Elaborate_Subprogram
029e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
029f 00c7 | | Action Elaborate_Subprogram
02a0 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
02a1 00c7 | | Action Elaborate_Subprogram
02a2 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
02a3 00c7 | | Action Elaborate_Subprogram
02a4 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
02a5 00c7 | | Action Elaborate_Subprogram
02a6 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
02a7 00c7 | | Action Elaborate_Subprogram
02a8 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
02a9 00c7 | | Action Elaborate_Subprogram
02aa 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
02ab 00c7 | | Action Elaborate_Subprogram
02ac 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
02ad 00c7 | | Action Elaborate_Subprogram
02ae 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
02af 00c7 | | Action Elaborate_Subprogram
02b0 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
02b1 00c7 | | Action Elaborate_Subprogram
02b2 1d52 | R | Execute_Immediate Reference_Lex_1,0x52
02b3 00c7 | | Action Elaborate_Subprogram
02b4 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
02b5 00c7 | | Action Elaborate_Subprogram
02b6 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
02b7 00c7 | | Action Elaborate_Subprogram
02b8 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
02b9 00c7 | | Action Elaborate_Subprogram
02ba 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
02bb 00c7 | | Action Elaborate_Subprogram
02bc 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
02bd 00c7 | | Action Elaborate_Subprogram
02be 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
02bf 00c7 | | Action Elaborate_Subprogram
02c0 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
02c1 00c7 | | Action Elaborate_Subprogram
02c2 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call
02c4 029d 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call
02c6 029d 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call
02c8 029d 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call
02ca 029d 0a13 | | Declare_Subprogram INIT_0a10,For_Outer_Call
02cc 029d 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call
02ce 029d 0a93 | | Declare_Subprogram INIT_0a90,For_Outer_Call
02d0 029d 0ac3 | | Declare_Subprogram INIT_0ac0,For_Outer_Call
02d2 029d 0bab | | Declare_Subprogram INIT_0ba8,For_Outer_Call
02d4 029d 0bc3 | | Declare_Subprogram INIT_0bc0,For_Outer_Call
02d6 029d 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call
02d8 029d 0c4b | K| Declare_Subprogram INIT_0c48,For_Outer_Call
02da 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
02db 00c7 | | Action Elaborate_Subprogram
02dc 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
02dd 00c7 | | Action Elaborate_Subprogram
02de 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
02df 00c7 | | Action Elaborate_Subprogram
02e0 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
02e1 00c7 | | Action Elaborate_Subprogram
02e2 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
02e3 00c7 | | Action Elaborate_Subprogram
02e4 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
02e5 00c7 | | Action Elaborate_Subprogram
02e6 029d 0cc3 | | Declare_Subprogram INIT_0cc0,For_Outer_Call
02e8 029d 0d13 | | Declare_Subprogram INIT_0d10,For_Outer_Call
02ea 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
02eb 00c7 | | Action Elaborate_Subprogram
02ec 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
02ed 00c7 | | Action Elaborate_Subprogram
02ee 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
02ef 00c7 | | Action Elaborate_Subprogram
02f0 029d 0d83 | | Declare_Subprogram INIT_0d80,For_Outer_Call
02f2 029d 0d9b | | Declare_Subprogram INIT_0d98,For_Outer_Call
02f4 029d 0dcb | | Declare_Subprogram INIT_0dc8,For_Outer_Call
02f6 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
02f7 00c7 | | Action Elaborate_Subprogram
02f8 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
02f9 00c7 | | Action Elaborate_Subprogram
02fa 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
02fb 00c7 | | Action Elaborate_Subprogram
02fc 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
02fd 00c7 | | Action Elaborate_Subprogram
02fe 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
02ff 00c7 | | Action Elaborate_Subprogram
0300 029d 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call
0302 029d 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call
0304 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
0305 00c7 | | Action Elaborate_Subprogram
0306 029d 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call
0308 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
0309 00c7 | | Action Elaborate_Subprogram
030a 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
030b 00c7 | | Action Elaborate_Subprogram
030c 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
030d 00c7 | | Action Elaborate_Subprogram
030e 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
030f 00c7 | | Action Elaborate_Subprogram
0310 029d 0e6b | k| Declare_Subprogram INIT_0e68,For_Outer_Call
0312 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
0313 00c7 | | Action Elaborate_Subprogram
0314 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
0315 00c7 | | Action Elaborate_Subprogram
0316 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
0317 00c7 | | Action Elaborate_Subprogram
0318 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
0319 00c7 | | Action Elaborate_Subprogram
031a 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
031b 00c7 | | Action Elaborate_Subprogram
031c 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
031d 00c7 | | Action Elaborate_Subprogram
031e 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
031f 00c7 | | Action Elaborate_Subprogram
0320 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
0321 00c7 | | Action Elaborate_Subprogram
0322 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
0323 00c7 | | Action Elaborate_Subprogram
0324 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
0325 00c7 | | Action Elaborate_Subprogram
0326 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
0327 00c7 | | Action Elaborate_Subprogram
0328 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
0329 00c7 | | Action Elaborate_Subprogram
032a 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
032b 00c7 | | Action Elaborate_Subprogram
032c 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
032d 00c7 | | Action Elaborate_Subprogram
032e 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
032f 00c7 | | Action Elaborate_Subprogram
0330 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
0331 00c7 | | Action Elaborate_Subprogram
0332 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
0333 00c7 | | Action Elaborate_Subprogram
0334 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
0335 00c7 | | Action Elaborate_Subprogram
0336 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51
0337 00c7 | | Action Elaborate_Subprogram
0338 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
0339 00c7 | | Action Elaborate_Subprogram
033a 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
033b 00c7 | | Action Elaborate_Subprogram
033c 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
033d 00c7 | | Action Elaborate_Subprogram
033e 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
033f 00c7 | | Action Elaborate_Subprogram
0340 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0341 00c7 | | Action Elaborate_Subprogram
0342 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0343 00c7 | | Action Elaborate_Subprogram
0344 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0345 00c7 | | Action Elaborate_Subprogram
0346 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0347 00c7 | | Action Elaborate_Subprogram
0348 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
0349 00c7 | | Action Elaborate_Subprogram
034a 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
034b 00c7 | | Action Elaborate_Subprogram
034c 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
034d 00c7 | | Action Elaborate_Subprogram
034e 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
034f 00c7 | | Action Elaborate_Subprogram
0350 00b6 | | Action Make_Scope
0351 e002 | | Load 0x0,0x2
0352 e003 | | Load 0x0,0x3
0353 e004 | | Load 0x0,0x4
0354 e005 | | Load 0x0,0x5
0355 e006 | | Load 0x0,0x6
0356 e007 | | Load 0x0,0x7
0357 e008 | | Load 0x0,0x8
0358 e009 | | Load 0x0,0x9
0359 e00a | | Load 0x0,0xa
035a e00b | | Load 0x0,0xb
035b e00c | | Load 0x0,0xc
035c e00d | | Load 0x0,0xd
035d e00e | | Load 0x0,0xe
035e e00f | | Load 0x0,0xf
035f 1da4 | | Execute_Immediate Reference_Lex_1,0xa4
0360 1d9e | | Execute_Immediate Reference_Lex_1,0x9e
0361 e298 | | Load 0x1,0x98
0362 1da1 | | Execute_Immediate Reference_Lex_1,0xa1
0363 e010 | | Load 0x0,0x10
0364 a011 | | Store_Unchecked 0x0,0x11
0365 e012 | | Load 0x0,0x12
0366 e013 | | Load 0x0,0x13
0367 e014 | | Load 0x0,0x14
0368 e015 | | Load 0x0,0x15
0369 e296 | | Load 0x1,0x96
036a e295 | | Load 0x1,0x95
036b e29a | | Load 0x1,0x9a
036c e29c | | Load 0x1,0x9c
036d e299 | | Load 0x1,0x99
036e 1db5 | | Execute_Immediate Reference_Lex_1,0xb5
036f e29d | | Load 0x1,0x9d
0370 e016 | | Load 0x0,0x16
0371 e29b | | Load 0x1,0x9b
0372 1db2 | | Execute_Immediate Reference_Lex_1,0xb2
0373 1db3 | | Execute_Immediate Reference_Lex_1,0xb3
0374 1da9 | | Execute_Immediate Reference_Lex_1,0xa9
0375 e294 | | Load 0x1,0x94
0376 1dac | | Execute_Immediate Reference_Lex_1,0xac
0377 1da3 | | Execute_Immediate Reference_Lex_1,0xa3
0378 e297 | | Load 0x1,0x97
0379 4829 |H) | Short_Literal 0x29
037a e267 | g | Load 0x1,0x67
037b 020e | | Execute Module,Augment_Imports
037c e267 | g | Load 0x1,0x67
037d 020f | | Execute Module,Activate
037e BODY_0008:
037e 00bc | | Action Signal_Activated
037f 00bb | | Action Signal_Completion
0380 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0384 ffff ffff | | .LITERAL {0xffffffff, 0x80000001}
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2
038c 0237 | 7 | Execute Float,Convert_From_Discrete
038d e5fe | | Load 0x2,-0x2
038e 023b | ; | Execute Float,Times
038f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 e5fe | | Load 0x2,-0x2
0395 0237 | 7 | Execute Float,Convert_From_Discrete
0396 023b | ; | Execute Float,Times
0397 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 023a | : | Execute Float,Divide
039f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 027b | { | Execute Discrete,Greater_Equal
03a6 6804 |h | Jump_Zero 0x3ab
03a7 00da | | Load_Top At_Offset_2
03a8 e5fd | | Load 0x2,-0x3
03a9 027a | z | Execute Discrete,Less_Equal
03aa 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03ab 4800 |H | Short_Literal 0x0
03ac 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3 | | .CONST 0x03b3 ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0001 | | .CONST 0x0001 ; Number of locals
03b3 BODY_03b0:
03b3 INIT_03b0:
03b3 00da | | Load_Top At_Offset_2
03b4 e5fe | | Load 0x2,-0x2
03b5 0243 | C | Execute Float,Greater_Equal
03b6 6804 |h | Jump_Zero 0x3bb
03b7 00da | | Load_Top At_Offset_2
03b8 e5fd | | Load 0x2,-0x3
03b9 0242 | B | Execute Float,Less_Equal
03ba 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03bb 4800 |H | Short_Literal 0x0
03bc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
03bd 0000 0000 | | .XXX[0x3]
03bf 0000 | |
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 4800 |H | Short_Literal 0x0
03c4 00ca | | Action Exit_Nullary_Function
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 4801 |H | Short_Literal 0x1
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 5804 |X | Indirect_Literal Float,0x3d8,0.0
03d4 00ca | | Action Exit_Nullary_Function
03d5 0000 0000 | | .XXX[0x3]
03d7 0000 | |
03d8 0000 0000 | | .DBL 0.0
03da 0000 0000 | |
03dc 0000 0000 | | .BLANK 0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 5804 |X | Indirect_Literal Float,0x3e8,1.0
03e4 00ca | | Action Exit_Nullary_Function
03e5 0000 0000 | | .XXX[0x3]
03e7 0000 | |
03e8 3ff0 0000 |? | .DBL 1.0
03ea 0000 0000 | |
03ec 0000 0000 | | .BLANK 0000[0x4]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 6004 |` | Indirect_Literal Discrete,0x3f8,{0x7fffffff, 0xffffffff}
03f4 00ca | | Action Exit_Nullary_Function
03f5 0000 0000 | | .XXX[0x3]
03f7 0000 | |
03f8 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
03fc 0000 0000 | | .BLANK 0000[0x4]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 6004 |` | Indirect_Literal Discrete,0x408,{0x80000000, 0x00000000}
0404 00ca | | Action Exit_Nullary_Function
0405 0000 0000 | | .XXX[0x3]
0407 0000 | |
0408 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
040c 0000 0000 | | .BLANK 0000[0x4]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 5804 |X | Indirect_Literal Float,0x418,-1.7976931348623157e+308
0414 00ca | | Action Exit_Nullary_Function
0415 0000 0000 | | .XXX[0x3]
0417 0000 | |
0418 ffef ffff | | .DBL -1.7976931348623157e+308
041a ffff ffff | |
041c 0000 0000 | | .BLANK 0000[0x4]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 5804 |X | Indirect_Literal Float,0x428,1.7976931348623157e+308
0424 00ca | | Action Exit_Nullary_Function
0425 0000 0000 | | .XXX[0x3]
0427 0000 | |
0428 7fef ffff | | .DBL 1.7976931348623157e+308
042a ffff ffff | |
042c 0000 0000 | | .BLANK 0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433 | 3 | .CONST 0x0433 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0001 | | .CONST 0x0001 ; Number of locals
0433 BODY_0430:
0433 INIT_0430:
0433 e20d | | Load 0x1,0xd
0434 012c | , | Execute Any,Size
0435 00d8 | | Load_Top At_Offset_0
0436 00e2 | | Load_Encached Integer_Cache
0437 0260 | ` | Execute Discrete,In_Type
0438 7001 |p | Jump_Nonzero 0x43a
0439 0801 | | Execute_Immediate Raise,0x1
043a 00ca | | Action Exit_Nullary_Function
043b 0000 0000 | | .BLANK 0000[0x5]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 e20e | | Load 0x1,0xe
0444 012c | , | Execute Any,Size
0445 00d8 | | Load_Top At_Offset_0
0446 00e2 | | Load_Encached Integer_Cache
0447 0260 | ` | Execute Discrete,In_Type
0448 7001 |p | Jump_Nonzero 0x44a
0449 0801 | | Execute_Immediate Raise,0x1
044a 00ca | | Action Exit_Nullary_Function
044b 0000 0000 | | .BLANK 0000[0x5]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453 | S | .CONST 0x0453 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0001 | | .CONST 0x0001 ; Number of locals
0453 BODY_0450:
0453 INIT_0450:
0453 4835 |H5 | Short_Literal 0x35
0454 00ca | | Action Exit_Nullary_Function
0455 0000 0000 | | .XXX[0x3]
0457 0000 | |
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 00db | | Load_Top At_Offset_3
045c 00db | | Load_Top At_Offset_3
045d 823a | : | Call 0x1,0x3a
045e 4fff |O | Short_Literal -0x1
045f 027f | | Execute Discrete,Equal
0460 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0461 0000 0000 | | .BLANK 0000[0x7]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b | k | .CONST 0x046b ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0001 | | .CONST 0x0001 ; Number of locals
046b BODY_0468:
046b INIT_0468:
046b 00db | | Load_Top At_Offset_3
046c 00db | | Load_Top At_Offset_3
046d 823a | : | Call 0x1,0x3a
046e 0e01 | | Execute_Immediate Not_Equal,0x1
046f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 0f01 | | Execute_Immediate Equal,0x1
0477 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 4fff |O | Short_Literal -0x1
047f 027e | ~ | Execute Discrete,Not_Equal
0480 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0481 0000 0000 | | .BLANK 0000[0x7]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b 00da | | Load_Top At_Offset_2
048c 0335 | 5 | Declare_Variable Array,Duplicate
048d 00cd | | Action Spare6_Action
048e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
048f 0000 | | .XXX[0x1]
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 4801 |H | Short_Literal 0x1
0494 00db | | Load_Top At_Offset_3
0495 01d7 | | Execute Vector,Field_Read
0496 0275 | u | Execute Discrete,Unary_Minus
0497 4802 |H | Short_Literal 0x2
0498 e5ff | | Load 0x2,-0x1
0499 01dc | | Execute Vector,Last
049a e5ff | | Load 0x2,-0x1
049b 01cf | | Execute Vector,Slice_Read
049c 01ca | | Execute Vector,Prepend
049d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
049e 0000 0000 | | .XXX[0x2]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04b1 | | .CONST 0x04b1 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0002 | | .CONST 0x0002 ; Number of locals
04a3 INIT_04a0:
04a3 4801 |H | Short_Literal 0x1
04a4 00db | | Load_Top At_Offset_3
04a5 01db | | Execute Vector,Length
04a6 00d8 | | Load_Top At_Offset_0
04a7 00e2 | | Load_Encached Integer_Cache
04a8 0260 | ` | Execute Discrete,In_Type
04a9 7001 |p | Jump_Nonzero 0x4ab
04aa 0801 | | Execute_Immediate Raise,0x1
04ab e220 | | Load 0x1,0x20
04ac 035b | [ | Declare_Type Array,Constrained
04ad 0337 | 7 | Declare_Variable Array
04ae 00db | | Load_Top At_Offset_3
04af 00d9 | | Load_Top At_Offset_1
04b0 01d4 | | Execute Vector,Structure_Write
04b1 BODY_04a0:
04b1 4801 |H | Short_Literal 0x1
04b2 00d9 | | Load_Top At_Offset_1
04b3 01d7 | | Execute Vector,Field_Read
04b4 0274 | t | Execute Discrete,Absolute_Value
04b5 4801 |H | Short_Literal 0x1
04b6 00da | | Load_Top At_Offset_2
04b7 01d6 | | Execute Vector,Field_Write
04b8 00d8 | | Load_Top At_Offset_0
04b9 e220 | | Load 0x1,0x20
04ba 01c6 | | Execute Vector,Convert_To_Formal
04bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04bc 0000 0000 | | .BLANK 0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04cc | | .CONST 0x04cc ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0009 | | .CONST 0x0009 ; Number of locals
04c3 INIT_04c0:
04c3 00e2 | | Load_Encached Integer_Cache
04c4 00e5 | | Load_Encached Long_Integer_Cache
04c5 03e9 | | Declare_Variable Discrete,Duplicate
04c6 00e2 | | Load_Encached Integer_Cache
04c7 03e9 | | Declare_Variable Discrete,Duplicate
04c8 00e1 | | Load_Encached Boolean_Cache
04c9 03e9 | | Declare_Variable Discrete,Duplicate
04ca 029f 0e9b | | Declare_Subprogram INIT_0e98,For_Call
04cc BODY_04c0:
04cc e5ff | | Load 0x2,-0x1
04cd 01db | | Execute Vector,Length
04ce c405 | | Store 0x2,0x5
04cf e5fe | | Load 0x2,-0x2
04d0 01db | | Execute Vector,Length
04d1 c406 | | Store 0x2,0x6
04d2 e405 | | Load 0x2,0x5
04d3 0f01 | | Execute_Immediate Equal,0x1
04d4 680c |h | Jump_Zero 0x4e1
04d5 00db | | Load_Top At_Offset_3
04d6 0f01 | | Execute_Immediate Equal,0x1
04d7 6809 |h | Jump_Zero 0x4e1
04d8 4801 |H | Short_Literal 0x1
04d9 e5ff | | Load 0x2,-0x1
04da 01d7 | | Execute Vector,Field_Read
04db 4801 |H | Short_Literal 0x1
04dc e5fe | | Load 0x2,-0x2
04dd 01d7 | | Execute Vector,Field_Read
04de 0273 | s | Execute Discrete,Plus
04df 82a0 | | Call 0x1,0xa0
04e0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04e1 e405 | | Load 0x2,0x5
04e2 0f01 | | Execute_Immediate Equal,0x1
04e3 6808 |h | Jump_Zero 0x4ec
04e4 4801 |H | Short_Literal 0x1
04e5 e5ff | | Load 0x2,-0x1
04e6 01d7 | | Execute Vector,Field_Read
04e7 7004 |p | Jump_Nonzero 0x4ec
04e8 e5fe | | Load 0x2,-0x2
04e9 0335 | 5 | Declare_Variable Array,Duplicate
04ea 00cd | | Action Spare6_Action
04eb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04ec 00db | | Load_Top At_Offset_3
04ed 0f01 | | Execute_Immediate Equal,0x1
04ee 6808 |h | Jump_Zero 0x4f7
04ef 4801 |H | Short_Literal 0x1
04f0 e5fe | | Load 0x2,-0x2
04f1 01d7 | | Execute Vector,Field_Read
04f2 7004 |p | Jump_Nonzero 0x4f7
04f3 e5ff | | Load 0x2,-0x1
04f4 0335 | 5 | Declare_Variable Array,Duplicate
04f5 00cd | | Action Spare6_Action
04f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04f7 e405 | | Load 0x2,0x5
04f8 e406 | | Load 0x2,0x6
04f9 027c | | | Execute Discrete,Less
04fa 6804 |h | Jump_Zero 0x4ff
04fb 00db | | Load_Top At_Offset_3
04fc 0a01 | | Execute_Immediate Plus,0x1
04fd c402 | | Store 0x2,0x2
04fe 7803 |x | Jump 0x502
04ff e405 | | Load 0x2,0x5
0500 0a01 | | Execute_Immediate Plus,0x1
0501 c402 | | Store 0x2,0x2
0502 8409 | | Call 0x2,0x9
0503 0831 | 1 | Execute_Immediate Raise,0x31
0504 0000 0000 | | .BLANK 0000[0x4]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b 00db | | Load_Top At_Offset_3
050c 8226 | & | Call 0x1,0x26
050d 00db | | Load_Top At_Offset_3
050e 8228 | ( | Call 0x1,0x28
050f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0522 | " | .CONST 0x0522 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0003 | | .CONST 0x0003 ; Number of locals
0513 INIT_0510:
0513 4801 |H | Short_Literal 0x1
0514 00db | | Load_Top At_Offset_3
0515 01db | | Execute Vector,Length
0516 e5fe | | Load 0x2,-0x2
0517 01db | | Execute Vector,Length
0518 0273 | s | Execute Discrete,Plus
0519 00d8 | | Load_Top At_Offset_0
051a 00e2 | | Load_Encached Integer_Cache
051b 0260 | ` | Execute Discrete,In_Type
051c 7001 |p | Jump_Nonzero 0x51e
051d 0801 | | Execute_Immediate Raise,0x1
051e e220 | | Load 0x1,0x20
051f 035b | [ | Declare_Type Array,Constrained
0520 0337 | 7 | Declare_Variable Array
0521 00e2 | | Load_Encached Integer_Cache
0522 BODY_0510:
0522 00d9 | | Load_Top At_Offset_1
0523 e5fe | | Load 0x2,-0x2
0524 e5ff | | Load 0x2,-0x1
0525 82ae | | Call 0x1,0xae
0526 00d1 | | Pop_Control Pop_Count_1
0527 00e2 | | Load_Encached Integer_Cache
0528 00da | | Load_Top At_Offset_2
0529 4800 |H | Short_Literal 0x0
052a 82a3 | | Call 0x1,0xa3
052b 00d1 | | Pop_Control Pop_Count_1
052c 0059 | Y | Store_Top Discrete,At_Offset_1
052d 4801 |H | Short_Literal 0x1
052e 00d9 | | Load_Top At_Offset_1
052f 00db | | Load_Top At_Offset_3
0530 01cf | | Execute Vector,Slice_Read
0531 e220 | | Load 0x1,0x20
0532 01c6 | | Execute Vector,Convert_To_Formal
0533 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0534 0000 0000 | | .BLANK 0000[0x4]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b 4800 |H | Short_Literal 0x0
053c e5fe | | Load 0x2,-0x2
053d e5ff | | Load 0x2,-0x1
053e 82a8 | | Call 0x1,0xa8
053f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0540 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0541 0000 0000 | | .BLANK 0000[0x7]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054e | N | .CONST 0x054e ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0002 | | .CONST 0x0002 ; Number of locals
054b INIT_0548:
054b 00db | | Load_Top At_Offset_3
054c 00db | | Load_Top At_Offset_3
054d 822d | - | Call 0x1,0x2d
054e BODY_0548:
054e 4801 |H | Short_Literal 0x1
054f e5ff | | Load 0x2,-0x1
0550 01d7 | | Execute Vector,Field_Read
0551 0d00 | | Execute_Immediate Less,0x0
0552 4801 |H | Short_Literal 0x1
0553 e5fe | | Load 0x2,-0x2
0554 01d7 | | Execute Vector,Field_Read
0555 0d00 | | Execute_Immediate Less,0x0
0556 027f | | Execute Discrete,Equal
0557 7004 |p | Jump_Nonzero 0x55c
0558 4801 |H | Short_Literal 0x1
0559 00d9 | | Load_Top At_Offset_1
055a 01d7 | | Execute Vector,Field_Read
055b 7002 |p | Jump_Nonzero 0x55e
055c 00d8 | | Load_Top At_Offset_0
055d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
055e 00d8 | | Load_Top At_Offset_0
055f e5fe | | Load 0x2,-0x2
0560 8228 | ( | Call 0x1,0x28
0561 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0562 0000 0000 | | .BLANK 0000[0x6]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b 00da | | Load_Top At_Offset_2
056c 01db | | Execute Vector,Length
056d 0f01 | | Execute_Immediate Equal,0x1
056e 680d |h | Jump_Zero 0x57c
056f 00db | | Load_Top At_Offset_3
0570 01db | | Execute Vector,Length
0571 0f01 | | Execute_Immediate Equal,0x1
0572 6809 |h | Jump_Zero 0x57c
0573 4801 |H | Short_Literal 0x1
0574 00db | | Load_Top At_Offset_3
0575 01d7 | | Execute Vector,Field_Read
0576 4801 |H | Short_Literal 0x1
0577 e5fe | | Load 0x2,-0x2
0578 01d7 | | Execute Vector,Field_Read
0579 026f | o | Execute Discrete,Remainder
057a 82a0 | | Call 0x1,0xa0
057b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
057c 4801 |H | Short_Literal 0x1
057d e5fe | | Load 0x2,-0x2
057e e5ff | | Load 0x2,-0x1
057f 82a8 | | Call 0x1,0xa8
0580 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0581 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0582 0000 0000 | | .BLANK 0000[0x6]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 059b | | .CONST 0x059b ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0003 | | .CONST 0x0003 ; Number of locals
058b INIT_0588:
058b 4801 |H | Short_Literal 0x1
058c 00db | | Load_Top At_Offset_3
058d 01db | | Execute Vector,Length
058e e5fe | | Load 0x2,-0x2
058f 0274 | t | Execute Discrete,Absolute_Value
0590 82af | | Call 0x1,0xaf
0591 0271 | q | Execute Discrete,Times
0592 00d8 | | Load_Top At_Offset_0
0593 00e2 | | Load_Encached Integer_Cache
0594 0260 | ` | Execute Discrete,In_Type
0595 7001 |p | Jump_Nonzero 0x597
0596 0801 | | Execute_Immediate Raise,0x1
0597 e220 | | Load 0x1,0x20
0598 035b | [ | Declare_Type Array,Constrained
0599 0337 | 7 | Declare_Variable Array
059a 00e2 | | Load_Encached Integer_Cache
059b BODY_0588:
059b 00d9 | | Load_Top At_Offset_1
059c e5fe | | Load 0x2,-0x2
059d e5ff | | Load 0x2,-0x1
059e 82b1 | | Call 0x1,0xb1
059f 00d1 | | Pop_Control Pop_Count_1
05a0 00e2 | | Load_Encached Integer_Cache
05a1 00da | | Load_Top At_Offset_2
05a2 4800 |H | Short_Literal 0x0
05a3 82a3 | | Call 0x1,0xa3
05a4 00d1 | | Pop_Control Pop_Count_1
05a5 0059 | Y | Store_Top Discrete,At_Offset_1
05a6 4801 |H | Short_Literal 0x1
05a7 00d9 | | Load_Top At_Offset_1
05a8 00db | | Load_Top At_Offset_3
05a9 01cf | | Execute Vector,Slice_Read
05aa e220 | | Load 0x1,0x20
05ab 01c6 | | Execute Vector,Convert_To_Formal
05ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05ad 0000 0000 | | .XXX[0x3]
05af 0000 | |
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3 | | .CONST 0x05b3 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0001 | | .CONST 0x0001 ; Number of locals
05b3 BODY_05b0:
05b3 INIT_05b0:
05b3 00db | | Load_Top At_Offset_3
05b4 00db | | Load_Top At_Offset_3
05b5 8224 | $ | Call 0x1,0x24
05b6 6804 |h | Jump_Zero 0x5bb
05b7 e5fd | | Load 0x2,-0x3
05b8 00db | | Load_Top At_Offset_3
05b9 8222 | " | Call 0x1,0x22
05ba 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
05bb 4800 |H | Short_Literal 0x0
05bc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
05bd 0000 0000 | | .XXX[0x3]
05bf 0000 | |
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3 | | .CONST 0x05c3 ; Address of begin
05c1 0004 | | .CONST 0x0004 ; Address of exception handler
05c2 0001 | | .CONST 0x0001 ; Number of locals
05c3 BODY_05c0:
05c3 INIT_05c0:
05c3 00db | | Load_Top At_Offset_3
05c4 00db | | Load_Top At_Offset_3
05c5 829e | | Call 0x1,0x9e
05c6 822a | * | Call 0x1,0x2a
05c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 829e | | Call 0x1,0x9e
05cd 00db | | Load_Top At_Offset_3
05ce 822a | * | Call 0x1,0x2a
05cf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 822b | + | Call 0x1,0x2b
05d7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 4802 |H | Short_Literal 0x2
05dc e5fe | | Load 0x2,-0x2
05dd e5ff | | Load 0x2,-0x1
05de 82a8 | | Call 0x1,0xa8
05df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05f6 | | .CONST 0x05f6 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0002 | | .CONST 0x0002 ; Number of locals
05e3 INIT_05e0:
05e3 4801 |H | Short_Literal 0x1
05e4 e5fe | | Load 0x2,-0x2
05e5 01db | | Execute Vector,Length
05e6 00d8 | | Load_Top At_Offset_0
05e7 00e2 | | Load_Encached Integer_Cache
05e8 0260 | ` | Execute Discrete,In_Type
05e9 7001 |p | Jump_Nonzero 0x5eb
05ea 0801 | | Execute_Immediate Raise,0x1
05eb e5ff | | Load 0x2,-0x1
05ec 01db | | Execute Vector,Length
05ed 00d8 | | Load_Top At_Offset_0
05ee 00e2 | | Load_Encached Integer_Cache
05ef 0260 | ` | Execute Discrete,In_Type
05f0 7001 |p | Jump_Nonzero 0x5f2
05f1 0801 | | Execute_Immediate Raise,0x1
05f2 82b2 | | Call 0x1,0xb2
05f3 e220 | | Load 0x1,0x20
05f4 035b | [ | Declare_Type Array,Constrained
05f5 0337 | 7 | Declare_Variable Array
05f6 BODY_05e0:
05f6 00d8 | | Load_Top At_Offset_0
05f7 e5fe | | Load 0x2,-0x2
05f8 e5ff | | Load 0x2,-0x1
05f9 82b3 | | Call 0x1,0xb3
05fa 00d1 | | Pop_Control Pop_Count_1
05fb 4800 |H | Short_Literal 0x0
05fc 00d9 | | Load_Top At_Offset_1
05fd 82a4 | | Call 0x1,0xa4
05fe e220 | | Load 0x1,0x20
05ff 01c6 | | Execute Vector,Convert_To_Formal
0600 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0601 0000 0000 | | .BLANK 0000[0x7]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 061a | | .CONST 0x061a ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0004 | | .CONST 0x0004 ; Number of locals
060b INIT_0608:
060b 481f |H | Short_Literal 0x1f
060c 00db | | Load_Top At_Offset_3
060d 01db | | Execute Vector,Length
060e 0271 | q | Execute Discrete,Times
060f 00e5 | | Load_Encached Long_Integer_Cache
0610 03f1 | | Declare_Variable Discrete,With_Value
0611 4801 |H | Short_Literal 0x1
0612 e5ff | | Load 0x2,-0x1
0613 01d7 | | Execute Vector,Field_Read
0614 0274 | t | Execute Discrete,Absolute_Value
0615 00e5 | | Load_Encached Long_Integer_Cache
0616 03f1 | | Declare_Variable Discrete,With_Value
0617 6034 |`4 | Indirect_Literal Discrete,0x64c,{0x00000000, 0x80000000}
0618 00e5 | | Load_Encached Long_Integer_Cache
0619 03f1 | | Declare_Variable Discrete,With_Value
061a BODY_0608:
061a 00d9 | | Load_Top At_Offset_1
061b 7001 |p | Jump_Nonzero 0x61d
061c 08e0 | | Execute_Immediate Raise,0xe0
061d 00cf | | Action Mark_Auxiliary
061e 7807 |x | Jump 0x626
061f 00d9 | | Load_Top At_Offset_1
0620 09ff | | Execute_Immediate Binary_Scale,-0x1
0621 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0622 00db | | Load_Top At_Offset_3
0623 0aff | | Execute_Immediate Plus,-0x1
0624 a402 | | Store_Unchecked 0x2,0x2
0625 00c9 | | Action Pop_Auxiliary_Loop
0626 00d9 | | Load_Top At_Offset_1
0627 00db | | Load_Top At_Offset_3
0628 027d | } | Execute Discrete,Greater
0629 77f5 |w | Jump_Nonzero 0x61f
062a 00ce | | Action Pop_Auxiliary
062b 00d8 | | Load_Top At_Offset_0
062c 00da | | Load_Top At_Offset_2
062d 027c | | | Execute Discrete,Less
062e 6803 |h | Jump_Zero 0x632
062f 00da | | Load_Top At_Offset_2
0630 0a01 | | Execute_Immediate Plus,0x1
0631 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0632 00cf | | Action Mark_Auxiliary
0633 e5ff | | Load 0x2,-0x1
0634 01dc | | Execute Vector,Last
0635 e5ff | | Load 0x2,-0x1
0636 01dd | | Execute Vector,First
0637 0a01 | | Execute_Immediate Plus,0x1
0638 00d8 | | Load_Top At_Offset_0
0639 00e2 | | Load_Encached Integer_Cache
063a 0260 | ` | Execute Discrete,In_Type
063b 7001 |p | Jump_Nonzero 0x63d
063c 0801 | | Execute_Immediate Raise,0x1
063d 0263 | c | Execute Discrete,Above_Bound
063e 7009 |p | Jump_Nonzero 0x648
063f 00d8 | | Load_Top At_Offset_0
0640 e5ff | | Load 0x2,-0x1
0641 01d7 | | Execute Vector,Field_Read
0642 6803 |h | Jump_Zero 0x646
0643 e402 | | Load 0x2,0x2
0644 0a01 | | Execute_Immediate Plus,0x1
0645 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0646 00c8 | | Action Pop_Auxiliary_Range
0647 3ff7 |? | Loop_Increasing 0x63f
0648 00ce | | Action Pop_Auxiliary
0649 00da | | Load_Top At_Offset_2
064a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
064b 0000 | | .XXX[0x1]
064c 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0660 | ` | .CONST 0x0660 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0004 | | .CONST 0x0004 ; Number of locals
0653 INIT_0650:
0653 00da | | Load_Top At_Offset_2
0654 8227 | ' | Call 0x1,0x27
0655 00d8 | | Load_Top At_Offset_0
0656 8236 | 6 | Call 0x1,0x36
0657 0237 | 7 | Execute Float,Convert_From_Discrete
0658 5823 |X# | Indirect_Literal Float,0x67c,0.30102999566
0659 023b | ; | Execute Float,Times
065a 0235 | 5 | Execute Float,Round_To_Discrete
065b 00e5 | | Load_Encached Long_Integer_Cache
065c 025e | ^ | Execute Discrete,Convert
065d 00e5 | | Load_Encached Long_Integer_Cache
065e 03f1 | | Declare_Variable Discrete,With_Value
065f e238 | 8 | Load 0x1,0x38
0660 BODY_0650:
0660 00cf | | Action Mark_Auxiliary
0661 00db | | Load_Top At_Offset_3
0662 00db | | Load_Top At_Offset_3
0663 00d8 | | Load_Top At_Offset_0
0664 00e2 | | Load_Encached Integer_Cache
0665 0260 | ` | Execute Discrete,In_Type
0666 7001 |p | Jump_Nonzero 0x668
0667 0801 | | Execute_Immediate Raise,0x1
0668 e298 | | Load 0x1,0x98
0669 822e | . | Call 0x1,0x2e
066a 823a | : | Call 0x1,0x3a
066b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
066c 00d9 | | Load_Top At_Offset_1
066d 0d01 | | Execute_Immediate Less,0x1
066e 7005 |p | Jump_Nonzero 0x674
066f 00da | | Load_Top At_Offset_2
0670 0aff | | Execute_Immediate Plus,-0x1
0671 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0672 00c9 | | Action Pop_Auxiliary_Loop
0673 7fed | | Jump 0x661
0674 00ce | | Action Pop_Auxiliary
0675 00d9 | | Load_Top At_Offset_1
0676 00d9 | | Load_Top At_Offset_1
0677 0273 | s | Execute Discrete,Plus
0678 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0679 0000 0000 | | .XXX[0x3]
067b 0000 | |
067c 3fd3 4413 |? D | .DBL 0.30102999566
067e 509e 61d8 |P a |
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683 | | .CONST 0x0683 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0001 | | .CONST 0x0001 ; Number of locals
0683 BODY_0680:
0683 INIT_0680:
0683 4801 |H | Short_Literal 0x1
0684 00db | | Load_Top At_Offset_3
0685 01d7 | | Execute Vector,Field_Read
0686 82b4 | | Call 0x1,0xb4
0687 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 00da | | Load_Top At_Offset_2
068c 01db | | Execute Vector,Length
068d e5fe | | Load 0x2,-0x2
068e 01db | | Execute Vector,Length
068f 027f | | Execute Discrete,Equal
0690 6831 |h1 | Jump_Zero 0x6c2
0691 00cf | | Action Mark_Auxiliary
0692 00db | | Load_Top At_Offset_3
0693 01d9 | | Execute Vector,Reverse_Bounds
0694 0263 | c | Execute Discrete,Above_Bound
0695 7029 |p) | Jump_Nonzero 0x6bf
0696 00d8 | | Load_Top At_Offset_0
0697 e5ff | | Load 0x2,-0x1
0698 01d7 | | Execute Vector,Field_Read
0699 00d9 | | Load_Top At_Offset_1
069a e5fe | | Load 0x2,-0x2
069b 01d7 | | Execute Vector,Field_Read
069c 027e | ~ | Execute Discrete,Not_Equal
069d 681f |h | Jump_Zero 0x6bd
069e 00d8 | | Load_Top At_Offset_0
069f 0f01 | | Execute_Immediate Equal,0x1
06a0 6809 |h | Jump_Zero 0x6aa
06a1 4801 |H | Short_Literal 0x1
06a2 e5ff | | Load 0x2,-0x1
06a3 01d7 | | Execute Vector,Field_Read
06a4 4801 |H | Short_Literal 0x1
06a5 e5fe | | Load 0x2,-0x2
06a6 01d7 | | Execute Vector,Field_Read
06a7 0272 | r | Execute Discrete,Minus
06a8 82b4 | | Call 0x1,0xb4
06a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06aa 4801 |H | Short_Literal 0x1
06ab e5ff | | Load 0x2,-0x1
06ac 01d7 | | Execute Vector,Field_Read
06ad 82b4 | | Call 0x1,0xb4
06ae 00d9 | | Load_Top At_Offset_1
06af e5ff | | Load 0x2,-0x1
06b0 01d7 | | Execute Vector,Field_Read
06b1 0271 | q | Execute Discrete,Times
06b2 4801 |H | Short_Literal 0x1
06b3 e5fe | | Load 0x2,-0x2
06b4 01d7 | | Execute Vector,Field_Read
06b5 82b4 | | Call 0x1,0xb4
06b6 00da | | Load_Top At_Offset_2
06b7 e5fe | | Load 0x2,-0x2
06b8 01d7 | | Execute Vector,Field_Read
06b9 0271 | q | Execute Discrete,Times
06ba 0272 | r | Execute Discrete,Minus
06bb 82b4 | | Call 0x1,0xb4
06bc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06bd 00c8 | | Action Pop_Auxiliary_Range
06be 3fd7 |? | Loop_Increasing 0x696
06bf 00ce | | Action Pop_Auxiliary
06c0 4800 |H | Short_Literal 0x0
06c1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06c2 4801 |H | Short_Literal 0x1
06c3 00db | | Load_Top At_Offset_3
06c4 01d7 | | Execute Vector,Field_Read
06c5 82b4 | | Call 0x1,0xb4
06c6 00db | | Load_Top At_Offset_3
06c7 01db | | Execute Vector,Length
06c8 0271 | q | Execute Discrete,Times
06c9 4801 |H | Short_Literal 0x1
06ca e5fe | | Load 0x2,-0x2
06cb 01d7 | | Execute Vector,Field_Read
06cc 82b4 | | Call 0x1,0xb4
06cd e5fe | | Load 0x2,-0x2
06ce 01db | | Execute Vector,Length
06cf 0271 | q | Execute Discrete,Times
06d0 0272 | r | Execute Discrete,Minus
06d1 82b4 | | Call 0x1,0xb4
06d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06d3 0000 0000 | | .BLANK 0000[0x5]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db | | .CONST 0x06db ; Address of begin
06d9 0004 | | .CONST 0x0004 ; Address of exception handler
06da 0001 | | .CONST 0x0001 ; Number of locals
06db BODY_06d8:
06db INIT_06d8:
06db e295 | | Load 0x1,0x95
06dc 00ca | | Action Exit_Nullary_Function
06dd 0000 0000 | | .XXX[0x3]
06df 0000 | |
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 e296 | | Load 0x1,0x96
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 e297 | | Load 0x1,0x97
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 e298 | | Load 0x1,0x98
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 00db | | Load_Top At_Offset_3
06fc 00db | | Load_Top At_Offset_3
06fd 8254 | T | Call 0x1,0x54
06fe 4fff |O | Short_Literal -0x1
06ff 027f | | Execute Discrete,Equal
0700 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0701 0000 0000 | | .BLANK 0000[0x7]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b | | .CONST 0x070b ; Address of begin
0709 0004 | | .CONST 0x0004 ; Address of exception handler
070a 0001 | | .CONST 0x0001 ; Number of locals
070b BODY_0708:
070b INIT_0708:
070b 00db | | Load_Top At_Offset_3
070c 00db | | Load_Top At_Offset_3
070d 8254 | T | Call 0x1,0x54
070e 0e01 | | Execute_Immediate Not_Equal,0x1
070f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 0f01 | | Execute_Immediate Equal,0x1
0717 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 4fff |O | Short_Literal -0x1
071f 027e | ~ | Execute Discrete,Not_Equal
0720 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0721 0000 0000 | | .BLANK 0000[0x7]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b | + | .CONST 0x072b ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0001 | | .CONST 0x0001 ; Number of locals
072b BODY_0728:
072b INIT_0728:
072b 00da | | Load_Top At_Offset_2
072c 02fd | | Declare_Variable Variant_Record,Duplicate
072d 00cd | | Action Spare6_Action
072e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
072f 0000 | | .XXX[0x1]
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 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0735 00db | | Load_Top At_Offset_3
0736 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0737 8226 | & | Call 0x1,0x26
0738 82b5 | | Call 0x1,0xb5
0739 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
073a 0000 0000 | | .BLANK 0000[0x6]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743 | C | .CONST 0x0743 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0001 | | .CONST 0x0001 ; Number of locals
0743 BODY_0740:
0743 INIT_0740:
0743 00da | | Load_Top At_Offset_2
0744 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0745 00db | | Load_Top At_Offset_3
0746 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0747 8227 | ' | Call 0x1,0x27
0748 82b5 | | Call 0x1,0xb5
0749 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
074a 0000 0000 | | .BLANK 0000[0x6]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753 | S | .CONST 0x0753 ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0001 | | .CONST 0x0001 ; Number of locals
0753 BODY_0750:
0753 INIT_0750:
0753 00db | | Load_Top At_Offset_3
0754 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0755 00db | | Load_Top At_Offset_3
0756 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0757 822a | * | Call 0x1,0x2a
0758 00db | | Load_Top At_Offset_3
0759 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
075a e5fe | | Load 0x2,-0x2
075b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
075c 822a | * | Call 0x1,0x2a
075d e5fe | | Load 0x2,-0x2
075e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
075f e5ff | | Load 0x2,-0x1
0760 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0761 822a | * | Call 0x1,0x2a
0762 8228 | ( | Call 0x1,0x28
0763 829f | | Call 0x1,0x9f
0764 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0765 0000 0000 | | .XXX[0x3]
0767 0000 | |
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b | k | .CONST 0x076b ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0001 | | .CONST 0x0001 ; Number of locals
076b BODY_0768:
076b INIT_0768:
076b 00db | | Load_Top At_Offset_3
076c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
076d 00db | | Load_Top At_Offset_3
076e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
076f 822a | * | Call 0x1,0x2a
0770 00db | | Load_Top At_Offset_3
0771 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0772 e5fe | | Load 0x2,-0x2
0773 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0774 822a | * | Call 0x1,0x2a
0775 e5fe | | Load 0x2,-0x2
0776 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0777 e5ff | | Load 0x2,-0x1
0778 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0779 822a | * | Call 0x1,0x2a
077a 8229 | ) | Call 0x1,0x29
077b 829f | | Call 0x1,0x9f
077c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
077d 0000 0000 | | .XXX[0x3]
077f 0000 | |
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783 | | .CONST 0x0783 ; Address of begin
0781 0004 | | .CONST 0x0004 ; Address of exception handler
0782 0001 | | .CONST 0x0001 ; Number of locals
0783 BODY_0780:
0783 INIT_0780:
0783 00db | | Load_Top At_Offset_3
0784 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0785 00db | | Load_Top At_Offset_3
0786 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0787 822a | * | Call 0x1,0x2a
0788 e5fe | | Load 0x2,-0x2
0789 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
078a e5ff | | Load 0x2,-0x1
078b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
078c 822a | * | Call 0x1,0x2a
078d 829f | | Call 0x1,0x9f
078e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
078f 0000 | | .XXX[0x1]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793 | | .CONST 0x0793 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0001 | | .CONST 0x0001 ; Number of locals
0793 BODY_0790:
0793 INIT_0790:
0793 00db | | Load_Top At_Offset_3
0794 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0795 00db | | Load_Top At_Offset_3
0796 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0797 822a | * | Call 0x1,0x2a
0798 e5fe | | Load 0x2,-0x2
0799 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
079a e5ff | | Load 0x2,-0x1
079b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
079c 822a | * | Call 0x1,0x2a
079d 829f | | Call 0x1,0x9f
079e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
079f 0000 | | .XXX[0x1]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3 | | .CONST 0x07a3 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0001 | | .CONST 0x0001 ; Number of locals
07a3 BODY_07a0:
07a3 INIT_07a0:
07a3 00db | | Load_Top At_Offset_3
07a4 7002 |p | Jump_Nonzero 0x7a7
07a5 e29b | | Load 0x1,0x9b
07a6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07a7 00db | | Load_Top At_Offset_3
07a8 0c01 | | Execute_Immediate Greater_Equal,0x1
07a9 6811 |h | Jump_Zero 0x7bb
07aa 00db | | Load_Top At_Offset_3
07ab 0f01 | | Execute_Immediate Equal,0x1
07ac 6804 |h | Jump_Zero 0x7b1
07ad 00da | | Load_Top At_Offset_2
07ae 02fd | | Declare_Variable Variant_Record,Duplicate
07af 00cd | | Action Spare6_Action
07b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07b1 00db | | Load_Top At_Offset_3
07b2 00db | | Load_Top At_Offset_3
07b3 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07b4 822e | . | Call 0x1,0x2e
07b5 e5fe | | Load 0x2,-0x2
07b6 e5ff | | Load 0x2,-0x1
07b7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07b8 822e | . | Call 0x1,0x2e
07b9 829f | | Call 0x1,0x9f
07ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07bb 00db | | Load_Top At_Offset_3
07bc 4fff |O | Short_Literal -0x1
07bd 027f | | Execute Discrete,Equal
07be 6814 |h | Jump_Zero 0x7d3
07bf 4801 |H | Short_Literal 0x1
07c0 00db | | Load_Top At_Offset_3
07c1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07c2 01d7 | | Execute Vector,Field_Read
07c3 0c01 | | Execute_Immediate Greater_Equal,0x1
07c4 6806 |h | Jump_Zero 0x7cb
07c5 00da | | Load_Top At_Offset_2
07c6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07c7 00db | | Load_Top At_Offset_3
07c8 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07c9 82b5 | | Call 0x1,0xb5
07ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07cb 00da | | Load_Top At_Offset_2
07cc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07cd 8226 | & | Call 0x1,0x26
07ce 00db | | Load_Top At_Offset_3
07cf 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07d0 8226 | & | Call 0x1,0x26
07d1 82b5 | | Call 0x1,0xb5
07d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07d3 00db | | Load_Top At_Offset_3
07d4 0275 | u | Execute Discrete,Unary_Minus
07d5 00db | | Load_Top At_Offset_3
07d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07d7 822e | . | Call 0x1,0x2e
07d8 e5fe | | Load 0x2,-0x2
07d9 0275 | u | Execute Discrete,Unary_Minus
07da e5ff | | Load 0x2,-0x1
07db 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07dc 822e | . | Call 0x1,0x2e
07dd 829f | | Call 0x1,0x9f
07de 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07df 0000 | | .XXX[0x1]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e3 | | .CONST 0x07e3 ; Address of begin
07e1 0004 | | .CONST 0x0004 ; Address of exception handler
07e2 0001 | | .CONST 0x0001 ; Number of locals
07e3 BODY_07e0:
07e3 INIT_07e0:
07e3 00db | | Load_Top At_Offset_3
07e4 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07e5 00db | | Load_Top At_Offset_3
07e6 e5fe | | Load 0x2,-0x2
07e7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07e8 822a | * | Call 0x1,0x2a
07e9 829f | | Call 0x1,0x9f
07ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07eb 0000 0000 | | .BLANK 0000[0x5]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3 | | .CONST 0x07f3 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0001 | | .CONST 0x0001 ; Number of locals
07f3 BODY_07f0:
07f3 INIT_07f0:
07f3 00da | | Load_Top At_Offset_2
07f4 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
07f5 e5fe | | Load 0x2,-0x2
07f6 e5ff | | Load 0x2,-0x1
07f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07f8 822a | * | Call 0x1,0x2a
07f9 829f | | Call 0x1,0x9f
07fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07fb 0000 0000 | | .BLANK 0000[0x5]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0803 | | .CONST 0x0803 ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0001 | | .CONST 0x0001 ; Number of locals
0803 BODY_0800:
0803 INIT_0800:
0803 00db | | Load_Top At_Offset_3
0804 00db | | Load_Top At_Offset_3
0805 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0806 822a | * | Call 0x1,0x2a
0807 00db | | Load_Top At_Offset_3
0808 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0809 829f | | Call 0x1,0x9f
080a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
080b 0000 0000 | | .BLANK 0000[0x5]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813 | | .CONST 0x0813 ; Address of begin
0811 0004 | | .CONST 0x0004 ; Address of exception handler
0812 0001 | | .CONST 0x0001 ; Number of locals
0813 BODY_0810:
0813 INIT_0810:
0813 00db | | Load_Top At_Offset_3
0814 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0815 e5fe | | Load 0x2,-0x2
0816 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0817 e5ff | | Load 0x2,-0x1
0818 8230 | 0 | Call 0x1,0x30
0819 829f | | Call 0x1,0x9f
081a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
081b 0000 0000 | | .BLANK 0000[0x5]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0823 | # | .CONST 0x0823 ; Address of begin
0821 0004 | | .CONST 0x0004 ; Address of exception handler
0822 0001 | | .CONST 0x0001 ; Number of locals
0823 BODY_0820:
0823 INIT_0820:
0823 00da | | Load_Top At_Offset_2
0824 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0825 e5fe | | Load 0x2,-0x2
0826 e5ff | | Load 0x2,-0x1
0827 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0828 8231 | 1 | Call 0x1,0x31
0829 829f | | Call 0x1,0x9f
082a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
082b 0000 0000 | | .BLANK 0000[0x5]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0833 | 3 | .CONST 0x0833 ; Address of begin
0831 0004 | | .CONST 0x0004 ; Address of exception handler
0832 0001 | | .CONST 0x0001 ; Number of locals
0833 BODY_0830:
0833 INIT_0830:
0833 00da | | Load_Top At_Offset_2
0834 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0835 e5fe | | Load 0x2,-0x2
0836 8230 | 0 | Call 0x1,0x30
0837 00db | | Load_Top At_Offset_3
0838 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0839 829f | | Call 0x1,0x9f
083a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
083b 0000 0000 | | .BLANK 0000[0x5]
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843 | C | .CONST 0x0843 ; Address of begin
0841 0004 | | .CONST 0x0004 ; Address of exception handler
0842 0001 | | .CONST 0x0001 ; Number of locals
0843 BODY_0840:
0843 INIT_0840:
0843 00db | | Load_Top At_Offset_3
0844 00db | | Load_Top At_Offset_3
0845 8243 | C | Call 0x1,0x43
0846 6804 |h | Jump_Zero 0x84b
0847 e5fd | | Load 0x2,-0x3
0848 00db | | Load_Top At_Offset_3
0849 8241 | A | Call 0x1,0x41
084a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
084b 4800 |H | Short_Literal 0x0
084c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
084d 0000 0000 | | .XXX[0x3]
084f 0000 | |
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0853 | S | .CONST 0x0853 ; Address of begin
0851 0004 | | .CONST 0x0004 ; Address of exception handler
0852 0001 | | .CONST 0x0001 ; Number of locals
0853 BODY_0850:
0853 INIT_0850:
0853 00da | | Load_Top At_Offset_2
0854 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0855 8239 | 9 | Call 0x1,0x39
0856 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0857 0000 | | .XXX[0x1]
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 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
085d e5fe | | Load 0x2,-0x2
085e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
085f 822a | * | Call 0x1,0x2a
0860 e5fe | | Load 0x2,-0x2
0861 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0862 e5ff | | Load 0x2,-0x1
0863 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0864 822a | * | Call 0x1,0x2a
0865 823a | : | Call 0x1,0x3a
0866 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0867 0000 | | .XXX[0x1]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086b | k | .CONST 0x086b ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 0001 | | .CONST 0x0001 ; Number of locals
086b BODY_0868:
086b INIT_0868:
086b 00da | | Load_Top At_Offset_2
086c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
086d 0335 | 5 | Declare_Variable Array,Duplicate
086e 00cd | | Action Spare6_Action
086f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 8255 | U | Call 0x1,0x55
0875 e267 | g | Load 0x1,0x67
0876 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0877 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
087d 0335 | 5 | Declare_Variable Array,Duplicate
087e 00cd | | Action Spare6_Action
087f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 8257 | W | Call 0x1,0x57
0885 e267 | g | Load 0x1,0x67
0886 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0887 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 e299 | | Load 0x1,0x99
088c 00ca | | Action Exit_Nullary_Function
088d 0000 0000 | | .XXX[0x3]
088f 0000 | |
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 e29a | | Load 0x1,0x9a
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 e29b | | Load 0x1,0x9b
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 e29c | | Load 0x1,0x9c
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 e29d | | Load 0x1,0x9d
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 4801 |H | Short_Literal 0x1
08b4 00db | | Load_Top At_Offset_3
08b5 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
08b6 01d7 | | Execute Vector,Field_Read
08b7 0f01 | | Execute_Immediate Equal,0x1
08b8 6805 |h | Jump_Zero 0x8be
08b9 00da | | Load_Top At_Offset_2
08ba 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
08bb 01db | | Execute Vector,Length
08bc 0f01 | | Execute_Immediate Equal,0x1
08bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08be 4800 |H | Short_Literal 0x0
08bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08c3 | | .CONST 0x08c3 ; Address of begin
08c1 0004 | | .CONST 0x0004 ; Address of exception handler
08c2 0001 | | .CONST 0x0001 ; Number of locals
08c3 BODY_08c0:
08c3 INIT_08c0:
08c3 4801 |H | Short_Literal 0x1
08c4 00db | | Load_Top At_Offset_3
08c5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08c6 01d7 | | Execute Vector,Field_Read
08c7 0274 | t | Execute Discrete,Absolute_Value
08c8 0f01 | | Execute_Immediate Equal,0x1
08c9 6805 |h | Jump_Zero 0x8cf
08ca 00da | | Load_Top At_Offset_2
08cb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08cc 01db | | Execute Vector,Length
08cd 0f01 | | Execute_Immediate Equal,0x1
08ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08cf 4800 |H | Short_Literal 0x0
08d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08d1 0000 0000 | | .BLANK 0000[0x7]
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08db | | .CONST 0x08db ; Address of begin
08d9 0004 | | .CONST 0x0004 ; Address of exception handler
08da 0001 | | .CONST 0x0001 ; Number of locals
08db BODY_08d8:
08db INIT_08d8:
08db e296 | | Load 0x1,0x96
08dc 00db | | Load_Top At_Offset_3
08dd 8265 | e | Call 0x1,0x65
08de 82b5 | | Call 0x1,0xb5
08df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 00da | | Load_Top At_Offset_2
08e4 8262 | b | Call 0x1,0x62
08e5 6805 |h | Jump_Zero 0x8eb
08e6 00da | | Load_Top At_Offset_2
08e7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08e8 0335 | 5 | Declare_Variable Array,Duplicate
08e9 00cd | | Action Spare6_Action
08ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08eb 00da | | Load_Top At_Offset_2
08ec 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
08ed 00db | | Load_Top At_Offset_3
08ee 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08ef 8227 | ' | Call 0x1,0x27
08f0 8221 | ! | Call 0x1,0x21
08f1 6802 |h | Jump_Zero 0x8f4
08f2 e295 | | Load 0x1,0x95
08f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08f4 00da | | Load_Top At_Offset_2
08f5 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
08f6 00db | | Load_Top At_Offset_3
08f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08f8 822b | + | Call 0x1,0x2b
08f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08fa 0000 0000 | | .BLANK 0000[0x6]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 0903 | | .CONST 0x0903 ; Address of begin
0901 0004 | | .CONST 0x0004 ; Address of exception handler
0902 0001 | | .CONST 0x0001 ; Number of locals
0903 BODY_0900:
0903 INIT_0900:
0903 00da | | Load_Top At_Offset_2
0904 8262 | b | Call 0x1,0x62
0905 6802 |h | Jump_Zero 0x908
0906 e299 | | Load 0x1,0x99
0907 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0908 00da | | Load_Top At_Offset_2
0909 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
090a 00db | | Load_Top At_Offset_3
090b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
090c e5ff | | Load 0x2,-0x1
090d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
090e 822d | - | Call 0x1,0x2d
090f 829f | | Call 0x1,0x9f
0910 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0911 0000 0000 | | .BLANK 0000[0x7]
0918 ; --------------------------------------------------------------------------------------
0918 ; SUBPROGRAM
0918 ; --------------------------------------------------------------------------------------
0918 091b | | .CONST 0x091b ; Address of begin
0919 0004 | | .CONST 0x0004 ; Address of exception handler
091a 0001 | | .CONST 0x0001 ; Number of locals
091b BODY_0918:
091b INIT_0918:
091b 00da | | Load_Top At_Offset_2
091c 00e0 | | Load_Encached Standard_Cache
091d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
091e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
091f 0000 | | .XXX[0x1]
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 4607 |F | Jump_Case 0x8
0924 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0925 7806 |x | Jump 0x92c ; case 0x1
0926 7809 |x | Jump 0x930 ; case 0x2
0927 780d |x | Jump 0x935 ; case 0x3
0928 7810 |x | Jump 0x939 ; case 0x4
0929 7811 |x | Jump 0x93b ; case 0x5
092a 7812 |x | Jump 0x93d ; case 0x6
092b 7815 |x | Jump 0x941 ; case 0x7
092c 00da | | Load_Top At_Offset_2
092d 0091 144d | M| Action Push_String_Extended_Indexed,0x144d ; "QUOTIENT"
092f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0930 00db | | Load_Top At_Offset_3
0931 00db | | Load_Top At_Offset_3
0932 00e0 | | Load_Encached Standard_Cache
0933 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0934 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0935 00da | | Load_Top At_Offset_2
0936 00e0 | | Load_Encached Standard_Cache
0937 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0938 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0939 00db | | Load_Top At_Offset_3
093a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
093b 00db | | Load_Top At_Offset_3
093c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
093d e293 | | Load 0x1,0x93
093e 00dc | | Load_Top At_Offset_4
093f 0267 | g | Execute Discrete,Predecessor
0940 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0941 e293 | | Load 0x1,0x93
0942 00dc | | Load_Top At_Offset_4
0943 0268 | h | Execute Discrete,Successor
0944 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0945 0000 0000 | | .XXX[0x3]
0947 0000 | |
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094b | K | .CONST 0x094b ; Address of begin
0949 0004 | | .CONST 0x0004 ; Address of exception handler
094a 0001 | | .CONST 0x0001 ; Number of locals
094b BODY_0948:
094b INIT_0948:
094b 00da | | Load_Top At_Offset_2
094c e267 | g | Load 0x1,0x67
094d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
094e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
094f 0000 | | .XXX[0x1]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 095a | Z | .CONST 0x095a ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0002 | | .CONST 0x0002 ; Number of locals
0953 INIT_0950:
0953 00db | | Load_Top At_Offset_3
0954 01dc | | Execute Vector,Last
0955 00db | | Load_Top At_Offset_3
0956 01db | | Execute Vector,Length
0957 0272 | r | Execute Discrete,Minus
0958 00e2 | | Load_Encached Integer_Cache
0959 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
095a BODY_0950:
095a e5fe | | Load 0x2,-0x2
095b 01db | | Execute Vector,Length
095c 0c01 | | Execute_Immediate Greater_Equal,0x1
095d 681f |h | Jump_Zero 0x97d
095e 00db | | Load_Top At_Offset_3
095f 00d9 | | Load_Top At_Offset_1
0960 0a01 | | Execute_Immediate Plus,0x1
0961 00d8 | | Load_Top At_Offset_0
0962 00e2 | | Load_Encached Integer_Cache
0963 0260 | ` | Execute Discrete,In_Type
0964 7001 |p | Jump_Nonzero 0x966
0965 0801 | | Execute_Immediate Raise,0x1
0966 e5fe | | Load 0x2,-0x2
0967 01dc | | Execute Vector,Last
0968 e5fe | | Load 0x2,-0x2
0969 01ce | | Execute Vector,Slice_Write
096a e5fe | | Load 0x2,-0x2
096b 01dd | | Execute Vector,First
096c 00d9 | | Load_Top At_Offset_1
096d e220 | | Load 0x1,0x20
096e 0334 | 4 | Declare_Variable Array,With_Constraint
096f 00d8 | | Load_Top At_Offset_0
0970 01d9 | | Execute Vector,Reverse_Bounds
0971 0263 | c | Execute Discrete,Above_Bound
0972 7005 |p | Jump_Nonzero 0x978
0973 4800 |H | Short_Literal 0x0
0974 00d9 | | Load_Top At_Offset_1
0975 e403 | | Load 0x2,0x3
0976 01d6 | | Execute Vector,Field_Write
0977 3ffb |? | Loop_Increasing 0x973
0978 e5fe | | Load 0x2,-0x2
0979 01dd | | Execute Vector,First
097a 00da | | Load_Top At_Offset_2
097b e5fe | | Load 0x2,-0x2
097c 01ce | | Execute Vector,Slice_Write
097d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
097e 0000 0000 | | .XXX[0x2]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983 | | .CONST 0x0983 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0001 | | .CONST 0x0001 ; Number of locals
0983 BODY_0980:
0983 INIT_0980:
0983 00db | | Load_Top At_Offset_3
0984 01db | | Execute Vector,Length
0985 0c01 | | Execute_Immediate Greater_Equal,0x1
0986 6828 |h( | Jump_Zero 0x9af
0987 00da | | Load_Top At_Offset_2
0988 e5fe | | Load 0x2,-0x2
0989 01dc | | Execute Vector,Last
098a e5fe | | Load 0x2,-0x2
098b 01d6 | | Execute Vector,Field_Write
098c 00db | | Load_Top At_Offset_3
098d e5fe | | Load 0x2,-0x2
098e 01dd | | Execute Vector,First
098f e5fe | | Load 0x2,-0x2
0990 01dc | | Execute Vector,Last
0991 0aff | | Execute_Immediate Plus,-0x1
0992 00d8 | | Load_Top At_Offset_0
0993 00e2 | | Load_Encached Integer_Cache
0994 0260 | ` | Execute Discrete,In_Type
0995 7001 |p | Jump_Nonzero 0x997
0996 0801 | | Execute_Immediate Raise,0x1
0997 00d9 | | Load_Top At_Offset_1
0998 00d9 | | Load_Top At_Offset_1
0999 e402 | | Load 0x2,0x2
099a 035b | [ | Declare_Type Array,Constrained
099b 00db | | Load_Top At_Offset_3
099c 01cd | | Execute Vector,Slice_Reference
099d 00d8 | | Load_Top At_Offset_0
099e 0335 | 5 | Declare_Variable Array,Duplicate
099f 00cd | | Action Spare6_Action
09a0 00d9 | | Load_Top At_Offset_1
09a1 01d9 | | Execute Vector,Reverse_Bounds
09a2 0263 | c | Execute Discrete,Above_Bound
09a3 7005 |p | Jump_Nonzero 0x9a9
09a4 4800 |H | Short_Literal 0x0
09a5 00d9 | | Load_Top At_Offset_1
09a6 e406 | | Load 0x2,0x6
09a7 01d6 | | Execute Vector,Field_Write
09a8 3ffb |? | Loop_Increasing 0x9a4
09a9 00cd | | Action Spare6_Action
09aa 00da | | Load_Top At_Offset_2
09ab 00da | | Load_Top At_Offset_2
09ac e402 | | Load 0x2,0x2
09ad 01ce | | Execute Vector,Slice_Write
09ae 00d3 | | Pop_Control Pop_Count_3
09af 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09b0 ; --------------------------------------------------------------------------------------
09b0 ; SUBPROGRAM
09b0 ; --------------------------------------------------------------------------------------
09b0 09b3 | | .CONST 0x09b3 ; Address of begin
09b1 0004 | | .CONST 0x0004 ; Address of exception handler
09b2 0001 | | .CONST 0x0001 ; Number of locals
09b3 BODY_09b0:
09b3 INIT_09b0:
09b3 4801 |H | Short_Literal 0x1
09b4 e5fe | | Load 0x2,-0x2
09b5 01d7 | | Execute Vector,Field_Read
09b6 702a |p* | Jump_Nonzero 0x9e1
09b7 4801 |H | Short_Literal 0x1
09b8 a5fd | | Store_Unchecked 0x2,-0x3
09b9 00cf | | Action Mark_Auxiliary
09ba e5fe | | Load 0x2,-0x2
09bb 01dc | | Execute Vector,Last
09bc 4802 |H | Short_Literal 0x2
09bd 0263 | c | Execute Discrete,Above_Bound
09be 7020 |p | Jump_Nonzero 0x9df
09bf 00d8 | | Load_Top At_Offset_0
09c0 e5fe | | Load 0x2,-0x2
09c1 01d7 | | Execute Vector,Field_Read
09c2 681a |h | Jump_Zero 0x9dd
09c3 00d8 | | Load_Top At_Offset_0
09c4 e5fe | | Load 0x2,-0x2
09c5 01dc | | Execute Vector,Last
09c6 e5fe | | Load 0x2,-0x2
09c7 01cf | | Execute Vector,Slice_Read
09c8 4801 |H | Short_Literal 0x1
09c9 e5fe | | Load 0x2,-0x2
09ca 01dc | | Execute Vector,Last
09cb 00db | | Load_Top At_Offset_3
09cc 0272 | r | Execute Discrete,Minus
09cd 0a01 | | Execute_Immediate Plus,0x1
09ce 00d8 | | Load_Top At_Offset_0
09cf 00e2 | | Load_Encached Integer_Cache
09d0 0260 | ` | Execute Discrete,In_Type
09d1 7001 |p | Jump_Nonzero 0x9d3
09d2 0801 | | Execute_Immediate Raise,0x1
09d3 e5fe | | Load 0x2,-0x2
09d4 01ce | | Execute Vector,Slice_Write
09d5 e5fe | | Load 0x2,-0x2
09d6 01dc | | Execute Vector,Last
09d7 00d9 | | Load_Top At_Offset_1
09d8 0272 | r | Execute Discrete,Minus
09d9 0a01 | | Execute_Immediate Plus,0x1
09da c5fd | | Store 0x2,-0x3
09db 00d2 | | Pop_Control Pop_Count_2
09dc 7802 |x | Jump 0x9df
09dd 00c8 | | Action Pop_Auxiliary_Range
09de 3fe0 |? | Loop_Increasing 0x9bf
09df 00ce | | Action Pop_Auxiliary
09e0 7803 |x | Jump 0x9e4
09e1 00db | | Load_Top At_Offset_3
09e2 01dc | | Execute Vector,Last
09e3 a5fd | | Store_Unchecked 0x2,-0x3
09e4 00da | | Load_Top At_Offset_2
09e5 6807 |h | Jump_Zero 0x9ed
09e6 4801 |H | Short_Literal 0x1
09e7 e5fe | | Load 0x2,-0x2
09e8 01d7 | | Execute Vector,Field_Read
09e9 0275 | u | Execute Discrete,Unary_Minus
09ea 4801 |H | Short_Literal 0x1
09eb e5fe | | Load 0x2,-0x2
09ec 01d6 | | Execute Vector,Field_Write
09ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09ee 0000 0000 | | .XXX[0x2]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f5 | | .CONST 0x09f5 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0002 | | .CONST 0x0002 ; Number of locals
09f3 INIT_09f0:
09f3 029f 0f7b | {| Declare_Subprogram INIT_0f78,For_Call
09f5 BODY_09f0:
09f5 00cf | | Action Mark_Auxiliary
09f6 e5ff | | Load 0x2,-0x1
09f7 01d9 | | Execute Vector,Reverse_Bounds
09f8 0263 | c | Execute Discrete,Above_Bound
09f9 700e |p | Jump_Nonzero 0xa08
09fa 00d8 | | Load_Top At_Offset_0
09fb e5ff | | Load 0x2,-0x1
09fc 01d7 | | Execute Vector,Field_Read
09fd 6808 |h | Jump_Zero 0xa06
09fe 00d8 | | Load_Top At_Offset_0
09ff 0f01 | | Execute_Immediate Equal,0x1
0a00 6804 |h | Jump_Zero 0xa05
0a01 e5fe | | Load 0x2,-0x2
0a02 7002 |p | Jump_Nonzero 0xa05
0a03 e5ff | | Load 0x2,-0x1
0a04 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a05 8402 | | Call 0x2,0x2
0a06 00c8 | | Action Pop_Auxiliary_Range
0a07 3ff2 |? | Loop_Increasing 0x9fa
0a08 00ce | | Action Pop_Auxiliary
0a09 e295 | | Load 0x1,0x95
0a0a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a0b 0000 0000 | | .BLANK 0000[0x5]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13 | | .CONST 0x0a13 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0001 | | .CONST 0x0001 ; Number of locals
0a13 BODY_0a10:
0a13 INIT_0a10:
0a13 00da | | Load_Top At_Offset_2
0a14 01db | | Execute Vector,Length
0a15 e5fe | | Load 0x2,-0x2
0a16 01db | | Execute Vector,Length
0a17 e233 | 3 | Load 0x1,0x33
0a18 1c08 | | Execute_Immediate Run_Utility,0x8
0a19 00db | | Load_Top At_Offset_3
0a1a 00d9 | | Load_Top At_Offset_1
0a1b 00d8 | | Load_Top At_Offset_0
0a1c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1d 00da | | Load_Top At_Offset_2
0a1e 01da | | Execute Vector,Bounds
0a1f 00da | | Load_Top At_Offset_2
0a20 01da | | Execute Vector,Bounds
0a21 00da | | Load_Top At_Offset_2
0a22 027f | | Execute Discrete,Equal
0a23 7001 |p | Jump_Nonzero 0xa25
0a24 08e0 | | Execute_Immediate Raise,0xe0
0a25 00cd | | Action Spare6_Action
0a26 027f | | Execute Discrete,Equal
0a27 7001 |p | Jump_Nonzero 0xa29
0a28 08e0 | | Execute_Immediate Raise,0xe0
0a29 00d2 | | Pop_Control Pop_Count_2
0a2a 00d9 | | Load_Top At_Offset_1
0a2b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a2c e5fe | | Load 0x2,-0x2
0a2d 00d9 | | Load_Top At_Offset_1
0a2e 00d8 | | Load_Top At_Offset_0
0a2f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0a30 00da | | Load_Top At_Offset_2
0a31 01da | | Execute Vector,Bounds
0a32 00da | | Load_Top At_Offset_2
0a33 01da | | Execute Vector,Bounds
0a34 00da | | Load_Top At_Offset_2
0a35 027f | | Execute Discrete,Equal
0a36 7001 |p | Jump_Nonzero 0xa38
0a37 08e0 | | Execute_Immediate Raise,0xe0
0a38 00cd | | Action Spare6_Action
0a39 027f | | Execute Discrete,Equal
0a3a 7001 |p | Jump_Nonzero 0xa3c
0a3b 08e0 | | Execute_Immediate Raise,0xe0
0a3c 00d2 | | Pop_Control Pop_Count_2
0a3d 00d9 | | Load_Top At_Offset_1
0a3e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0a3f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a54 | T | .CONST 0x0a54 ; Address of begin
0a41 0004 | | .CONST 0x0004 ; Address of exception handler
0a42 0004 | | .CONST 0x0004 ; Number of locals
0a43 INIT_0a40:
0a43 4801 |H | Short_Literal 0x1
0a44 00db | | Load_Top At_Offset_3
0a45 01db | | Execute Vector,Length
0a46 00d8 | | Load_Top At_Offset_0
0a47 00e2 | | Load_Encached Integer_Cache
0a48 0260 | ` | Execute Discrete,In_Type
0a49 7001 |p | Jump_Nonzero 0xa4b
0a4a 0801 | | Execute_Immediate Raise,0x1
0a4b e220 | | Load 0x1,0x20
0a4c 035b | [ | Declare_Type Array,Constrained
0a4d 0337 | 7 | Declare_Variable Array
0a4e 00db | | Load_Top At_Offset_3
0a4f 00d9 | | Load_Top At_Offset_1
0a50 01d4 | | Execute Vector,Structure_Write
0a51 e21f | | Load 0x1,0x1f
0a52 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a53 00e5 | | Load_Encached Long_Integer_Cache
0a54 BODY_0a40:
0a54 4801 |H | Short_Literal 0x1
0a55 00db | | Load_Top At_Offset_3
0a56 01d7 | | Execute Vector,Field_Read
0a57 0274 | t | Execute Discrete,Absolute_Value
0a58 4801 |H | Short_Literal 0x1
0a59 e402 | | Load 0x2,0x2
0a5a 01d6 | | Execute Vector,Field_Write
0a5b 00da | | Load_Top At_Offset_2
0a5c 01db | | Execute Vector,Length
0a5d 0c02 | | Execute_Immediate Greater_Equal,0x2
0a5e 6807 |h | Jump_Zero 0xa66
0a5f 4802 |H | Short_Literal 0x2
0a60 00db | | Load_Top At_Offset_3
0a61 01d7 | | Execute Vector,Field_Read
0a62 0274 | t | Execute Discrete,Absolute_Value
0a63 4802 |H | Short_Literal 0x2
0a64 e402 | | Load 0x2,0x2
0a65 01d6 | | Execute Vector,Field_Write
0a66 e5fe | | Load 0x2,-0x2
0a67 0e01 | | Execute_Immediate Not_Equal,0x1
0a68 6819 |h | Jump_Zero 0xa82
0a69 00cf | | Action Mark_Auxiliary
0a6a 00db | | Load_Top At_Offset_3
0a6b 01da | | Execute Vector,Bounds
0a6c 0264 | d | Execute Discrete,Below_Bound
0a6d 7013 |p | Jump_Nonzero 0xa81
0a6e 00d8 | | Load_Top At_Offset_0
0a6f e402 | | Load 0x2,0x2
0a70 01d7 | | Execute Vector,Field_Read
0a71 e5fe | | Load 0x2,-0x2
0a72 0271 | q | Execute Discrete,Times
0a73 e403 | | Load 0x2,0x3
0a74 0273 | s | Execute Discrete,Plus
0a75 a404 | | Store_Unchecked 0x2,0x4
0a76 00db | | Load_Top At_Offset_3
0a77 6010 |` | Indirect_Literal Discrete,0xa88,{0x00000000, 0x80000000}
0a78 026f | o | Execute Discrete,Remainder
0a79 00d9 | | Load_Top At_Offset_1
0a7a e402 | | Load 0x2,0x2
0a7b 01d6 | | Execute Vector,Field_Write
0a7c 00db | | Load_Top At_Offset_3
0a7d 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0a7e c403 | | Store 0x2,0x3
0a7f 00c8 | | Action Pop_Auxiliary_Range
0a80 37ed |7 | Loop_Decreasing 0xa6e
0a81 00ce | | Action Pop_Auxiliary
0a82 00da | | Load_Top At_Offset_2
0a83 e220 | | Load 0x1,0x20
0a84 01c6 | | Execute Vector,Convert_To_Formal
0a85 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a86 0000 0000 | | .XXX[0x2]
0a88 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0a8c 0000 0000 | | .BLANK 0000[0x4]
0a90 ; --------------------------------------------------------------------------------------
0a90 ; SUBPROGRAM
0a90 ; --------------------------------------------------------------------------------------
0a90 0a9a | | .CONST 0x0a9a ; Address of begin
0a91 0004 | | .CONST 0x0004 ; Address of exception handler
0a92 0004 | | .CONST 0x0004 ; Number of locals
0a93 INIT_0a90:
0a93 e21f | | Load 0x1,0x1f
0a94 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a95 e5fe | | Load 0x2,-0x2
0a96 0274 | t | Execute Discrete,Absolute_Value
0a97 e21f | | Load 0x1,0x1f
0a98 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0a99 00e5 | | Load_Encached Long_Integer_Cache
0a9a BODY_0a90:
0a9a 4801 |H | Short_Literal 0x1
0a9b e5ff | | Load 0x2,-0x1
0a9c 01d7 | | Execute Vector,Field_Read
0a9d 0274 | t | Execute Discrete,Absolute_Value
0a9e 4801 |H | Short_Literal 0x1
0a9f e5ff | | Load 0x2,-0x1
0aa0 01d6 | | Execute Vector,Field_Write
0aa1 00d9 | | Load_Top At_Offset_1
0aa2 0e01 | | Execute_Immediate Not_Equal,0x1
0aa3 6819 |h | Jump_Zero 0xabd
0aa4 00cf | | Action Mark_Auxiliary
0aa5 e5ff | | Load 0x2,-0x1
0aa6 01d9 | | Execute Vector,Reverse_Bounds
0aa7 0263 | c | Execute Discrete,Above_Bound
0aa8 7013 |p | Jump_Nonzero 0xabc
0aa9 e402 | | Load 0x2,0x2
0aaa 091f | | Execute_Immediate Binary_Scale,0x1f
0aab 00d9 | | Load_Top At_Offset_1
0aac e5ff | | Load 0x2,-0x1
0aad 01d7 | | Execute Vector,Field_Read
0aae 0273 | s | Execute Discrete,Plus
0aaf a404 | | Store_Unchecked 0x2,0x4
0ab0 00db | | Load_Top At_Offset_3
0ab1 e403 | | Load 0x2,0x3
0ab2 0270 | p | Execute Discrete,Divide
0ab3 00d9 | | Load_Top At_Offset_1
0ab4 e5ff | | Load 0x2,-0x1
0ab5 01d6 | | Execute Vector,Field_Write
0ab6 00db | | Load_Top At_Offset_3
0ab7 e403 | | Load 0x2,0x3
0ab8 026f | o | Execute Discrete,Remainder
0ab9 c402 | | Store 0x2,0x2
0aba 00c8 | | Action Pop_Auxiliary_Range
0abb 3fed |? | Loop_Increasing 0xaa9
0abc 00ce | | Action Pop_Auxiliary
0abd 00da | | Load_Top At_Offset_2
0abe a5fe | | Store_Unchecked 0x2,-0x2
0abf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0add | | .CONST 0x0add ; Address of begin
0ac1 0004 | | .CONST 0x0004 ; Address of exception handler
0ac2 0007 | | .CONST 0x0007 ; Number of locals
0ac3 INIT_0ac0:
0ac3 00da | | Load_Top At_Offset_2
0ac4 01db | | Execute Vector,Length
0ac5 00e2 | | Load_Encached Integer_Cache
0ac6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0ac7 e5fe | | Load 0x2,-0x2
0ac8 01db | | Execute Vector,Length
0ac9 00e2 | | Load_Encached Integer_Cache
0aca 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0acb 4801 |H | Short_Literal 0x1
0acc e5ff | | Load 0x2,-0x1
0acd 01d7 | | Execute Vector,Field_Read
0ace 0d00 | | Execute_Immediate Less,0x0
0acf 00e1 | | Load_Encached Boolean_Cache
0ad0 03f1 | | Declare_Variable Discrete,With_Value
0ad1 00d8 | | Load_Top At_Offset_0
0ad2 4801 |H | Short_Literal 0x1
0ad3 e5fe | | Load 0x2,-0x2
0ad4 01d7 | | Execute Vector,Field_Read
0ad5 0d00 | | Execute_Immediate Less,0x0
0ad6 0277 | w | Execute Discrete,Xor
0ad7 00e1 | | Load_Encached Boolean_Cache
0ad8 03f1 | | Declare_Variable Discrete,With_Value
0ad9 029f 0fa3 | | Declare_Subprogram INIT_0fa0,For_Call
0adb 029f 101b | | Declare_Subprogram INIT_1018,For_Call
0add BODY_0ac0:
0add e402 | | Load 0x2,0x2
0ade 0f01 | | Execute_Immediate Equal,0x1
0adf 68bd |h | Jump_Zero 0xb9d
0ae0 e403 | | Load 0x2,0x3
0ae1 0f01 | | Execute_Immediate Equal,0x1
0ae2 68ba |h | Jump_Zero 0xb9d
0ae3 e5fd | | Load 0x2,-0x3
0ae4 4602 |F | Jump_Case 0x3
0ae5 7847 |xG | Jump 0xb2d ; case 0x0
0ae6 787e |x~ | Jump 0xb65 ; case 0x1
0ae7 7800 |x | Jump 0xae8 ; case 0x2
0ae8 4801 |H | Short_Literal 0x1
0ae9 4801 |H | Short_Literal 0x1
0aea e233 | 3 | Load 0x1,0x33
0aeb 1c08 | | Execute_Immediate Run_Utility,0x8
0aec 4801 |H | Short_Literal 0x1
0aed 4801 |H | Short_Literal 0x1
0aee e220 | | Load 0x1,0x20
0aef 0334 | 4 | Declare_Variable Array,With_Constraint
0af0 4801 |H | Short_Literal 0x1
0af1 e5ff | | Load 0x2,-0x1
0af2 01d7 | | Execute Vector,Field_Read
0af3 4801 |H | Short_Literal 0x1
0af4 e5fe | | Load 0x2,-0x2
0af5 01d7 | | Execute Vector,Field_Read
0af6 0270 | p | Execute Discrete,Divide
0af7 4801 |H | Short_Literal 0x1
0af8 00da | | Load_Top At_Offset_2
0af9 01d6 | | Execute Vector,Field_Write
0afa 00d9 | | Load_Top At_Offset_1
0afb 00d8 | | Load_Top At_Offset_0
0afc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0afd 00da | | Load_Top At_Offset_2
0afe 01da | | Execute Vector,Bounds
0aff 00da | | Load_Top At_Offset_2
0b00 01da | | Execute Vector,Bounds
0b01 00da | | Load_Top At_Offset_2
0b02 027f | | Execute Discrete,Equal
0b03 7001 |p | Jump_Nonzero 0xb05
0b04 08e0 | | Execute_Immediate Raise,0xe0
0b05 00cd | | Action Spare6_Action
0b06 027f | | Execute Discrete,Equal
0b07 7001 |p | Jump_Nonzero 0xb09
0b08 08e0 | | Execute_Immediate Raise,0xe0
0b09 00d2 | | Pop_Control Pop_Count_2
0b0a 00d9 | | Load_Top At_Offset_1
0b0b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b0c 4801 |H | Short_Literal 0x1
0b0d 4801 |H | Short_Literal 0x1
0b0e e220 | | Load 0x1,0x20
0b0f 0334 | 4 | Declare_Variable Array,With_Constraint
0b10 4801 |H | Short_Literal 0x1
0b11 e5ff | | Load 0x2,-0x1
0b12 01d7 | | Execute Vector,Field_Read
0b13 4801 |H | Short_Literal 0x1
0b14 e5fe | | Load 0x2,-0x2
0b15 01d7 | | Execute Vector,Field_Read
0b16 026e | n | Execute Discrete,Modulo
0b17 4801 |H | Short_Literal 0x1
0b18 00da | | Load_Top At_Offset_2
0b19 01d6 | | Execute Vector,Field_Write
0b1a 00d9 | | Load_Top At_Offset_1
0b1b 00d8 | | Load_Top At_Offset_0
0b1c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0b1d 00da | | Load_Top At_Offset_2
0b1e 01da | | Execute Vector,Bounds
0b1f 00da | | Load_Top At_Offset_2
0b20 01da | | Execute Vector,Bounds
0b21 00da | | Load_Top At_Offset_2
0b22 027f | | Execute Discrete,Equal
0b23 7001 |p | Jump_Nonzero 0xb25
0b24 08e0 | | Execute_Immediate Raise,0xe0
0b25 00cd | | Action Spare6_Action
0b26 027f | | Execute Discrete,Equal
0b27 7001 |p | Jump_Nonzero 0xb29
0b28 08e0 | | Execute_Immediate Raise,0xe0
0b29 00d2 | | Pop_Control Pop_Count_2
0b2a 00d9 | | Load_Top At_Offset_1
0b2b 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0b2c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0b2d 4801 |H | Short_Literal 0x1
0b2e 4800 |H | Short_Literal 0x0
0b2f e233 | 3 | Load 0x1,0x33
0b30 1c08 | | Execute_Immediate Run_Utility,0x8
0b31 4801 |H | Short_Literal 0x1
0b32 4801 |H | Short_Literal 0x1
0b33 e220 | | Load 0x1,0x20
0b34 0334 | 4 | Declare_Variable Array,With_Constraint
0b35 4801 |H | Short_Literal 0x1
0b36 e5ff | | Load 0x2,-0x1
0b37 01d7 | | Execute Vector,Field_Read
0b38 4801 |H | Short_Literal 0x1
0b39 e5fe | | Load 0x2,-0x2
0b3a 01d7 | | Execute Vector,Field_Read
0b3b 0270 | p | Execute Discrete,Divide
0b3c 4801 |H | Short_Literal 0x1
0b3d 00da | | Load_Top At_Offset_2
0b3e 01d6 | | Execute Vector,Field_Write
0b3f 00d9 | | Load_Top At_Offset_1
0b40 00d8 | | Load_Top At_Offset_0
0b41 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b42 00da | | Load_Top At_Offset_2
0b43 01da | | Execute Vector,Bounds
0b44 00da | | Load_Top At_Offset_2
0b45 01da | | Execute Vector,Bounds
0b46 00da | | Load_Top At_Offset_2
0b47 027f | | Execute Discrete,Equal
0b48 7001 |p | Jump_Nonzero 0xb4a
0b49 08e0 | | Execute_Immediate Raise,0xe0
0b4a 00cd | | Action Spare6_Action
0b4b 027f | | Execute Discrete,Equal
0b4c 7001 |p | Jump_Nonzero 0xb4e
0b4d 08e0 | | Execute_Immediate Raise,0xe0
0b4e 00d2 | | Pop_Control Pop_Count_2
0b4f 00d9 | | Load_Top At_Offset_1
0b50 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b51 e294 | | Load 0x1,0x94
0b52 00d9 | | Load_Top At_Offset_1
0b53 00d8 | | Load_Top At_Offset_0
0b54 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0b55 00da | | Load_Top At_Offset_2
0b56 01da | | Execute Vector,Bounds
0b57 00da | | Load_Top At_Offset_2
0b58 01da | | Execute Vector,Bounds
0b59 00da | | Load_Top At_Offset_2
0b5a 027f | | Execute Discrete,Equal
0b5b 7001 |p | Jump_Nonzero 0xb5d
0b5c 08e0 | | Execute_Immediate Raise,0xe0
0b5d 00cd | | Action Spare6_Action
0b5e 027f | | Execute Discrete,Equal
0b5f 7001 |p | Jump_Nonzero 0xb61
0b60 08e0 | | Execute_Immediate Raise,0xe0
0b61 00d2 | | Pop_Control Pop_Count_2
0b62 00d9 | | Load_Top At_Offset_1
0b63 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0b64 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0b65 4800 |H | Short_Literal 0x0
0b66 4801 |H | Short_Literal 0x1
0b67 e233 | 3 | Load 0x1,0x33
0b68 1c08 | | Execute_Immediate Run_Utility,0x8
0b69 e294 | | Load 0x1,0x94
0b6a 00d9 | | Load_Top At_Offset_1
0b6b 00d8 | | Load_Top At_Offset_0
0b6c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b6d 00da | | Load_Top At_Offset_2
0b6e 01da | | Execute Vector,Bounds
0b6f 00da | | Load_Top At_Offset_2
0b70 01da | | Execute Vector,Bounds
0b71 00da | | Load_Top At_Offset_2
0b72 027f | | Execute Discrete,Equal
0b73 7001 |p | Jump_Nonzero 0xb75
0b74 08e0 | | Execute_Immediate Raise,0xe0
0b75 00cd | | Action Spare6_Action
0b76 027f | | Execute Discrete,Equal
0b77 7001 |p | Jump_Nonzero 0xb79
0b78 08e0 | | Execute_Immediate Raise,0xe0
0b79 00d2 | | Pop_Control Pop_Count_2
0b7a 00d9 | | Load_Top At_Offset_1
0b7b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b7c 4801 |H | Short_Literal 0x1
0b7d 4801 |H | Short_Literal 0x1
0b7e e220 | | Load 0x1,0x20
0b7f 0334 | 4 | Declare_Variable Array,With_Constraint
0b80 4801 |H | Short_Literal 0x1
0b81 e5ff | | Load 0x2,-0x1
0b82 01d7 | | Execute Vector,Field_Read
0b83 4801 |H | Short_Literal 0x1
0b84 e5fe | | Load 0x2,-0x2
0b85 01d7 | | Execute Vector,Field_Read
0b86 026f | o | Execute Discrete,Remainder
0b87 4801 |H | Short_Literal 0x1
0b88 00da | | Load_Top At_Offset_2
0b89 01d6 | | Execute Vector,Field_Write
0b8a 00d9 | | Load_Top At_Offset_1
0b8b 00d8 | | Load_Top At_Offset_0
0b8c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0b8d 00da | | Load_Top At_Offset_2
0b8e 01da | | Execute Vector,Bounds
0b8f 00da | | Load_Top At_Offset_2
0b90 01da | | Execute Vector,Bounds
0b91 00da | | Load_Top At_Offset_2
0b92 027f | | Execute Discrete,Equal
0b93 7001 |p | Jump_Nonzero 0xb95
0b94 08e0 | | Execute_Immediate Raise,0xe0
0b95 00cd | | Action Spare6_Action
0b96 027f | | Execute Discrete,Equal
0b97 7001 |p | Jump_Nonzero 0xb99
0b98 08e0 | | Execute_Immediate Raise,0xe0
0b99 00d2 | | Pop_Control Pop_Count_2
0b9a 00d9 | | Load_Top At_Offset_1
0b9b 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0b9c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0b9d e403 | | Load 0x2,0x3
0b9e 0f01 | | Execute_Immediate Equal,0x1
0b9f 6801 |h | Jump_Zero 0xba1
0ba0 8406 | | Call 0x2,0x6
0ba1 8407 | | Call 0x2,0x7
0ba2 0831 | 1 | Execute_Immediate Raise,0x31
0ba3 0000 0000 | | .BLANK 0000[0x5]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; SUBPROGRAM
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0bab | | .CONST 0x0bab ; Address of begin
0ba9 0004 | | .CONST 0x0004 ; Address of exception handler
0baa 0001 | | .CONST 0x0001 ; Number of locals
0bab BODY_0ba8:
0bab INIT_0ba8:
0bab 00cf | | Action Mark_Auxiliary
0bac 00db | | Load_Top At_Offset_3
0bad 01d9 | | Execute Vector,Reverse_Bounds
0bae 0263 | c | Execute Discrete,Above_Bound
0baf 7008 |p | Jump_Nonzero 0xbb8
0bb0 00d8 | | Load_Top At_Offset_0
0bb1 e5ff | | Load 0x2,-0x1
0bb2 01d7 | | Execute Vector,Field_Read
0bb3 6802 |h | Jump_Zero 0xbb6
0bb4 00d8 | | Load_Top At_Offset_0
0bb5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bb6 00c8 | | Action Pop_Auxiliary_Range
0bb7 3ff8 |? | Loop_Increasing 0xbb0
0bb8 00ce | | Action Pop_Auxiliary
0bb9 00da | | Load_Top At_Offset_2
0bba 01dc | | Execute Vector,Last
0bbb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bbc 0000 0000 | | .BLANK 0000[0x4]
0bc0 ; --------------------------------------------------------------------------------------
0bc0 ; SUBPROGRAM
0bc0 ; --------------------------------------------------------------------------------------
0bc0 0bc6 | | .CONST 0x0bc6 ; Address of begin
0bc1 0004 | | .CONST 0x0004 ; Address of exception handler
0bc2 0003 | | .CONST 0x0003 ; Number of locals
0bc3 INIT_0bc0:
0bc3 e21f | | Load 0x1,0x1f
0bc4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0bc5 00e5 | | Load_Encached Long_Integer_Cache
0bc6 BODY_0bc0:
0bc6 00cf | | Action Mark_Auxiliary
0bc7 e5fe | | Load 0x2,-0x2
0bc8 01da | | Execute Vector,Bounds
0bc9 0264 | d | Execute Discrete,Below_Bound
0bca 7013 |p | Jump_Nonzero 0xbde
0bcb 00d8 | | Load_Top At_Offset_0
0bcc e5fe | | Load 0x2,-0x2
0bcd 01d7 | | Execute Vector,Field_Read
0bce e5ff | | Load 0x2,-0x1
0bcf 0271 | q | Execute Discrete,Times
0bd0 e402 | | Load 0x2,0x2
0bd1 0273 | s | Execute Discrete,Plus
0bd2 a403 | | Store_Unchecked 0x2,0x3
0bd3 00db | | Load_Top At_Offset_3
0bd4 600b |` | Indirect_Literal Discrete,0xbe0,{0x00000000, 0x80000000}
0bd5 026f | o | Execute Discrete,Remainder
0bd6 00d9 | | Load_Top At_Offset_1
0bd7 e5fe | | Load 0x2,-0x2
0bd8 01d6 | | Execute Vector,Field_Write
0bd9 00db | | Load_Top At_Offset_3
0bda 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0bdb c402 | | Store 0x2,0x2
0bdc 00c8 | | Action Pop_Auxiliary_Range
0bdd 37ed |7 | Loop_Decreasing 0xbcb
0bde 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bdf 0000 | | .XXX[0x1]
0be0 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0be4 0000 0000 | | .BLANK 0000[0x4]
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0c01 | | .CONST 0x0c01 ; Address of begin
0be9 0004 | | .CONST 0x0004 ; Address of exception handler
0bea 0006 | | .CONST 0x0006 ; Number of locals
0beb INIT_0be8:
0beb e21f | | Load 0x1,0x1f
0bec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0bed e5fe | | Load 0x2,-0x2
0bee 0274 | t | Execute Discrete,Absolute_Value
0bef e21f | | Load 0x1,0x1f
0bf0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0bf1 00e5 | | Load_Encached Long_Integer_Cache
0bf2 4801 |H | Short_Literal 0x1
0bf3 e5ff | | Load 0x2,-0x1
0bf4 01db | | Execute Vector,Length
0bf5 00d8 | | Load_Top At_Offset_0
0bf6 00e2 | | Load_Encached Integer_Cache
0bf7 0260 | ` | Execute Discrete,In_Type
0bf8 7001 |p | Jump_Nonzero 0xbfa
0bf9 0801 | | Execute_Immediate Raise,0x1
0bfa e220 | | Load 0x1,0x20
0bfb 035b | [ | Declare_Type Array,Constrained
0bfc 0337 | 7 | Declare_Variable Array
0bfd e5ff | | Load 0x2,-0x1
0bfe 00d9 | | Load_Top At_Offset_1
0bff 01d4 | | Execute Vector,Structure_Write
0c00 00e2 | | Load_Encached Integer_Cache
0c01 BODY_0be8:
0c01 4801 |H | Short_Literal 0x1
0c02 00da | | Load_Top At_Offset_2
0c03 01d7 | | Execute Vector,Field_Read
0c04 0274 | t | Execute Discrete,Absolute_Value
0c05 4801 |H | Short_Literal 0x1
0c06 00db | | Load_Top At_Offset_3
0c07 01d6 | | Execute Vector,Field_Write
0c08 00cf | | Action Mark_Auxiliary
0c09 00da | | Load_Top At_Offset_2
0c0a 01d9 | | Execute Vector,Reverse_Bounds
0c0b 0263 | c | Execute Discrete,Above_Bound
0c0c 7013 |p | Jump_Nonzero 0xc20
0c0d e402 | | Load 0x2,0x2
0c0e 091f | | Execute_Immediate Binary_Scale,0x1f
0c0f 00d9 | | Load_Top At_Offset_1
0c10 e405 | | Load 0x2,0x5
0c11 01d7 | | Execute Vector,Field_Read
0c12 0273 | s | Execute Discrete,Plus
0c13 a404 | | Store_Unchecked 0x2,0x4
0c14 e404 | | Load 0x2,0x4
0c15 e403 | | Load 0x2,0x3
0c16 0270 | p | Execute Discrete,Divide
0c17 00d9 | | Load_Top At_Offset_1
0c18 e405 | | Load 0x2,0x5
0c19 01d6 | | Execute Vector,Field_Write
0c1a e404 | | Load 0x2,0x4
0c1b e403 | | Load 0x2,0x3
0c1c 026f | o | Execute Discrete,Remainder
0c1d c402 | | Store 0x2,0x2
0c1e 00c8 | | Action Pop_Auxiliary_Range
0c1f 3fed |? | Loop_Increasing 0xc0d
0c20 00ce | | Action Pop_Auxiliary
0c21 e5ff | | Load 0x2,-0x1
0c22 01dd | | Execute Vector,First
0c23 e5ff | | Load 0x2,-0x1
0c24 01d7 | | Execute Vector,Field_Read
0c25 0d00 | | Execute_Immediate Less,0x0
0c26 e5fe | | Load 0x2,-0x2
0c27 0d00 | | Execute_Immediate Less,0x0
0c28 0277 | w | Execute Discrete,Xor
0c29 680a |h | Jump_Zero 0xc34
0c2a 00d9 | | Load_Top At_Offset_1
0c2b 82a9 | | Call 0x1,0xa9
0c2c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0c2d 00d8 | | Load_Top At_Offset_0
0c2e 00da | | Load_Top At_Offset_2
0c2f 01d7 | | Execute Vector,Field_Read
0c30 0275 | u | Execute Discrete,Unary_Minus
0c31 00d9 | | Load_Top At_Offset_1
0c32 00db | | Load_Top At_Offset_3
0c33 01d6 | | Execute Vector,Field_Write
0c34 e5ff | | Load 0x2,-0x1
0c35 01dd | | Execute Vector,First
0c36 e5ff | | Load 0x2,-0x1
0c37 01d7 | | Execute Vector,Field_Read
0c38 0d00 | | Execute_Immediate Less,0x0
0c39 6803 |h | Jump_Zero 0xc3d
0c3a e402 | | Load 0x2,0x2
0c3b 0275 | u | Execute Discrete,Unary_Minus
0c3c c402 | | Store 0x2,0x2
0c3d e5fd | | Load 0x2,-0x3
0c3e 00da | | Load_Top At_Offset_2
0c3f 82a1 | | Call 0x1,0xa1
0c40 00d1 | | Pop_Control Pop_Count_1
0c41 e5fc | | Load 0x2,-0x4
0c42 e402 | | Load 0x2,0x2
0c43 82a2 | | Call 0x1,0xa2
0c44 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c45 0000 0000 | | .XXX[0x3]
0c47 0000 | |
0c48 ; --------------------------------------------------------------------------------------
0c48 ; SUBPROGRAM
0c48 ; --------------------------------------------------------------------------------------
0c48 0c72 | r | .CONST 0x0c72 ; Address of begin
0c49 0004 | | .CONST 0x0004 ; Address of exception handler
0c4a 0009 | | .CONST 0x0009 ; Number of locals
0c4b INIT_0c48:
0c4b 00da | | Load_Top At_Offset_2
0c4c 82a9 | | Call 0x1,0xa9
0c4d 00e2 | | Load_Encached Integer_Cache
0c4e 03f1 | | Declare_Variable Discrete,With_Value
0c4f e5fe | | Load 0x2,-0x2
0c50 82a9 | | Call 0x1,0xa9
0c51 00e2 | | Load_Encached Integer_Cache
0c52 03f1 | | Declare_Variable Discrete,With_Value
0c53 e5ff | | Load 0x2,-0x1
0c54 01dc | | Execute Vector,Last
0c55 00da | | Load_Top At_Offset_2
0c56 0272 | r | Execute Discrete,Minus
0c57 0a01 | | Execute_Immediate Plus,0x1
0c58 00e2 | | Load_Encached Integer_Cache
0c59 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0c5a e5fe | | Load 0x2,-0x2
0c5b 01dc | | Execute Vector,Last
0c5c 00da | | Load_Top At_Offset_2
0c5d 0272 | r | Execute Discrete,Minus
0c5e 0a01 | | Execute_Immediate Plus,0x1
0c5f 00e2 | | Load_Encached Integer_Cache
0c60 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0c61 00db | | Load_Top At_Offset_3
0c62 e5ff | | Load 0x2,-0x1
0c63 01d7 | | Execute Vector,Field_Read
0c64 0d00 | | Execute_Immediate Less,0x0
0c65 00e1 | | Load_Encached Boolean_Cache
0c66 03f1 | | Declare_Variable Discrete,With_Value
0c67 00d8 | | Load_Top At_Offset_0
0c68 e403 | | Load 0x2,0x3
0c69 e5fe | | Load 0x2,-0x2
0c6a 01d7 | | Execute Vector,Field_Read
0c6b 0d00 | | Execute_Immediate Less,0x0
0c6c 0277 | w | Execute Discrete,Xor
0c6d 00e1 | | Load_Encached Boolean_Cache
0c6e 03f1 | | Declare_Variable Discrete,With_Value
0c6f 00e5 | | Load_Encached Long_Integer_Cache
0c70 029f 1153 | S| Declare_Subprogram INIT_1150,For_Call
0c72 BODY_0c48:
0c72 e404 | | Load 0x2,0x4
0c73 0f01 | | Execute_Immediate Equal,0x1
0c74 6827 |h' | Jump_Zero 0xc9c
0c75 e405 | | Load 0x2,0x5
0c76 0f01 | | Execute_Immediate Equal,0x1
0c77 6824 |h$ | Jump_Zero 0xc9c
0c78 e5fd | | Load 0x2,-0x3
0c79 e402 | | Load 0x2,0x2
0c7a e5ff | | Load 0x2,-0x1
0c7b 01d7 | | Execute Vector,Field_Read
0c7c e403 | | Load 0x2,0x3
0c7d e5fe | | Load 0x2,-0x2
0c7e 01d7 | | Execute Vector,Field_Read
0c7f 0270 | p | Execute Discrete,Divide
0c80 00d8 | | Load_Top At_Offset_0
0c81 e21f | | Load 0x1,0x1f
0c82 0260 | ` | Execute Discrete,In_Type
0c83 7001 |p | Jump_Nonzero 0xc85
0c84 0801 | | Execute_Immediate Raise,0x1
0c85 82a2 | | Call 0x1,0xa2
0c86 00d1 | | Pop_Control Pop_Count_1
0c87 e402 | | Load 0x2,0x2
0c88 e5ff | | Load 0x2,-0x1
0c89 01d7 | | Execute Vector,Field_Read
0c8a e403 | | Load 0x2,0x3
0c8b e5fe | | Load 0x2,-0x2
0c8c 01d7 | | Execute Vector,Field_Read
0c8d 026f | o | Execute Discrete,Remainder
0c8e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0c8f e5fc | | Load 0x2,-0x4
0c90 00da | | Load_Top At_Offset_2
0c91 00d8 | | Load_Top At_Offset_0
0c92 e21f | | Load 0x1,0x1f
0c93 0260 | ` | Execute Discrete,In_Type
0c94 7001 |p | Jump_Nonzero 0xc96
0c95 0801 | | Execute_Immediate Raise,0x1
0c96 82a2 | | Call 0x1,0xa2
0c97 00d1 | | Pop_Control Pop_Count_1
0c98 00d9 | | Load_Top At_Offset_1
0c99 0f00 | | Execute_Immediate Equal,0x0
0c9a a5fb | | Store_Unchecked 0x2,-0x5
0c9b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c9c e405 | | Load 0x2,0x5
0c9d 0f01 | | Execute_Immediate Equal,0x1
0c9e 6819 |h | Jump_Zero 0xcb8
0c9f e5fc | | Load 0x2,-0x4
0ca0 e5fd | | Load 0x2,-0x3
0ca1 e403 | | Load 0x2,0x3
0ca2 e5fe | | Load 0x2,-0x2
0ca3 01d7 | | Execute Vector,Field_Read
0ca4 e402 | | Load 0x2,0x2
0ca5 e5ff | | Load 0x2,-0x1
0ca6 01dc | | Execute Vector,Last
0ca7 e5ff | | Load 0x2,-0x1
0ca8 01cf | | Execute Vector,Slice_Read
0ca9 82ab | | Call 0x1,0xab
0caa 00d2 | | Pop_Control Pop_Count_2
0cab e5fc | | Load 0x2,-0x4
0cac 01db | | Execute Vector,Length
0cad 0c01 | | Execute_Immediate Greater_Equal,0x1
0cae 6806 |h | Jump_Zero 0xcb5
0caf e5fc | | Load 0x2,-0x4
0cb0 01dc | | Execute Vector,Last
0cb1 e5fc | | Load 0x2,-0x4
0cb2 01d7 | | Execute Vector,Field_Read
0cb3 0f00 | | Execute_Immediate Equal,0x0
0cb4 7801 |x | Jump 0xcb6
0cb5 4800 |H | Short_Literal 0x0
0cb6 a5fb | | Store_Unchecked 0x2,-0x5
0cb7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0cb8 8409 | | Call 0x2,0x9
0cb9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0cba 0000 0000 | | .BLANK 0000[0x6]
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; SUBPROGRAM
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0cd6 | | .CONST 0x0cd6 ; Address of begin
0cc1 0004 | | .CONST 0x0004 ; Address of exception handler
0cc2 0005 | | .CONST 0x0005 ; Number of locals
0cc3 INIT_0cc0:
0cc3 00da | | Load_Top At_Offset_2
0cc4 82a9 | | Call 0x1,0xa9
0cc5 00e2 | | Load_Encached Integer_Cache
0cc6 03f1 | | Declare_Variable Discrete,With_Value
0cc7 00d8 | | Load_Top At_Offset_0
0cc8 e5ff | | Load 0x2,-0x1
0cc9 01dc | | Execute Vector,Last
0cca 0a01 | | Execute_Immediate Plus,0x1
0ccb 00d8 | | Load_Top At_Offset_0
0ccc 00e2 | | Load_Encached Integer_Cache
0ccd 0260 | ` | Execute Discrete,In_Type
0cce 7001 |p | Jump_Nonzero 0xcd0
0ccf 0801 | | Execute_Immediate Raise,0x1
0cd0 e220 | | Load 0x1,0x20
0cd1 035b | [ | Declare_Type Array,Constrained
0cd2 0337 | 7 | Declare_Variable Array
0cd3 e21f | | Load 0x1,0x1f
0cd4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cd5 00e5 | | Load_Encached Long_Integer_Cache
0cd6 BODY_0cc0:
0cd6 00cf | | Action Mark_Auxiliary
0cd7 e402 | | Load 0x2,0x2
0cd8 e5ff | | Load 0x2,-0x1
0cd9 01dc | | Execute Vector,Last
0cda 0264 | d | Execute Discrete,Below_Bound
0cdb 7015 |p | Jump_Nonzero 0xcf1
0cdc 00d8 | | Load_Top At_Offset_0
0cdd e5ff | | Load 0x2,-0x1
0cde 01d7 | | Execute Vector,Field_Read
0cdf e5fe | | Load 0x2,-0x2
0ce0 0271 | q | Execute Discrete,Times
0ce1 0274 | t | Execute Discrete,Absolute_Value
0ce2 e404 | | Load 0x2,0x4
0ce3 0273 | s | Execute Discrete,Plus
0ce4 a405 | | Store_Unchecked 0x2,0x5
0ce5 00db | | Load_Top At_Offset_3
0ce6 6025 |`% | Indirect_Literal Discrete,0xd0c,{0x00000000, 0x80000000}
0ce7 026f | o | Execute Discrete,Remainder
0ce8 00d9 | | Load_Top At_Offset_1
0ce9 0a01 | | Execute_Immediate Plus,0x1
0cea e403 | | Load 0x2,0x3
0ceb 01d6 | | Execute Vector,Field_Write
0cec 00db | | Load_Top At_Offset_3
0ced 09e1 | | Execute_Immediate Binary_Scale,-0x1f
0cee c404 | | Store 0x2,0x4
0cef 00c8 | | Action Pop_Auxiliary_Range
0cf0 37eb |7 | Loop_Decreasing 0xcdc
0cf1 00ce | | Action Pop_Auxiliary
0cf2 00d9 | | Load_Top At_Offset_1
0cf3 e402 | | Load 0x2,0x2
0cf4 e403 | | Load 0x2,0x3
0cf5 01d6 | | Execute Vector,Field_Write
0cf6 00db | | Load_Top At_Offset_3
0cf7 e5ff | | Load 0x2,-0x1
0cf8 01d7 | | Execute Vector,Field_Read
0cf9 0d00 | | Execute_Immediate Less,0x0
0cfa e5fe | | Load 0x2,-0x2
0cfb 0d00 | | Execute_Immediate Less,0x0
0cfc 0277 | w | Execute Discrete,Xor
0cfd 680a |h | Jump_Zero 0xd08
0cfe 00da | | Load_Top At_Offset_2
0cff 82a9 | | Call 0x1,0xa9
0d00 a402 | | Store_Unchecked 0x2,0x2
0d01 00db | | Load_Top At_Offset_3
0d02 00db | | Load_Top At_Offset_3
0d03 01d7 | | Execute Vector,Field_Read
0d04 0275 | u | Execute Discrete,Unary_Minus
0d05 e402 | | Load 0x2,0x2
0d06 e403 | | Load 0x2,0x3
0d07 01d6 | | Execute Vector,Field_Write
0d08 e5fd | | Load 0x2,-0x3
0d09 00db | | Load_Top At_Offset_3
0d0a 82a1 | | Call 0x1,0xa1
0d0b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d0c 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0d10 ; --------------------------------------------------------------------------------------
0d10 ; SUBPROGRAM
0d10 ; --------------------------------------------------------------------------------------
0d10 0d2b | + | .CONST 0x0d2b ; Address of begin
0d11 0004 | | .CONST 0x0004 ; Address of exception handler
0d12 0006 | | .CONST 0x0006 ; Number of locals
0d13 INIT_0d10:
0d13 00da | | Load_Top At_Offset_2
0d14 82a9 | | Call 0x1,0xa9
0d15 00e2 | | Load_Encached Integer_Cache
0d16 03f1 | | Declare_Variable Discrete,With_Value
0d17 e5fe | | Load 0x2,-0x2
0d18 82a9 | | Call 0x1,0xa9
0d19 00e2 | | Load_Encached Integer_Cache
0d1a 03f1 | | Declare_Variable Discrete,With_Value
0d1b e5ff | | Load 0x2,-0x1
0d1c 01dc | | Execute Vector,Last
0d1d 00da | | Load_Top At_Offset_2
0d1e 0272 | r | Execute Discrete,Minus
0d1f 0a01 | | Execute_Immediate Plus,0x1
0d20 00e2 | | Load_Encached Integer_Cache
0d21 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0d22 e5fe | | Load 0x2,-0x2
0d23 01dc | | Execute Vector,Last
0d24 00da | | Load_Top At_Offset_2
0d25 0272 | r | Execute Discrete,Minus
0d26 0a01 | | Execute_Immediate Plus,0x1
0d27 00e2 | | Load_Encached Integer_Cache
0d28 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0d29 029f 12cb | | Declare_Subprogram INIT_12c8,For_Call
0d2b BODY_0d10:
0d2b 00da | | Load_Top At_Offset_2
0d2c 0f01 | | Execute_Immediate Equal,0x1
0d2d 682e |h. | Jump_Zero 0xd5c
0d2e e402 | | Load 0x2,0x2
0d2f e5ff | | Load 0x2,-0x1
0d30 01d7 | | Execute Vector,Field_Read
0d31 7005 |p | Jump_Nonzero 0xd37
0d32 e5fd | | Load 0x2,-0x3
0d33 4800 |H | Short_Literal 0x0
0d34 82a2 | | Call 0x1,0xa2
0d35 00d1 | | Pop_Control Pop_Count_1
0d36 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d37 e402 | | Load 0x2,0x2
0d38 e5ff | | Load 0x2,-0x1
0d39 01d7 | | Execute Vector,Field_Read
0d3a 0f01 | | Execute_Immediate Equal,0x1
0d3b 6805 |h | Jump_Zero 0xd41
0d3c e5fd | | Load 0x2,-0x3
0d3d e5fe | | Load 0x2,-0x2
0d3e 82a1 | | Call 0x1,0xa1
0d3f 00d1 | | Pop_Control Pop_Count_1
0d40 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d41 00d9 | | Load_Top At_Offset_1
0d42 0f01 | | Execute_Immediate Equal,0x1
0d43 680c |h | Jump_Zero 0xd50
0d44 e5fd | | Load 0x2,-0x3
0d45 e402 | | Load 0x2,0x2
0d46 e5ff | | Load 0x2,-0x1
0d47 01d7 | | Execute Vector,Field_Read
0d48 e403 | | Load 0x2,0x3
0d49 e5fe | | Load 0x2,-0x2
0d4a 01d7 | | Execute Vector,Field_Read
0d4b 0271 | q | Execute Discrete,Times
0d4c 82a0 | | Call 0x1,0xa0
0d4d 82a1 | | Call 0x1,0xa1
0d4e 00d1 | | Pop_Control Pop_Count_1
0d4f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d50 e5fd | | Load 0x2,-0x3
0d51 e402 | | Load 0x2,0x2
0d52 e5ff | | Load 0x2,-0x1
0d53 01d7 | | Execute Vector,Field_Read
0d54 e403 | | Load 0x2,0x3
0d55 e5fe | | Load 0x2,-0x2
0d56 01dc | | Execute Vector,Last
0d57 e5fe | | Load 0x2,-0x2
0d58 01cf | | Execute Vector,Slice_Read
0d59 82ad | | Call 0x1,0xad
0d5a 00d1 | | Pop_Control Pop_Count_1
0d5b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d5c 00d9 | | Load_Top At_Offset_1
0d5d 0f01 | | Execute_Immediate Equal,0x1
0d5e 681f |h | Jump_Zero 0xd7e
0d5f 00db | | Load_Top At_Offset_3
0d60 e5fe | | Load 0x2,-0x2
0d61 01d7 | | Execute Vector,Field_Read
0d62 7005 |p | Jump_Nonzero 0xd68
0d63 e5fd | | Load 0x2,-0x3
0d64 4800 |H | Short_Literal 0x0
0d65 82a2 | | Call 0x1,0xa2
0d66 00d1 | | Pop_Control Pop_Count_1
0d67 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d68 00db | | Load_Top At_Offset_3
0d69 e5fe | | Load 0x2,-0x2
0d6a 01d7 | | Execute Vector,Field_Read
0d6b 0f01 | | Execute_Immediate Equal,0x1
0d6c 6805 |h | Jump_Zero 0xd72
0d6d e5fd | | Load 0x2,-0x3
0d6e e5ff | | Load 0x2,-0x1
0d6f 82a1 | | Call 0x1,0xa1
0d70 00d1 | | Pop_Control Pop_Count_1
0d71 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d72 e5fd | | Load 0x2,-0x3
0d73 e403 | | Load 0x2,0x3
0d74 e5fe | | Load 0x2,-0x2
0d75 01d7 | | Execute Vector,Field_Read
0d76 e402 | | Load 0x2,0x2
0d77 e5ff | | Load 0x2,-0x1
0d78 01dc | | Execute Vector,Last
0d79 e5ff | | Load 0x2,-0x1
0d7a 01cf | | Execute Vector,Slice_Read
0d7b 82ad | | Call 0x1,0xad
0d7c 00d1 | | Pop_Control Pop_Count_1
0d7d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d7e 8406 | | Call 0x2,0x6
0d7f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d80 ; --------------------------------------------------------------------------------------
0d80 ; SUBPROGRAM
0d80 ; --------------------------------------------------------------------------------------
0d80 0d85 | | .CONST 0x0d85 ; Address of begin
0d81 0004 | | .CONST 0x0004 ; Address of exception handler
0d82 0002 | | .CONST 0x0002 ; Number of locals
0d83 INIT_0d80:
0d83 00e2 | | Load_Encached Integer_Cache
0d84 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0d85 BODY_0d80:
0d85 00cf | | Action Mark_Auxiliary
0d86 7805 |x | Jump 0xd8c
0d87 00d9 | | Load_Top At_Offset_1
0d88 00da | | Load_Top At_Offset_2
0d89 0273 | s | Execute Discrete,Plus
0d8a 005a | Z | Store_Top Discrete,At_Offset_2
0d8b 00c9 | | Action Pop_Auxiliary_Loop
0d8c 00d9 | | Load_Top At_Offset_1
0d8d e5ff | | Load 0x2,-0x1
0d8e 027c | | | Execute Discrete,Less
0d8f 77f7 |w | Jump_Nonzero 0xd87
0d90 00ce | | Action Pop_Auxiliary
0d91 00d8 | | Load_Top At_Offset_0
0d92 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d93 0000 0000 | | .BLANK 0000[0x5]
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0db6 | | .CONST 0x0db6 ; Address of begin
0d99 0004 | | .CONST 0x0004 ; Address of exception handler
0d9a 0002 | | .CONST 0x0002 ; Number of locals
0d9b INIT_0d98:
0d9b 4801 |H | Short_Literal 0x1
0d9c 00db | | Load_Top At_Offset_3
0d9d 0a1f | | Execute_Immediate Plus,0x1f
0d9e 481f |H | Short_Literal 0x1f
0d9f 0270 | p | Execute Discrete,Divide
0da0 00d8 | | Load_Top At_Offset_0
0da1 00e2 | | Load_Encached Integer_Cache
0da2 0260 | ` | Execute Discrete,In_Type
0da3 7001 |p | Jump_Nonzero 0xda5
0da4 0801 | | Execute_Immediate Raise,0x1
0da5 e220 | | Load 0x1,0x20
0da6 035b | [ | Declare_Type Array,Constrained
0da7 0337 | 7 | Declare_Variable Array
0da8 00d8 | | Load_Top At_Offset_0
0da9 0335 | 5 | Declare_Variable Array,Duplicate
0daa 00cd | | Action Spare6_Action
0dab 00d9 | | Load_Top At_Offset_1
0dac 01d9 | | Execute Vector,Reverse_Bounds
0dad 0263 | c | Execute Discrete,Above_Bound
0dae 7005 |p | Jump_Nonzero 0xdb4
0daf 4800 |H | Short_Literal 0x0
0db0 00d9 | | Load_Top At_Offset_1
0db1 e403 | | Load 0x2,0x3
0db2 01d6 | | Execute Vector,Field_Write
0db3 3ffb |? | Loop_Increasing 0xdaf
0db4 00d9 | | Load_Top At_Offset_1
0db5 01d4 | | Execute Vector,Structure_Write
0db6 BODY_0d98:
0db6 4802 |H | Short_Literal 0x2
0db7 e5ff | | Load 0x2,-0x1
0db8 481f |H | Short_Literal 0x1f
0db9 026e | n | Execute Discrete,Modulo
0dba 026d | m | Execute Discrete,Exponentiate
0dbb 4801 |H | Short_Literal 0x1
0dbc 00da | | Load_Top At_Offset_2
0dbd 01d6 | | Execute Vector,Field_Write
0dbe 00d8 | | Load_Top At_Offset_0
0dbf e220 | | Load 0x1,0x20
0dc0 01c6 | | Execute Vector,Convert_To_Formal
0dc1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0dc2 0000 0000 | | .BLANK 0000[0x6]
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0dd8 | | .CONST 0x0dd8 ; Address of begin
0dc9 0004 | | .CONST 0x0004 ; Address of exception handler
0dca 0004 | | .CONST 0x0004 ; Number of locals
0dcb INIT_0dc8:
0dcb 00da | | Load_Top At_Offset_2
0dcc 82a9 | | Call 0x1,0xa9
0dcd 00e2 | | Load_Encached Integer_Cache
0dce 03f1 | | Declare_Variable Discrete,With_Value
0dcf 00db | | Load_Top At_Offset_3
0dd0 01db | | Execute Vector,Length
0dd1 00d9 | | Load_Top At_Offset_1
0dd2 0272 | r | Execute Discrete,Minus
0dd3 0a01 | | Execute_Immediate Plus,0x1
0dd4 00e2 | | Load_Encached Integer_Cache
0dd5 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0dd6 029f 1343 | C| Declare_Subprogram INIT_1340,For_Call
0dd8 BODY_0dc8:
0dd8 e5fe | | Load 0x2,-0x2
0dd9 0d00 | | Execute_Immediate Less,0x0
0dda 6801 |h | Jump_Zero 0xddc
0ddb 08e0 | | Execute_Immediate Raise,0xe0
0ddc e5fe | | Load 0x2,-0x2
0ddd 7005 |p | Jump_Nonzero 0xde3
0dde e5fd | | Load 0x2,-0x3
0ddf 4801 |H | Short_Literal 0x1
0de0 82a2 | | Call 0x1,0xa2
0de1 00d1 | | Pop_Control Pop_Count_1
0de2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0de3 e5fe | | Load 0x2,-0x2
0de4 6027 |`' | Indirect_Literal Discrete,0xe0c,{0x00000000, 0x000014a0}
0de5 027d | } | Execute Discrete,Greater
0de6 6801 |h | Jump_Zero 0xde8
0de7 08e1 | | Execute_Immediate Raise,0xe1
0de8 00d9 | | Load_Top At_Offset_1
0de9 0f01 | | Execute_Immediate Equal,0x1
0dea 6810 |h | Jump_Zero 0xdfb
0deb 00da | | Load_Top At_Offset_2
0dec e5ff | | Load 0x2,-0x1
0ded 01d7 | | Execute Vector,Field_Read
0dee 0f01 | | Execute_Immediate Equal,0x1
0def 7004 |p | Jump_Nonzero 0xdf4
0df0 00da | | Load_Top At_Offset_2
0df1 e5ff | | Load 0x2,-0x1
0df2 01d7 | | Execute Vector,Field_Read
0df3 7007 |p | Jump_Nonzero 0xdfb
0df4 e5fd | | Load 0x2,-0x3
0df5 00db | | Load_Top At_Offset_3
0df6 e5ff | | Load 0x2,-0x1
0df7 01d7 | | Execute Vector,Field_Read
0df8 82a2 | | Call 0x1,0xa2
0df9 00d1 | | Pop_Control Pop_Count_1
0dfa 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dfb 00d9 | | Load_Top At_Offset_1
0dfc 0f01 | | Execute_Immediate Equal,0x1
0dfd 680b |h | Jump_Zero 0xe09
0dfe 00da | | Load_Top At_Offset_2
0dff e5ff | | Load 0x2,-0x1
0e00 01d7 | | Execute Vector,Field_Read
0e01 0f02 | | Execute_Immediate Equal,0x2
0e02 6806 |h | Jump_Zero 0xe09
0e03 e5fd | | Load 0x2,-0x3
0e04 e5fe | | Load 0x2,-0x2
0e05 82b0 | | Call 0x1,0xb0
0e06 82a1 | | Call 0x1,0xa1
0e07 00d1 | | Pop_Control Pop_Count_1
0e08 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e09 8404 | | Call 0x2,0x4
0e0a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e0b 0000 | | .XXX[0x1]
0e0c 0000 0000 | | .LITERAL {0x00000000, 0x000014a0}
0e10 ; --------------------------------------------------------------------------------------
0e10 ; SUBPROGRAM
0e10 ; --------------------------------------------------------------------------------------
0e10 0e13 | | .CONST 0x0e13 ; Address of begin
0e11 0004 | | .CONST 0x0004 ; Address of exception handler
0e12 0001 | | .CONST 0x0001 ; Number of locals
0e13 BODY_0e10:
0e13 INIT_0e10:
0e13 00da | | Load_Top At_Offset_2
0e14 e5fe | | Load 0x2,-0x2
0e15 027d | } | Execute Discrete,Greater
0e16 6802 |h | Jump_Zero 0xe19
0e17 00da | | Load_Top At_Offset_2
0e18 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e19 00db | | Load_Top At_Offset_3
0e1a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e1b 0000 0000 | | .BLANK 0000[0x5]
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e2e | . | .CONST 0x0e2e ; Address of begin
0e21 0004 | | .CONST 0x0004 ; Address of exception handler
0e22 0004 | | .CONST 0x0004 ; Number of locals
0e23 INIT_0e20:
0e23 e5fd | | Load 0x2,-0x3
0e24 01da | | Execute Vector,Bounds
0e25 e220 | | Load 0x1,0x20
0e26 035b | [ | Declare_Type Array,Constrained
0e27 0337 | 7 | Declare_Variable Array
0e28 e5fd | | Load 0x2,-0x3
0e29 01da | | Execute Vector,Bounds
0e2a e220 | | Load 0x1,0x20
0e2b 035b | [ | Declare_Type Array,Constrained
0e2c 0337 | 7 | Declare_Variable Array
0e2d 00e1 | | Load_Encached Boolean_Cache
0e2e BODY_0e20:
0e2e 00d9 | | Load_Top At_Offset_1
0e2f e5ff | | Load 0x2,-0x1
0e30 8227 | ' | Call 0x1,0x27
0e31 82a1 | | Call 0x1,0xa1
0e32 00d1 | | Pop_Control Pop_Count_1
0e33 e5fd | | Load 0x2,-0x3
0e34 e5fe | | Load 0x2,-0x2
0e35 8227 | ' | Call 0x1,0x27
0e36 82a1 | | Call 0x1,0xa1
0e37 00d1 | | Pop_Control Pop_Count_1
0e38 00cf | | Action Mark_Auxiliary
0e39 00e1 | | Load_Encached Boolean_Cache
0e3a e402 | | Load 0x2,0x2
0e3b e294 | | Load 0x1,0x94
0e3c e5fd | | Load 0x2,-0x3
0e3d e403 | | Load 0x2,0x3
0e3e 82ac | | Call 0x1,0xac
0e3f 00d2 | | Pop_Control Pop_Count_2
0e40 005a | Z | Store_Top Discrete,At_Offset_2
0e41 00d9 | | Load_Top At_Offset_1
0e42 7008 |p | Jump_Nonzero 0xe4b
0e43 e5fd | | Load 0x2,-0x3
0e44 00db | | Load_Top At_Offset_3
0e45 01d4 | | Execute Vector,Structure_Write
0e46 00db | | Load_Top At_Offset_3
0e47 e5fd | | Load 0x2,-0x3
0e48 01d4 | | Execute Vector,Structure_Write
0e49 00c9 | | Action Pop_Auxiliary_Loop
0e4a 7fee | | Jump 0xe39
0e4b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e4c 0000 0000 | | .BLANK 0000[0x4]
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e53 | S | .CONST 0x0e53 ; Address of begin
0e51 0004 | | .CONST 0x0004 ; Address of exception handler
0e52 0001 | | .CONST 0x0001 ; Number of locals
0e53 BODY_0e50:
0e53 INIT_0e50:
0e53 00da | | Load_Top At_Offset_2
0e54 00d8 | | Load_Top At_Offset_0
0e55 600e |` | Indirect_Literal Discrete,0xe64,{0x80000000, 0x00000000}
0e56 4fff |O | Short_Literal -0x1
0e57 0262 | b | Execute Discrete,In_Range
0e58 7003 |p | Jump_Nonzero 0xe5c
0e59 6805 |h | Jump_Zero 0xe5f
0e5a 4801 |H | Short_Literal 0x1
0e5b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e5c 00d1 | | Pop_Control Pop_Count_1
0e5d 4fff |O | Short_Literal -0x1
0e5e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e5f 4800 |H | Short_Literal 0x0
0e60 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e61 0000 0000 | | .XXX[0x3]
0e63 0000 | |
0e64 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
0e68 ; --------------------------------------------------------------------------------------
0e68 ; SUBPROGRAM
0e68 ; --------------------------------------------------------------------------------------
0e68 0e6b | k | .CONST 0x0e6b ; Address of begin
0e69 0004 | | .CONST 0x0004 ; Address of exception handler
0e6a 0001 | | .CONST 0x0001 ; Number of locals
0e6b BODY_0e68:
0e6b INIT_0e68:
0e6b 00da | | Load_Top At_Offset_2
0e6c 01db | | Execute Vector,Length
0e6d e5fe | | Load 0x2,-0x2
0e6e 01db | | Execute Vector,Length
0e6f e23f | ? | Load 0x1,0x3f
0e70 1c08 | | Execute_Immediate Run_Utility,0x8
0e71 00db | | Load_Top At_Offset_3
0e72 00d9 | | Load_Top At_Offset_1
0e73 00d8 | | Load_Top At_Offset_0
0e74 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e75 00da | | Load_Top At_Offset_2
0e76 01da | | Execute Vector,Bounds
0e77 00da | | Load_Top At_Offset_2
0e78 01da | | Execute Vector,Bounds
0e79 00da | | Load_Top At_Offset_2
0e7a 027f | | Execute Discrete,Equal
0e7b 7001 |p | Jump_Nonzero 0xe7d
0e7c 08e0 | | Execute_Immediate Raise,0xe0
0e7d 00cd | | Action Spare6_Action
0e7e 027f | | Execute Discrete,Equal
0e7f 7001 |p | Jump_Nonzero 0xe81
0e80 08e0 | | Execute_Immediate Raise,0xe0
0e81 00d2 | | Pop_Control Pop_Count_2
0e82 00d9 | | Load_Top At_Offset_1
0e83 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0e84 e5fe | | Load 0x2,-0x2
0e85 00d9 | | Load_Top At_Offset_1
0e86 00d8 | | Load_Top At_Offset_0
0e87 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0e88 00da | | Load_Top At_Offset_2
0e89 01da | | Execute Vector,Bounds
0e8a 00da | | Load_Top At_Offset_2
0e8b 01da | | Execute Vector,Bounds
0e8c 00da | | Load_Top At_Offset_2
0e8d 027f | | Execute Discrete,Equal
0e8e 7001 |p | Jump_Nonzero 0xe90
0e8f 08e0 | | Execute_Immediate Raise,0xe0
0e90 00cd | | Action Spare6_Action
0e91 027f | | Execute Discrete,Equal
0e92 7001 |p | Jump_Nonzero 0xe94
0e93 08e0 | | Execute_Immediate Raise,0xe0
0e94 00d2 | | Pop_Control Pop_Count_2
0e95 00d9 | | Load_Top At_Offset_1
0e96 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
0e97 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e98 ; --------------------------------------------------------------------------------------
0e98 ; SUBPROGRAM
0e98 ; --------------------------------------------------------------------------------------
0e98 0ea5 | | .CONST 0x0ea5 ; Address of begin
0e99 0004 | | .CONST 0x0004 ; Address of exception handler
0e9a 0003 | | .CONST 0x0003 ; Number of locals
0e9b INIT_0e98:
0e9b 4801 |H | Short_Literal 0x1
0e9c e402 | | Load 0x2,0x2
0e9d e220 | | Load 0x1,0x20
0e9e 035b | [ | Declare_Type Array,Constrained
0e9f 0337 | 7 | Declare_Variable Array
0ea0 4801 |H | Short_Literal 0x1
0ea1 e402 | | Load 0x2,0x2
0ea2 e220 | | Load 0x1,0x20
0ea3 035b | [ | Declare_Type Array,Constrained
0ea4 0337 | 7 | Declare_Variable Array
0ea5 BODY_0e98:
0ea5 4801 |H | Short_Literal 0x1
0ea6 e5ff | | Load 0x2,-0x1
0ea7 01d7 | | Execute Vector,Field_Read
0ea8 0d00 | | Execute_Immediate Less,0x0
0ea9 a407 | | Store_Unchecked 0x2,0x7
0eaa 4801 |H | Short_Literal 0x1
0eab e5fe | | Load 0x2,-0x2
0eac 01d7 | | Execute Vector,Field_Read
0ead 0d00 | | Execute_Immediate Less,0x0
0eae a408 | | Store_Unchecked 0x2,0x8
0eaf 4801 |H | Short_Literal 0x1
0eb0 e5ff | | Load 0x2,-0x1
0eb1 01d7 | | Execute Vector,Field_Read
0eb2 0274 | t | Execute Discrete,Absolute_Value
0eb3 4801 |H | Short_Literal 0x1
0eb4 e402 | | Load 0x2,0x2
0eb5 e405 | | Load 0x2,0x5
0eb6 0272 | r | Execute Discrete,Minus
0eb7 e220 | | Load 0x1,0x20
0eb8 0334 | 4 | Declare_Variable Array,With_Constraint
0eb9 00d8 | | Load_Top At_Offset_0
0eba 01dc | | Execute Vector,Last
0ebb 4801 |H | Short_Literal 0x1
0ebc 0263 | c | Execute Discrete,Above_Bound
0ebd 7005 |p | Jump_Nonzero 0xec3
0ebe 4800 |H | Short_Literal 0x0
0ebf 00d9 | | Load_Top At_Offset_1
0ec0 e605 | | Load 0x3,0x5
0ec1 01d6 | | Execute Vector,Field_Write
0ec2 3ffb |? | Loop_Increasing 0xebe
0ec3 01cb | | Execute Vector,Append
0ec4 4802 |H | Short_Literal 0x2
0ec5 e405 | | Load 0x2,0x5
0ec6 e5ff | | Load 0x2,-0x1
0ec7 01cf | | Execute Vector,Slice_Read
0ec8 01cc | | Execute Vector,Catenate
0ec9 00da | | Load_Top At_Offset_2
0eca 01d4 | | Execute Vector,Structure_Write
0ecb 4801 |H | Short_Literal 0x1
0ecc e5fe | | Load 0x2,-0x2
0ecd 01d7 | | Execute Vector,Field_Read
0ece 0274 | t | Execute Discrete,Absolute_Value
0ecf 4801 |H | Short_Literal 0x1
0ed0 e402 | | Load 0x2,0x2
0ed1 e406 | | Load 0x2,0x6
0ed2 0272 | r | Execute Discrete,Minus
0ed3 e220 | | Load 0x1,0x20
0ed4 0334 | 4 | Declare_Variable Array,With_Constraint
0ed5 00d8 | | Load_Top At_Offset_0
0ed6 01dc | | Execute Vector,Last
0ed7 4801 |H | Short_Literal 0x1
0ed8 0263 | c | Execute Discrete,Above_Bound
0ed9 7005 |p | Jump_Nonzero 0xedf
0eda 4800 |H | Short_Literal 0x0
0edb 00d9 | | Load_Top At_Offset_1
0edc e605 | | Load 0x3,0x5
0edd 01d6 | | Execute Vector,Field_Write
0ede 3ffb |? | Loop_Increasing 0xeda
0edf 01cb | | Execute Vector,Append
0ee0 4802 |H | Short_Literal 0x2
0ee1 e406 | | Load 0x2,0x6
0ee2 e5fe | | Load 0x2,-0x2
0ee3 01cf | | Execute Vector,Slice_Read
0ee4 01cc | | Execute Vector,Catenate
0ee5 00d9 | | Load_Top At_Offset_1
0ee6 01d4 | | Execute Vector,Structure_Write
0ee7 e407 | | Load 0x2,0x7
0ee8 e408 | | Load 0x2,0x8
0ee9 027f | | Execute Discrete,Equal
0eea 682c |h, | Jump_Zero 0xf17
0eeb 4800 |H | Short_Literal 0x0
0eec a403 | | Store_Unchecked 0x2,0x3
0eed 00cf | | Action Mark_Auxiliary
0eee 4801 |H | Short_Literal 0x1
0eef e402 | | Load 0x2,0x2
0ef0 0264 | d | Execute Discrete,Below_Bound
0ef1 701d |p | Jump_Nonzero 0xf0f
0ef2 00d8 | | Load_Top At_Offset_0
0ef3 e602 | | Load 0x3,0x2
0ef4 01d7 | | Execute Vector,Field_Read
0ef5 00d9 | | Load_Top At_Offset_1
0ef6 e603 | | Load 0x3,0x3
0ef7 01d7 | | Execute Vector,Field_Read
0ef8 0273 | s | Execute Discrete,Plus
0ef9 e403 | | Load 0x2,0x3
0efa 0273 | s | Execute Discrete,Plus
0efb a404 | | Store_Unchecked 0x2,0x4
0efc e404 | | Load 0x2,0x4
0efd 6076 |`v | Indirect_Literal Discrete,0xf74,{0x00000000, 0x80000000}
0efe 027b | { | Execute Discrete,Greater_Equal
0eff 6807 |h | Jump_Zero 0xf07
0f00 e404 | | Load 0x2,0x4
0f01 606e |`n | Indirect_Literal Discrete,0xf70,{0xffffffff, 0x80000000}
0f02 0273 | s | Execute Discrete,Plus
0f03 a404 | | Store_Unchecked 0x2,0x4
0f04 4801 |H | Short_Literal 0x1
0f05 a403 | | Store_Unchecked 0x2,0x3
0f06 7802 |x | Jump 0xf09
0f07 4800 |H | Short_Literal 0x0
0f08 a403 | | Store_Unchecked 0x2,0x3
0f09 e404 | | Load 0x2,0x4
0f0a 00d9 | | Load_Top At_Offset_1
0f0b e602 | | Load 0x3,0x2
0f0c 01d6 | | Execute Vector,Field_Write
0f0d 00c8 | | Action Pop_Auxiliary_Range
0f0e 37e3 |7 | Loop_Decreasing 0xef2
0f0f 00ce | | Action Pop_Auxiliary
0f10 e407 | | Load 0x2,0x7
0f11 00da | | Load_Top At_Offset_2
0f12 82a4 | | Call 0x1,0xa4
0f13 e220 | | Load 0x1,0x20
0f14 01c6 | | Execute Vector,Convert_To_Formal
0f15 00cb | | Action Pop_Block_With_Result
0f16 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f17 4800 |H | Short_Literal 0x0
0f18 a403 | | Store_Unchecked 0x2,0x3
0f19 00cf | | Action Mark_Auxiliary
0f1a 4801 |H | Short_Literal 0x1
0f1b e402 | | Load 0x2,0x2
0f1c 0264 | d | Execute Discrete,Below_Bound
0f1d 701c |p | Jump_Nonzero 0xf3a
0f1e 00d8 | | Load_Top At_Offset_0
0f1f e602 | | Load 0x3,0x2
0f20 01d7 | | Execute Vector,Field_Read
0f21 00d9 | | Load_Top At_Offset_1
0f22 e603 | | Load 0x3,0x3
0f23 01d7 | | Execute Vector,Field_Read
0f24 0272 | r | Execute Discrete,Minus
0f25 e403 | | Load 0x2,0x3
0f26 0273 | s | Execute Discrete,Plus
0f27 a404 | | Store_Unchecked 0x2,0x4
0f28 e404 | | Load 0x2,0x4
0f29 0d00 | | Execute_Immediate Less,0x0
0f2a 6807 |h | Jump_Zero 0xf32
0f2b e404 | | Load 0x2,0x4
0f2c 6047 |`G | Indirect_Literal Discrete,0xf74,{0x00000000, 0x80000000}
0f2d 0273 | s | Execute Discrete,Plus
0f2e a404 | | Store_Unchecked 0x2,0x4
0f2f 4fff |O | Short_Literal -0x1
0f30 a403 | | Store_Unchecked 0x2,0x3
0f31 7802 |x | Jump 0xf34
0f32 4800 |H | Short_Literal 0x0
0f33 a403 | | Store_Unchecked 0x2,0x3
0f34 e404 | | Load 0x2,0x4
0f35 00d9 | | Load_Top At_Offset_1
0f36 e602 | | Load 0x3,0x2
0f37 01d6 | | Execute Vector,Field_Write
0f38 00c8 | | Action Pop_Auxiliary_Range
0f39 37e4 |7 | Loop_Decreasing 0xf1e
0f3a 00ce | | Action Pop_Auxiliary
0f3b e403 | | Load 0x2,0x3
0f3c 7007 |p | Jump_Nonzero 0xf44
0f3d e407 | | Load 0x2,0x7
0f3e 00da | | Load_Top At_Offset_2
0f3f 82a4 | | Call 0x1,0xa4
0f40 e220 | | Load 0x1,0x20
0f41 01c6 | | Execute Vector,Convert_To_Formal
0f42 00cb | | Action Pop_Block_With_Result
0f43 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f44 4801 |H | Short_Literal 0x1
0f45 a403 | | Store_Unchecked 0x2,0x3
0f46 00cf | | Action Mark_Auxiliary
0f47 4801 |H | Short_Literal 0x1
0f48 e402 | | Load 0x2,0x2
0f49 0264 | d | Execute Discrete,Below_Bound
0f4a 7019 |p | Jump_Nonzero 0xf64
0f4b 6020 |` | Indirect_Literal Discrete,0xf6c,{0x00000000, 0x7fffffff}
0f4c 00d9 | | Load_Top At_Offset_1
0f4d e602 | | Load 0x3,0x2
0f4e 01d7 | | Execute Vector,Field_Read
0f4f 0272 | r | Execute Discrete,Minus
0f50 e403 | | Load 0x2,0x3
0f51 0273 | s | Execute Discrete,Plus
0f52 a404 | | Store_Unchecked 0x2,0x4
0f53 e404 | | Load 0x2,0x4
0f54 601f |` | Indirect_Literal Discrete,0xf74,{0x00000000, 0x80000000}
0f55 027f | | Execute Discrete,Equal
0f56 6805 |h | Jump_Zero 0xf5c
0f57 4800 |H | Short_Literal 0x0
0f58 a404 | | Store_Unchecked 0x2,0x4
0f59 4801 |H | Short_Literal 0x1
0f5a a403 | | Store_Unchecked 0x2,0x3
0f5b 7802 |x | Jump 0xf5e
0f5c 4800 |H | Short_Literal 0x0
0f5d a403 | | Store_Unchecked 0x2,0x3
0f5e e404 | | Load 0x2,0x4
0f5f 00d9 | | Load_Top At_Offset_1
0f60 e602 | | Load 0x3,0x2
0f61 01d6 | | Execute Vector,Field_Write
0f62 00c8 | | Action Pop_Auxiliary_Range
0f63 37e7 |7 | Loop_Decreasing 0xf4b
0f64 00ce | | Action Pop_Auxiliary
0f65 e408 | | Load 0x2,0x8
0f66 00da | | Load_Top At_Offset_2
0f67 82a4 | | Call 0x1,0xa4
0f68 e220 | | Load 0x1,0x20
0f69 01c6 | | Execute Vector,Convert_To_Formal
0f6a 00cb | | Action Pop_Block_With_Result
0f6b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f6c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0f70 ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
0f74 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
0f78 ; --------------------------------------------------------------------------------------
0f78 ; SUBPROGRAM
0f78 ; --------------------------------------------------------------------------------------
0f78 0f90 | | .CONST 0x0f90 ; Address of begin
0f79 0004 | | .CONST 0x0004 ; Address of exception handler
0f7a 0002 | | .CONST 0x0002 ; Number of locals
0f7b INIT_0f78:
0f7b 4801 |H | Short_Literal 0x1
0f7c e5ff | | Load 0x2,-0x1
0f7d 01dc | | Execute Vector,Last
0f7e e405 | | Load 0x2,0x5
0f7f 0272 | r | Execute Discrete,Minus
0f80 0a01 | | Execute_Immediate Plus,0x1
0f81 00d8 | | Load_Top At_Offset_0
0f82 00e2 | | Load_Encached Integer_Cache
0f83 0260 | ` | Execute Discrete,In_Type
0f84 7001 |p | Jump_Nonzero 0xf86
0f85 0801 | | Execute_Immediate Raise,0x1
0f86 e220 | | Load 0x1,0x20
0f87 035b | [ | Declare_Type Array,Constrained
0f88 0337 | 7 | Declare_Variable Array
0f89 e405 | | Load 0x2,0x5
0f8a e5ff | | Load 0x2,-0x1
0f8b 01dc | | Execute Vector,Last
0f8c e5ff | | Load 0x2,-0x1
0f8d 01cf | | Execute Vector,Slice_Read
0f8e 00d9 | | Load_Top At_Offset_1
0f8f 01d4 | | Execute Vector,Structure_Write
0f90 BODY_0f78:
0f90 e5fe | | Load 0x2,-0x2
0f91 6807 |h | Jump_Zero 0xf99
0f92 4801 |H | Short_Literal 0x1
0f93 00d9 | | Load_Top At_Offset_1
0f94 01d7 | | Execute Vector,Field_Read
0f95 0275 | u | Execute Discrete,Unary_Minus
0f96 4801 |H | Short_Literal 0x1
0f97 00da | | Load_Top At_Offset_2
0f98 01d6 | | Execute Vector,Field_Write
0f99 00d8 | | Load_Top At_Offset_0
0f9a e220 | | Load 0x1,0x20
0f9b 01c6 | | Execute Vector,Convert_To_Formal
0f9c 00cb | | Action Pop_Block_With_Result
0f9d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f9e 0000 0000 | | .XXX[0x2]
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fb7 | | .CONST 0x0fb7 ; Address of begin
0fa1 0004 | | .CONST 0x0004 ; Address of exception handler
0fa2 0004 | | .CONST 0x0004 ; Number of locals
0fa3 INIT_0fa0:
0fa3 e5ff | | Load 0x2,-0x1
0fa4 01da | | Execute Vector,Bounds
0fa5 e220 | | Load 0x1,0x20
0fa6 035b | [ | Declare_Type Array,Constrained
0fa7 0337 | 7 | Declare_Variable Array
0fa8 e5ff | | Load 0x2,-0x1
0fa9 00d9 | | Load_Top At_Offset_1
0faa 01d4 | | Execute Vector,Structure_Write
0fab 4801 |H | Short_Literal 0x1
0fac e5fe | | Load 0x2,-0x2
0fad 01d7 | | Execute Vector,Field_Read
0fae 0274 | t | Execute Discrete,Absolute_Value
0faf e21f | | Load 0x1,0x1f
0fb0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0fb1 4801 |H | Short_Literal 0x1
0fb2 e404 | | Load 0x2,0x4
0fb3 0901 | | Execute_Immediate Binary_Scale,0x1
0fb4 0272 | r | Execute Discrete,Minus
0fb5 e21f | | Load 0x1,0x1f
0fb6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0fb7 BODY_0fa0:
0fb7 00d9 | | Load_Top At_Offset_1
0fb8 00db | | Load_Top At_Offset_3
0fb9 82a7 | | Call 0x1,0xa7
0fba 00d1 | | Pop_Control Pop_Count_1
0fbb 005a | Z | Store_Top Discrete,At_Offset_2
0fbc e5fd | | Load 0x2,-0x3
0fbd 4602 |F | Jump_Case 0x3
0fbe 7814 |x | Jump 0xfd3 ; case 0x0
0fbf 781c |x | Jump 0xfdc ; case 0x1
0fc0 7800 |x | Jump 0xfc1 ; case 0x2
0fc1 4801 |H | Short_Literal 0x1
0fc2 4801 |H | Short_Literal 0x1
0fc3 e220 | | Load 0x1,0x20
0fc4 0334 | 4 | Declare_Variable Array,With_Constraint
0fc5 00d9 | | Load_Top At_Offset_1
0fc6 00db | | Load_Top At_Offset_3
0fc7 0271 | q | Execute Discrete,Times
0fc8 4801 |H | Short_Literal 0x1
0fc9 00da | | Load_Top At_Offset_2
0fca 01d6 | | Execute Vector,Field_Write
0fcb e405 | | Load 0x2,0x5
0fcc e602 | | Load 0x3,0x2
0fcd 82a4 | | Call 0x1,0xa4
0fce 82a5 | | Call 0x1,0xa5
0fcf e233 | 3 | Load 0x1,0x33
0fd0 0165 | e | Execute Variant_Record,Convert
0fd1 00cb | | Action Pop_Block_With_Result
0fd2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0fd3 e294 | | Load 0x1,0x94
0fd4 e405 | | Load 0x2,0x5
0fd5 e602 | | Load 0x3,0x2
0fd6 82a4 | | Call 0x1,0xa4
0fd7 82a5 | | Call 0x1,0xa5
0fd8 e233 | 3 | Load 0x1,0x33
0fd9 0165 | e | Execute Variant_Record,Convert
0fda 00cb | | Action Pop_Block_With_Result
0fdb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0fdc 4800 |H | Short_Literal 0x0
0fdd 4801 |H | Short_Literal 0x1
0fde e233 | 3 | Load 0x1,0x33
0fdf 1c08 | | Execute_Immediate Run_Utility,0x8
0fe0 e294 | | Load 0x1,0x94
0fe1 00d9 | | Load_Top At_Offset_1
0fe2 00d8 | | Load_Top At_Offset_0
0fe3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0fe4 00da | | Load_Top At_Offset_2
0fe5 01da | | Execute Vector,Bounds
0fe6 00da | | Load_Top At_Offset_2
0fe7 01da | | Execute Vector,Bounds
0fe8 00da | | Load_Top At_Offset_2
0fe9 027f | | Execute Discrete,Equal
0fea 7001 |p | Jump_Nonzero 0xfec
0feb 08e0 | | Execute_Immediate Raise,0xe0
0fec 00cd | | Action Spare6_Action
0fed 027f | | Execute Discrete,Equal
0fee 7001 |p | Jump_Nonzero 0xff0
0fef 08e0 | | Execute_Immediate Raise,0xe0
0ff0 00d2 | | Pop_Control Pop_Count_2
0ff1 00d9 | | Load_Top At_Offset_1
0ff2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0ff3 4801 |H | Short_Literal 0x1
0ff4 4801 |H | Short_Literal 0x1
0ff5 e220 | | Load 0x1,0x20
0ff6 0334 | 4 | Declare_Variable Array,With_Constraint
0ff7 00da | | Load_Top At_Offset_2
0ff8 e603 | | Load 0x3,0x3
0ff9 0271 | q | Execute Discrete,Times
0ffa 4801 |H | Short_Literal 0x1
0ffb 00da | | Load_Top At_Offset_2
0ffc 01d6 | | Execute Vector,Field_Write
0ffd 00d9 | | Load_Top At_Offset_1
0ffe 00d8 | | Load_Top At_Offset_0
0fff 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
1000 00da | | Load_Top At_Offset_2
1001 01da | | Execute Vector,Bounds
1002 00da | | Load_Top At_Offset_2
1003 01da | | Execute Vector,Bounds
1004 00da | | Load_Top At_Offset_2
1005 027f | | Execute Discrete,Equal
1006 7001 |p | Jump_Nonzero 0x1008
1007 08e0 | | Execute_Immediate Raise,0xe0
1008 00cd | | Action Spare6_Action
1009 027f | | Execute Discrete,Equal
100a 7001 |p | Jump_Nonzero 0x100c
100b 08e0 | | Execute_Immediate Raise,0xe0
100c 00d2 | | Pop_Control Pop_Count_2
100d 00d9 | | Load_Top At_Offset_1
100e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4
100f 00cb | | Action Pop_Block_With_Result
1010 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1011 0000 0000 | | .BLANK 0000[0x7]
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 1065 | e | .CONST 0x1065 ; Address of begin
1019 0004 | | .CONST 0x0004 ; Address of exception handler
101a 000b | | .CONST 0x000b ; Number of locals
101b INIT_1018:
101b 612c |a, | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
101c 4801 |H | Short_Literal 0x1
101d e5fe | | Load 0x2,-0x2
101e 01d7 | | Execute Vector,Field_Read
101f 0274 | t | Execute Discrete,Absolute_Value
1020 0a01 | | Execute_Immediate Plus,0x1
1021 0270 | p | Execute Discrete,Divide
1022 00e5 | | Load_Encached Long_Integer_Cache
1023 03f1 | | Declare_Variable Discrete,With_Value
1024 4801 |H | Short_Literal 0x1
1025 e402 | | Load 0x2,0x2
1026 0a01 | | Execute_Immediate Plus,0x1
1027 00d8 | | Load_Top At_Offset_0
1028 00e2 | | Load_Encached Integer_Cache
1029 0260 | ` | Execute Discrete,In_Type
102a 7001 |p | Jump_Nonzero 0x102c
102b 0801 | | Execute_Immediate Raise,0x1
102c e220 | | Load 0x1,0x20
102d 035b | [ | Declare_Type Array,Constrained
102e 0337 | 7 | Declare_Variable Array
102f 00d9 | | Load_Top At_Offset_1
1030 00d8 | | Load_Top At_Offset_0
1031 e21f | | Load 0x1,0x1f
1032 0260 | ` | Execute Discrete,In_Type
1033 7001 |p | Jump_Nonzero 0x1035
1034 0801 | | Execute_Immediate Raise,0x1
1035 4800 |H | Short_Literal 0x0
1036 e5ff | | Load 0x2,-0x1
1037 01ca | | Execute Vector,Prepend
1038 82a6 | | Call 0x1,0xa6
1039 00d9 | | Load_Top At_Offset_1
103a 01d4 | | Execute Vector,Structure_Write
103b 4801 |H | Short_Literal 0x1
103c e403 | | Load 0x2,0x3
103d e220 | | Load 0x1,0x20
103e 035b | [ | Declare_Type Array,Constrained
103f 0337 | 7 | Declare_Variable Array
1040 00da | | Load_Top At_Offset_2
1041 00d8 | | Load_Top At_Offset_0
1042 e21f | | Load 0x1,0x1f
1043 0260 | ` | Execute Discrete,In_Type
1044 7001 |p | Jump_Nonzero 0x1046
1045 0801 | | Execute_Immediate Raise,0x1
1046 e5fe | | Load 0x2,-0x2
1047 82a6 | | Call 0x1,0xa6
1048 00d9 | | Load_Top At_Offset_1
1049 01d4 | | Execute Vector,Structure_Write
104a 4801 |H | Short_Literal 0x1
104b 00d9 | | Load_Top At_Offset_1
104c 01d7 | | Execute Vector,Field_Read
104d 00e5 | | Load_Encached Long_Integer_Cache
104e 03f1 | | Declare_Variable Discrete,With_Value
104f 4802 |H | Short_Literal 0x2
1050 00da | | Load_Top At_Offset_2
1051 01d7 | | Execute Vector,Field_Read
1052 00e5 | | Load_Encached Long_Integer_Cache
1053 03f1 | | Declare_Variable Discrete,With_Value
1054 4801 |H | Short_Literal 0x1
1055 e402 | | Load 0x2,0x2
1056 e403 | | Load 0x2,0x3
1057 0272 | r | Execute Discrete,Minus
1058 0a01 | | Execute_Immediate Plus,0x1
1059 00d8 | | Load_Top At_Offset_0
105a 00e2 | | Load_Encached Integer_Cache
105b 0260 | ` | Execute Discrete,In_Type
105c 7001 |p | Jump_Nonzero 0x105e
105d 0801 | | Execute_Immediate Raise,0x1
105e e220 | | Load 0x1,0x20
105f 035b | [ | Declare_Type Array,Constrained
1060 0337 | 7 | Declare_Variable Array
1061 00e5 | | Load_Encached Long_Integer_Cache
1062 00e5 | | Load_Encached Long_Integer_Cache
1063 03e9 | | Declare_Variable Discrete,Duplicate
1064 00e5 | | Load_Encached Long_Integer_Cache
1065 BODY_1018:
1065 00cf | | Action Mark_Auxiliary
1066 e607 | | Load 0x3,0x7
1067 01d9 | | Execute Vector,Reverse_Bounds
1068 0263 | c | Execute Discrete,Above_Bound
1069 70a4 |p | Jump_Nonzero 0x110e
106a 00d8 | | Load_Top At_Offset_0
106b e603 | | Load 0x3,0x3
106c 01d7 | | Execute Vector,Field_Read
106d 091f | | Execute_Immediate Binary_Scale,0x1f
106e 00d9 | | Load_Top At_Offset_1
106f 0a01 | | Execute_Immediate Plus,0x1
1070 e603 | | Load 0x3,0x3
1071 01d7 | | Execute Vector,Field_Read
1072 0273 | s | Execute Discrete,Plus
1073 a60a | | Store_Unchecked 0x3,0xa
1074 00d8 | | Load_Top At_Offset_0
1075 e603 | | Load 0x3,0x3
1076 01d7 | | Execute Vector,Field_Read
1077 e605 | | Load 0x3,0x5
1078 027e | ~ | Execute Discrete,Not_Equal
1079 6805 |h | Jump_Zero 0x107f
107a e60a | | Load 0x3,0xa
107b e605 | | Load 0x3,0x5
107c 0270 | p | Execute Discrete,Divide
107d a60b | | Store_Unchecked 0x3,0xb
107e 7802 |x | Jump 0x1081
107f 60c4 |` | Indirect_Literal Discrete,0x1144,{0x00000000, 0x7fffffff}
1080 a60b | | Store_Unchecked 0x3,0xb
1081 00cf | | Action Mark_Auxiliary
1082 7804 |x | Jump 0x1087
1083 e60b | | Load 0x3,0xb
1084 0aff | | Execute_Immediate Plus,-0x1
1085 a60b | | Store_Unchecked 0x3,0xb
1086 00c9 | | Action Pop_Auxiliary_Loop
1087 e606 | | Load 0x3,0x6
1088 e60b | | Load 0x3,0xb
1089 0271 | q | Execute Discrete,Times
108a e60a | | Load 0x3,0xa
108b e60b | | Load 0x3,0xb
108c e605 | | Load 0x3,0x5
108d 0271 | q | Execute Discrete,Times
108e 0272 | r | Execute Discrete,Minus
108f 091f | | Execute_Immediate Binary_Scale,0x1f
1090 00db | | Load_Top At_Offset_3
1091 0a02 | | Execute_Immediate Plus,0x2
1092 e603 | | Load 0x3,0x3
1093 01d7 | | Execute Vector,Field_Read
1094 0273 | s | Execute Discrete,Plus
1095 027d | } | Execute Discrete,Greater
1096 77ec |w | Jump_Nonzero 0x1083
1097 00ce | | Action Pop_Auxiliary
1098 4800 |H | Short_Literal 0x0
1099 a609 | | Store_Unchecked 0x3,0x9
109a 00cf | | Action Mark_Auxiliary
109b e604 | | Load 0x3,0x4
109c 01da | | Execute Vector,Bounds
109d 0264 | d | Execute Discrete,Below_Bound
109e 7027 |p' | Jump_Nonzero 0x10c6
109f 00db | | Load_Top At_Offset_3
10a0 00d9 | | Load_Top At_Offset_1
10a1 0273 | s | Execute Discrete,Plus
10a2 e603 | | Load 0x3,0x3
10a3 01d7 | | Execute Vector,Field_Read
10a4 e60b | | Load 0x3,0xb
10a5 00da | | Load_Top At_Offset_2
10a6 e604 | | Load 0x3,0x4
10a7 01d7 | | Execute Vector,Field_Read
10a8 0271 | q | Execute Discrete,Times
10a9 0272 | r | Execute Discrete,Minus
10aa e609 | | Load 0x3,0x9
10ab 0273 | s | Execute Discrete,Plus
10ac a60a | | Store_Unchecked 0x3,0xa
10ad e60a | | Load 0x3,0xa
10ae 6099 |` | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
10af 026f | o | Execute Discrete,Remainder
10b0 a608 | | Store_Unchecked 0x3,0x8
10b1 e60a | | Load 0x3,0xa
10b2 09e1 | | Execute_Immediate Binary_Scale,-0x1f
10b3 a609 | | Store_Unchecked 0x3,0x9
10b4 e608 | | Load 0x3,0x8
10b5 0d00 | | Execute_Immediate Less,0x0
10b6 6807 |h | Jump_Zero 0x10be
10b7 e608 | | Load 0x3,0x8
10b8 608f |` | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
10b9 0273 | s | Execute Discrete,Plus
10ba a608 | | Store_Unchecked 0x3,0x8
10bb e609 | | Load 0x3,0x9
10bc 0aff | | Execute_Immediate Plus,-0x1
10bd a609 | | Store_Unchecked 0x3,0x9
10be e608 | | Load 0x3,0x8
10bf e60e | | Load 0x3,0xe
10c0 00da | | Load_Top At_Offset_2
10c1 0273 | s | Execute Discrete,Plus
10c2 e603 | | Load 0x3,0x3
10c3 01d6 | | Execute Vector,Field_Write
10c4 00c8 | | Action Pop_Auxiliary_Range
10c5 37d9 |7 | Loop_Decreasing 0x109f
10c6 00ce | | Action Pop_Auxiliary
10c7 00d8 | | Load_Top At_Offset_0
10c8 e603 | | Load 0x3,0x3
10c9 01d7 | | Execute Vector,Field_Read
10ca e609 | | Load 0x3,0x9
10cb 0273 | s | Execute Discrete,Plus
10cc 00d9 | | Load_Top At_Offset_1
10cd e603 | | Load 0x3,0x3
10ce 01d6 | | Execute Vector,Field_Write
10cf 00d8 | | Load_Top At_Offset_0
10d0 e603 | | Load 0x3,0x3
10d1 01d7 | | Execute Vector,Field_Read
10d2 0d00 | | Execute_Immediate Less,0x0
10d3 6834 |h4 | Jump_Zero 0x1108
10d4 00db | | Load_Top At_Offset_3
10d5 0aff | | Execute_Immediate Plus,-0x1
10d6 a60b | | Store_Unchecked 0x3,0xb
10d7 4800 |H | Short_Literal 0x0
10d8 a609 | | Store_Unchecked 0x3,0x9
10d9 00cf | | Action Mark_Auxiliary
10da e604 | | Load 0x3,0x4
10db 01da | | Execute Vector,Bounds
10dc 0264 | d | Execute Discrete,Below_Bound
10dd 7021 |p! | Jump_Nonzero 0x10ff
10de 00db | | Load_Top At_Offset_3
10df 00d9 | | Load_Top At_Offset_1
10e0 0273 | s | Execute Discrete,Plus
10e1 e603 | | Load 0x3,0x3
10e2 01d7 | | Execute Vector,Field_Read
10e3 00d9 | | Load_Top At_Offset_1
10e4 e604 | | Load 0x3,0x4
10e5 01d7 | | Execute Vector,Field_Read
10e6 0273 | s | Execute Discrete,Plus
10e7 e609 | | Load 0x3,0x9
10e8 0273 | s | Execute Discrete,Plus
10e9 a60a | | Store_Unchecked 0x3,0xa
10ea e60a | | Load 0x3,0xa
10eb 605c |`\ | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
10ec 027b | { | Execute Discrete,Greater_Equal
10ed 6807 |h | Jump_Zero 0x10f5
10ee e60a | | Load 0x3,0xa
10ef 6050 |`P | Indirect_Literal Discrete,0x1140,{0xffffffff, 0x80000000}
10f0 0273 | s | Execute Discrete,Plus
10f1 a60a | | Store_Unchecked 0x3,0xa
10f2 4801 |H | Short_Literal 0x1
10f3 a609 | | Store_Unchecked 0x3,0x9
10f4 7802 |x | Jump 0x10f7
10f5 4800 |H | Short_Literal 0x0
10f6 a609 | | Store_Unchecked 0x3,0x9
10f7 e60a | | Load 0x3,0xa
10f8 e60e | | Load 0x3,0xe
10f9 00da | | Load_Top At_Offset_2
10fa 0273 | s | Execute Discrete,Plus
10fb e603 | | Load 0x3,0x3
10fc 01d6 | | Execute Vector,Field_Write
10fd 00c8 | | Action Pop_Auxiliary_Range
10fe 37df |7 | Loop_Decreasing 0x10de
10ff 00ce | | Action Pop_Auxiliary
1100 00d8 | | Load_Top At_Offset_0
1101 e603 | | Load 0x3,0x3
1102 01d7 | | Execute Vector,Field_Read
1103 e609 | | Load 0x3,0x9
1104 0273 | s | Execute Discrete,Plus
1105 00d9 | | Load_Top At_Offset_1
1106 e603 | | Load 0x3,0x3
1107 01d6 | | Execute Vector,Field_Write
1108 00db | | Load_Top At_Offset_3
1109 00d9 | | Load_Top At_Offset_1
110a e607 | | Load 0x3,0x7
110b 01d6 | | Execute Vector,Field_Write
110c 00c8 | | Action Pop_Auxiliary_Range
110d 3f5c |?\ | Loop_Increasing 0x106a
110e 00ce | | Action Pop_Auxiliary
110f e602 | | Load 0x3,0x2
1110 0c02 | | Execute_Immediate Greater_Equal,0x2
1111 6809 |h | Jump_Zero 0x111b
1112 e5fd | | Load 0x2,-0x3
1113 6807 |h | Jump_Zero 0x111b
1114 e602 | | Load 0x3,0x2
1115 e21f | | Load 0x1,0x1f
1116 025e | ^ | Execute Discrete,Convert
1117 e603 | | Load 0x3,0x3
1118 82a7 | | Call 0x1,0xa7
1119 00d1 | | Pop_Control Pop_Count_1
111a c602 | | Store 0x3,0x2
111b e5fd | | Load 0x2,-0x3
111c 4602 |F | Jump_Case 0x3
111d 780d |x | Jump 0x112b ; case 0x0
111e 7815 |x | Jump 0x1134 ; case 0x1
111f 7800 |x | Jump 0x1120 ; case 0x2
1120 e404 | | Load 0x2,0x4
1121 e603 | | Load 0x3,0x3
1122 82a4 | | Call 0x1,0xa4
1123 e405 | | Load 0x2,0x5
1124 e607 | | Load 0x3,0x7
1125 82a4 | | Call 0x1,0xa4
1126 82a5 | | Call 0x1,0xa5
1127 e233 | 3 | Load 0x1,0x33
1128 0165 | e | Execute Variant_Record,Convert
1129 00cb | | Action Pop_Block_With_Result
112a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
112b e294 | | Load 0x1,0x94
112c e405 | | Load 0x2,0x5
112d e607 | | Load 0x3,0x7
112e 82a4 | | Call 0x1,0xa4
112f 82a5 | | Call 0x1,0xa5
1130 e233 | 3 | Load 0x1,0x33
1131 0165 | e | Execute Variant_Record,Convert
1132 00cb | | Action Pop_Block_With_Result
1133 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1134 e404 | | Load 0x2,0x4
1135 e603 | | Load 0x3,0x3
1136 82a4 | | Call 0x1,0xa4
1137 e294 | | Load 0x1,0x94
1138 82a5 | | Call 0x1,0xa5
1139 e233 | 3 | Load 0x1,0x33
113a 0165 | e | Execute Variant_Record,Convert
113b 00cb | | Action Pop_Block_With_Result
113c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
113d 0000 0000 | | .XXX[0x3]
113f 0000 | |
1140 ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
1144 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
1148 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
114c 0000 0000 | | .BLANK 0000[0x4]
1150 ; --------------------------------------------------------------------------------------
1150 ; SUBPROGRAM
1150 ; --------------------------------------------------------------------------------------
1150 117f | | .CONST 0x117f ; Address of begin
1151 0004 | | .CONST 0x0004 ; Address of exception handler
1152 000b | | .CONST 0x000b ; Number of locals
1153 INIT_1150:
1153 67f4 |g | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
1154 e403 | | Load 0x2,0x3
1155 e5fe | | Load 0x2,-0x2
1156 01d7 | | Execute Vector,Field_Read
1157 0274 | t | Execute Discrete,Absolute_Value
1158 0a01 | | Execute_Immediate Plus,0x1
1159 0270 | p | Execute Discrete,Divide
115a 00e5 | | Load_Encached Long_Integer_Cache
115b 03f1 | | Declare_Variable Discrete,With_Value
115c 4801 |H | Short_Literal 0x1
115d e404 | | Load 0x2,0x4
115e 0a01 | | Execute_Immediate Plus,0x1
115f 00d8 | | Load_Top At_Offset_0
1160 00e2 | | Load_Encached Integer_Cache
1161 0260 | ` | Execute Discrete,In_Type
1162 7001 |p | Jump_Nonzero 0x1164
1163 0801 | | Execute_Immediate Raise,0x1
1164 e220 | | Load 0x1,0x20
1165 035b | [ | Declare_Type Array,Constrained
1166 0337 | 7 | Declare_Variable Array
1167 4801 |H | Short_Literal 0x1
1168 e405 | | Load 0x2,0x5
1169 e220 | | Load 0x1,0x20
116a 035b | [ | Declare_Type Array,Constrained
116b 0337 | 7 | Declare_Variable Array
116c 00e5 | | Load_Encached Long_Integer_Cache
116d 00e5 | | Load_Encached Long_Integer_Cache
116e 4801 |H | Short_Literal 0x1
116f e404 | | Load 0x2,0x4
1170 e405 | | Load 0x2,0x5
1171 0272 | r | Execute Discrete,Minus
1172 0a01 | | Execute_Immediate Plus,0x1
1173 00d8 | | Load_Top At_Offset_0
1174 00e2 | | Load_Encached Integer_Cache
1175 0260 | ` | Execute Discrete,In_Type
1176 7001 |p | Jump_Nonzero 0x1178
1177 0801 | | Execute_Immediate Raise,0x1
1178 e220 | | Load 0x1,0x20
1179 035b | [ | Declare_Type Array,Constrained
117a 0337 | 7 | Declare_Variable Array
117b 00e5 | | Load_Encached Long_Integer_Cache
117c 00e5 | | Load_Encached Long_Integer_Cache
117d 03e9 | | Declare_Variable Discrete,Duplicate
117e 00e5 | | Load_Encached Long_Integer_Cache
117f BODY_1150:
117f e603 | | Load 0x3,0x3
1180 e402 | | Load 0x2,0x2
1181 e5ff | | Load 0x2,-0x1
1182 01dc | | Execute Vector,Last
1183 e5ff | | Load 0x2,-0x1
1184 01cf | | Execute Vector,Slice_Read
1185 82a1 | | Call 0x1,0xa1
1186 00d1 | | Pop_Control Pop_Count_1
1187 e604 | | Load 0x3,0x4
1188 e403 | | Load 0x2,0x3
1189 e5fe | | Load 0x2,-0x2
118a 01dc | | Execute Vector,Last
118b e5fe | | Load 0x2,-0x2
118c 01cf | | Execute Vector,Slice_Read
118d 82a1 | | Call 0x1,0xa1
118e 00d1 | | Pop_Control Pop_Count_1
118f 4802 |H | Short_Literal 0x2
1190 e603 | | Load 0x3,0x3
1191 01d7 | | Execute Vector,Field_Read
1192 0274 | t | Execute Discrete,Absolute_Value
1193 4802 |H | Short_Literal 0x2
1194 e603 | | Load 0x3,0x3
1195 01d6 | | Execute Vector,Field_Write
1196 4801 |H | Short_Literal 0x1
1197 e604 | | Load 0x3,0x4
1198 01d7 | | Execute Vector,Field_Read
1199 0274 | t | Execute Discrete,Absolute_Value
119a 4801 |H | Short_Literal 0x1
119b e604 | | Load 0x3,0x4
119c 01d6 | | Execute Vector,Field_Write
119d e602 | | Load 0x3,0x2
119e 0c02 | | Execute_Immediate Greater_Equal,0x2
119f 6812 |h | Jump_Zero 0x11b2
11a0 e603 | | Load 0x3,0x3
11a1 e602 | | Load 0x3,0x2
11a2 00d8 | | Load_Top At_Offset_0
11a3 e21f | | Load 0x1,0x1f
11a4 0260 | ` | Execute Discrete,In_Type
11a5 7001 |p | Jump_Nonzero 0x11a7
11a6 0801 | | Execute_Immediate Raise,0x1
11a7 82aa | | Call 0x1,0xaa
11a8 00d1 | | Pop_Control Pop_Count_1
11a9 e604 | | Load 0x3,0x4
11aa e602 | | Load 0x3,0x2
11ab 00d8 | | Load_Top At_Offset_0
11ac e21f | | Load 0x1,0x1f
11ad 0260 | ` | Execute Discrete,In_Type
11ae 7001 |p | Jump_Nonzero 0x11b0
11af 0801 | | Execute_Immediate Raise,0x1
11b0 82aa | | Call 0x1,0xaa
11b1 00d1 | | Pop_Control Pop_Count_1
11b2 4801 |H | Short_Literal 0x1
11b3 e604 | | Load 0x3,0x4
11b4 01d7 | | Execute Vector,Field_Read
11b5 a605 | | Store_Unchecked 0x3,0x5
11b6 4802 |H | Short_Literal 0x2
11b7 e604 | | Load 0x3,0x4
11b8 01d7 | | Execute Vector,Field_Read
11b9 a606 | | Store_Unchecked 0x3,0x6
11ba 00cf | | Action Mark_Auxiliary
11bb e607 | | Load 0x3,0x7
11bc 01d9 | | Execute Vector,Reverse_Bounds
11bd 0263 | c | Execute Discrete,Above_Bound
11be 70a4 |p | Jump_Nonzero 0x1263
11bf 00d8 | | Load_Top At_Offset_0
11c0 e603 | | Load 0x3,0x3
11c1 01d7 | | Execute Vector,Field_Read
11c2 091f | | Execute_Immediate Binary_Scale,0x1f
11c3 00d9 | | Load_Top At_Offset_1
11c4 0a01 | | Execute_Immediate Plus,0x1
11c5 e603 | | Load 0x3,0x3
11c6 01d7 | | Execute Vector,Field_Read
11c7 0273 | s | Execute Discrete,Plus
11c8 a60a | | Store_Unchecked 0x3,0xa
11c9 00d8 | | Load_Top At_Offset_0
11ca e603 | | Load 0x3,0x3
11cb 01d7 | | Execute Vector,Field_Read
11cc e605 | | Load 0x3,0x5
11cd 027e | ~ | Execute Discrete,Not_Equal
11ce 6805 |h | Jump_Zero 0x11d4
11cf e60a | | Load 0x3,0xa
11d0 e605 | | Load 0x3,0x5
11d1 0270 | p | Execute Discrete,Divide
11d2 a60b | | Store_Unchecked 0x3,0xb
11d3 7802 |x | Jump 0x11d6
11d4 676f |go | Indirect_Literal Discrete,0x1144,{0x00000000, 0x7fffffff}
11d5 a60b | | Store_Unchecked 0x3,0xb
11d6 00cf | | Action Mark_Auxiliary
11d7 7804 |x | Jump 0x11dc
11d8 e60b | | Load 0x3,0xb
11d9 0aff | | Execute_Immediate Plus,-0x1
11da a60b | | Store_Unchecked 0x3,0xb
11db 00c9 | | Action Pop_Auxiliary_Loop
11dc e606 | | Load 0x3,0x6
11dd e60b | | Load 0x3,0xb
11de 0271 | q | Execute Discrete,Times
11df e60a | | Load 0x3,0xa
11e0 e60b | | Load 0x3,0xb
11e1 e605 | | Load 0x3,0x5
11e2 0271 | q | Execute Discrete,Times
11e3 0272 | r | Execute Discrete,Minus
11e4 091f | | Execute_Immediate Binary_Scale,0x1f
11e5 00db | | Load_Top At_Offset_3
11e6 0a02 | | Execute_Immediate Plus,0x2
11e7 e603 | | Load 0x3,0x3
11e8 01d7 | | Execute Vector,Field_Read
11e9 0273 | s | Execute Discrete,Plus
11ea 027d | } | Execute Discrete,Greater
11eb 77ec |w | Jump_Nonzero 0x11d8
11ec 00ce | | Action Pop_Auxiliary
11ed 4800 |H | Short_Literal 0x0
11ee a609 | | Store_Unchecked 0x3,0x9
11ef 00cf | | Action Mark_Auxiliary
11f0 e604 | | Load 0x3,0x4
11f1 01da | | Execute Vector,Bounds
11f2 0264 | d | Execute Discrete,Below_Bound
11f3 7027 |p' | Jump_Nonzero 0x121b
11f4 00db | | Load_Top At_Offset_3
11f5 00d9 | | Load_Top At_Offset_1
11f6 0273 | s | Execute Discrete,Plus
11f7 e603 | | Load 0x3,0x3
11f8 01d7 | | Execute Vector,Field_Read
11f9 e60b | | Load 0x3,0xb
11fa 00da | | Load_Top At_Offset_2
11fb e604 | | Load 0x3,0x4
11fc 01d7 | | Execute Vector,Field_Read
11fd 0271 | q | Execute Discrete,Times
11fe 0272 | r | Execute Discrete,Minus
11ff e609 | | Load 0x3,0x9
1200 0273 | s | Execute Discrete,Plus
1201 a60a | | Store_Unchecked 0x3,0xa
1202 e60a | | Load 0x3,0xa
1203 6744 |gD | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
1204 026f | o | Execute Discrete,Remainder
1205 a608 | | Store_Unchecked 0x3,0x8
1206 e60a | | Load 0x3,0xa
1207 09e1 | | Execute_Immediate Binary_Scale,-0x1f
1208 a609 | | Store_Unchecked 0x3,0x9
1209 e608 | | Load 0x3,0x8
120a 0d00 | | Execute_Immediate Less,0x0
120b 6807 |h | Jump_Zero 0x1213
120c e608 | | Load 0x3,0x8
120d 673a |g: | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
120e 0273 | s | Execute Discrete,Plus
120f a608 | | Store_Unchecked 0x3,0x8
1210 e609 | | Load 0x3,0x9
1211 0aff | | Execute_Immediate Plus,-0x1
1212 a609 | | Store_Unchecked 0x3,0x9
1213 e608 | | Load 0x3,0x8
1214 e60e | | Load 0x3,0xe
1215 00da | | Load_Top At_Offset_2
1216 0273 | s | Execute Discrete,Plus
1217 e603 | | Load 0x3,0x3
1218 01d6 | | Execute Vector,Field_Write
1219 00c8 | | Action Pop_Auxiliary_Range
121a 37d9 |7 | Loop_Decreasing 0x11f4
121b 00ce | | Action Pop_Auxiliary
121c 00d8 | | Load_Top At_Offset_0
121d e603 | | Load 0x3,0x3
121e 01d7 | | Execute Vector,Field_Read
121f e609 | | Load 0x3,0x9
1220 0273 | s | Execute Discrete,Plus
1221 00d9 | | Load_Top At_Offset_1
1222 e603 | | Load 0x3,0x3
1223 01d6 | | Execute Vector,Field_Write
1224 00d8 | | Load_Top At_Offset_0
1225 e603 | | Load 0x3,0x3
1226 01d7 | | Execute Vector,Field_Read
1227 0d00 | | Execute_Immediate Less,0x0
1228 6834 |h4 | Jump_Zero 0x125d
1229 00db | | Load_Top At_Offset_3
122a 0aff | | Execute_Immediate Plus,-0x1
122b a60b | | Store_Unchecked 0x3,0xb
122c 4800 |H | Short_Literal 0x0
122d a609 | | Store_Unchecked 0x3,0x9
122e 00cf | | Action Mark_Auxiliary
122f e604 | | Load 0x3,0x4
1230 01da | | Execute Vector,Bounds
1231 0264 | d | Execute Discrete,Below_Bound
1232 7021 |p! | Jump_Nonzero 0x1254
1233 00db | | Load_Top At_Offset_3
1234 00d9 | | Load_Top At_Offset_1
1235 0273 | s | Execute Discrete,Plus
1236 e603 | | Load 0x3,0x3
1237 01d7 | | Execute Vector,Field_Read
1238 00d9 | | Load_Top At_Offset_1
1239 e604 | | Load 0x3,0x4
123a 01d7 | | Execute Vector,Field_Read
123b 0273 | s | Execute Discrete,Plus
123c e609 | | Load 0x3,0x9
123d 0273 | s | Execute Discrete,Plus
123e a60a | | Store_Unchecked 0x3,0xa
123f e60a | | Load 0x3,0xa
1240 6707 |g | Indirect_Literal Discrete,0x1148,{0x00000000, 0x80000000}
1241 027b | { | Execute Discrete,Greater_Equal
1242 6807 |h | Jump_Zero 0x124a
1243 e60a | | Load 0x3,0xa
1244 66fb |f | Indirect_Literal Discrete,0x1140,{0xffffffff, 0x80000000}
1245 0273 | s | Execute Discrete,Plus
1246 a60a | | Store_Unchecked 0x3,0xa
1247 4801 |H | Short_Literal 0x1
1248 a609 | | Store_Unchecked 0x3,0x9
1249 7802 |x | Jump 0x124c
124a 4800 |H | Short_Literal 0x0
124b a609 | | Store_Unchecked 0x3,0x9
124c e60a | | Load 0x3,0xa
124d e60e | | Load 0x3,0xe
124e 00da | | Load_Top At_Offset_2
124f 0273 | s | Execute Discrete,Plus
1250 e603 | | Load 0x3,0x3
1251 01d6 | | Execute Vector,Field_Write
1252 00c8 | | Action Pop_Auxiliary_Range
1253 37df |7 | Loop_Decreasing 0x1233
1254 00ce | | Action Pop_Auxiliary
1255 00d8 | | Load_Top At_Offset_0
1256 e603 | | Load 0x3,0x3
1257 01d7 | | Execute Vector,Field_Read
1258 e609 | | Load 0x3,0x9
1259 0273 | s | Execute Discrete,Plus
125a 00d9 | | Load_Top At_Offset_1
125b e603 | | Load 0x3,0x3
125c 01d6 | | Execute Vector,Field_Write
125d 00db | | Load_Top At_Offset_3
125e 00d9 | | Load_Top At_Offset_1
125f e607 | | Load 0x3,0x7
1260 01d6 | | Execute Vector,Field_Write
1261 00c8 | | Action Pop_Auxiliary_Range
1262 3f5c |?\ | Loop_Increasing 0x11bf
1263 00ce | | Action Pop_Auxiliary
1264 e407 | | Load 0x2,0x7
1265 680a |h | Jump_Zero 0x1270
1266 e607 | | Load 0x3,0x7
1267 82a9 | | Call 0x1,0xa9
1268 a402 | | Store_Unchecked 0x2,0x2
1269 e402 | | Load 0x2,0x2
126a e607 | | Load 0x3,0x7
126b 01d7 | | Execute Vector,Field_Read
126c 0275 | u | Execute Discrete,Unary_Minus
126d e402 | | Load 0x2,0x2
126e e607 | | Load 0x3,0x7
126f 01d6 | | Execute Vector,Field_Write
1270 e5fd | | Load 0x2,-0x3
1271 e607 | | Load 0x3,0x7
1272 82a1 | | Call 0x1,0xa1
1273 00d1 | | Pop_Control Pop_Count_1
1274 4800 |H | Short_Literal 0x0
1275 a5fb | | Store_Unchecked 0x2,-0x5
1276 e5fc | | Load 0x2,-0x4
1277 01db | | Execute Vector,Length
1278 0c01 | | Execute_Immediate Greater_Equal,0x1
1279 684d |hM | Jump_Zero 0x12c7
127a e603 | | Load 0x3,0x3
127b 82a9 | | Call 0x1,0xa9
127c a402 | | Store_Unchecked 0x2,0x2
127d e603 | | Load 0x3,0x3
127e 01dc | | Execute Vector,Last
127f e603 | | Load 0x3,0x3
1280 01d7 | | Execute Vector,Field_Read
1281 700c |p | Jump_Nonzero 0x128e
1282 e402 | | Load 0x2,0x2
1283 e603 | | Load 0x3,0x3
1284 01dc | | Execute Vector,Last
1285 027f | | Execute Discrete,Equal
1286 6807 |h | Jump_Zero 0x128e
1287 4801 |H | Short_Literal 0x1
1288 a5fb | | Store_Unchecked 0x2,-0x5
1289 e5fc | | Load 0x2,-0x4
128a 4800 |H | Short_Literal 0x0
128b 82a2 | | Call 0x1,0xa2
128c 00d1 | | Pop_Control Pop_Count_1
128d 7831 |x1 | Jump 0x12bf
128e 4800 |H | Short_Literal 0x0
128f a5fb | | Store_Unchecked 0x2,-0x5
1290 e602 | | Load 0x3,0x2
1291 0c02 | | Execute_Immediate Greater_Equal,0x2
1292 6823 |h# | Jump_Zero 0x12b6
1293 4800 |H | Short_Literal 0x0
1294 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
1295 00cf | | Action Mark_Auxiliary
1296 e603 | | Load 0x3,0x3
1297 01dc | | Execute Vector,Last
1298 e402 | | Load 0x2,0x2
1299 0263 | c | Execute Discrete,Above_Bound
129a 7013 |p | Jump_Nonzero 0x12ae
129b e609 | | Load 0x3,0x9
129c 091f | | Execute_Immediate Binary_Scale,0x1f
129d 00d9 | | Load_Top At_Offset_1
129e e603 | | Load 0x3,0x3
129f 01d7 | | Execute Vector,Field_Read
12a0 0273 | s | Execute Discrete,Plus
12a1 a60a | | Store_Unchecked 0x3,0xa
12a2 e60a | | Load 0x3,0xa
12a3 e602 | | Load 0x3,0x2
12a4 0270 | p | Execute Discrete,Divide
12a5 00d9 | | Load_Top At_Offset_1
12a6 e603 | | Load 0x3,0x3
12a7 01d6 | | Execute Vector,Field_Write
12a8 e60a | | Load 0x3,0xa
12a9 e602 | | Load 0x3,0x2
12aa 026f | o | Execute Discrete,Remainder
12ab a609 | | Store_Unchecked 0x3,0x9
12ac 00c8 | | Action Pop_Auxiliary_Range
12ad 3fed |? | Loop_Increasing 0x129b
12ae 00ce | | Action Pop_Auxiliary
12af e402 | | Load 0x2,0x2
12b0 e603 | | Load 0x3,0x3
12b1 01dc | | Execute Vector,Last
12b2 e603 | | Load 0x3,0x3
12b3 01cf | | Execute Vector,Slice_Read
12b4 82a9 | | Call 0x1,0xa9
12b5 a402 | | Store_Unchecked 0x2,0x2
12b6 e406 | | Load 0x2,0x6
12b7 6807 |h | Jump_Zero 0x12bf
12b8 e402 | | Load 0x2,0x2
12b9 e603 | | Load 0x3,0x3
12ba 01d7 | | Execute Vector,Field_Read
12bb 0275 | u | Execute Discrete,Unary_Minus
12bc e402 | | Load 0x2,0x2
12bd e603 | | Load 0x3,0x3
12be 01d6 | | Execute Vector,Field_Write
12bf e5fc | | Load 0x2,-0x4
12c0 4802 |H | Short_Literal 0x2
12c1 e603 | | Load 0x3,0x3
12c2 01dc | | Execute Vector,Last
12c3 e603 | | Load 0x3,0x3
12c4 01cf | | Execute Vector,Slice_Read
12c5 82a1 | | Call 0x1,0xa1
12c6 00d1 | | Pop_Control Pop_Count_1
12c7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12c8 ; --------------------------------------------------------------------------------------
12c8 ; SUBPROGRAM
12c8 ; --------------------------------------------------------------------------------------
12c8 12e7 | | .CONST 0x12e7 ; Address of begin
12c9 0004 | | .CONST 0x0004 ; Address of exception handler
12ca 0004 | | .CONST 0x0004 ; Number of locals
12cb INIT_12c8:
12cb 4801 |H | Short_Literal 0x1
12cc e404 | | Load 0x2,0x4
12cd e405 | | Load 0x2,0x5
12ce 0273 | s | Execute Discrete,Plus
12cf 00d8 | | Load_Top At_Offset_0
12d0 00e2 | | Load_Encached Integer_Cache
12d1 0260 | ` | Execute Discrete,In_Type
12d2 7001 |p | Jump_Nonzero 0x12d4
12d3 0801 | | Execute_Immediate Raise,0x1
12d4 e220 | | Load 0x1,0x20
12d5 035b | [ | Declare_Type Array,Constrained
12d6 0337 | 7 | Declare_Variable Array
12d7 00d8 | | Load_Top At_Offset_0
12d8 0335 | 5 | Declare_Variable Array,Duplicate
12d9 00cd | | Action Spare6_Action
12da 00d9 | | Load_Top At_Offset_1
12db 01d9 | | Execute Vector,Reverse_Bounds
12dc 0263 | c | Execute Discrete,Above_Bound
12dd 7005 |p | Jump_Nonzero 0x12e3
12de 4800 |H | Short_Literal 0x0
12df 00d9 | | Load_Top At_Offset_1
12e0 e603 | | Load 0x3,0x3
12e1 01d6 | | Execute Vector,Field_Write
12e2 3ffb |? | Loop_Increasing 0x12de
12e3 00d9 | | Load_Top At_Offset_1
12e4 01d4 | | Execute Vector,Structure_Write
12e5 00e5 | | Load_Encached Long_Integer_Cache
12e6 03e9 | | Declare_Variable Discrete,Duplicate
12e7 BODY_12c8:
12e7 00cf | | Action Mark_Auxiliary
12e8 4801 |H | Short_Literal 0x1
12e9 e405 | | Load 0x2,0x5
12ea 0264 | d | Execute Discrete,Below_Bound
12eb 7032 |p2 | Jump_Nonzero 0x131e
12ec 4800 |H | Short_Literal 0x0
12ed a603 | | Store_Unchecked 0x3,0x3
12ee 00cf | | Action Mark_Auxiliary
12ef 4801 |H | Short_Literal 0x1
12f0 e404 | | Load 0x2,0x4
12f1 0264 | d | Execute Discrete,Below_Bound
12f2 7024 |p$ | Jump_Nonzero 0x1317
12f3 e402 | | Load 0x2,0x2
12f4 00d9 | | Load_Top At_Offset_1
12f5 0273 | s | Execute Discrete,Plus
12f6 0aff | | Execute_Immediate Plus,-0x1
12f7 e5ff | | Load 0x2,-0x1
12f8 01d7 | | Execute Vector,Field_Read
12f9 e403 | | Load 0x2,0x3
12fa e607 | | Load 0x3,0x7
12fb 0273 | s | Execute Discrete,Plus
12fc 0aff | | Execute_Immediate Plus,-0x1
12fd e5fe | | Load 0x2,-0x2
12fe 01d7 | | Execute Vector,Field_Read
12ff 0271 | q | Execute Discrete,Times
1300 0274 | t | Execute Discrete,Absolute_Value
1301 00d9 | | Load_Top At_Offset_1
1302 e607 | | Load 0x3,0x7
1303 0273 | s | Execute Discrete,Plus
1304 e602 | | Load 0x3,0x2
1305 01d7 | | Execute Vector,Field_Read
1306 0273 | s | Execute Discrete,Plus
1307 e603 | | Load 0x3,0x3
1308 0273 | s | Execute Discrete,Plus
1309 a604 | | Store_Unchecked 0x3,0x4
130a e604 | | Load 0x3,0x4
130b 602c |`, | Indirect_Literal Discrete,0x1338,{0x00000000, 0x80000000}
130c 026f | o | Execute Discrete,Remainder
130d 00d9 | | Load_Top At_Offset_1
130e e607 | | Load 0x3,0x7
130f 0273 | s | Execute Discrete,Plus
1310 e602 | | Load 0x3,0x2
1311 01d6 | | Execute Vector,Field_Write
1312 e604 | | Load 0x3,0x4
1313 09e1 | | Execute_Immediate Binary_Scale,-0x1f
1314 a603 | | Store_Unchecked 0x3,0x3
1315 00c8 | | Action Pop_Auxiliary_Range
1316 37dc |7 | Loop_Decreasing 0x12f3
1317 00ce | | Action Pop_Auxiliary
1318 e603 | | Load 0x3,0x3
1319 00d9 | | Load_Top At_Offset_1
131a e602 | | Load 0x3,0x2
131b 01d6 | | Execute Vector,Field_Write
131c 00c8 | | Action Pop_Auxiliary_Range
131d 37ce |7 | Loop_Decreasing 0x12ec
131e 00ce | | Action Pop_Auxiliary
131f e402 | | Load 0x2,0x2
1320 e5ff | | Load 0x2,-0x1
1321 01d7 | | Execute Vector,Field_Read
1322 0d00 | | Execute_Immediate Less,0x0
1323 e403 | | Load 0x2,0x3
1324 e5fe | | Load 0x2,-0x2
1325 01d7 | | Execute Vector,Field_Read
1326 0d00 | | Execute_Immediate Less,0x0
1327 0277 | w | Execute Discrete,Xor
1328 680a |h | Jump_Zero 0x1333
1329 00da | | Load_Top At_Offset_2
132a 82a9 | | Call 0x1,0xa9
132b a402 | | Store_Unchecked 0x2,0x2
132c e402 | | Load 0x2,0x2
132d 00db | | Load_Top At_Offset_3
132e 01d7 | | Execute Vector,Field_Read
132f 0275 | u | Execute Discrete,Unary_Minus
1330 e402 | | Load 0x2,0x2
1331 e602 | | Load 0x3,0x2
1332 01d6 | | Execute Vector,Field_Write
1333 e5fd | | Load 0x2,-0x3
1334 00db | | Load_Top At_Offset_3
1335 82a1 | | Call 0x1,0xa1
1336 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1337 0000 | | .XXX[0x1]
1338 0000 0000 | | .LITERAL {0x00000000, 0x80000000}
133c 0000 0000 | | .BLANK 0000[0x4]
1340 ; --------------------------------------------------------------------------------------
1340 ; SUBPROGRAM
1340 ; --------------------------------------------------------------------------------------
1340 1356 | V | .CONST 0x1356 ; Address of begin
1341 0004 | | .CONST 0x0004 ; Address of exception handler
1342 0005 | | .CONST 0x0005 ; Number of locals
1343 INIT_1340:
1343 e403 | | Load 0x2,0x3
1344 e5fe | | Load 0x2,-0x2
1345 82af | | Call 0x1,0xaf
1346 0271 | q | Execute Discrete,Times
1347 00e2 | | Load_Encached Integer_Cache
1348 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1349 4801 |H | Short_Literal 0x1
134a 00d9 | | Load_Top At_Offset_1
134b e220 | | Load 0x1,0x20
134c 035b | [ | Declare_Type Array,Constrained
134d 0337 | 7 | Declare_Variable Array
134e 4801 |H | Short_Literal 0x1
134f 00da | | Load_Top At_Offset_2
1350 e220 | | Load 0x1,0x20
1351 035b | [ | Declare_Type Array,Constrained
1352 0337 | 7 | Declare_Variable Array
1353 e5fe | | Load 0x2,-0x2
1354 00e2 | | Load_Encached Integer_Cache
1355 03f1 | | Declare_Variable Discrete,With_Value
1356 BODY_1340:
1356 00d9 | | Load_Top At_Offset_1
1357 e402 | | Load 0x2,0x2
1358 e5ff | | Load 0x2,-0x1
1359 01dc | | Execute Vector,Last
135a e5ff | | Load 0x2,-0x1
135b 01cf | | Execute Vector,Slice_Read
135c 8227 | ' | Call 0x1,0x27
135d 82a1 | | Call 0x1,0xa1
135e 00d1 | | Pop_Control Pop_Count_1
135f 00da | | Load_Top At_Offset_2
1360 4801 |H | Short_Literal 0x1
1361 82a2 | | Call 0x1,0xa2
1362 00d1 | | Pop_Control Pop_Count_1
1363 00cf | | Action Mark_Auxiliary
1364 00d9 | | Load_Top At_Offset_1
1365 4802 |H | Short_Literal 0x2
1366 026f | o | Execute Discrete,Remainder
1367 0f01 | | Execute_Immediate Equal,0x1
1368 6805 |h | Jump_Zero 0x136e
1369 00db | | Load_Top At_Offset_3
136a 00db | | Load_Top At_Offset_3
136b e603 | | Load 0x3,0x3
136c 82ae | | Call 0x1,0xae
136d 00d1 | | Pop_Control Pop_Count_1
136e 00d9 | | Load_Top At_Offset_1
136f 09ff | | Execute_Immediate Binary_Scale,-0x1
1370 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
1371 00d9 | | Load_Top At_Offset_1
1372 6807 |h | Jump_Zero 0x137a
1373 00da | | Load_Top At_Offset_2
1374 00db | | Load_Top At_Offset_3
1375 e604 | | Load 0x3,0x4
1376 82ae | | Call 0x1,0xae
1377 00d1 | | Pop_Control Pop_Count_1
1378 00c9 | | Action Pop_Auxiliary_Loop
1379 7fea | | Jump 0x1364
137a 00ce | | Action Pop_Auxiliary
137b e402 | | Load 0x2,0x2
137c e5ff | | Load 0x2,-0x1
137d 01d7 | | Execute Vector,Field_Read
137e 0d00 | | Execute_Immediate Less,0x0
137f 680f |h | Jump_Zero 0x138f
1380 e5fe | | Load 0x2,-0x2
1381 4802 |H | Short_Literal 0x2
1382 026f | o | Execute Discrete,Remainder
1383 0f01 | | Execute_Immediate Equal,0x1
1384 680a |h | Jump_Zero 0x138f
1385 00da | | Load_Top At_Offset_2
1386 82a9 | | Call 0x1,0xa9
1387 a402 | | Store_Unchecked 0x2,0x2
1388 e402 | | Load 0x2,0x2
1389 00db | | Load_Top At_Offset_3
138a 01d7 | | Execute Vector,Field_Read
138b 0275 | u | Execute Discrete,Unary_Minus
138c e402 | | Load 0x2,0x2
138d e603 | | Load 0x3,0x3
138e 01d6 | | Execute Vector,Field_Write
138f e5fd | | Load 0x2,-0x3
1390 00db | | Load_Top At_Offset_3
1391 82a1 | | Call 0x1,0xa1
1392 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1393 0000 0000 | | .BLANK 0000[0x5]
1398 ; --------------------------------------------------------------------------------------
1398 ; SUBPROGRAM
1398 ; SUBPROGRAM
1398 ; --------------------------------------------------------------------------------------
1398 139b | | .CONST 0x139b ; Address of begin
1399 0004 | | .CONST 0x0004 ; Address of exception handler
139a 0001 | | .CONST 0x0001 ; Number of locals
139b BODY_1398:
139b BODY_1398:
139b INIT_1398:
139b INIT_1398:
139b 4608 |F | Jump_Case 0x9
139c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
139d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
139e 7824 |x$ | Jump 0x13c3 ; case 0x2
139f 7823 |x# | Jump 0x13c3 ; case 0x3
13a0 7822 |x" | Jump 0x13c3 ; case 0x4
13a1 7821 |x! | Jump 0x13c3 ; case 0x5
13a2 7820 |x | Jump 0x13c3 ; case 0x6
13a3 7801 |x | Jump 0x13a5 ; case 0x7
13a4 780e |x | Jump 0x13b3 ; case 0x8
13a5 e5fd | | Load 0x2,-0x3
13a6 e5fe | | Load 0x2,-0x2
13a7 4801 |H | Short_Literal 0x1
13a8 e5fd | | Load 0x2,-0x3
13a9 e220 | | Load 0x1,0x20
13aa 035b | [ | Declare_Type Array,Constrained
13ab 4801 |H | Short_Literal 0x1
13ac e5fe | | Load 0x2,-0x2
13ad e220 | | Load 0x1,0x20
13ae 035b | [ | Declare_Type Array,Constrained
13af 4802 |H | Short_Literal 0x2
13b0 e5ff | | Load 0x2,-0x1
13b1 031b | | Declare_Type Variant_Record,Constrained
13b2 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
13b3 e5fd | | Load 0x2,-0x3
13b4 e5fe | | Load 0x2,-0x2
13b5 e5ff | | Load 0x2,-0x1
13b6 02fc | | Declare_Variable Variant_Record,With_Constraint
13b7 4801 |H | Short_Literal 0x1
13b8 e5fd | | Load 0x2,-0x3
13b9 e220 | | Load 0x1,0x20
13ba 0334 | 4 | Declare_Variable Array,With_Constraint
13bb 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
13bc 4801 |H | Short_Literal 0x1
13bd e5fe | | Load 0x2,-0x2
13be e220 | | Load 0x1,0x20
13bf 0334 | 4 | Declare_Variable Array,With_Constraint
13c0 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4
13c1 016a | j | QQ_execute Variant_Record,XXX
13c2 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
13c3 0869 | i | Execute_Immediate Raise,0x69
13c4 0000 0000 | | .BLANK 0000[0x4]
13c8 ; --------------------------------------------------------------------------------------
13c8 ; SUBPROGRAM
13c8 ; --------------------------------------------------------------------------------------
13c8 13cb | | .CONST 0x13cb ; Address of begin
13c9 0004 | | .CONST 0x0004 ; Address of exception handler
13ca 0001 | | .CONST 0x0001 ; Number of locals
13cb BODY_13c8:
13cb INIT_13c8:
13cb 4608 |F | Jump_Case 0x9
13cc 7808 |x | Jump 0x13d5 ; case 0x0
13cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
13ce 7831 |x1 | Jump 0x1400 ; case 0x2
13cf 7830 |x0 | Jump 0x1400 ; case 0x3
13d0 782f |x/ | Jump 0x1400 ; case 0x4
13d1 782e |x. | Jump 0x1400 ; case 0x5
13d2 782d |x- | Jump 0x1400 ; case 0x6
13d3 780e |x | Jump 0x13e2 ; case 0x7
13d4 781b |x | Jump 0x13f0 ; case 0x8
13d5 00da | | Load_Top At_Offset_2
13d6 016c | l | Execute Variant_Record,Is_Constrained
13d7 7009 |p | Jump_Nonzero 0x13e1
13d8 00cf | | Action Mark_Auxiliary
13d9 4801 |H | Short_Literal 0x1
13da 4801 |H | Short_Literal 0x1
13db e5ff | | Load 0x2,-0x1
13dc 1c08 | | Execute_Immediate Run_Utility,0x8
13dd 00d8 | | Load_Top At_Offset_0
13de 1c00 | | Execute_Immediate Run_Utility,0x0
13df c5ff | | Store 0x2,-0x1
13e0 00ce | | Action Pop_Auxiliary
13e1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
13e2 e5fd | | Load 0x2,-0x3
13e3 e5fe | | Load 0x2,-0x2
13e4 4801 |H | Short_Literal 0x1
13e5 e5fd | | Load 0x2,-0x3
13e6 e220 | | Load 0x1,0x20
13e7 035b | [ | Declare_Type Array,Constrained
13e8 4801 |H | Short_Literal 0x1
13e9 e5fe | | Load 0x2,-0x2
13ea e220 | | Load 0x1,0x20
13eb 035b | [ | Declare_Type Array,Constrained
13ec 4802 |H | Short_Literal 0x2
13ed e5ff | | Load 0x2,-0x1
13ee 031b | | Declare_Type Variant_Record,Constrained
13ef 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
13f0 e5fd | | Load 0x2,-0x3
13f1 e5fe | | Load 0x2,-0x2
13f2 e5ff | | Load 0x2,-0x1
13f3 02fc | | Declare_Variable Variant_Record,With_Constraint
13f4 4801 |H | Short_Literal 0x1
13f5 e5fd | | Load 0x2,-0x3
13f6 e220 | | Load 0x1,0x20
13f7 0334 | 4 | Declare_Variable Array,With_Constraint
13f8 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
13f9 4801 |H | Short_Literal 0x1
13fa e5fe | | Load 0x2,-0x2
13fb e220 | | Load 0x1,0x20
13fc 0334 | 4 | Declare_Variable Array,With_Constraint
13fd 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4
13fe 016a | j | QQ_execute Variant_Record,XXX
13ff 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
1400 0869 | i | Execute_Immediate Raise,0x69
1401 0000 0000 | | .BLANK 0000[0x7]
1408 ; --------------------------------------------------------------------------------------
1408 ; SUBPROGRAM
1408 ; --------------------------------------------------------------------------------------
1408 140b | | .CONST 0x140b ; Address of begin
1409 0004 | | .CONST 0x0004 ; Address of exception handler
140a 0001 | | .CONST 0x0001 ; Number of locals
140b BODY_1408:
140b INIT_1408:
140b 4608 |F | Jump_Case 0x9
140c 7808 |x | Jump 0x1415 ; case 0x0
140d 781b |x | Jump 0x1429 ; case 0x1
140e 783d |x= | Jump 0x144c ; case 0x2
140f 783c |x< | Jump 0x144c ; case 0x3
1410 783b |x; | Jump 0x144c ; case 0x4
1411 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
1412 7839 |x9 | Jump 0x144c ; case 0x6
1413 7818 |x | Jump 0x142c ; case 0x7
1414 7826 |x& | Jump 0x143b ; case 0x8
1415 00da | | Load_Top At_Offset_2
1416 016c | l | Execute Variant_Record,Is_Constrained
1417 700b |p | Jump_Nonzero 0x1423
1418 00cf | | Action Mark_Auxiliary
1419 4801 |H | Short_Literal 0x1
141a 4801 |H | Short_Literal 0x1
141b 4801 |H | Short_Literal 0x1
141c e5ff | | Load 0x2,-0x1
141d 1c08 | | Execute_Immediate Run_Utility,0x8
141e 00d8 | | Load_Top At_Offset_0
141f 1c00 | | Execute_Immediate Run_Utility,0x0
1420 c5ff | | Store 0x2,-0x1
1421 00ce | | Action Pop_Auxiliary
1422 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1423 00da | | Load_Top At_Offset_2
1424 2207 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x7
1425 00da | | Load_Top At_Offset_2
1426 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
1427 1c00 | | Execute_Immediate Run_Utility,0x0
1428 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1429 00da | | Load_Top At_Offset_2
142a 2207 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x7
142b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
142c e5fc | | Load 0x2,-0x4
142d e5fd | | Load 0x2,-0x3
142e e5fe | | Load 0x2,-0x2
142f 4801 |H | Short_Literal 0x1
1430 e5fc | | Load 0x2,-0x4
1431 e260 | ` | Load 0x1,0x60
1432 035b | [ | Declare_Type Array,Constrained
1433 e5fd | | Load 0x2,-0x3
1434 e5fe | | Load 0x2,-0x2
1435 e23f | ? | Load 0x1,0x3f
1436 1c07 | | Execute_Immediate Run_Utility,0x7
1437 4802 |H | Short_Literal 0x2
1438 e5ff | | Load 0x2,-0x1
1439 031b | | Declare_Type Variant_Record,Constrained
143a 4204 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x4
143b e5fc | | Load 0x2,-0x4
143c e5fd | | Load 0x2,-0x3
143d e5fe | | Load 0x2,-0x2
143e e5ff | | Load 0x2,-0x1
143f 02fc | | Declare_Variable Variant_Record,With_Constraint
1440 4801 |H | Short_Literal 0x1
1441 e5fc | | Load 0x2,-0x4
1442 e260 | ` | Load 0x1,0x60
1443 0334 | 4 | Declare_Variable Array,With_Constraint
1444 2d06 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6
1445 e5fd | | Load 0x2,-0x3
1446 e5fe | | Load 0x2,-0x2
1447 e23f | ? | Load 0x1,0x3f
1448 1c08 | | Execute_Immediate Run_Utility,0x8
1449 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
144a 016a | j | QQ_execute Variant_Record,XXX
144b 4204 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x4
144c 0869 | i | Execute_Immediate Raise,0x69
144d ; --------------------------------------------------------------------------------------
144d ; STRING TABLE
144d ; --------------------------------------------------------------------------------------
144d 0008 | | .STRTAB 0x0008->0x1451 ; "QUOTIENT"
144e 000e | | .STRTAB 0x000e->0x1455 ; "REMAINDER"
144f 0015 | | .STRTAB 0x0015->0x1459 ; "BOTH"
1450 0017 | | .STREND 0x0017->0x145b
1451 5155 4f54 |QUOT| .STRTAB_STRINGS
145c 0000 0000 | | .BLANK 0000[0x4]
1460 ; --------------------------------------------------------------------------------------
1460 ; Debug Table
1460 ; --------------------------------------------------------------------------------------
1460 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e77,0x0000,0x0001,0x0000
1466 0be1 0b00 | | .XXX[0x3]
1468 0141 | A |
1469 0000 0000 | | .BLANK 0000[0x4]
146d 000d 0be1 | | .XXX[0x4]
146f 0b00 0141 | A|
1471 0000 0000 | | .BLANK 0000[0x4]
1475 0001 0008 | | .XXX[0xa]
1477 5805 8f20 |X |
1479 0000 0800 | |
147b 0000 03d0 | |
147d 263c 8000 |&< |
147f 0000 0000 | | .BLANK 0000[0x5]
1484 01f2 5340 | S@| .XXX[0x11]
1486 01f2 91d0 | |
1488 fe38 10b0 | 8 |
148a 003b 4030 | ;@0|
148c 0000 0040 | @|
148e 0000 0000 | |
1490 01f8 6e58 | nX|
1492 0800 2900 | ) |
1494 2001 | |
1495 0000 0000 | | .BLANK 0000[0xb]
14a0 000f 93ac | | .XXX[0xe]
14a2 000f 9520 | |
14a4 8080 042c | ,|
14a6 0248 1000 | H |
14a8 0004 0000 | |
14aa 0001 e809 | |
14ac 2045 8000 | E |
14ae 0000 0000 | | .BLANK 0000[0x5]
14b3 f948 e800 | H | .XXX[0x7]
14b5 f967 2868 | g(h|
14b7 5f08 5800 |_ X |
14b9 0a08 | |
14ba 0000 0000 | | .BLANK 0000[0x4]
14be 0068 5f08 | h_ | .XXX[0x4]
14c0 5800 0a08 |X |
14c2 0000 0000 | | .BLANK 0000[0x4]
14c6 0068 5f08 | h_ | .XXX[0x4]
14c8 5800 0a08 |X |
14ca 0000 0000 | | .BLANK 0000[0x4]
14ce 0008 006d | m| .XXX[0x3]
14d0 8800 | |
14d1 0000 0000 | | .BLANK 0000[0xc]
14dd 0f95 2080 | | .XXX[0xf]
14df 0f97 4486 | D |
14e1 85f0 8580 | |
14e3 00a0 8000 | |
14e5 0000 0000 | |
14e7 0000 0002 | |
14e9 4d00 0000 |M |
14eb 2800 |( |
14ec 0000 0000 | | .BLANK 0000[0xb]
14f7 00f9 6728 | g(| .XXX[0x8]
14f9 00f9 8168 | h|
14fb 685f 0858 |h_ X|
14fd 000a 0800 | |
14ff 0000 0000 | | .BLANK 0000[0x4]
1503 0800 7500 | u | .XXX[0x3]
1505 7800 |x |
1506 0000 0000 | | .BLANK 0000[0xb]
1511 000f 9744 | D| .XXX[0x8]
1513 800f 98e8 | |
1515 8685 f085 | |
1517 8000 a080 | |
1519 0000 0000 | | .BLANK 0000[0x4]
151d 0080 0290 | | .XXX[0x4]
151f 0221 b000 | ! |
1521 0000 0000 | | .BLANK 0000[0xb]
152c f981 6800 | h | .XXX[0xd]
152e f997 a808 | |
1530 0042 c02c | B ,|
1532 7a00 0000 |z |
1534 4000 0000 |@ |
1536 1e81 31e8 | 1 |
1538 0400 | |
1539 0000 0000 | | .BLANK 0000[0x5]
153e 0f98 e880 | | .XXX[0x6]
1540 0f9a 9e80 | |
1542 c100 2100 | ! |
1544 0000 0000 | | .BLANK 0000[0xc]
1550 00f9 97a8 | | .XXX[0x7]
1552 00f1 ef90 | |
1554 0800 3240 | 2@|
1556 4000 |@ |
1557 0000 0000 | | .BLANK 0000[0xb]
1562 000f 997a | z| .XXX[0x5]
1564 800f 9b30 | 0|
1566 bfce | |
1567 0000 0000 | | .BLANK 0000[0xe]
1575 f9a9 e800 | | .XXX[0xc]
1577 f9bc 2810 | ( |
1579 a000 b200 | |
157b 0000 0000 | |
157d d0be 10b0 | |
157f 000f ca40 | @|
1581 0000 0000 | | .BLANK 0000[0x6]
1587 0f9b 3080 | 0 | .XXX[0x5]
1589 0f9c 54bf | T |
158b cb00 | |
158c 0000 0000 | | .BLANK 0000[0xd]
1599 00f9 bc28 | (| .XXX[0x6]
159b 00f9 ce68 | h|
159d 2100 0010 |! |
159f 0000 0000 | | .BLANK 0000[0xc]
15ab 000f 9c54 | T| .XXX[0x7]
15ad 800f 9d78 | x|
15af 824d 0000 | M |
15b1 0002 | |
15b2 0000 0000 | | .BLANK 0000[0xc]
15be f9ce 6800 | h | .XXX[0x8]
15c0 f9f1 687f | h |
15c2 1c08 5800 | X |
15c4 1e0b 63fe | c |
15c6 0000 0000 | | .BLANK 0000[0xc]
15d2 07f1 c085 | | .XXX[0x5]
15d4 8001 e256 | V|
15d6 bfe0 | |
15d7 0000 0000 | | .BLANK 0000[0xc]
15e3 0800 2900 | ) | .XXX[0x3]
15e5 221c |" |
15e6 0000 0000 | | .BLANK 0000[0xb]
15f1 000f 9d78 | x| .XXX[0x8]
15f3 800f 9fa8 | |
15f5 8080 0290 | |
15f7 0200 2000 | |
15f9 0000 0000 | | .BLANK 0000[0x7]