|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 15360 (0x3c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 1d78 | x | .CONST 0x1d78 ; 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 8013 | | .CONST 0x8013 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 037d | } | .CONST 0x037d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0153 | S | .CONST 0x0153 ; Number of locals
000b INIT_0008:
000b 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 4800 |H | Short_Literal 0x0
000f 0093 1b83 | | push_full_address INIT_1b80
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 038e | | Declare_Type Package,Defined
0013 0387 | | Declare_Variable Package
0014 00d8 | | Load_Top At_Offset_0
0015 020f | | Execute Module,Activate
0016 4800 |H | Short_Literal 0x0
0017 487f |H | Short_Literal 0x7f
0018 00e1 | | Load_Encached Boolean_Cache
0019 02a0 | | Declare_Subprogram Null_Subprogram
001a 4801 |H | Short_Literal 0x1
001b 035d | ] | Declare_Type Array,Defined
001c 4800 |H | Short_Literal 0x0
001d 639e |c | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x000fffff}
001e 00e5 | | Load_Encached Long_Integer_Cache
001f 03f8 | | Declare_Type Discrete,Constrained
0020 00e3 | | Load_Encached Natural_Cache
0021 06ff | | Execute_Immediate Set_Value_Unchecked,0xff
0022 00d8 | | Load_Top At_Offset_0
0023 09ff | | Execute_Immediate Binary_Scale,-0x1
0024 0275 | u | Execute Discrete,Unary_Minus
0025 0a03 | | Execute_Immediate Plus,0x3
0026 00e5 | | Load_Encached Long_Integer_Cache
0027 03f1 | | Declare_Variable Discrete,With_Value
0028 00d8 | | Load_Top At_Offset_0
0029 6392 |c | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x000fffff}
002a 00e5 | | Load_Encached Long_Integer_Cache
002b 03f8 | | Declare_Type Discrete,Constrained
002c 00e5 | | Load_Encached Long_Integer_Cache
002d 0266 | f | Execute Discrete,Bounds
002e 00e1 | | Load_Encached Boolean_Cache
002f 02a0 | | Declare_Subprogram Null_Subprogram
0030 4801 |H | Short_Literal 0x1
0031 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0032 4800 |H | Short_Literal 0x0
0033 4fff |O | Short_Literal -0x1
0034 e214 | | Load 0x1,0x14
0035 035b | [ | Declare_Type Array,Constrained
0036 0337 | 7 | Declare_Variable Array
0037 029d 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call
0039 a002 | | Store_Unchecked 0x0,0x2
003a 00c6 | | Action Check_Subprogram_Elaborated
003b e210 | | Load 0x1,0x10
003c e003 | | Load 0x0,0x3
003d e004 | | Load 0x0,0x4
003e e005 | | Load 0x0,0x5
003f 4800 |H | Short_Literal 0x0
0040 0007 | | Action Break_Optional
0041 a002 | | Store_Unchecked 0x0,0x2
0042 00c6 | | Action Check_Subprogram_Elaborated
0043 e003 | | Load 0x0,0x3
0044 e210 | | Load 0x1,0x10
0045 e006 | | Load 0x0,0x6
0046 e007 | | Load 0x0,0x7
0047 4800 |H | Short_Literal 0x0
0048 0007 | | Action Break_Optional
0049 e003 | | Load 0x0,0x3
004a 012c | , | Execute Any,Size
004b e210 | | Load 0x1,0x10
004c 012c | , | Execute Any,Size
004d 027f | | Execute Discrete,Equal
004e 7001 |p | Jump_Nonzero 0x50
004f 0887 | | Execute_Immediate Raise,0x87
0050 e008 | | Load 0x0,0x8
0051 012c | , | Execute Any,Size
0052 00e3 | | Load_Encached Natural_Cache
0053 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0054 a002 | | Store_Unchecked 0x0,0x2
0055 00c6 | | Action Check_Subprogram_Elaborated
0056 e009 | | Load 0x0,0x9
0057 e008 | | Load 0x0,0x8
0058 e00a | | Load 0x0,0xa
0059 e00b | | Load 0x0,0xb
005a 4800 |H | Short_Literal 0x0
005b 0007 | | Action Break_Optional
005c a002 | | Store_Unchecked 0x0,0x2
005d 00c6 | | Action Check_Subprogram_Elaborated
005e e008 | | Load 0x0,0x8
005f e009 | | Load 0x0,0x9
0060 e00c | | Load 0x0,0xc
0061 e00d | | Load 0x0,0xd
0062 4800 |H | Short_Literal 0x0
0063 0007 | | Action Break_Optional
0064 e221 | ! | Load 0x1,0x21
0065 e009 | | Load 0x0,0x9
0066 012c | , | Execute Any,Size
0067 027f | | Execute Discrete,Equal
0068 7001 |p | Jump_Nonzero 0x6a
0069 0887 | | Execute_Immediate Raise,0x87
006a 4801 |H | Short_Literal 0x1
006b e221 | ! | Load 0x1,0x21
006c e214 | | Load 0x1,0x14
006d 035b | [ | Declare_Type Array,Constrained
006e a002 | | Store_Unchecked 0x0,0x2
006f 00c6 | | Action Check_Subprogram_Elaborated
0070 00d8 | | Load_Top At_Offset_0
0071 e008 | | Load 0x0,0x8
0072 e00e | | Load 0x0,0xe
0073 e00f | | Load 0x0,0xf
0074 4800 |H | Short_Literal 0x0
0075 0007 | | Action Break_Optional
0076 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call
0078 029d 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call
007a e010 | | Load 0x0,0x10
007b 012c | , | Execute Any,Size
007c 00e3 | | Load_Encached Natural_Cache
007d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
007e 4801 |H | Short_Literal 0x1
007f e234 | 4 | Load 0x1,0x34
0080 e214 | | Load 0x1,0x14
0081 035b | [ | Declare_Type Array,Constrained
0082 a002 | | Store_Unchecked 0x0,0x2
0083 00c6 | | Action Check_Subprogram_Elaborated
0084 00d8 | | Load_Top At_Offset_0
0085 e010 | | Load 0x0,0x10
0086 e011 | | Load 0x0,0x11
0087 e012 | | Load 0x0,0x12
0088 4800 |H | Short_Literal 0x0
0089 0007 | | Action Break_Optional
008a 029d 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call
008c 029d 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call
008e a002 | | Store_Unchecked 0x0,0x2
008f 00c6 | | Action Check_Subprogram_Elaborated
0090 00e5 | | Load_Encached Long_Integer_Cache
0091 e013 | | Load 0x0,0x13
0092 e014 | | Load 0x0,0x14
0093 e015 | | Load 0x0,0x15
0094 4800 |H | Short_Literal 0x0
0095 0007 | | Action Break_Optional
0096 e013 | | Load 0x0,0x13
0097 012c | , | Execute Any,Size
0098 00e5 | | Load_Encached Long_Integer_Cache
0099 012c | , | Execute Any,Size
009a 027f | | Execute Discrete,Equal
009b 7001 |p | Jump_Nonzero 0x9d
009c 0887 | | Execute_Immediate Raise,0x87
009d a002 | | Store_Unchecked 0x0,0x2
009e 00c6 | | Action Check_Subprogram_Elaborated
009f 00e5 | | Load_Encached Long_Integer_Cache
00a0 e010 | | Load 0x0,0x10
00a1 e016 | | Load 0x0,0x16
00a2 e017 | | Load 0x0,0x17
00a3 4800 |H | Short_Literal 0x0
00a4 0007 | | Action Break_Optional
00a5 00e5 | | Load_Encached Long_Integer_Cache
00a6 012c | , | Execute Any,Size
00a7 e234 | 4 | Load 0x1,0x34
00a8 027f | | Execute Discrete,Equal
00a9 7001 |p | Jump_Nonzero 0xab
00aa 0887 | | Execute_Immediate Raise,0x87
00ab 029d 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call
00ad 029d 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call
00af a002 | | Store_Unchecked 0x0,0x2
00b0 00c6 | | Action Check_Subprogram_Elaborated
00b1 e20f | | Load 0x1,0xf
00b2 e018 | | Load 0x0,0x18
00b3 e019 | | Load 0x0,0x19
00b4 e01a | | Load 0x0,0x1a
00b5 4800 |H | Short_Literal 0x0
00b6 0007 | | Action Break_Optional
00b7 a002 | | Store_Unchecked 0x0,0x2
00b8 00c6 | | Action Check_Subprogram_Elaborated
00b9 e20f | | Load 0x1,0xf
00ba e01b | | Load 0x0,0x1b
00bb e01c | | Load 0x0,0x1c
00bc e01d | | Load 0x0,0x1d
00bd 4800 |H | Short_Literal 0x0
00be 0007 | | Action Break_Optional
00bf a002 | | Store_Unchecked 0x0,0x2
00c0 00c6 | | Action Check_Subprogram_Elaborated
00c1 e20f | | Load 0x1,0xf
00c2 e01e | | Load 0x0,0x1e
00c3 e01f | | Load 0x0,0x1f
00c4 e020 | | Load 0x0,0x20
00c5 4800 |H | Short_Literal 0x0
00c6 0007 | | Action Break_Optional
00c7 a002 | | Store_Unchecked 0x0,0x2
00c8 00c6 | | Action Check_Subprogram_Elaborated
00c9 e20f | | Load 0x1,0xf
00ca e021 | ! | Load 0x0,0x21
00cb e022 | " | Load 0x0,0x22
00cc e023 | # | Load 0x0,0x23
00cd 4800 |H | Short_Literal 0x0
00ce 0007 | | Action Break_Optional
00cf a024 | $ | Store_Unchecked 0x0,0x24
00d0 00c6 | | Action Check_Subprogram_Elaborated
00d1 e20f | | Load 0x1,0xf
00d2 0093 0000 | | push_full_address 0x0
00d4 62e3 |b | Indirect_Literal Discrete,0x3b8,{0x80000000, 0x00200000}
00d5 0273 | s | Execute Discrete,Plus
00d6 e025 | % | Load 0x0,0x25
00d7 0273 | s | Execute Discrete,Plus
00d8 e026 | & | Load 0x0,0x26
00d9 0273 | s | Execute Discrete,Plus
00da 4800 |H | Short_Literal 0x0
00db 0007 | | Action Break_Optional
00dc 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call
00de 029d 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call
00e0 029d 050b | | Declare_Subprogram INIT_0508,For_Outer_Call
00e2 029d 051b | | Declare_Subprogram INIT_0518,For_Outer_Call
00e4 029d 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call
00e6 029b 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Unelaborated
00e8 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
00e9 00c7 | | Action Elaborate_Subprogram
00ea 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
00eb 00c6 | | Action Check_Subprogram_Elaborated
00ec e027 | ' | Load 0x0,0x27
00ed 0093 0000 | | push_full_address 0x0
00ef 62c4 |b | Indirect_Literal Discrete,0x3b4,{0x80000000, 0x001e0000}
00f0 0273 | s | Execute Discrete,Plus
00f1 e025 | % | Load 0x0,0x25
00f2 0273 | s | Execute Discrete,Plus
00f3 e028 | ( | Load 0x0,0x28
00f4 0273 | s | Execute Discrete,Plus
00f5 4800 |H | Short_Literal 0x0
00f6 0007 | | Action Break_Optional
00f7 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
00f8 00c6 | | Action Check_Subprogram_Elaborated
00f9 e029 | ) | Load 0x0,0x29
00fa 0093 0000 | | push_full_address 0x0
00fc 62b3 |b | Indirect_Literal Discrete,0x3b0,{0x80000000, 0x001d0000}
00fd 0273 | s | Execute Discrete,Plus
00fe e025 | % | Load 0x0,0x25
00ff 0273 | s | Execute Discrete,Plus
0100 e02a | * | Load 0x0,0x2a
0101 0273 | s | Execute Discrete,Plus
0102 4800 |H | Short_Literal 0x0
0103 0007 | | Action Break_Optional
0104 4801 |H | Short_Literal 0x1
0105 4840 |H@ | Short_Literal 0x40
0106 e214 | | Load 0x1,0x14
0107 035b | [ | Declare_Type Array,Constrained
0108 a002 | | Store_Unchecked 0x0,0x2
0109 00c6 | | Action Check_Subprogram_Elaborated
010a 00d8 | | Load_Top At_Offset_0
010b 00e5 | | Load_Encached Long_Integer_Cache
010c e02b | + | Load 0x0,0x2b
010d e02c | , | Load 0x0,0x2c
010e 4800 |H | Short_Literal 0x0
010f 0007 | | Action Break_Optional
0110 029d 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call
0112 4801 |H | Short_Literal 0x1
0113 4808 |H | Short_Literal 0x8
0114 e214 | | Load 0x1,0x14
0115 035b | [ | Declare_Type Array,Constrained
0116 a002 | | Store_Unchecked 0x0,0x2
0117 00c6 | | Action Check_Subprogram_Elaborated
0118 00d8 | | Load_Top At_Offset_0
0119 00e8 | | Load_Encached Character_Cache
011a e02d | - | Load 0x0,0x2d
011b e02e | . | Load 0x0,0x2e
011c 4800 |H | Short_Literal 0x0
011d 0007 | | Action Break_Optional
011e 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call
0120 029d 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call
0122 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call
0124 029d 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call
0126 029d 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call
0128 029d 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call
012a 029d 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call
012c 029d 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call
012e 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
0130 029d 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call
0132 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call
0134 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call
0136 029d 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call
0138 029d 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call
013a 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call
013c 029d 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call
013e 029d 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call
0140 029d 071b | | Declare_Subprogram INIT_0718,For_Outer_Call
0142 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call
0144 029d 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call
0146 029d 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call
0148 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call
014a 029d 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call
014c 029d 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call
014e 029d 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call
0150 029d 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call
0152 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call
0154 029b 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call,Unelaborated
0156 1d94 | | Execute_Immediate Reference_Lex_1,0x94
0157 00c7 | | Action Elaborate_Subprogram
0158 1d94 | | Execute_Immediate Reference_Lex_1,0x94
0159 00c6 | | Action Check_Subprogram_Elaborated
015a e008 | | Load 0x0,0x8
015b 0093 0000 | | push_full_address 0x0
015d 624e |bN | Indirect_Literal Discrete,0x3ac,{0x80000000, 0x00180000}
015e 0273 | s | Execute Discrete,Plus
015f e025 | % | Load 0x0,0x25
0160 0273 | s | Execute Discrete,Plus
0161 e02f | / | Load 0x0,0x2f
0162 0273 | s | Execute Discrete,Plus
0163 4800 |H | Short_Literal 0x0
0164 0007 | | Action Break_Optional
0165 1d94 | | Execute_Immediate Reference_Lex_1,0x94
0166 00c6 | | Action Check_Subprogram_Elaborated
0167 e010 | | Load 0x0,0x10
0168 0093 0000 | | push_full_address 0x0
016a 623d |b= | Indirect_Literal Discrete,0x3a8,{0x80000000, 0x00170000}
016b 0273 | s | Execute Discrete,Plus
016c e025 | % | Load 0x0,0x25
016d 0273 | s | Execute Discrete,Plus
016e e030 | 0 | Load 0x0,0x30
016f 0273 | s | Execute Discrete,Plus
0170 4800 |H | Short_Literal 0x0
0171 0007 | | Action Break_Optional
0172 e031 | 1 | Load 0x0,0x31
0173 012c | , | Execute Any,Size
0174 00e5 | | Load_Encached Long_Integer_Cache
0175 03f1 | | Declare_Variable Discrete,With_Value
0176 4801 |H | Short_Literal 0x1
0177 e29b | | Load 0x1,0x9b
0178 e214 | | Load 0x1,0x14
0179 035b | [ | Declare_Type Array,Constrained
017a a002 | | Store_Unchecked 0x0,0x2
017b 00c6 | | Action Check_Subprogram_Elaborated
017c 00d8 | | Load_Top At_Offset_0
017d e031 | 1 | Load 0x0,0x31
017e e032 | 2 | Load 0x0,0x32
017f e033 | 3 | Load 0x0,0x33
0180 4800 |H | Short_Literal 0x0
0181 0007 | | Action Break_Optional
0182 029d 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call
0184 029d 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call
0186 029d 089b | | Declare_Subprogram INIT_0898,For_Outer_Call
0188 e034 | 4 | Load 0x0,0x34
0189 012c | , | Execute Any,Size
018a 00e5 | | Load_Encached Long_Integer_Cache
018b 03f1 | | Declare_Variable Discrete,With_Value
018c 4801 |H | Short_Literal 0x1
018d e2a5 | | Load 0x1,0xa5
018e e214 | | Load 0x1,0x14
018f 035b | [ | Declare_Type Array,Constrained
0190 a002 | | Store_Unchecked 0x0,0x2
0191 00c6 | | Action Check_Subprogram_Elaborated
0192 00d8 | | Load_Top At_Offset_0
0193 e034 | 4 | Load 0x0,0x34
0194 e035 | 5 | Load 0x0,0x35
0195 e036 | 6 | Load 0x0,0x36
0196 4800 |H | Short_Literal 0x0
0197 0007 | | Action Break_Optional
0198 029d 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call
019a 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call
019c 029d 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call
019e 4801 |H | Short_Literal 0x1
019f 6204 |b | Indirect_Literal Discrete,0x3a4,{0x00000000, 0x00002000}
01a0 e214 | | Load 0x1,0x14
01a1 035b | [ | Declare_Type Array,Constrained
01a2 029d 090b | | Declare_Subprogram INIT_0908,For_Outer_Call
01a4 029d 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call
01a6 029d 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call
01a8 e037 | 7 | Load 0x0,0x37
01a9 012c | , | Execute Any,Size
01aa 00e3 | | Load_Encached Natural_Cache
01ab 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
01ac 4801 |H | Short_Literal 0x1
01ad e2b3 | | Load 0x1,0xb3
01ae e214 | | Load 0x1,0x14
01af 035b | [ | Declare_Type Array,Constrained
01b0 a002 | | Store_Unchecked 0x0,0x2
01b1 00c6 | | Action Check_Subprogram_Elaborated
01b2 00d8 | | Load_Top At_Offset_0
01b3 e037 | 7 | Load 0x0,0x37
01b4 e038 | 8 | Load 0x0,0x38
01b5 e039 | 9 | Load 0x0,0x39
01b6 4800 |H | Short_Literal 0x0
01b7 0007 | | Action Break_Optional
01b8 029d 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call
01ba 029d 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call
01bc 029d 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call
01be a002 | | Store_Unchecked 0x0,0x2
01bf 00c6 | | Action Check_Subprogram_Elaborated
01c0 00e5 | | Load_Encached Long_Integer_Cache
01c1 00e6 | | Load_Encached Float_Cache
01c2 e03a | : | Load 0x0,0x3a
01c3 e03b | ; | Load 0x0,0x3b
01c4 4800 |H | Short_Literal 0x0
01c5 0007 | | Action Break_Optional
01c6 a002 | | Store_Unchecked 0x0,0x2
01c7 00c6 | | Action Check_Subprogram_Elaborated
01c8 00e5 | | Load_Encached Long_Integer_Cache
01c9 e03c | < | Load 0x0,0x3c
01ca e03d | = | Load 0x0,0x3d
01cb e03e | > | Load 0x0,0x3e
01cc 4800 |H | Short_Literal 0x0
01cd 0007 | | Action Break_Optional
01ce 00e5 | | Load_Encached Long_Integer_Cache
01cf 012c | , | Execute Any,Size
01d0 e03c | < | Load 0x0,0x3c
01d1 012c | , | Execute Any,Size
01d2 027f | | Execute Discrete,Equal
01d3 7001 |p | Jump_Nonzero 0x1d5
01d4 0887 | | Execute_Immediate Raise,0x87
01d5 029d 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call
01d7 029b 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call,Unelaborated
01d9 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8
01da 00c7 | | Action Elaborate_Subprogram
01db 029b 0a73 | s| Declare_Subprogram INIT_0a70,For_Outer_Call,Unelaborated
01dd 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
01de 00c7 | | Action Elaborate_Subprogram
01df 029d 0aa3 | | Declare_Subprogram INIT_0aa0,For_Outer_Call
01e1 4800 |H | Short_Literal 0x0
01e2 4809 |H | Short_Literal 0x9
01e3 029f 0adb | | Declare_Subprogram INIT_0ad8,For_Call
01e5 03fd | | Declare_Type Discrete,Defined
01e6 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8
01e7 00c6 | | Action Check_Subprogram_Elaborated
01e8 00e2 | | Load_Encached Integer_Cache
01e9 0093 0000 | | push_full_address 0x0
01eb 61b4 |a | Indirect_Literal Discrete,0x3a0,{0x80000000, 0x000b0000}
01ec 0273 | s | Execute Discrete,Plus
01ed e025 | % | Load 0x0,0x25
01ee 0273 | s | Execute Discrete,Plus
01ef e03f | ? | Load 0x0,0x3f
01f0 0273 | s | Execute Discrete,Plus
01f1 4800 |H | Short_Literal 0x0
01f2 0007 | | Action Break_Optional
01f3 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
01f4 00c6 | | Action Check_Subprogram_Elaborated
01f5 00e2 | | Load_Encached Integer_Cache
01f6 0093 0000 | | push_full_address 0x0
01f8 61a3 |a | Indirect_Literal Discrete,0x39c,{0x80000000, 0x000a0000}
01f9 0273 | s | Execute Discrete,Plus
01fa e025 | % | Load 0x0,0x25
01fb 0273 | s | Execute Discrete,Plus
01fc e040 | @ | Load 0x0,0x40
01fd 0273 | s | Execute Discrete,Plus
01fe 4800 |H | Short_Literal 0x0
01ff 0007 | | Action Break_Optional
0200 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
0201 00c6 | | Action Check_Subprogram_Elaborated
0202 00e5 | | Load_Encached Long_Integer_Cache
0203 0093 0000 | | push_full_address 0x0
0205 6192 |a | Indirect_Literal Discrete,0x398,{0x80000000, 0x00090000}
0206 0273 | s | Execute Discrete,Plus
0207 e025 | % | Load 0x0,0x25
0208 0273 | s | Execute Discrete,Plus
0209 e041 | A | Load 0x0,0x41
020a 0273 | s | Execute Discrete,Plus
020b 4800 |H | Short_Literal 0x0
020c 0007 | | Action Break_Optional
020d 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
020e 00c6 | | Action Check_Subprogram_Elaborated
020f 00e1 | | Load_Encached Boolean_Cache
0210 0093 0000 | | push_full_address 0x0
0212 6181 |a | Indirect_Literal Discrete,0x394,{0x80000000, 0x00080000}
0213 0273 | s | Execute Discrete,Plus
0214 e025 | % | Load 0x0,0x25
0215 0273 | s | Execute Discrete,Plus
0216 e042 | B | Load 0x0,0x42
0217 0273 | s | Execute Discrete,Plus
0218 4800 |H | Short_Literal 0x0
0219 0007 | | Action Break_Optional
021a 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
021b 00c6 | | Action Check_Subprogram_Elaborated
021c 00e8 | | Load_Encached Character_Cache
021d 0093 0000 | | push_full_address 0x0
021f 6170 |ap | Indirect_Literal Discrete,0x390,{0x80000000, 0x00070000}
0220 0273 | s | Execute Discrete,Plus
0221 e025 | % | Load 0x0,0x25
0222 0273 | s | Execute Discrete,Plus
0223 e043 | C | Load 0x0,0x43
0224 0273 | s | Execute Discrete,Plus
0225 4800 |H | Short_Literal 0x0
0226 0007 | | Action Break_Optional
0227 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
0228 00c6 | | Action Check_Subprogram_Elaborated
0229 00e6 | | Load_Encached Float_Cache
022a 0093 0000 | | push_full_address 0x0
022c 615f |a_ | Indirect_Literal Discrete,0x38c,{0x80000000, 0x00060000}
022d 0273 | s | Execute Discrete,Plus
022e e025 | % | Load 0x0,0x25
022f 0273 | s | Execute Discrete,Plus
0230 e044 | D | Load 0x0,0x44
0231 0273 | s | Execute Discrete,Plus
0232 4800 |H | Short_Literal 0x0
0233 0007 | | Action Break_Optional
0234 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
0235 00c6 | | Action Check_Subprogram_Elaborated
0236 00e7 | | Load_Encached Duration_Cache
0237 0093 0000 | | push_full_address 0x0
0239 614e |aN | Indirect_Literal Discrete,0x388,{0x80000000, 0x00050000}
023a 0273 | s | Execute Discrete,Plus
023b e025 | % | Load 0x0,0x25
023c 0273 | s | Execute Discrete,Plus
023d e045 | E | Load 0x0,0x45
023e 0273 | s | Execute Discrete,Plus
023f 4800 |H | Short_Literal 0x0
0240 0007 | | Action Break_Optional
0241 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
0242 00c6 | | Action Check_Subprogram_Elaborated
0243 00e4 | | Load_Encached Positive_Cache
0244 0093 0000 | | push_full_address 0x0
0246 613d |a= | Indirect_Literal Discrete,0x384,{0x80000000, 0x00040000}
0247 0273 | s | Execute Discrete,Plus
0248 e025 | % | Load 0x0,0x25
0249 0273 | s | Execute Discrete,Plus
024a e046 | F | Load 0x0,0x46
024b 0273 | s | Execute Discrete,Plus
024c 4800 |H | Short_Literal 0x0
024d 0007 | | Action Break_Optional
024e 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9
024f 00c6 | | Action Check_Subprogram_Elaborated
0250 00e3 | | Load_Encached Natural_Cache
0251 0093 0000 | | push_full_address 0x0
0253 612c |a, | Indirect_Literal Discrete,0x380,{0x80000000, 0x00030000}
0254 0273 | s | Execute Discrete,Plus
0255 e025 | % | Load 0x0,0x25
0256 0273 | s | Execute Discrete,Plus
0257 e047 | G | Load 0x0,0x47
0258 0273 | s | Execute Discrete,Plus
0259 4800 |H | Short_Literal 0x0
025a 0007 | | Action Break_Optional
025b 00e1 | | Load_Encached Boolean_Cache
025c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
025d e048 | H | Load 0x0,0x48
025e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
025f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0260 e003 | | Load 0x0,0x3
0261 0322 | " | Declare_Variable Record
0262 4800 |H | Short_Literal 0x0
0263 e2e9 | | Load 0x1,0xe9
0264 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0265 4800 |H | Short_Literal 0x0
0266 e2e9 | | Load 0x1,0xe9
0267 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0268 e003 | | Load 0x0,0x3
0269 0322 | " | Declare_Variable Record
026a e2e9 | | Load 0x1,0xe9
026b e2ea | | Load 0x1,0xea
026c 017d | } | Execute Record,Structure_Write
026d e003 | | Load 0x0,0x3
026e 0322 | " | Declare_Variable Record
026f e2e9 | | Load 0x1,0xe9
0270 e2eb | | Load 0x1,0xeb
0271 017d | } | Execute Record,Structure_Write
0272 e003 | | Load 0x0,0x3
0273 0322 | " | Declare_Variable Record
0274 e2e9 | | Load 0x1,0xe9
0275 e2ec | | Load 0x1,0xec
0276 017d | } | Execute Record,Structure_Write
0277 e003 | | Load 0x0,0x3
0278 0322 | " | Declare_Variable Record
0279 e2e9 | | Load 0x1,0xe9
027a e2ed | | Load 0x1,0xed
027b 017d | } | Execute Record,Structure_Write
027c e003 | | Load 0x0,0x3
027d 0322 | " | Declare_Variable Record
027e e2e9 | | Load 0x1,0xe9
027f e2ee | | Load 0x1,0xee
0280 017d | } | Execute Record,Structure_Write
0281 e003 | | Load 0x0,0x3
0282 0322 | " | Declare_Variable Record
0283 e2e9 | | Load 0x1,0xe9
0284 e2ef | | Load 0x1,0xef
0285 017d | } | Execute Record,Structure_Write
0286 e003 | | Load 0x0,0x3
0287 0322 | " | Declare_Variable Record
0288 e2e9 | | Load 0x1,0xe9
0289 e2f0 | | Load 0x1,0xf0
028a 017d | } | Execute Record,Structure_Write
028b e003 | | Load 0x0,0x3
028c 0322 | " | Declare_Variable Record
028d e2e9 | | Load 0x1,0xe9
028e e2f1 | | Load 0x1,0xf1
028f 017d | } | Execute Record,Structure_Write
0290 e003 | | Load 0x0,0x3
0291 0322 | " | Declare_Variable Record
0292 e2e9 | | Load 0x1,0xe9
0293 e2f2 | | Load 0x1,0xf2
0294 017d | } | Execute Record,Structure_Write
0295 029d 0b03 | | Declare_Subprogram INIT_0b00,For_Outer_Call
0297 029d 0b13 | | Declare_Subprogram INIT_0b10,For_Outer_Call
0299 029d 0b1b | | Declare_Subprogram INIT_0b18,For_Outer_Call
029b 029d 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call
029d 029d 0b63 | c| Declare_Subprogram INIT_0b60,For_Outer_Call
029f 029d 0b73 | s| Declare_Subprogram INIT_0b70,For_Outer_Call
02a1 029d 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call
02a3 029d 0bcb | | Declare_Subprogram INIT_0bc8,For_Outer_Call
02a5 029d 0bf3 | | Declare_Subprogram INIT_0bf0,For_Outer_Call
02a7 0092 1bc4 | | Action Push_String_Extended,0x1bc4 ; " => "
02a9 0092 1bc5 | | Action Push_String_Extended,0x1bc5 ; "..."
02ab 0092 1bc6 | | Action Push_String_Extended,0x1bc6 ; " => ..., "
02ad 0092 1bc7 | | Action Push_String_Extended,0x1bc7 ; "... => ..., "
02af 0092 1bc8 | | Action Push_String_Extended,0x1bc8 ; "Value\x00not\x00readable"
02b1 0092 1bc9 | | Action Push_String_Extended,0x1bc9 ; "Field\x00not\x00initialized"
02b3 0092 1bca | | Action Push_String_Extended,0x1bca ; "Element\x00not\x00initialized"
02b5 0092 1bcb | | Action Push_String_Extended,0x1bcb ; "Null\x00string"
02b7 0092 1bcc | | Action Push_String_Extended,0x1bcc ; "Null\x00vector"
02b9 0092 1bcd | | Action Push_String_Extended,0x1bcd ; "Field\x00value\x00not\x00readable"
02bb 0092 1bce | | Action Push_String_Extended,0x1bce ; "Exception\x00raised\x00reading\x00field\x00value"
02bd 0092 1bcf | | Action Push_String_Extended,0x1bcf ; "Element\x00value\x00not\x00readable"
02bf 0092 1bd0 | | Action Push_String_Extended,0x1bd0 ; "Exception\x00raised\x00readingelement\x00value"
02c1 0092 1bd1 | | Action Push_String_Extended,0x1bd1 ; "Uninitialized\x00boolean\x00value"
02c3 0092 1bd2 | | Action Push_String_Extended,0x1bd2 ; "Uninitialized\x00character\x00value"
02c5 0092 1bd3 | | Action Push_String_Extended,0x1bd3 ; "Object\x00too\x00big"
02c7 0092 1bd4 | | Action Push_String_Extended,0x1bd4 ; "Multi-dimensional\x00array"
02c9 029d 0c03 | | Declare_Subprogram INIT_0c00,For_Outer_Call
02cb 029d 0c13 | | Declare_Subprogram INIT_0c10,For_Outer_Call
02cd 029d 0c33 | 3| Declare_Subprogram INIT_0c30,For_Outer_Call
02cf 029d 0c43 | C| Declare_Subprogram INIT_0c40,For_Outer_Call
02d1 029d 0c5b | [| Declare_Subprogram INIT_0c58,For_Outer_Call
02d3 029d 0c8b | | Declare_Subprogram INIT_0c88,For_Outer_Call
02d5 029d 0cab | | Declare_Subprogram INIT_0ca8,For_Outer_Call
02d7 029d 0cd3 | | Declare_Subprogram INIT_0cd0,For_Outer_Call
02d9 029d 0d23 | #| Declare_Subprogram INIT_0d20,For_Outer_Call
02db 029d 0d4b | K| Declare_Subprogram INIT_0d48,For_Outer_Call
02dd 029d 0d6b | k| Declare_Subprogram INIT_0d68,For_Outer_Call
02df 029d 0d93 | | Declare_Subprogram INIT_0d90,For_Outer_Call
02e1 029d 0dbb | | Declare_Subprogram INIT_0db8,For_Outer_Call
02e3 029d 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call
02e5 029d 0e73 | s| Declare_Subprogram INIT_0e70,For_Outer_Call
02e7 029d 0eab | | Declare_Subprogram INIT_0ea8,For_Outer_Call
02e9 029d 0eb3 | | Declare_Subprogram INIT_0eb0,For_Outer_Call
02eb 029d 0ecb | | Declare_Subprogram INIT_0ec8,For_Outer_Call
02ed 029d 0edb | | Declare_Subprogram INIT_0ed8,For_Outer_Call
02ef 029d 0f63 | c| Declare_Subprogram INIT_0f60,For_Outer_Call
02f1 029d 0f83 | | Declare_Subprogram INIT_0f80,For_Outer_Call
02f3 029d 0f93 | | Declare_Subprogram INIT_0f90,For_Outer_Call
02f5 029d 0fa3 | | Declare_Subprogram INIT_0fa0,For_Outer_Call
02f7 029d 0fb3 | | Declare_Subprogram INIT_0fb0,For_Outer_Call
02f9 029d 0fcb | | Declare_Subprogram INIT_0fc8,For_Outer_Call
02fb 029d 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call
02fd 0092 1bd5 | | Action Push_String_Extended,0x1bd5 ; "Inner_"
02ff 029d 0ffb | | Declare_Subprogram INIT_0ff8,For_Outer_Call
0301 029b 1013 | | Declare_Subprogram INIT_1010,For_Outer_Call,Unelaborated
0303 029b 10cb | | Declare_Subprogram INIT_10c8,For_Outer_Call,Unelaborated
0305 029b 10fb | | Declare_Subprogram INIT_10f8,For_Outer_Call,Unelaborated
0307 029b 1123 | #| Declare_Subprogram INIT_1120,For_Outer_Call,Unelaborated
0309 029b 11ab | | Declare_Subprogram INIT_11a8,For_Outer_Call,Unelaborated
030b 029b 11fb | | Declare_Subprogram INIT_11f8,For_Outer_Call,Unelaborated
030d 029b 1243 | C| Declare_Subprogram INIT_1240,For_Outer_Call,Unelaborated
030f 029b 128b | | Declare_Subprogram INIT_1288,For_Outer_Call,Unelaborated
0311 029d 12c3 | | Declare_Subprogram INIT_12c0,For_Outer_Call
0313 029d 12eb | | Declare_Subprogram INIT_12e8,For_Outer_Call
0315 029d 1313 | | Declare_Subprogram INIT_1310,For_Outer_Call
0317 029d 1373 | s| Declare_Subprogram INIT_1370,For_Outer_Call
0319 029d 13f3 | | Declare_Subprogram INIT_13f0,For_Outer_Call
031b 029d 1413 | | Declare_Subprogram INIT_1410,For_Outer_Call
031d 029d 1433 | 3| Declare_Subprogram INIT_1430,For_Outer_Call
031f 4930 |I0 | Short_Literal 0x130
0320 4801 |H | Short_Literal 0x1
0321 0099 | | Action Reference_Dynamic
0322 00c7 | | Action Elaborate_Subprogram
0323 029d 1463 | c| Declare_Subprogram INIT_1460,For_Outer_Call
0325 029b 149b | | Declare_Subprogram INIT_1498,For_Outer_Call,Unelaborated
0327 029d 14db | | Declare_Subprogram INIT_14d8,For_Outer_Call
0329 029d 150b | | Declare_Subprogram INIT_1508,For_Outer_Call
032b 029d 1573 | s| Declare_Subprogram INIT_1570,For_Outer_Call
032d 4939 |I9 | Short_Literal 0x139
032e 4801 |H | Short_Literal 0x1
032f 0099 | | Action Reference_Dynamic
0330 00c7 | | Action Elaborate_Subprogram
0331 492f |I/ | Short_Literal 0x12f
0332 4801 |H | Short_Literal 0x1
0333 0099 | | Action Reference_Dynamic
0334 00c7 | | Action Elaborate_Subprogram
0335 029d 15c3 | | Declare_Subprogram INIT_15c0,For_Outer_Call
0337 029d 15d3 | | Declare_Subprogram INIT_15d0,For_Outer_Call
0339 029d 15eb | | Declare_Subprogram INIT_15e8,For_Outer_Call
033b 029d 160b | | Declare_Subprogram INIT_1608,For_Outer_Call
033d 029d 162b | +| Declare_Subprogram INIT_1628,For_Outer_Call
033f 029d 1683 | | Declare_Subprogram INIT_1680,For_Outer_Call
0341 029d 169b | | Declare_Subprogram INIT_1698,For_Outer_Call
0343 029d 16b3 | | Declare_Subprogram INIT_16b0,For_Outer_Call
0345 029d 16f3 | | Declare_Subprogram INIT_16f0,For_Outer_Call
0347 029d 170b | | Declare_Subprogram INIT_1708,For_Outer_Call
0349 029d 172b | +| Declare_Subprogram INIT_1728,For_Outer_Call
034b 029d 1753 | S| Declare_Subprogram INIT_1750,For_Outer_Call
034d 029d 17cb | | Declare_Subprogram INIT_17c8,For_Outer_Call
034f 029d 17fb | | Declare_Subprogram INIT_17f8,For_Outer_Call
0351 029d 1843 | C| Declare_Subprogram INIT_1840,For_Outer_Call
0353 492e |I. | Short_Literal 0x12e
0354 4801 |H | Short_Literal 0x1
0355 0099 | | Action Reference_Dynamic
0356 00c7 | | Action Elaborate_Subprogram
0357 492d |I- | Short_Literal 0x12d
0358 4801 |H | Short_Literal 0x1
0359 0099 | | Action Reference_Dynamic
035a 00c7 | | Action Elaborate_Subprogram
035b 029d 1863 | c| Declare_Subprogram INIT_1860,For_Outer_Call
035d 029d 1883 | | Declare_Subprogram INIT_1880,For_Outer_Call
035f 492c |I, | Short_Literal 0x12c
0360 4801 |H | Short_Literal 0x1
0361 0099 | | Action Reference_Dynamic
0362 00c7 | | Action Elaborate_Subprogram
0363 029d 18ab | | Declare_Subprogram INIT_18a8,For_Outer_Call
0365 029d 18eb | | Declare_Subprogram INIT_18e8,For_Outer_Call
0367 492a |I* | Short_Literal 0x12a
0368 4801 |H | Short_Literal 0x1
0369 0099 | | Action Reference_Dynamic
036a 00c7 | | Action Elaborate_Subprogram
036b 492b |I+ | Short_Literal 0x12b
036c 4801 |H | Short_Literal 0x1
036d 0099 | | Action Reference_Dynamic
036e 00c7 | | Action Elaborate_Subprogram
036f 029d 1973 | s| Declare_Subprogram INIT_1970,For_Outer_Call
0371 029d 198b | | Declare_Subprogram INIT_1988,For_Outer_Call
0373 4929 |I) | Short_Literal 0x129
0374 4801 |H | Short_Literal 0x1
0375 0099 | | Action Reference_Dynamic
0376 00c7 | | Action Elaborate_Subprogram
0377 029d 19bb | | Declare_Subprogram INIT_19b8,For_Outer_Call
0379 1d0d | | Execute_Immediate Reference_Lex_1,0xd
037a 00c7 | | Action Elaborate_Subprogram
037b 029d 19f3 | | Declare_Subprogram INIT_19f0,For_Outer_Call
037d BODY_0008:
037d 8353 | S | Call 0x1,0x153
037e 00bc | | Action Signal_Activated
037f 00bb | | Action Signal_Completion
0380 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
0384 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
0388 8000 0000 | | .LITERAL {0x80000000, 0x00050000}
038c 8000 0000 | | .LITERAL {0x80000000, 0x00060000}
0390 8000 0000 | | .LITERAL {0x80000000, 0x00070000}
0394 8000 0000 | | .LITERAL {0x80000000, 0x00080000}
0398 8000 0000 | | .LITERAL {0x80000000, 0x00090000}
039c 8000 0000 | | .LITERAL {0x80000000, 0x000a0000}
03a0 8000 0000 | | .LITERAL {0x80000000, 0x000b0000}
03a4 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
03a8 8000 0000 | | .LITERAL {0x80000000, 0x00170000}
03ac 8000 0000 | | .LITERAL {0x80000000, 0x00180000}
03b0 8000 0000 | | .LITERAL {0x80000000, 0x001d0000}
03b4 8000 0000 | | .LITERAL {0x80000000, 0x001e0000}
03b8 8000 0000 | | .LITERAL {0x80000000, 0x00200000}
03bc 0000 0000 | | .LITERAL {0x00000000, 0x000fffff}
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03cc | | .CONST 0x03cc ; Address of begin
03c1 03e9 | | .CONST 0x03e9 ; Address of exception handler
03c2 0003 | | .CONST 0x0003 ; Number of locals
03c3 INIT_03c0:
03c3 e5ff | | Load 0x2,-0x1
03c4 e049 | I | Load 0x0,0x49
03c5 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
03c6 e5fe | | Load 0x2,-0x2
03c7 831e | | Call 0x1,0x11e
03c8 e5f9 | | Load 0x2,-0x7
03c9 830e | | Call 0x1,0x10e
03ca 01cc | | Execute Vector,Catenate
03cb 0007 | | Action Break_Optional
03cc BODY_03c0:
03cc e402 | | Load 0x2,0x2
03cd 82fb | | Call 0x1,0xfb
03ce 6815 |h | Jump_Zero 0x3e4
03cf 00d8 | | Load_Top At_Offset_0
03d0 e402 | | Load 0x2,0x2
03d1 e049 | I | Load 0x0,0x49
03d2 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
03d3 011c | | Execute Any,Convert_Unchecked
03d4 1c01 | | Execute_Immediate Run_Utility,0x1
03d5 01cc | | Execute Vector,Catenate
03d6 0092 1bd6 | | Action Push_String_Extended,0x1bd6 ; " = "
03d8 01cc | | Execute Vector,Catenate
03d9 e5f9 | | Load 0x2,-0x7
03da e402 | | Load 0x2,0x2
03db e5fa | | Load 0x2,-0x6
03dc e5fb | | Load 0x2,-0x5
03dd e5fc | | Load 0x2,-0x4
03de e5fd | | Load 0x2,-0x3
03df e5ff | | Load 0x2,-0x1
03e0 8352 | R | Call 0x1,0x152
03e1 8320 | | Call 0x1,0x120
03e2 01cc | | Execute Vector,Catenate
03e3 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
03e4 e5f9 | | Load 0x2,-0x7
03e5 e5fe | | Load 0x2,-0x2
03e6 e5ff | | Load 0x2,-0x1
03e7 8321 | ! | Call 0x1,0x121
03e8 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
03e9 TRAP_03c0:
03e9 4884 |H | Short_Literal 0x84
03ea 010f | | Execute Exception,Equal
03eb 6805 |h | Jump_Zero 0x3f1
03ec e403 | | Load 0x2,0x3
03ed 0092 1bd7 | | Action Push_String_Extended,0x1bd7 ; "Value not readable"
03ef 01cc | | Execute Vector,Catenate
03f0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
03f1 e403 | | Load 0x2,0x3
03f2 0092 1bd8 | | Action Push_String_Extended,0x1bd8 ; "Exception raised: "
03f4 01cc | | Execute Vector,Catenate
03f5 e04a | J | Load 0x0,0x4a
03f6 180d | | Execute Package,Field_Execute,Field_Number 0xd
03f7 01cc | | Execute Vector,Catenate
03f8 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
03f9 0000 0000 | | .BLANK 0000[0x7]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 040d | | .CONST 0x040d ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0002 | | .CONST 0x0002 ; Number of locals
0403 INIT_0400:
0403 4800 |H | Short_Literal 0x0
0404 e5ff | | Load 0x2,-0x1
0405 01db | | Execute Vector,Length
0406 0aff | | Execute_Immediate Plus,-0x1
0407 e214 | | Load 0x1,0x14
0408 035b | [ | Declare_Type Array,Constrained
0409 0337 | 7 | Declare_Variable Array
040a e5ff | | Load 0x2,-0x1
040b e402 | | Load 0x2,0x2
040c 01d4 | | Execute Vector,Structure_Write
040d BODY_0400:
040d 00d8 | | Load_Top At_Offset_0
040e e214 | | Load 0x1,0x14
040f 01c6 | | Execute Vector,Convert_To_Formal
0410 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0411 0000 0000 | | .BLANK 0000[0x7]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0421 | ! | .CONST 0x0421 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0003 | | .CONST 0x0003 ; Number of locals
041b INIT_0418:
041b e22c | , | Load 0x1,0x2c
041c 0337 | 7 | Declare_Variable Array
041d e5ff | | Load 0x2,-0x1
041e 01db | | Execute Vector,Length
041f 00e3 | | Load_Encached Natural_Cache
0420 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0421 BODY_0418:
0421 00d8 | | Load_Top At_Offset_0
0422 e221 | ! | Load 0x1,0x21
0423 027f | | Execute Discrete,Equal
0424 6804 |h | Jump_Zero 0x429
0425 e5ff | | Load 0x2,-0x1
0426 e402 | | Load 0x2,0x2
0427 01d4 | | Execute Vector,Structure_Write
0428 7822 |x" | Jump 0x44b
0429 00d8 | | Load_Top At_Offset_0
042a e221 | ! | Load 0x1,0x21
042b 027c | | | Execute Discrete,Less
042c 7001 |p | Jump_Nonzero 0x42e
042d 0887 | | Execute_Immediate Raise,0x87
042e e402 | | Load 0x2,0x2
042f 00d8 | | Load_Top At_Offset_0
0430 0335 | 5 | Declare_Variable Array,Duplicate
0431 00cd | | Action Spare6_Action
0432 e404 | | Load 0x2,0x4
0433 01d9 | | Execute Vector,Reverse_Bounds
0434 0263 | c | Execute Discrete,Above_Bound
0435 7005 |p | Jump_Nonzero 0x43b
0436 4800 |H | Short_Literal 0x0
0437 e407 | | Load 0x2,0x7
0438 e405 | | Load 0x2,0x5
0439 01d6 | | Execute Vector,Field_Write
043a 3ffb |? | Loop_Increasing 0x436
043b 00cd | | Action Spare6_Action
043c e402 | | Load 0x2,0x2
043d 01d4 | | Execute Vector,Structure_Write
043e e5ff | | Load 0x2,-0x1
043f e221 | ! | Load 0x1,0x21
0440 e403 | | Load 0x2,0x3
0441 0272 | r | Execute Discrete,Minus
0442 0a01 | | Execute_Immediate Plus,0x1
0443 00d8 | | Load_Top At_Offset_0
0444 00e5 | | Load_Encached Long_Integer_Cache
0445 0260 | ` | Execute Discrete,In_Type
0446 7001 |p | Jump_Nonzero 0x448
0447 0801 | | Execute_Immediate Raise,0x1
0448 e221 | ! | Load 0x1,0x21
0449 e402 | | Load 0x2,0x2
044a 01ce | | Execute Vector,Slice_Write
044b e402 | | Load 0x2,0x2
044c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
044d 0000 0000 | | .XXX[0x3]
044f 0000 | |
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 e5ff | | Load 0x2,-0x1
0454 01db | | Execute Vector,Length
0455 e221 | ! | Load 0x1,0x21
0456 027a | z | Execute Discrete,Less_Equal
0457 7001 |p | Jump_Nonzero 0x459
0458 0887 | | Execute_Immediate Raise,0x87
0459 e5ff | | Load 0x2,-0x1
045a 8232 | 2 | Call 0x1,0x32
045b e22d | - | Load 0x1,0x2d
045c e22e | . | Load 0x1,0x2e
045d 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
045e 8002 | | Call 0x0,0x2
045f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0468 | h | .CONST 0x0468 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0002 | | .CONST 0x0002 ; Number of locals
0463 INIT_0460:
0463 e235 | 5 | Load 0x1,0x35
0464 0337 | 7 | Declare_Variable Array
0465 e5ff | | Load 0x2,-0x1
0466 e402 | | Load 0x2,0x2
0467 01d4 | | Execute Vector,Structure_Write
0468 BODY_0460:
0468 00d8 | | Load_Top At_Offset_0
0469 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
046a 0000 0000 | | .BLANK 0000[0x6]
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 e5ff | | Load 0x2,-0x1
0474 01db | | Execute Vector,Length
0475 e234 | 4 | Load 0x1,0x34
0476 027f | | Execute Discrete,Equal
0477 7001 |p | Jump_Nonzero 0x479
0478 0887 | | Execute_Immediate Raise,0x87
0479 e5ff | | Load 0x2,-0x1
047a 823b | ; | Call 0x1,0x3b
047b e236 | 6 | Load 0x1,0x36
047c e237 | 7 | Load 0x1,0x37
047d 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
047e 8002 | | Call 0x0,0x2
047f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483 | | .CONST 0x0483 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0001 | | .CONST 0x0001 ; Number of locals
0483 BODY_0480:
0483 INIT_0480:
0483 e5ff | | Load 0x2,-0x1
0484 e21c | | Load 0x1,0x1c
0485 e21d | | Load 0x1,0x1d
0486 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0487 8002 | | Call 0x0,0x2
0488 00d8 | | Load_Top At_Offset_0
0489 e213 | | Load 0x1,0x13
048a 0260 | ` | Execute Discrete,In_Type
048b 7001 |p | Jump_Nonzero 0x48d
048c 0801 | | Execute_Immediate Raise,0x1
048d e5fe | | Load 0x2,-0x2
048e 0273 | s | Execute Discrete,Plus
048f 00d8 | | Load_Top At_Offset_0
0490 e210 | | Load 0x1,0x10
0491 0260 | ` | Execute Discrete,In_Type
0492 7001 |p | Jump_Nonzero 0x494
0493 0801 | | Execute_Immediate Raise,0x1
0494 e217 | | Load 0x1,0x17
0495 e218 | | Load 0x1,0x18
0496 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0497 8002 | | Call 0x0,0x2
0498 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0499 0000 0000 | | .BLANK 0000[0x7]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 e5ff | | Load 0x2,-0x1
04a4 e227 | ' | Load 0x1,0x27
04a5 e228 | ( | Load 0x1,0x28
04a6 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
04a7 8002 | | Call 0x0,0x2
04a8 e5fe | | Load 0x2,-0x2
04a9 0273 | s | Execute Discrete,Plus
04aa 00d8 | | Load_Top At_Offset_0
04ab e009 | | Load 0x0,0x9
04ac 0260 | ` | Execute Discrete,In_Type
04ad 7001 |p | Jump_Nonzero 0x4af
04ae 0801 | | Execute_Immediate Raise,0x1
04af e222 | " | Load 0x1,0x22
04b0 e223 | # | Load 0x1,0x23
04b1 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
04b2 8002 | | Call 0x0,0x2
04b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04b4 0000 0000 | | .BLANK 0000[0x4]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04d7 | | .CONST 0x04d7 ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 0005 | | .CONST 0x0005 ; Number of locals
04bb INIT_04b8:
04bb e5ff | | Load 0x2,-0x1
04bc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
04bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04be e048 | H | Load 0x0,0x48
04bf 1b15 | | Execute Package,Field_Read,Field_Number 0x15
04c0 03f1 | | Declare_Variable Discrete,With_Value
04c1 e003 | | Load 0x0,0x3
04c2 0322 | " | Declare_Variable Record
04c3 e5fe | | Load 0x2,-0x2
04c4 e5ff | | Load 0x2,-0x1
04c5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
04c6 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
04c7 8247 | G | Call 0x1,0x47
04c8 e403 | | Load 0x2,0x3
04c9 017d | } | Execute Record,Structure_Write
04ca 00d8 | | Load_Top At_Offset_0
04cb e21c | | Load 0x1,0x1c
04cc e21d | | Load 0x1,0x1d
04cd 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
04ce 8002 | | Call 0x0,0x2
04cf e402 | | Load 0x2,0x2
04d0 e049 | I | Load 0x0,0x49
04d1 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04d2 e048 | H | Load 0x0,0x48
04d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d4 03f1 | | Declare_Variable Discrete,With_Value
04d5 029f 1a33 | 3| Declare_Subprogram INIT_1a30,For_Call
04d7 BODY_04b8:
04d7 00cf | | Action Mark_Auxiliary
04d8 4803 |H | Short_Literal 0x3
04d9 4801 |H | Short_Literal 0x1
04da 0007 | | Action Break_Optional
04db 8405 | | Call 0x2,0x5
04dc 00c8 | | Action Pop_Auxiliary_Range
04dd 3ffd |? | Loop_Increasing 0x4db
04de 00ce | | Action Pop_Auxiliary
04df 4884 |H | Short_Literal 0x84
04e0 0257 | W | Execute Discrete,Raise
04e1 0000 0000 | | .BLANK 0000[0x7]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04ed | | .CONST 0x04ed ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0002 | | .CONST 0x0002 ; Number of locals
04eb INIT_04e8:
04eb e018 | | Load 0x0,0x18
04ec 0322 | " | Declare_Variable Record
04ed BODY_04e8:
04ed 4fff |O | Short_Literal -0x1
04ee 00d8 | | Load_Top At_Offset_0
04ef e213 | | Load 0x1,0x13
04f0 0260 | ` | Execute Discrete,In_Type
04f1 7001 |p | Jump_Nonzero 0x4f3
04f2 0801 | | Execute_Immediate Raise,0x1
04f3 e5ff | | Load 0x2,-0x1
04f4 8260 | ` | Call 0x1,0x60
04f5 e249 | I | Load 0x1,0x49
04f6 e24a | J | Load 0x1,0x4a
04f7 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
04f8 8002 | | Call 0x0,0x2
04f9 e402 | | Load 0x2,0x2
04fa 017d | } | Execute Record,Structure_Write
04fb 00d8 | | Load_Top At_Offset_0
04fc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04fd 6801 |h | Jump_Zero 0x4ff
04fe 0887 | | Execute_Immediate Raise,0x87
04ff 00d8 | | Load_Top At_Offset_0
0500 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0501 0000 0000 | | .BLANK 0000[0x7]
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 e5fe | | Load 0x2,-0x2
050c 00d8 | | Load_Top At_Offset_0
050d e213 | | Load 0x1,0x13
050e 0260 | ` | Execute Discrete,In_Type
050f 7001 |p | Jump_Nonzero 0x511
0510 0801 | | Execute_Immediate Raise,0x1
0511 e5ff | | Load 0x2,-0x1
0512 8260 | ` | Call 0x1,0x60
0513 e24e | N | Load 0x1,0x4e
0514 e24f | O | Load 0x1,0x4f
0515 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
0516 8002 | | Call 0x0,0x2
0517 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b e5fe | | Load 0x2,-0x2
051c 0901 | | Execute_Immediate Binary_Scale,0x1
051d 0a01 | | Execute_Immediate Plus,0x1
051e 00d8 | | Load_Top At_Offset_0
051f e213 | | Load 0x1,0x13
0520 0260 | ` | Execute Discrete,In_Type
0521 7001 |p | Jump_Nonzero 0x523
0522 0801 | | Execute_Immediate Raise,0x1
0523 e5ff | | Load 0x2,-0x1
0524 8260 | ` | Call 0x1,0x60
0525 e253 | S | Load 0x1,0x53
0526 e254 | T | Load 0x1,0x54
0527 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
0528 8002 | | Call 0x0,0x2
0529 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
052a 0000 0000 | | .BLANK 0000[0x6]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533 | 3 | .CONST 0x0533 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0001 | | .CONST 0x0001 ; Number of locals
0533 BODY_0530:
0533 INIT_0530:
0533 e5fe | | Load 0x2,-0x2
0534 0901 | | Execute_Immediate Binary_Scale,0x1
0535 00d8 | | Load_Top At_Offset_0
0536 e213 | | Load 0x1,0x13
0537 0260 | ` | Execute Discrete,In_Type
0538 7001 |p | Jump_Nonzero 0x53a
0539 0801 | | Execute_Immediate Raise,0x1
053a e5ff | | Load 0x2,-0x1
053b 8260 | ` | Call 0x1,0x60
053c e258 | X | Load 0x1,0x58
053d e259 | Y | Load 0x1,0x59
053e 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
053f 8002 | | Call 0x0,0x2
0540 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0541 0000 0000 | | .BLANK 0000[0x7]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0553 | S | .CONST 0x0553 ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0006 | | .CONST 0x0006 ; Number of locals
054b INIT_0548:
054b a002 | | Store_Unchecked 0x0,0x2
054c 00c6 | | Action Check_Subprogram_Elaborated
054d e20f | | Load 0x1,0xf
054e e5fe | | Load 0x2,-0x2
054f e04b | K | Load 0x0,0x4b
0550 e04c | L | Load 0x0,0x4c
0551 4806 |H | Short_Literal 0x6
0552 0007 | | Action Break_Optional
0553 BODY_0548:
0553 e5fc | | Load 0x2,-0x4
0554 e5fd | | Load 0x2,-0x3
0555 8260 | ` | Call 0x1,0x60
0556 e402 | | Load 0x2,0x2
0557 e403 | | Load 0x2,0x3
0558 4804 |H | Short_Literal 0x4
0559 4802 |H | Short_Literal 0x2
055a 0099 | | Action Reference_Dynamic
055b 8002 | | Call 0x0,0x2
055c e5fe | | Load 0x2,-0x2
055d 011d | | Execute Any,Convert_To_Formal
055e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
055f 0000 | | .XXX[0x1]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 057a | z | .CONST 0x057a ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0004 | | .CONST 0x0004 ; Number of locals
0563 INIT_0560:
0563 e26c | l | Load 0x1,0x6c
0564 0337 | 7 | Declare_Variable Array
0565 00d8 | | Load_Top At_Offset_0
0566 0335 | 5 | Declare_Variable Array,Duplicate
0567 00cd | | Action Spare6_Action
0568 4840 |H@ | Short_Literal 0x40
0569 4801 |H | Short_Literal 0x1
056a 4800 |H | Short_Literal 0x0
056b e405 | | Load 0x2,0x5
056c e403 | | Load 0x2,0x3
056d 01d6 | | Execute Vector,Field_Write
056e 3ffb |? | Loop_Increasing 0x56a
056f e402 | | Load 0x2,0x2
0570 01d4 | | Execute Vector,Structure_Write
0571 e5ff | | Load 0x2,-0x1
0572 01db | | Execute Vector,Length
0573 00e5 | | Load_Encached Long_Integer_Cache
0574 03f1 | | Declare_Variable Discrete,With_Value
0575 00d8 | | Load_Top At_Offset_0
0576 0d41 | A | Execute_Immediate Less,0x41
0577 7001 |p | Jump_Nonzero 0x579
0578 0887 | | Execute_Immediate Raise,0x87
0579 00e5 | | Load_Encached Long_Integer_Cache
057a BODY_0560:
057a e403 | | Load 0x2,0x3
057b 7002 |p | Jump_Nonzero 0x57e
057c 4800 |H | Short_Literal 0x0
057d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
057e e5ff | | Load 0x2,-0x1
057f 4840 |H@ | Short_Literal 0x40
0580 e403 | | Load 0x2,0x3
0581 0272 | r | Execute Discrete,Minus
0582 0a01 | | Execute_Immediate Plus,0x1
0583 4840 |H@ | Short_Literal 0x40
0584 e402 | | Load 0x2,0x2
0585 01ce | | Execute Vector,Slice_Write
0586 e402 | | Load 0x2,0x2
0587 e26d | m | Load 0x1,0x6d
0588 e26e | n | Load 0x1,0x6e
0589 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f
058a 8002 | | Call 0x0,0x2
058b a404 | | Store_Unchecked 0x2,0x4
058c 00d8 | | Load_Top At_Offset_0
058d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
058e 0000 0000 | | .XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0598 | | .CONST 0x0598 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0002 | | .CONST 0x0002 ; Number of locals
0593 INIT_0590:
0593 e273 | s | Load 0x1,0x73
0594 0337 | 7 | Declare_Variable Array
0595 e5ff | | Load 0x2,-0x1
0596 e402 | | Load 0x2,0x2
0597 01d4 | | Execute Vector,Structure_Write
0598 BODY_0590:
0598 00d8 | | Load_Top At_Offset_0
0599 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
059a 0000 0000 | | .BLANK 0000[0x6]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a3 | | .CONST 0x05a3 ; Address of begin
05a1 05af | | .CONST 0x05af ; Address of exception handler
05a2 0001 | | .CONST 0x0001 ; Number of locals
05a3 BODY_05a0:
05a3 INIT_05a0:
05a3 e5ff | | Load 0x2,-0x1
05a4 01db | | Execute Vector,Length
05a5 0f08 | | Execute_Immediate Equal,0x8
05a6 7001 |p | Jump_Nonzero 0x5a8
05a7 0887 | | Execute_Immediate Raise,0x87
05a8 e5ff | | Load 0x2,-0x1
05a9 8279 | y | Call 0x1,0x79
05aa e274 | t | Load 0x1,0x74
05ab e275 | u | Load 0x1,0x75
05ac 1d76 | v | Execute_Immediate Reference_Lex_1,0x76
05ad 8002 | | Call 0x0,0x2
05ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05af TRAP_05a0:
05af 010d | | Execute Exception,Is_Numeric_Error
05b0 6802 |h | Jump_Zero 0x5b3
05b1 4800 |H | Short_Literal 0x0
05b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05b3 0100 | | Execute Exception,Raise
05b4 0000 0000 | | .BLANK 0000[0x4]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e5ff | | Load 0x2,-0x1
05bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05bd 7009 |p | Jump_Nonzero 0x5c7
05be e5ff | | Load 0x2,-0x1
05bf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05c0 7004 |p | Jump_Nonzero 0x5c5
05c1 e5ff | | Load 0x2,-0x1
05c2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05c3 0f00 | | Execute_Immediate Equal,0x0
05c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05c5 4800 |H | Short_Literal 0x0
05c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05c7 4800 |H | Short_Literal 0x0
05c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05c9 0000 0000 | | .BLANK 0000[0x7]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05de | | .CONST 0x05de ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0003 | | .CONST 0x0003 ; Number of locals
05d3 INIT_05d0:
05d3 e5ff | | Load 0x2,-0x1
05d4 e20e | | Load 0x1,0xe
05d5 180e | | Execute Package,Field_Execute,Field_Number 0xe
05d6 e048 | H | Load 0x0,0x48
05d7 1b15 | | Execute Package,Field_Read,Field_Number 0x15
05d8 03f1 | | Declare_Variable Discrete,With_Value
05d9 e5ff | | Load 0x2,-0x1
05da e20e | | Load 0x1,0xe
05db 180f | | Execute Package,Field_Execute,Field_Number 0xf
05dc e009 | | Load 0x0,0x9
05dd 03f1 | | Declare_Variable Discrete,With_Value
05de BODY_05d0:
05de 00d8 | | Load_Top At_Offset_0
05df e5fe | | Load 0x2,-0x2
05e0 00d8 | | Load_Top At_Offset_0
05e1 e009 | | Load 0x0,0x9
05e2 0260 | ` | Execute Discrete,In_Type
05e3 7001 |p | Jump_Nonzero 0x5e5
05e4 0801 | | Execute_Immediate Raise,0x1
05e5 0273 | s | Execute Discrete,Plus
05e6 00d8 | | Load_Top At_Offset_0
05e7 e009 | | Load 0x0,0x9
05e8 0260 | ` | Execute Discrete,In_Type
05e9 7001 |p | Jump_Nonzero 0x5eb
05ea 0801 | | Execute_Immediate Raise,0x1
05eb e402 | | Load 0x2,0x2
05ec e20e | | Load 0x1,0xe
05ed 180d | | Execute Package,Field_Execute,Field_Number 0xd
05ee 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05ef 0000 | | .XXX[0x1]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05fe | | .CONST 0x05fe ; Address of begin
05f1 0004 | | .CONST 0x0004 ; Address of exception handler
05f2 0003 | | .CONST 0x0003 ; Number of locals
05f3 INIT_05f0:
05f3 e5ff | | Load 0x2,-0x1
05f4 e20e | | Load 0x1,0xe
05f5 180e | | Execute Package,Field_Execute,Field_Number 0xe
05f6 e048 | H | Load 0x0,0x48
05f7 1b15 | | Execute Package,Field_Read,Field_Number 0x15
05f8 03f1 | | Declare_Variable Discrete,With_Value
05f9 e5ff | | Load 0x2,-0x1
05fa e20e | | Load 0x1,0xe
05fb 180f | | Execute Package,Field_Execute,Field_Number 0xf
05fc e009 | | Load 0x0,0x9
05fd 03f1 | | Declare_Variable Discrete,With_Value
05fe BODY_05f0:
05fe 00d8 | | Load_Top At_Offset_0
05ff 600c |` | Indirect_Literal Discrete,0x60c,{0x00000000, 0x00002000}
0600 0273 | s | Execute Discrete,Plus
0601 00d8 | | Load_Top At_Offset_0
0602 e009 | | Load 0x0,0x9
0603 0260 | ` | Execute Discrete,In_Type
0604 7001 |p | Jump_Nonzero 0x606
0605 0801 | | Execute_Immediate Raise,0x1
0606 e402 | | Load 0x2,0x2
0607 e20e | | Load 0x1,0xe
0608 180d | | Execute Package,Field_Execute,Field_Number 0xd
0609 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
060a 0000 0000 | | .XXX[0x2]
060c 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613 | | .CONST 0x0613 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0001 | | .CONST 0x0001 ; Number of locals
0613 BODY_0610:
0613 INIT_0610:
0613 e5fe | | Load 0x2,-0x2
0614 e227 | ' | Load 0x1,0x27
0615 e228 | ( | Load 0x1,0x28
0616 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0617 8002 | | Call 0x0,0x2
0618 e5ff | | Load 0x2,-0x1
0619 e20e | | Load 0x1,0xe
061a 180d | | Execute Package,Field_Execute,Field_Number 0xd
061b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
061c 0000 0000 | | .BLANK 0000[0x4]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 062b | + | .CONST 0x062b ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0002 | | .CONST 0x0002 ; Number of locals
0623 INIT_0620:
0623 e008 | | Load 0x0,0x8
0624 0322 | " | Declare_Variable Record
0625 e5fe | | Load 0x2,-0x2
0626 e5ff | | Load 0x2,-0x1
0627 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0628 8248 | H | Call 0x1,0x48
0629 e402 | | Load 0x2,0x2
062a 017d | } | Execute Record,Structure_Write
062b BODY_0620:
062b 00d8 | | Load_Top At_Offset_0
062c e5ff | | Load 0x2,-0x1
062d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
062e 827e | ~ | Call 0x1,0x7e
062f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 063a | : | .CONST 0x063a ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0002 | | .CONST 0x0002 ; Number of locals
0633 INIT_0630:
0633 e5fe | | Load 0x2,-0x2
0634 e227 | ' | Load 0x1,0x27
0635 e228 | ( | Load 0x1,0x28
0636 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0637 8002 | | Call 0x0,0x2
0638 e009 | | Load 0x0,0x9
0639 03f1 | | Declare_Variable Discrete,With_Value
063a BODY_0630:
063a 00d8 | | Load_Top At_Offset_0
063b 7002 |p | Jump_Nonzero 0x63e
063c 4800 |H | Short_Literal 0x0
063d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
063e 00d8 | | Load_Top At_Offset_0
063f e5ff | | Load 0x2,-0x1
0640 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0641 827f | | Call 0x1,0x7f
0642 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0643 0000 0000 | | .BLANK 0000[0x5]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b 4800 |H | Short_Literal 0x0
064c e5ff | | Load 0x2,-0x1
064d 827f | | Call 0x1,0x7f
064e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
064f 0000 | | .XXX[0x1]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 e5ff | | Load 0x2,-0x1
0654 0b38 | 8 | Execute_Immediate Case_Compare,0x38
0655 7003 |p | Jump_Nonzero 0x659
0656 0f10 | | Execute_Immediate Equal,0x10
0657 7009 |p | Jump_Nonzero 0x661
0658 0887 | | Execute_Immediate Raise,0x87
0659 00d1 | | Pop_Control Pop_Count_1
065a e5fd | | Load 0x2,-0x3
065b e242 | B | Load 0x1,0x42
065c e243 | C | Load 0x1,0x43
065d 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
065e 8002 | | Call 0x0,0x2
065f 8281 | | Call 0x1,0x81
0660 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0661 e5fd | | Load 0x2,-0x3
0662 00d8 | | Load_Top At_Offset_0
0663 e009 | | Load 0x0,0x9
0664 0260 | ` | Execute Discrete,In_Type
0665 7001 |p | Jump_Nonzero 0x667
0666 0801 | | Execute_Immediate Raise,0x1
0667 e5fe | | Load 0x2,-0x2
0668 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0669 827f | | Call 0x1,0x7f
066a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
066b 0000 0000 | | .BLANK 0000[0x5]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673 | s | .CONST 0x0673 ; Address of begin
0671 0004 | | .CONST 0x0004 ; Address of exception handler
0672 0001 | | .CONST 0x0001 ; Number of locals
0673 BODY_0670:
0673 INIT_0670:
0673 e5ff | | Load 0x2,-0x1
0674 827b | { | Call 0x1,0x7b
0675 6802 |h | Jump_Zero 0x678
0676 4800 |H | Short_Literal 0x0
0677 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0678 e5ff | | Load 0x2,-0x1
0679 e5fe | | Load 0x2,-0x2
067a e049 | I | Load 0x0,0x49
067b 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
067c 827e | ~ | Call 0x1,0x7e
067d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
067e 0000 0000 | | .XXX[0x2]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0687 | | .CONST 0x0687 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0003 | | .CONST 0x0003 ; Number of locals
0683 INIT_0680:
0683 e008 | | Load 0x0,0x8
0684 0322 | " | Declare_Variable Record
0685 e010 | | Load 0x0,0x10
0686 0322 | " | Declare_Variable Record
0687 BODY_0680:
0687 e5ff | | Load 0x2,-0x1
0688 01db | | Execute Vector,Length
0689 e234 | 4 | Load 0x1,0x34
068a 027f | | Execute Discrete,Equal
068b 680f |h | Jump_Zero 0x69b
068c e5ff | | Load 0x2,-0x1
068d 823c | < | Call 0x1,0x3c
068e e403 | | Load 0x2,0x3
068f 017d | } | Execute Record,Structure_Write
0690 00d8 | | Load_Top At_Offset_0
0691 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0692 7005 |p | Jump_Nonzero 0x698
0693 e5fe | | Load 0x2,-0x2
0694 e403 | | Load 0x2,0x3
0695 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0696 8283 | | Call 0x1,0x83
0697 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0698 00d8 | | Load_Top At_Offset_0
0699 8281 | | Call 0x1,0x81
069a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
069b e5ff | | Load 0x2,-0x1
069c 8233 | 3 | Call 0x1,0x33
069d e402 | | Load 0x2,0x2
069e 017d | } | Execute Record,Structure_Write
069f e5fe | | Load 0x2,-0x2
06a0 e402 | | Load 0x2,0x2
06a1 8283 | | Call 0x1,0x83
06a2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06a3 0000 0000 | | .BLANK 0000[0x5]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06ac | | .CONST 0x06ac ; Address of begin
06a9 0004 | | .CONST 0x0004 ; Address of exception handler
06aa 0002 | | .CONST 0x0002 ; Number of locals
06ab INIT_06a8:
06ab 00e5 | | Load_Encached Long_Integer_Cache
06ac BODY_06a8:
06ac e5ff | | Load 0x2,-0x1
06ad 0b38 | 8 | Execute_Immediate Case_Compare,0x38
06ae 7003 |p | Jump_Nonzero 0x6b2
06af 0f10 | | Execute_Immediate Equal,0x10
06b0 7006 |p | Jump_Nonzero 0x6b7
06b1 0887 | | Execute_Immediate Raise,0x87
06b2 00d1 | | Pop_Control Pop_Count_1
06b3 e5fc | | Load 0x2,-0x4
06b4 e5fd | | Load 0x2,-0x3
06b5 8284 | | Call 0x1,0x84
06b6 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
06b7 e5fd | | Load 0x2,-0x3
06b8 8272 | r | Call 0x1,0x72
06b9 a402 | | Store_Unchecked 0x2,0x2
06ba 00d8 | | Load_Top At_Offset_0
06bb 7002 |p | Jump_Nonzero 0x6be
06bc 4800 |H | Short_Literal 0x0
06bd 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
06be 00d8 | | Load_Top At_Offset_0
06bf 00d8 | | Load_Top At_Offset_0
06c0 e009 | | Load 0x0,0x9
06c1 0260 | ` | Execute Discrete,In_Type
06c2 7001 |p | Jump_Nonzero 0x6c4
06c3 0801 | | Execute_Immediate Raise,0x1
06c4 e5fe | | Load 0x2,-0x2
06c5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
06c6 827f | | Call 0x1,0x7f
06c7 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb | | .CONST 0x06cb ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0001 | | .CONST 0x0001 ; Number of locals
06cb BODY_06c8:
06cb INIT_06c8:
06cb e5fe | | Load 0x2,-0x2
06cc 0aff | | Execute_Immediate Plus,-0x1
06cd e5ff | | Load 0x2,-0x1
06ce 0273 | s | Execute Discrete,Plus
06cf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3 | | .CONST 0x06d3 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0001 | | .CONST 0x0001 ; Number of locals
06d3 BODY_06d0:
06d3 INIT_06d0:
06d3 e5fe | | Load 0x2,-0x2
06d4 6805 |h | Jump_Zero 0x6da
06d5 e5ff | | Load 0x2,-0x1
06d6 0d4f | O | Execute_Immediate Less,0x4f
06d7 6802 |h | Jump_Zero 0x6da
06d8 484f |HO | Short_Literal 0x4f
06d9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06da e5ff | | Load 0x2,-0x1
06db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06dc 0000 0000 | | .BLANK 0000[0x4]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3 | | .CONST 0x06e3 ; Address of begin
06e1 06e7 | | .CONST 0x06e7 ; Address of exception handler
06e2 0001 | | .CONST 0x0001 ; Number of locals
06e3 BODY_06e0:
06e3 INIT_06e0:
06e3 e5ff | | Load 0x2,-0x1
06e4 e5fe | | Load 0x2,-0x2
06e5 0273 | s | Execute Discrete,Plus
06e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06e7 TRAP_06e0:
06e7 010d | | Execute Exception,Is_Numeric_Error
06e8 6802 |h | Jump_Zero 0x6eb
06e9 6002 |` | Indirect_Literal Discrete,0x6ec,{0x7fffffff, 0xffffffff}
06ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06eb 0100 | | Execute Exception,Raise
06ec 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 0702 | | .CONST 0x0702 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0003 | | .CONST 0x0003 ; Number of locals
06f3 INIT_06f0:
06f3 e5fd | | Load 0x2,-0x3
06f4 00d8 | | Load_Top At_Offset_0
06f5 00e3 | | Load_Encached Natural_Cache
06f6 0260 | ` | Execute Discrete,In_Type
06f7 7001 |p | Jump_Nonzero 0x6f9
06f8 0801 | | Execute_Immediate Raise,0x1
06f9 e5ff | | Load 0x2,-0x1
06fa 8288 | | Call 0x1,0x88
06fb 00e5 | | Load_Encached Long_Integer_Cache
06fc 03f1 | | Declare_Variable Discrete,With_Value
06fd e5fb | | Load 0x2,-0x5
06fe e5fc | | Load 0x2,-0x4
06ff 8287 | | Call 0x1,0x87
0700 00e3 | | Load_Encached Natural_Cache
0701 03f1 | | Declare_Variable Discrete,With_Value
0702 BODY_06f0:
0702 e402 | | Load 0x2,0x2
0703 a5fa | | Store_Unchecked 0x2,-0x6
0704 00d8 | | Load_Top At_Offset_0
0705 0aff | | Execute_Immediate Plus,-0x1
0706 00d8 | | Load_Top At_Offset_0
0707 00e3 | | Load_Encached Natural_Cache
0708 0260 | ` | Execute Discrete,In_Type
0709 7001 |p | Jump_Nonzero 0x70b
070a 0801 | | Execute_Immediate Raise,0x1
070b e402 | | Load 0x2,0x2
070c 8288 | | Call 0x1,0x88
070d a5f9 | | Store_Unchecked 0x2,-0x7
070e e5f9 | | Load 0x2,-0x7
070f e5fe | | Load 0x2,-0x2
0710 027d | } | Execute Discrete,Greater
0711 6802 |h | Jump_Zero 0x714
0712 e5fe | | Load 0x2,-0x2
0713 a5f9 | | Store_Unchecked 0x2,-0x7
0714 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0715 0000 0000 | | .XXX[0x3]
0717 0000 | |
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 e5ff | | Load 0x2,-0x1
071c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
071d 700b |p | Jump_Nonzero 0x729
071e e5ff | | Load 0x2,-0x1
071f 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0720 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0721 7005 |p | Jump_Nonzero 0x727
0722 e5ff | | Load 0x2,-0x1
0723 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0724 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0725 0f00 | | Execute_Immediate Equal,0x0
0726 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0727 4800 |H | Short_Literal 0x0
0728 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0729 4800 |H | Short_Literal 0x0
072a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
072b 0000 0000 | | .BLANK 0000[0x5]
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 e5ff | | Load 0x2,-0x1
0734 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0735 7004 |p | Jump_Nonzero 0x73a
0736 e5ff | | Load 0x2,-0x1
0737 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0738 828a | | Call 0x1,0x8a
0739 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
073a 4800 |H | Short_Literal 0x0
073b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
073c 0000 0000 | | .BLANK 0000[0x4]
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 e5ff | | Load 0x2,-0x1
0744 0b10 | | Execute_Immediate Case_Compare,0x10
0745 7004 |p | Jump_Nonzero 0x74a
0746 0f38 | 8 | Execute_Immediate Equal,0x38
0747 7003 |p | Jump_Nonzero 0x74b
0748 4800 |H | Short_Literal 0x0
0749 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
074a 00d1 | | Pop_Control Pop_Count_1
074b 4801 |H | Short_Literal 0x1
074c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
074d 0000 0000 | | .XXX[0x3]
074f 0000 | |
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 e5ff | | Load 0x2,-0x1
0754 0b44 | D | Execute_Immediate Case_Compare,0x44
0755 7004 |p | Jump_Nonzero 0x75a
0756 0f4c | L | Execute_Immediate Equal,0x4c
0757 7003 |p | Jump_Nonzero 0x75b
0758 4800 |H | Short_Literal 0x0
0759 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
075a 00d1 | | Pop_Control Pop_Count_1
075b 4801 |H | Short_Literal 0x1
075c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
075d 0000 0000 | | .XXX[0x3]
075f 0000 | |
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 076c | l | .CONST 0x076c ; Address of begin
0761 0004 | | .CONST 0x0004 ; Address of exception handler
0762 0004 | | .CONST 0x0004 ; Number of locals
0763 INIT_0760:
0763 e5ff | | Load 0x2,-0x1
0764 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0765 e049 | I | Load 0x0,0x49
0766 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
0767 03f1 | | Declare_Variable Discrete,With_Value
0768 e027 | ' | Load 0x0,0x27
0769 0322 | " | Declare_Variable Record
076a e03c | < | Load 0x0,0x3c
076b 0322 | " | Declare_Variable Record
076c BODY_0760:
076c e402 | | Load 0x2,0x2
076d 828c | | Call 0x1,0x8c
076e 6819 |h | Jump_Zero 0x788
076f 4800 |H | Short_Literal 0x0
0770 00d8 | | Load_Top At_Offset_0
0771 e213 | | Load 0x1,0x13
0772 0260 | ` | Execute Discrete,In_Type
0773 7001 |p | Jump_Nonzero 0x775
0774 0801 | | Execute_Immediate Raise,0x1
0775 e5ff | | Load 0x2,-0x1
0776 e266 | f | Load 0x1,0x66
0777 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
0778 8265 | e | Call 0x1,0x65
0779 e403 | | Load 0x2,0x3
077a 017d | } | Execute Record,Structure_Write
077b e403 | | Load 0x2,0x3
077c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
077d e404 | | Load 0x2,0x4
077e 017d | } | Execute Record,Structure_Write
077f 00d8 | | Load_Top At_Offset_0
0780 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0781 828d | | Call 0x1,0x8d
0782 7003 |p | Jump_Nonzero 0x786
0783 00d8 | | Load_Top At_Offset_0
0784 828e | | Call 0x1,0x8e
0785 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0786 4801 |H | Short_Literal 0x1
0787 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0788 4800 |H | Short_Literal 0x0
0789 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
078a 0000 0000 | | .BLANK 0000[0x6]
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 e5ff | | Load 0x2,-0x1
0794 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0795 0f4c | L | Execute_Immediate Equal,0x4c
0796 680c |h | Jump_Zero 0x7a3
0797 4800 |H | Short_Literal 0x0
0798 00d8 | | Load_Top At_Offset_0
0799 e213 | | Load 0x1,0x13
079a 0260 | ` | Execute Discrete,In_Type
079b 7001 |p | Jump_Nonzero 0x79d
079c 0801 | | Execute_Immediate Raise,0x1
079d e5ff | | Load 0x2,-0x1
079e e269 | i | Load 0x1,0x69
079f 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
07a0 8265 | e | Call 0x1,0x65
07a1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
07a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07a3 4800 |H | Short_Literal 0x0
07a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07a5 0000 0000 | | .XXX[0x3]
07a7 0000 | |
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab e5ff | | Load 0x2,-0x1
07ac 0b74 | t | Execute_Immediate Case_Compare,0x74
07ad 7004 |p | Jump_Nonzero 0x7b2
07ae 0f7c | | | Execute_Immediate Equal,0x7c
07af 7003 |p | Jump_Nonzero 0x7b3
07b0 4800 |H | Short_Literal 0x0
07b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07b2 00d1 | | Pop_Control Pop_Count_1
07b3 4801 |H | Short_Literal 0x1
07b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07b5 0000 0000 | | .XXX[0x3]
07b7 0000 | |
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb | | .CONST 0x07bb ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0001 | | .CONST 0x0001 ; Number of locals
07bb BODY_07b8:
07bb INIT_07b8:
07bb e5ff | | Load 0x2,-0x1
07bc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07bd 00d8 | | Load_Top At_Offset_0
07be 0d6c | l | Execute_Immediate Less,0x6c
07bf 7018 |p | Jump_Nonzero 0x7d8
07c0 0a94 | | Execute_Immediate Plus,-0x6c
07c1 4613 |F | Jump_Case 0x14
07c2 7817 |x | Jump 0x7da ; case 0x0
07c3 7812 |x | Jump 0x7d6 ; case 0x1
07c4 7811 |x | Jump 0x7d6 ; case 0x2
07c5 7810 |x | Jump 0x7d6 ; case 0x3
07c6 780f |x | Jump 0x7d6 ; case 0x4
07c7 780e |x | Jump 0x7d6 ; case 0x5
07c8 780d |x | Jump 0x7d6 ; case 0x6
07c9 780c |x | Jump 0x7d6 ; case 0x7
07ca 780f |x | Jump 0x7da ; case 0x8
07cb 780a |x | Jump 0x7d6 ; case 0x9
07cc 7809 |x | Jump 0x7d6 ; case 0xa
07cd 7808 |x | Jump 0x7d6 ; case 0xb
07ce 7807 |x | Jump 0x7d6 ; case 0xc
07cf 7806 |x | Jump 0x7d6 ; case 0xd
07d0 7805 |x | Jump 0x7d6 ; case 0xe
07d1 7804 |x | Jump 0x7d6 ; case 0xf
07d2 7807 |x | Jump 0x7da ; case 0x10
07d3 7802 |x | Jump 0x7d6 ; case 0x11
07d4 7801 |x | Jump 0x7d6 ; case 0x12
07d5 7800 |x | Jump 0x7d6 ; case 0x13
07d6 4800 |H | Short_Literal 0x0
07d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07d8 00d1 | | Pop_Control Pop_Count_1
07d9 7ffc | | Jump 0x7d6
07da e5ff | | Load 0x2,-0x1
07db 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
07dc 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
07dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07de 0000 0000 | | .XXX[0x2]
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 e5ff | | Load 0x2,-0x1
07e4 e5fe | | Load 0x2,-0x2
07e5 0273 | s | Execute Discrete,Plus
07e6 0aff | | Execute_Immediate Plus,-0x1
07e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07f1 | | .CONST 0x07f1 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0002 | | .CONST 0x0002 ; Number of locals
07eb INIT_07e8:
07eb e018 | | Load 0x0,0x18
07ec 0322 | " | Declare_Variable Record
07ed e5ff | | Load 0x2,-0x1
07ee 8261 | a | Call 0x1,0x61
07ef e402 | | Load 0x2,0x2
07f0 017d | } | Execute Record,Structure_Write
07f1 BODY_07e8:
07f1 00d8 | | Load_Top At_Offset_0
07f2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
07f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07f4 0000 0000 | | .BLANK 0000[0x4]
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 083c | < | .CONST 0x083c ; Address of begin
07f9 0004 | | .CONST 0x0004 ; Address of exception handler
07fa 0010 | | .CONST 0x0010 ; Number of locals
07fb INIT_07f8:
07fb e5fe | | Load 0x2,-0x2
07fc 012c | , | Execute Any,Size
07fd 00e5 | | Load_Encached Long_Integer_Cache
07fe 03f1 | | Declare_Variable Discrete,With_Value
07ff 4801 |H | Short_Literal 0x1
0800 e402 | | Load 0x2,0x2
0801 e214 | | Load 0x1,0x14
0802 035b | [ | Declare_Type Array,Constrained
0803 a002 | | Store_Unchecked 0x0,0x2
0804 00c6 | | Action Check_Subprogram_Elaborated
0805 00d8 | | Load_Top At_Offset_0
0806 e5fe | | Load 0x2,-0x2
0807 e04d | M | Load 0x0,0x4d
0808 e04e | N | Load 0x0,0x4e
0809 4808 |H | Short_Literal 0x8
080a 0007 | | Action Break_Optional
080b e403 | | Load 0x2,0x3
080c 0337 | 7 | Declare_Variable Array
080d 00d8 | | Load_Top At_Offset_0
080e 0335 | 5 | Declare_Variable Array,Duplicate
080f 00cd | | Action Spare6_Action
0810 e409 | | Load 0x2,0x9
0811 01d9 | | Execute Vector,Reverse_Bounds
0812 0263 | c | Execute Discrete,Above_Bound
0813 7005 |p | Jump_Nonzero 0x819
0814 4800 |H | Short_Literal 0x0
0815 e40c | | Load 0x2,0xc
0816 e40a | | Load 0x2,0xa
0817 01d6 | | Execute Vector,Field_Write
0818 3ffb |? | Loop_Increasing 0x814
0819 e409 | | Load 0x2,0x9
081a 01d4 | | Execute Vector,Structure_Write
081b 00d8 | | Load_Top At_Offset_0
081c 012c | , | Execute Any,Size
081d 00e5 | | Load_Encached Long_Integer_Cache
081e 03f1 | | Declare_Variable Discrete,With_Value
081f e5fc | | Load 0x2,-0x4
0820 8293 | | Call 0x1,0x93
0821 00e5 | | Load_Encached Long_Integer_Cache
0822 03f1 | | Declare_Variable Discrete,With_Value
0823 00d8 | | Load_Top At_Offset_0
0824 602b |`+ | Indirect_Literal Discrete,0x850,{0x00000000, 0x00002000}
0825 027a | z | Execute Discrete,Less_Equal
0826 7001 |p | Jump_Nonzero 0x828
0827 0887 | | Execute_Immediate Raise,0x87
0828 4801 |H | Short_Literal 0x1
0829 e40b | | Load 0x2,0xb
082a e214 | | Load 0x1,0x14
082b 035b | [ | Declare_Type Array,Constrained
082c a024 | $ | Store_Unchecked 0x0,0x24
082d 00c6 | | Action Check_Subprogram_Elaborated
082e 00d8 | | Load_Top At_Offset_0
082f 0093 0000 | | push_full_address 0x0
0831 601a |` | Indirect_Literal Discrete,0x84c,{0x80000000, 0x00190000}
0832 0273 | s | Execute Discrete,Plus
0833 e5ff | | Load 0x2,-0x1
0834 6013 |` | Indirect_Literal Discrete,0x848,{0x00000000, 0x0000ffff}
0835 0279 | y | Execute Discrete,And
0836 0273 | s | Execute Discrete,Plus
0837 e04f | O | Load 0x0,0x4f
0838 0273 | s | Execute Discrete,Plus
0839 480f |H | Short_Literal 0xf
083a 029f 1a43 | C| Declare_Subprogram INIT_1a40,For_Call
083c BODY_07f8:
083c 00cf | | Action Mark_Auxiliary
083d 4803 |H | Short_Literal 0x3
083e 4801 |H | Short_Literal 0x1
083f 0007 | | Action Break_Optional
0840 8410 | | Call 0x2,0x10
0841 00c8 | | Action Pop_Auxiliary_Range
0842 3ffd |? | Loop_Increasing 0x840
0843 00ce | | Action Pop_Auxiliary
0844 4884 |H | Short_Literal 0x84
0845 0257 | W | Execute Discrete,Raise
0846 0000 0000 | | .XXX[0x2]
0848 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
084c 8000 0000 | | .LITERAL {0x80000000, 0x00190000}
0850 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
0854 0000 0000 | | .BLANK 0000[0x4]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 086d | m | .CONST 0x086d ; Address of begin
0859 0004 | | .CONST 0x0004 ; Address of exception handler
085a 0003 | | .CONST 0x0003 ; Number of locals
085b INIT_0858:
085b e29c | | Load 0x1,0x9c
085c 0337 | 7 | Declare_Variable Array
085d 4800 |H | Short_Literal 0x0
085e e29b | | Load 0x1,0x9b
085f 0aff | | Execute_Immediate Plus,-0x1
0860 e5ff | | Load 0x2,-0x1
0861 01cf | | Execute Vector,Slice_Read
0862 e402 | | Load 0x2,0x2
0863 01d4 | | Execute Vector,Structure_Write
0864 e031 | 1 | Load 0x0,0x31
0865 0322 | " | Declare_Variable Record
0866 e402 | | Load 0x2,0x2
0867 e29d | | Load 0x1,0x9d
0868 e29e | | Load 0x1,0x9e
0869 1d9f | | Execute_Immediate Reference_Lex_1,0x9f
086a 8002 | | Call 0x0,0x2
086b e403 | | Load 0x2,0x3
086c 017d | } | Execute Record,Structure_Write
086d BODY_0858:
086d 00d8 | | Load_Top At_Offset_0
086e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
086f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0884 | | .CONST 0x0884 ; Address of begin
0871 0004 | | .CONST 0x0004 ; Address of exception handler
0872 0006 | | .CONST 0x0006 ; Number of locals
0873 INIT_0870:
0873 a024 | $ | Store_Unchecked 0x0,0x24
0874 00c6 | | Action Check_Subprogram_Elaborated
0875 e29c | | Load 0x1,0x9c
0876 0093 0000 | | push_full_address 0x0
0878 6017 |` | Indirect_Literal Discrete,0x890,{0x80000000, 0x00150000}
0879 0273 | s | Execute Discrete,Plus
087a e025 | % | Load 0x0,0x25
087b 0273 | s | Execute Discrete,Plus
087c e050 | P | Load 0x0,0x50
087d 0273 | s | Execute Discrete,Plus
087e 4804 |H | Short_Literal 0x4
087f 0007 | | Action Break_Optional
0880 e29c | | Load 0x1,0x9c
0881 0337 | 7 | Declare_Variable Array
0882 029f 1a6b | k| Declare_Subprogram INIT_1a68,For_Call
0884 BODY_0870:
0884 00cf | | Action Mark_Auxiliary
0885 4803 |H | Short_Literal 0x3
0886 4801 |H | Short_Literal 0x1
0887 0007 | | Action Break_Optional
0888 8406 | | Call 0x2,0x6
0889 00c8 | | Action Pop_Auxiliary_Range
088a 3ffd |? | Loop_Increasing 0x888
088b 00ce | | Action Pop_Auxiliary
088c 4884 |H | Short_Literal 0x84
088d 0257 | W | Execute Discrete,Raise
088e 0000 0000 | | .XXX[0x2]
0890 8000 0000 | | .LITERAL {0x80000000, 0x00150000}
0894 0000 0000 | | .BLANK 0000[0x4]
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 e5ff | | Load 0x2,-0x1
089c 82a3 | | Call 0x1,0xa3
089d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
089e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
089f 0000 | | .XXX[0x1]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08ba | | .CONST 0x08ba ; Address of begin
08a1 0004 | | .CONST 0x0004 ; Address of exception handler
08a2 0004 | | .CONST 0x0004 ; Number of locals
08a3 INIT_08a0:
08a3 e5fe | | Load 0x2,-0x2
08a4 00e5 | | Load_Encached Long_Integer_Cache
08a5 03f1 | | Declare_Variable Discrete,With_Value
08a6 e2a6 | | Load 0x1,0xa6
08a7 0337 | 7 | Declare_Variable Array
08a8 e402 | | Load 0x2,0x2
08a9 00d8 | | Load_Top At_Offset_0
08aa e2a5 | | Load 0x1,0xa5
08ab 0273 | s | Execute Discrete,Plus
08ac 0aff | | Execute_Immediate Plus,-0x1
08ad e5ff | | Load 0x2,-0x1
08ae 01cf | | Execute Vector,Slice_Read
08af e403 | | Load 0x2,0x3
08b0 01d4 | | Execute Vector,Structure_Write
08b1 e034 | 4 | Load 0x0,0x34
08b2 0322 | " | Declare_Variable Record
08b3 e403 | | Load 0x2,0x3
08b4 e2a7 | | Load 0x1,0xa7
08b5 e2a8 | | Load 0x1,0xa8
08b6 1da9 | | Execute_Immediate Reference_Lex_1,0xa9
08b7 8002 | | Call 0x0,0x2
08b8 e404 | | Load 0x2,0x4
08b9 017d | } | Execute Record,Structure_Write
08ba BODY_08a0:
08ba 00d8 | | Load_Top At_Offset_0
08bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08bc 0000 0000 | | .BLANK 0000[0x4]
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08d4 | | .CONST 0x08d4 ; Address of begin
08c1 0004 | | .CONST 0x0004 ; Address of exception handler
08c2 0006 | | .CONST 0x0006 ; Number of locals
08c3 INIT_08c0:
08c3 a024 | $ | Store_Unchecked 0x0,0x24
08c4 00c6 | | Action Check_Subprogram_Elaborated
08c5 e2a6 | | Load 0x1,0xa6
08c6 0093 0000 | | push_full_address 0x0
08c8 6017 |` | Indirect_Literal Discrete,0x8e0,{0x80000000, 0x00130000}
08c9 0273 | s | Execute Discrete,Plus
08ca e025 | % | Load 0x0,0x25
08cb 0273 | s | Execute Discrete,Plus
08cc e051 | Q | Load 0x0,0x51
08cd 0273 | s | Execute Discrete,Plus
08ce 4804 |H | Short_Literal 0x4
08cf 0007 | | Action Break_Optional
08d0 e2a6 | | Load 0x1,0xa6
08d1 0337 | 7 | Declare_Variable Array
08d2 029f 1a8b | | Declare_Subprogram INIT_1a88,For_Call
08d4 BODY_08c0:
08d4 00cf | | Action Mark_Auxiliary
08d5 4803 |H | Short_Literal 0x3
08d6 4801 |H | Short_Literal 0x1
08d7 0007 | | Action Break_Optional
08d8 8406 | | Call 0x2,0x6
08d9 00c8 | | Action Pop_Auxiliary_Range
08da 3ffd |? | Loop_Increasing 0x8d8
08db 00ce | | Action Pop_Auxiliary
08dc 4884 |H | Short_Literal 0x84
08dd 0257 | W | Execute Discrete,Raise
08de 0000 0000 | | .XXX[0x2]
08e0 8000 0000 | | .LITERAL {0x80000000, 0x00130000}
08e4 0000 0000 | | .BLANK 0000[0x4]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f3 | | .CONST 0x08f3 ; Address of begin
08e9 0004 | | .CONST 0x0004 ; Address of exception handler
08ea 0003 | | .CONST 0x0003 ; Number of locals
08eb INIT_08e8:
08eb e5ff | | Load 0x2,-0x1
08ec 01dc | | Execute Vector,Last
08ed 00e5 | | Load_Encached Long_Integer_Cache
08ee 03f1 | | Declare_Variable Discrete,With_Value
08ef e5fe | | Load 0x2,-0x2
08f0 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
08f1 e052 | R | Load 0x0,0x52
08f2 03f1 | | Declare_Variable Discrete,With_Value
08f3 BODY_08e8:
08f3 00d8 | | Load_Top At_Offset_0
08f4 e2a5 | | Load 0x1,0xa5
08f5 0273 | s | Execute Discrete,Plus
08f6 0aff | | Execute_Immediate Plus,-0x1
08f7 e402 | | Load 0x2,0x2
08f8 027a | z | Execute Discrete,Less_Equal
08f9 6804 |h | Jump_Zero 0x8fe
08fa 00d8 | | Load_Top At_Offset_0
08fb e5ff | | Load 0x2,-0x1
08fc 82ac | | Call 0x1,0xac
08fd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08fe 00d8 | | Load_Top At_Offset_0
08ff e5fd | | Load 0x2,-0x3
0900 827c | | | Call 0x1,0x7c
0901 82ad | | Call 0x1,0xad
0902 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0903 0000 0000 | | .BLANK 0000[0x5]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 091d | | .CONST 0x091d ; Address of begin
0909 0004 | | .CONST 0x0004 ; Address of exception handler
090a 0006 | | .CONST 0x0006 ; Number of locals
090b INIT_0908:
090b 4801 |H | Short_Literal 0x1
090c 601f |` | Indirect_Literal Discrete,0x92c,{0x00000000, 0x00002000}
090d e214 | | Load 0x1,0x14
090e 035b | [ | Declare_Type Array,Constrained
090f a024 | $ | Store_Unchecked 0x0,0x24
0910 00c6 | | Action Check_Subprogram_Elaborated
0911 00d8 | | Load_Top At_Offset_0
0912 0093 0000 | | push_full_address 0x0
0914 6013 |` | Indirect_Literal Discrete,0x928,{0x80000000, 0x00120000}
0915 0273 | s | Execute Discrete,Plus
0916 e025 | % | Load 0x0,0x25
0917 0273 | s | Execute Discrete,Plus
0918 e053 | S | Load 0x0,0x53
0919 0273 | s | Execute Discrete,Plus
091a 4805 |H | Short_Literal 0x5
091b 029f 1aab | | Declare_Subprogram INIT_1aa8,For_Call
091d BODY_0908:
091d 00cf | | Action Mark_Auxiliary
091e 4803 |H | Short_Literal 0x3
091f 4801 |H | Short_Literal 0x1
0920 0007 | | Action Break_Optional
0921 8406 | | Call 0x2,0x6
0922 00c8 | | Action Pop_Auxiliary_Range
0923 3ffd |? | Loop_Increasing 0x921
0924 00ce | | Action Pop_Auxiliary
0925 4884 |H | Short_Literal 0x84
0926 0257 | W | Execute Discrete,Raise
0927 0000 | | .XXX[0x1]
0928 8000 0000 | | .LITERAL {0x80000000, 0x00120000}
092c 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 094b | K | .CONST 0x094b ; Address of begin
0931 0004 | | .CONST 0x0004 ; Address of exception handler
0932 0006 | | .CONST 0x0006 ; Number of locals
0933 INIT_0930:
0933 e5fe | | Load 0x2,-0x2
0934 67f7 |g | Indirect_Literal Discrete,0x92c,{0x00000000, 0x00002000}
0935 027a | z | Execute Discrete,Less_Equal
0936 7001 |p | Jump_Nonzero 0x938
0937 0887 | | Execute_Immediate Raise,0x87
0938 4800 |H | Short_Literal 0x0
0939 e5fe | | Load 0x2,-0x2
093a 0aff | | Execute_Immediate Plus,-0x1
093b e214 | | Load 0x1,0x14
093c 035b | [ | Declare_Type Array,Constrained
093d a024 | $ | Store_Unchecked 0x0,0x24
093e 00c6 | | Action Check_Subprogram_Elaborated
093f 00d8 | | Load_Top At_Offset_0
0940 0093 0000 | | push_full_address 0x0
0942 6015 |` | Indirect_Literal Discrete,0x958,{0x80000000, 0x00110000}
0943 0273 | s | Execute Discrete,Plus
0944 e025 | % | Load 0x0,0x25
0945 0273 | s | Execute Discrete,Plus
0946 e054 | T | Load 0x0,0x54
0947 0273 | s | Execute Discrete,Plus
0948 4805 |H | Short_Literal 0x5
0949 029f 1ac3 | | Declare_Subprogram INIT_1ac0,For_Call
094b BODY_0930:
094b 00cf | | Action Mark_Auxiliary
094c 4803 |H | Short_Literal 0x3
094d 4801 |H | Short_Literal 0x1
094e 0007 | | Action Break_Optional
094f 8406 | | Call 0x2,0x6
0950 00c8 | | Action Pop_Auxiliary_Range
0951 3ffd |? | Loop_Increasing 0x94f
0952 00ce | | Action Pop_Auxiliary
0953 4884 |H | Short_Literal 0x84
0954 0257 | W | Execute Discrete,Raise
0955 0000 0000 | | .XXX[0x3]
0957 0000 | |
0958 8000 0000 | | .LITERAL {0x80000000, 0x00110000}
095c 0000 0000 | | .BLANK 0000[0x4]
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0986 | | .CONST 0x0986 ; Address of begin
0961 0004 | | .CONST 0x0004 ; Address of exception handler
0962 0008 | | .CONST 0x0008 ; Number of locals
0963 INIT_0960:
0963 4800 |H | Short_Literal 0x0
0964 e5fe | | Load 0x2,-0x2
0965 0aff | | Execute_Immediate Plus,-0x1
0966 e214 | | Load 0x1,0x14
0967 035b | [ | Declare_Type Array,Constrained
0968 0337 | 7 | Declare_Variable Array
0969 e5fe | | Load 0x2,-0x2
096a 09f3 | | Execute_Immediate Binary_Scale,-0xd
096b 00d8 | | Load_Top At_Offset_0
096c 00e3 | | Load_Encached Natural_Cache
096d 0260 | ` | Execute Discrete,In_Type
096e 7001 |p | Jump_Nonzero 0x970
096f 0801 | | Execute_Immediate Raise,0x1
0970 00e3 | | Load_Encached Natural_Cache
0971 03f1 | | Declare_Variable Discrete,With_Value
0972 e5fe | | Load 0x2,-0x2
0973 602c |`, | Indirect_Literal Discrete,0x9a0,{0x00000000, 0x00001fff}
0974 0279 | y | Execute Discrete,And
0975 00d8 | | Load_Top At_Offset_0
0976 00e3 | | Load_Encached Natural_Cache
0977 0260 | ` | Execute Discrete,In_Type
0978 7001 |p | Jump_Nonzero 0x97a
0979 0801 | | Execute_Immediate Raise,0x1
097a 00e3 | | Load_Encached Natural_Cache
097b 03f1 | | Declare_Variable Discrete,With_Value
097c e5ff | | Load 0x2,-0x1
097d e048 | H | Load 0x0,0x48
097e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
097f 03f1 | | Declare_Variable Discrete,With_Value
0980 00e5 | | Load_Encached Long_Integer_Cache
0981 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0982 029f 1adb | | Declare_Subprogram INIT_1ad8,For_Call
0984 029f 1afb | | Declare_Subprogram INIT_1af8,For_Call
0986 BODY_0960:
0986 00cf | | Action Mark_Auxiliary
0987 e403 | | Load 0x2,0x3
0988 4801 |H | Short_Literal 0x1
0989 0263 | c | Execute Discrete,Above_Bound
098a 700a |p | Jump_Nonzero 0x995
098b 8407 | | Call 0x2,0x7
098c e406 | | Load 0x2,0x6
098d 600e |` | Indirect_Literal Discrete,0x99c,{0x00000000, 0x00002000}
098e 0273 | s | Execute Discrete,Plus
098f a406 | | Store_Unchecked 0x2,0x6
0990 e405 | | Load 0x2,0x5
0991 827d | } | Call 0x1,0x7d
0992 a405 | | Store_Unchecked 0x2,0x5
0993 00c8 | | Action Pop_Auxiliary_Range
0994 3ff6 |? | Loop_Increasing 0x98b
0995 00ce | | Action Pop_Auxiliary
0996 8408 | | Call 0x2,0x8
0997 e402 | | Load 0x2,0x2
0998 e214 | | Load 0x1,0x14
0999 01c6 | | Execute Vector,Convert_To_Formal
099a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
099b 0000 | | .XXX[0x1]
099c 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
09a0 0000 0000 | | .LITERAL {0x00000000, 0x00001fff}
09a4 0000 0000 | | .BLANK 0000[0x4]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09bc | | .CONST 0x09bc ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0006 | | .CONST 0x0006 ; Number of locals
09ab INIT_09a8:
09ab a024 | $ | Store_Unchecked 0x0,0x24
09ac 00c6 | | Action Check_Subprogram_Elaborated
09ad e2b4 | | Load 0x1,0xb4
09ae 0093 0000 | | push_full_address 0x0
09b0 6017 |` | Indirect_Literal Discrete,0x9c8,{0x80000000, 0x000f0000}
09b1 0273 | s | Execute Discrete,Plus
09b2 e025 | % | Load 0x0,0x25
09b3 0273 | s | Execute Discrete,Plus
09b4 e055 | U | Load 0x0,0x55
09b5 0273 | s | Execute Discrete,Plus
09b6 4804 |H | Short_Literal 0x4
09b7 0007 | | Action Break_Optional
09b8 e2b4 | | Load 0x1,0xb4
09b9 0337 | 7 | Declare_Variable Array
09ba 029f 1b1b | | Declare_Subprogram INIT_1b18,For_Call
09bc BODY_09a8:
09bc 00cf | | Action Mark_Auxiliary
09bd 4803 |H | Short_Literal 0x3
09be 4801 |H | Short_Literal 0x1
09bf 0007 | | Action Break_Optional
09c0 8406 | | Call 0x2,0x6
09c1 00c8 | | Action Pop_Auxiliary_Range
09c2 3ffd |? | Loop_Increasing 0x9c0
09c3 00ce | | Action Pop_Auxiliary
09c4 4884 |H | Short_Literal 0x84
09c5 0257 | W | Execute Discrete,Raise
09c6 0000 0000 | | .XXX[0x2]
09c8 8000 0000 | | .LITERAL {0x80000000, 0x000f0000}
09cc 0000 0000 | | .BLANK 0000[0x4]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09e9 | | .CONST 0x09e9 ; Address of begin
09d1 0004 | | .CONST 0x0004 ; Address of exception handler
09d2 0003 | | .CONST 0x0003 ; Number of locals
09d3 INIT_09d0:
09d3 e2b4 | | Load 0x1,0xb4
09d4 0337 | 7 | Declare_Variable Array
09d5 e5ff | | Load 0x2,-0x1
09d6 01dd | | Execute Vector,First
09d7 e5ff | | Load 0x2,-0x1
09d8 01dd | | Execute Vector,First
09d9 e2b3 | | Load 0x1,0xb3
09da 0273 | s | Execute Discrete,Plus
09db 0aff | | Execute_Immediate Plus,-0x1
09dc e5ff | | Load 0x2,-0x1
09dd 01cf | | Execute Vector,Slice_Read
09de e402 | | Load 0x2,0x2
09df 01d4 | | Execute Vector,Structure_Write
09e0 e037 | 7 | Load 0x0,0x37
09e1 0322 | " | Declare_Variable Record
09e2 e402 | | Load 0x2,0x2
09e3 e2b5 | | Load 0x1,0xb5
09e4 e2b6 | | Load 0x1,0xb6
09e5 1db7 | | Execute_Immediate Reference_Lex_1,0xb7
09e6 8002 | | Call 0x0,0x2
09e7 e403 | | Load 0x2,0x3
09e8 017d | } | Execute Record,Structure_Write
09e9 BODY_09d0:
09e9 00d8 | | Load_Top At_Offset_0
09ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09eb 0000 0000 | | .BLANK 0000[0x5]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 0a1b | | .CONST 0x0a1b ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0008 | | .CONST 0x0008 ; Number of locals
09f3 INIT_09f0:
09f3 e26c | l | Load 0x1,0x6c
09f4 0337 | 7 | Declare_Variable Array
09f5 00d8 | | Load_Top At_Offset_0
09f6 0335 | 5 | Declare_Variable Array,Duplicate
09f7 00cd | | Action Spare6_Action
09f8 4840 |H@ | Short_Literal 0x40
09f9 4801 |H | Short_Literal 0x1
09fa 4800 |H | Short_Literal 0x0
09fb e405 | | Load 0x2,0x5
09fc e403 | | Load 0x2,0x3
09fd 01d6 | | Execute Vector,Field_Write
09fe 3ffb |? | Loop_Increasing 0x9fa
09ff e402 | | Load 0x2,0x2
0a00 01d4 | | Execute Vector,Structure_Write
0a01 e5fe | | Load 0x2,-0x2
0a02 8293 | | Call 0x1,0x93
0a03 00e5 | | Load_Encached Long_Integer_Cache
0a04 03f1 | | Declare_Variable Discrete,With_Value
0a05 00d8 | | Load_Top At_Offset_0
0a06 0d41 | A | Execute_Immediate Less,0x41
0a07 7001 |p | Jump_Nonzero 0xa09
0a08 0887 | | Execute_Immediate Raise,0x87
0a09 4801 |H | Short_Literal 0x1
0a0a e403 | | Load 0x2,0x3
0a0b e214 | | Load 0x1,0x14
0a0c 035b | [ | Declare_Type Array,Constrained
0a0d a024 | $ | Store_Unchecked 0x0,0x24
0a0e 00c6 | | Action Check_Subprogram_Elaborated
0a0f 00d8 | | Load_Top At_Offset_0
0a10 0093 0000 | | push_full_address 0x0
0a12 6015 |` | Indirect_Literal Discrete,0xa28,{0x80000000, 0x000e0000}
0a13 0273 | s | Execute Discrete,Plus
0a14 e025 | % | Load 0x0,0x25
0a15 0273 | s | Execute Discrete,Plus
0a16 e056 | V | Load 0x0,0x56
0a17 0273 | s | Execute Discrete,Plus
0a18 4807 |H | Short_Literal 0x7
0a19 029f 1b3b | ;| Declare_Subprogram INIT_1b38,For_Call
0a1b BODY_09f0:
0a1b 00cf | | Action Mark_Auxiliary
0a1c 4803 |H | Short_Literal 0x3
0a1d 4801 |H | Short_Literal 0x1
0a1e 0007 | | Action Break_Optional
0a1f 8408 | | Call 0x2,0x8
0a20 00c8 | | Action Pop_Auxiliary_Range
0a21 3ffd |? | Loop_Increasing 0xa1f
0a22 00ce | | Action Pop_Auxiliary
0a23 4884 |H | Short_Literal 0x84
0a24 0257 | W | Execute Discrete,Raise
0a25 0000 0000 | | .XXX[0x3]
0a27 0000 | |
0a28 8000 0000 | | .LITERAL {0x80000000, 0x000e0000}
0a2c 0000 0000 | | .BLANK 0000[0x4]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a33 | 3 | .CONST 0x0a33 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0001 | | .CONST 0x0001 ; Number of locals
0a33 BODY_0a30:
0a33 INIT_0a30:
0a33 e5ff | | Load 0x2,-0x1
0a34 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a35 e2c2 | | Load 0x1,0xc2
0a36 e2c3 | | Load 0x1,0xc3
0a37 1dc4 | | Execute_Immediate Reference_Lex_1,0xc4
0a38 8002 | | Call 0x0,0x2
0a39 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a3a 0000 0000 | | .BLANK 0000[0x6]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a61 | a | .CONST 0x0a61 ; Address of begin
0a41 0004 | | .CONST 0x0004 ; Address of exception handler
0a42 0006 | | .CONST 0x0006 ; Number of locals
0a43 INIT_0a40:
0a43 e5fe | | Load 0x2,-0x2
0a44 02c7 | | Declare_Variable Any
0a45 00d8 | | Load_Top At_Offset_0
0a46 1c00 | | Execute_Immediate Run_Utility,0x0
0a47 4802 |H | Short_Literal 0x2
0a48 4802 |H | Short_Literal 0x2
0a49 0099 | | Action Reference_Dynamic
0a4a 012d | - | Execute Any,Address
0a4b e049 | I | Load 0x0,0x49
0a4c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0a4d e049 | I | Load 0x0,0x49
0a4e 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0a4f e049 | I | Load 0x0,0x49
0a50 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a51 e049 | I | Load 0x0,0x49
0a52 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0a53 e049 | I | Load 0x0,0x49
0a54 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0a55 011e | | Execute Any,Convert
0a56 e049 | I | Load 0x0,0x49
0a57 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0a58 0322 | " | Declare_Variable Record
0a59 e403 | | Load 0x2,0x3
0a5a e404 | | Load 0x2,0x4
0a5b e049 | I | Load 0x0,0x49
0a5c 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0a5d e405 | | Load 0x2,0x5
0a5e 017d | } | Execute Record,Structure_Write
0a5f e03c | < | Load 0x0,0x3c
0a60 0322 | " | Declare_Variable Record
0a61 BODY_0a40:
0a61 e405 | | Load 0x2,0x5
0a62 82c7 | | Call 0x1,0xc7
0a63 e406 | | Load 0x2,0x6
0a64 017d | } | Execute Record,Structure_Write
0a65 00d8 | | Load_Top At_Offset_0
0a66 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a67 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a68 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a69 0000 0000 | | .BLANK 0000[0x7]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a91 | | .CONST 0x0a91 ; Address of begin
0a71 0004 | | .CONST 0x0004 ; Address of exception handler
0a72 0006 | | .CONST 0x0006 ; Number of locals
0a73 INIT_0a70:
0a73 e5fe | | Load 0x2,-0x2
0a74 02c7 | | Declare_Variable Any
0a75 00d8 | | Load_Top At_Offset_0
0a76 1c00 | | Execute_Immediate Run_Utility,0x0
0a77 4802 |H | Short_Literal 0x2
0a78 4802 |H | Short_Literal 0x2
0a79 0099 | | Action Reference_Dynamic
0a7a 012d | - | Execute Any,Address
0a7b e049 | I | Load 0x0,0x49
0a7c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0a7d e049 | I | Load 0x0,0x49
0a7e 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0a7f e049 | I | Load 0x0,0x49
0a80 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a81 e049 | I | Load 0x0,0x49
0a82 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0a83 e049 | I | Load 0x0,0x49
0a84 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0a85 011e | | Execute Any,Convert
0a86 e049 | I | Load 0x0,0x49
0a87 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0a88 0322 | " | Declare_Variable Record
0a89 e403 | | Load 0x2,0x3
0a8a e404 | | Load 0x2,0x4
0a8b e049 | I | Load 0x0,0x49
0a8c 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0a8d e405 | | Load 0x2,0x5
0a8e 017d | } | Execute Record,Structure_Write
0a8f e03c | < | Load 0x0,0x3c
0a90 0322 | " | Declare_Variable Record
0a91 BODY_0a70:
0a91 e405 | | Load 0x2,0x5
0a92 82c7 | | Call 0x1,0xc7
0a93 e406 | | Load 0x2,0x6
0a94 017d | } | Execute Record,Structure_Write
0a95 00d8 | | Load_Top At_Offset_0
0a96 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a97 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0a98 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a99 0000 0000 | | .BLANK 0000[0x7]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0ad1 | | .CONST 0x0ad1 ; Address of begin
0aa1 0004 | | .CONST 0x0004 ; Address of exception handler
0aa2 0008 | | .CONST 0x0008 ; Number of locals
0aa3 INIT_0aa0:
0aa3 00e2 | | Load_Encached Integer_Cache
0aa4 4801 |H | Short_Literal 0x1
0aa5 4801 |H | Short_Literal 0x1
0aa6 00e9 | | Load_Encached String_Cache
0aa7 035b | [ | Declare_Type Array,Constrained
0aa8 0337 | 7 | Declare_Variable Array
0aa9 4802 |H | Short_Literal 0x2
0aaa 4802 |H | Short_Literal 0x2
0aab 0099 | | Action Reference_Dynamic
0aac 012d | - | Execute Any,Address
0aad e049 | I | Load 0x0,0x49
0aae 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0aaf 0a01 | | Execute_Immediate Plus,0x1
0ab0 e049 | I | Load 0x0,0x49
0ab1 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0ab2 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0ab3 e049 | I | Load 0x0,0x49
0ab4 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0ab5 e049 | I | Load 0x0,0x49
0ab6 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0ab7 e049 | I | Load 0x0,0x49
0ab8 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ab9 e049 | I | Load 0x0,0x49
0aba 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0abb 011e | | Execute Any,Convert
0abc e049 | I | Load 0x0,0x49
0abd 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0abe 0322 | " | Declare_Variable Record
0abf e404 | | Load 0x2,0x4
0ac0 e405 | | Load 0x2,0x5
0ac1 e049 | I | Load 0x0,0x49
0ac2 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0ac3 e406 | | Load 0x2,0x6
0ac4 017d | } | Execute Record,Structure_Write
0ac5 e03c | < | Load 0x0,0x3c
0ac6 0322 | " | Declare_Variable Record
0ac7 e406 | | Load 0x2,0x6
0ac8 82c7 | | Call 0x1,0xc7
0ac9 e407 | | Load 0x2,0x7
0aca 017d | } | Execute Record,Structure_Write
0acb e018 | | Load 0x0,0x18
0acc 0322 | " | Declare_Variable Record
0acd e407 | | Load 0x2,0x7
0ace 8261 | a | Call 0x1,0x61
0acf e408 | | Load 0x2,0x8
0ad0 017d | } | Execute Record,Structure_Write
0ad1 BODY_0aa0:
0ad1 00d8 | | Load_Top At_Offset_0
0ad2 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0ad3 00ca | | Action Exit_Nullary_Function
0ad4 0000 0000 | | .BLANK 0000[0x4]
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0adb | | .CONST 0x0adb ; Address of begin
0ad9 0004 | | .CONST 0x0004 ; Address of exception handler
0ada 0001 | | .CONST 0x0001 ; Number of locals
0adb BODY_0ad8:
0adb INIT_0ad8:
0adb 4607 |F | Jump_Case 0x8
0adc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0add 7807 |x | Jump 0xae5 ; case 0x1
0ade 780a |x | Jump 0xae9 ; case 0x2
0adf 780e |x | Jump 0xaee ; case 0x3
0ae0 7811 |x | Jump 0xaf2 ; case 0x4
0ae1 7812 |x | Jump 0xaf4 ; case 0x5
0ae2 7813 |x | Jump 0xaf6 ; case 0x6
0ae3 7816 |x | Jump 0xafa ; case 0x7
0ae4 4302 |C | .XXX[0x1]
0ae5 00da | | Load_Top At_Offset_2
0ae6 0091 1bba | | Action Push_String_Extended_Indexed,0x1bba ; "INTEGER_TYPE"
0ae8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0ae9 00db | | Load_Top At_Offset_3
0aea 00db | | Load_Top At_Offset_3
0aeb 00e0 | | Load_Encached Standard_Cache
0aec 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0aed 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0aee 00da | | Load_Top At_Offset_2
0aef 00e0 | | Load_Encached Standard_Cache
0af0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0af1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0af2 00db | | Load_Top At_Offset_3
0af3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0af4 00db | | Load_Top At_Offset_3
0af5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0af6 e2cb | | Load 0x1,0xcb
0af7 00dc | | Load_Top At_Offset_4
0af8 0267 | g | Execute Discrete,Predecessor
0af9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0afa e2cb | | Load 0x1,0xcb
0afb 00dc | | Load_Top At_Offset_4
0afc 0268 | h | Execute Discrete,Successor
0afd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0afe 0000 0000 | | .XXX[0x2]
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b03 | | .CONST 0x0b03 ; Address of begin
0b01 0004 | | .CONST 0x0004 ; Address of exception handler
0b02 0001 | | .CONST 0x0001 ; Number of locals
0b03 BODY_0b00:
0b03 INIT_0b00:
0b03 e2e7 | | Load 0x1,0xe7
0b04 6804 |h | Jump_Zero 0xb09
0b05 e5ff | | Load 0x2,-0x1
0b06 e2e8 | | Load 0x1,0xe8
0b07 027f | | Execute Discrete,Equal
0b08 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b09 4800 |H | Short_Literal 0x0
0b0a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b0b 0000 0000 | | .BLANK 0000[0x5]
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b13 | | .CONST 0x0b13 ; Address of begin
0b11 0004 | | .CONST 0x0004 ; Address of exception handler
0b12 0001 | | .CONST 0x0001 ; Number of locals
0b13 BODY_0b10:
0b13 INIT_0b10:
0b13 e5ff | | Load 0x2,-0x1
0b14 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0b15 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b16 82f3 | | Call 0x1,0xf3
0b17 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b18 ; --------------------------------------------------------------------------------------
0b18 ; SUBPROGRAM
0b18 ; --------------------------------------------------------------------------------------
0b18 0b1b | | .CONST 0x0b1b ; Address of begin
0b19 0004 | | .CONST 0x0004 ; Address of exception handler
0b1a 0001 | | .CONST 0x0001 ; Number of locals
0b1b BODY_0b18:
0b1b INIT_0b18:
0b1b e2e7 | | Load 0x1,0xe7
0b1c 7002 |p | Jump_Nonzero 0xb1f
0b1d 4809 |H | Short_Literal 0x9
0b1e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b1f e5ff | | Load 0x2,-0x1
0b20 e2ea | | Load 0x1,0xea
0b21 017f | | Execute Record,Equal
0b22 6802 |h | Jump_Zero 0xb25
0b23 4800 |H | Short_Literal 0x0
0b24 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b25 e5ff | | Load 0x2,-0x1
0b26 e2eb | | Load 0x1,0xeb
0b27 017f | | Execute Record,Equal
0b28 6802 |h | Jump_Zero 0xb2b
0b29 4801 |H | Short_Literal 0x1
0b2a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b2b e5ff | | Load 0x2,-0x1
0b2c e2ed | | Load 0x1,0xed
0b2d 017f | | Execute Record,Equal
0b2e 6802 |h | Jump_Zero 0xb31
0b2f 4804 |H | Short_Literal 0x4
0b30 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b31 e5ff | | Load 0x2,-0x1
0b32 e2ec | | Load 0x1,0xec
0b33 017f | | Execute Record,Equal
0b34 6802 |h | Jump_Zero 0xb37
0b35 4805 |H | Short_Literal 0x5
0b36 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b37 e5ff | | Load 0x2,-0x1
0b38 e2ee | | Load 0x1,0xee
0b39 017f | | Execute Record,Equal
0b3a 6802 |h | Jump_Zero 0xb3d
0b3b 4806 |H | Short_Literal 0x6
0b3c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b3d e5ff | | Load 0x2,-0x1
0b3e e2ef | | Load 0x1,0xef
0b3f 017f | | Execute Record,Equal
0b40 6802 |h | Jump_Zero 0xb43
0b41 4807 |H | Short_Literal 0x7
0b42 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b43 e5ff | | Load 0x2,-0x1
0b44 e2f1 | | Load 0x1,0xf1
0b45 017f | | Execute Record,Equal
0b46 6802 |h | Jump_Zero 0xb49
0b47 4802 |H | Short_Literal 0x2
0b48 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b49 e5ff | | Load 0x2,-0x1
0b4a e2f0 | | Load 0x1,0xf0
0b4b 017f | | Execute Record,Equal
0b4c 6802 |h | Jump_Zero 0xb4f
0b4d 4803 |H | Short_Literal 0x3
0b4e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b4f e5ff | | Load 0x2,-0x1
0b50 e2f2 | | Load 0x1,0xf2
0b51 017f | | Execute Record,Equal
0b52 6802 |h | Jump_Zero 0xb55
0b53 4808 |H | Short_Literal 0x8
0b54 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b55 4809 |H | Short_Literal 0x9
0b56 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b57 0000 | | .XXX[0x1]
0b58 ; --------------------------------------------------------------------------------------
0b58 ; SUBPROGRAM
0b58 ; --------------------------------------------------------------------------------------
0b58 0b5b | [ | .CONST 0x0b5b ; Address of begin
0b59 0004 | | .CONST 0x0004 ; Address of exception handler
0b5a 0001 | | .CONST 0x0001 ; Number of locals
0b5b BODY_0b58:
0b5b INIT_0b58:
0b5b e5ff | | Load 0x2,-0x1
0b5c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0b5d 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0b5e 82f5 | | Call 0x1,0xf5
0b5f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b60 ; --------------------------------------------------------------------------------------
0b60 ; SUBPROGRAM
0b60 ; --------------------------------------------------------------------------------------
0b60 0b63 | c | .CONST 0x0b63 ; Address of begin
0b61 0004 | | .CONST 0x0004 ; Address of exception handler
0b62 0001 | | .CONST 0x0001 ; Number of locals
0b63 BODY_0b60:
0b63 INIT_0b60:
0b63 e5ff | | Load 0x2,-0x1
0b64 82f4 | | Call 0x1,0xf4
0b65 6804 |h | Jump_Zero 0xb6a
0b66 e5ff | | Load 0x2,-0x1
0b67 82f6 | | Call 0x1,0xf6
0b68 0f04 | | Execute_Immediate Equal,0x4
0b69 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b6a 4800 |H | Short_Literal 0x0
0b6b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b6c 0000 0000 | | .BLANK 0000[0x4]
0b70 ; --------------------------------------------------------------------------------------
0b70 ; SUBPROGRAM
0b70 ; --------------------------------------------------------------------------------------
0b70 0b73 | s | .CONST 0x0b73 ; Address of begin
0b71 0004 | | .CONST 0x0004 ; Address of exception handler
0b72 0001 | | .CONST 0x0001 ; Number of locals
0b73 BODY_0b70:
0b73 INIT_0b70:
0b73 e5ff | | Load 0x2,-0x1
0b74 00d8 | | Load_Top At_Offset_0
0b75 0d39 | 9 | Execute_Immediate Less,0x39
0b76 7019 |p | Jump_Nonzero 0xb90
0b77 00d8 | | Load_Top At_Offset_0
0b78 0c44 | D | Execute_Immediate Greater_Equal,0x44
0b79 7003 |p | Jump_Nonzero 0xb7d
0b7a 00d1 | | Pop_Control Pop_Count_1
0b7b 4800 |H | Short_Literal 0x0
0b7c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b7d 00d8 | | Load_Top At_Offset_0
0b7e 0d6c | l | Execute_Immediate Less,0x6c
0b7f 700b |p | Jump_Nonzero 0xb8b
0b80 00d8 | | Load_Top At_Offset_0
0b81 0c6d | m | Execute_Immediate Greater_Equal,0x6d
0b82 7003 |p | Jump_Nonzero 0xb86
0b83 00d1 | | Pop_Control Pop_Count_1
0b84 4800 |H | Short_Literal 0x0
0b85 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b86 0b74 | t | Execute_Immediate Case_Compare,0x74
0b87 77fb |w | Jump_Nonzero 0xb83
0b88 0f7c | | | Execute_Immediate Equal,0x7c
0b89 77fa |w | Jump_Nonzero 0xb84
0b8a 7ff0 | | Jump 0xb7b
0b8b 0b44 | D | Execute_Immediate Case_Compare,0x44
0b8c 77f6 |w | Jump_Nonzero 0xb83
0b8d 0f4c | L | Execute_Immediate Equal,0x4c
0b8e 77f5 |w | Jump_Nonzero 0xb84
0b8f 7feb | | Jump 0xb7b
0b90 00d8 | | Load_Top At_Offset_0
0b91 0c19 | | Execute_Immediate Greater_Equal,0x19
0b92 701c |p | Jump_Nonzero 0xbaf
0b93 4618 |F | Jump_Case 0x19
0b94 7818 |x | Jump 0xbad ; case 0x0
0b95 7fe5 | | Jump 0xb7b ; case 0x1
0b96 7fe4 | | Jump 0xb7b ; case 0x2
0b97 7fe3 | | Jump 0xb7b ; case 0x3
0b98 7fe2 | | Jump 0xb7b ; case 0x4
0b99 7fe1 | | Jump 0xb7b ; case 0x5
0b9a 7fe0 | | Jump 0xb7b ; case 0x6
0b9b 7fdf | | Jump 0xb7b ; case 0x7
0b9c 7fe7 | | Jump 0xb84 ; case 0x8
0b9d 7fdd | | Jump 0xb7b ; case 0x9
0b9e 7fdc | | Jump 0xb7b ; case 0xa
0b9f 7fdb | | Jump 0xb7b ; case 0xb
0ba0 7fda | | Jump 0xb7b ; case 0xc
0ba1 7fd9 | | Jump 0xb7b ; case 0xd
0ba2 7fd8 | | Jump 0xb7b ; case 0xe
0ba3 7fd7 | | Jump 0xb7b ; case 0xf
0ba4 7808 |x | Jump 0xbad ; case 0x10
0ba5 7fd5 | | Jump 0xb7b ; case 0x11
0ba6 7fd4 | | Jump 0xb7b ; case 0x12
0ba7 7fd3 | | Jump 0xb7b ; case 0x13
0ba8 7fd2 | | Jump 0xb7b ; case 0x14
0ba9 7fd1 | | Jump 0xb7b ; case 0x15
0baa 7fd0 | | Jump 0xb7b ; case 0x16
0bab 7fcf | | Jump 0xb7b ; case 0x17
0bac 7800 |x | Jump 0xbad ; case 0x18
0bad 4801 |H | Short_Literal 0x1
0bae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0baf 0f38 | 8 | Execute_Immediate Equal,0x38
0bb0 77fc |w | Jump_Nonzero 0xbad
0bb1 7fc9 | | Jump 0xb7b
0bb2 0000 0000 | | .BLANK 0000[0x6]
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bbb | | .CONST 0x0bbb ; Address of begin
0bb9 0004 | | .CONST 0x0004 ; Address of exception handler
0bba 0001 | | .CONST 0x0001 ; Number of locals
0bbb BODY_0bb8:
0bbb INIT_0bb8:
0bbb e5ff | | Load 0x2,-0x1
0bbc 82f8 | | Call 0x1,0xf8
0bbd 7003 |p | Jump_Nonzero 0xbc1
0bbe e5ff | | Load 0x2,-0x1
0bbf 0f08 | | Execute_Immediate Equal,0x8
0bc0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bc1 4801 |H | Short_Literal 0x1
0bc2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bc3 0000 0000 | | .BLANK 0000[0x5]
0bc8 ; --------------------------------------------------------------------------------------
0bc8 ; SUBPROGRAM
0bc8 ; --------------------------------------------------------------------------------------
0bc8 0bcb | | .CONST 0x0bcb ; Address of begin
0bc9 0004 | | .CONST 0x0004 ; Address of exception handler
0bca 0001 | | .CONST 0x0001 ; Number of locals
0bcb BODY_0bc8:
0bcb INIT_0bc8:
0bcb e5ff | | Load 0x2,-0x1
0bcc 00d8 | | Load_Top At_Offset_0
0bcd 0d6c | l | Execute_Immediate Less,0x6c
0bce 7018 |p | Jump_Nonzero 0xbe7
0bcf 0a94 | | Execute_Immediate Plus,-0x6c
0bd0 4613 |F | Jump_Case 0x14
0bd1 7817 |x | Jump 0xbe9 ; case 0x0
0bd2 7812 |x | Jump 0xbe5 ; case 0x1
0bd3 7811 |x | Jump 0xbe5 ; case 0x2
0bd4 7810 |x | Jump 0xbe5 ; case 0x3
0bd5 780f |x | Jump 0xbe5 ; case 0x4
0bd6 780e |x | Jump 0xbe5 ; case 0x5
0bd7 780d |x | Jump 0xbe5 ; case 0x6
0bd8 780c |x | Jump 0xbe5 ; case 0x7
0bd9 780f |x | Jump 0xbe9 ; case 0x8
0bda 780a |x | Jump 0xbe5 ; case 0x9
0bdb 7809 |x | Jump 0xbe5 ; case 0xa
0bdc 7808 |x | Jump 0xbe5 ; case 0xb
0bdd 7807 |x | Jump 0xbe5 ; case 0xc
0bde 7806 |x | Jump 0xbe5 ; case 0xd
0bdf 7805 |x | Jump 0xbe5 ; case 0xe
0be0 7804 |x | Jump 0xbe5 ; case 0xf
0be1 7807 |x | Jump 0xbe9 ; case 0x10
0be2 7802 |x | Jump 0xbe5 ; case 0x11
0be3 7801 |x | Jump 0xbe5 ; case 0x12
0be4 7800 |x | Jump 0xbe5 ; case 0x13
0be5 4800 |H | Short_Literal 0x0
0be6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0be7 00d1 | | Pop_Control Pop_Count_1
0be8 7ffc | | Jump 0xbe5
0be9 4801 |H | Short_Literal 0x1
0bea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0beb 0000 0000 | | .BLANK 0000[0x5]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf3 | | .CONST 0x0bf3 ; Address of begin
0bf1 0004 | | .CONST 0x0004 ; Address of exception handler
0bf2 0001 | | .CONST 0x0001 ; Number of locals
0bf3 BODY_0bf0:
0bf3 INIT_0bf0:
0bf3 e5ff | | Load 0x2,-0x1
0bf4 82f9 | | Call 0x1,0xf9
0bf5 7008 |p | Jump_Nonzero 0xbfe
0bf6 e5ff | | Load 0x2,-0x1
0bf7 828d | | Call 0x1,0x8d
0bf8 7003 |p | Jump_Nonzero 0xbfc
0bf9 e5ff | | Load 0x2,-0x1
0bfa 82fa | | Call 0x1,0xfa
0bfb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bfc 4801 |H | Short_Literal 0x1
0bfd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bfe 4801 |H | Short_Literal 0x1
0bff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c00 ; --------------------------------------------------------------------------------------
0c00 ; SUBPROGRAM
0c00 ; --------------------------------------------------------------------------------------
0c00 0c03 | | .CONST 0x0c03 ; Address of begin
0c01 0004 | | .CONST 0x0004 ; Address of exception handler
0c02 0001 | | .CONST 0x0001 ; Number of locals
0c03 BODY_0c00:
0c03 INIT_0c00:
0c03 e5fe | | Load 0x2,-0x2
0c04 6802 |h | Jump_Zero 0xc07
0c05 e5ff | | Load 0x2,-0x1
0c06 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c07 e5fd | | Load 0x2,-0x3
0c08 01db | | Execute Vector,Length
0c09 7002 |p | Jump_Nonzero 0xc0c
0c0a 00ea | | Load_Encached Null_String_Cache
0c0b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c0c e5fd | | Load 0x2,-0x3
0c0d e5ff | | Load 0x2,-0x1
0c0e 01cc | | Execute Vector,Catenate
0c0f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c10 ; --------------------------------------------------------------------------------------
0c10 ; SUBPROGRAM
0c10 ; --------------------------------------------------------------------------------------
0c10 0c26 | & | .CONST 0x0c26 ; Address of begin
0c11 0004 | | .CONST 0x0004 ; Address of exception handler
0c12 0002 | | .CONST 0x0002 ; Number of locals
0c13 INIT_0c10:
0c13 4801 |H | Short_Literal 0x1
0c14 e5ff | | Load 0x2,-0x1
0c15 00e9 | | Load_Encached String_Cache
0c16 035b | [ | Declare_Type Array,Constrained
0c17 0337 | 7 | Declare_Variable Array
0c18 00d8 | | Load_Top At_Offset_0
0c19 0335 | 5 | Declare_Variable Array,Duplicate
0c1a 00cd | | Action Spare6_Action
0c1b e402 | | Load 0x2,0x2
0c1c 01d9 | | Execute Vector,Reverse_Bounds
0c1d 0263 | c | Execute Discrete,Above_Bound
0c1e 7005 |p | Jump_Nonzero 0xc24
0c1f 4820 |H | Short_Literal 0x20
0c20 e405 | | Load 0x2,0x5
0c21 e403 | | Load 0x2,0x3
0c22 01d6 | | Execute Vector,Field_Write
0c23 3ffb |? | Loop_Increasing 0xc1f
0c24 e402 | | Load 0x2,0x2
0c25 01d4 | | Execute Vector,Structure_Write
0c26 BODY_0c10:
0c26 00d8 | | Load_Top At_Offset_0
0c27 00e9 | | Load_Encached String_Cache
0c28 01c6 | | Execute Vector,Convert_To_Formal
0c29 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c2a 0000 0000 | | .BLANK 0000[0x6]
0c30 ; --------------------------------------------------------------------------------------
0c30 ; SUBPROGRAM
0c30 ; --------------------------------------------------------------------------------------
0c30 0c33 | 3 | .CONST 0x0c33 ; Address of begin
0c31 0004 | | .CONST 0x0004 ; Address of exception handler
0c32 0001 | | .CONST 0x0001 ; Number of locals
0c33 BODY_0c30:
0c33 INIT_0c30:
0c33 4803 |H | Short_Literal 0x3
0c34 e5ff | | Load 0x2,-0x1
0c35 0271 | q | Execute Discrete,Times
0c36 492c |I, | Short_Literal 0x12c
0c37 0273 | s | Execute Discrete,Plus
0c38 00d8 | | Load_Top At_Offset_0
0c39 00e3 | | Load_Encached Natural_Cache
0c3a 0260 | ` | Execute Discrete,In_Type
0c3b 7001 |p | Jump_Nonzero 0xc3d
0c3c 0801 | | Execute_Immediate Raise,0x1
0c3d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c3e 0000 0000 | | .XXX[0x2]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c43 | C | .CONST 0x0c43 ; Address of begin
0c41 0004 | | .CONST 0x0004 ; Address of exception handler
0c42 0001 | | .CONST 0x0001 ; Number of locals
0c43 BODY_0c40:
0c43 INIT_0c40:
0c43 e5fd | | Load 0x2,-0x3
0c44 00d8 | | Load_Top At_Offset_0
0c45 4820 |H | Short_Literal 0x20
0c46 4800 |H | Short_Literal 0x0
0c47 480a |H | Short_Literal 0xa
0c48 e5ff | | Load 0x2,-0x1
0c49 e057 | W | Load 0x0,0x57
0c4a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c4b 01cb | | Execute Vector,Append
0c4c 0092 1bd9 | | Action Push_String_Extended,0x1bd9 ; ".."
0c4e 01cc | | Execute Vector,Catenate
0c4f 01cb | | Execute Vector,Append
0c50 4820 |H | Short_Literal 0x20
0c51 4800 |H | Short_Literal 0x0
0c52 480a |H | Short_Literal 0xa
0c53 e5fe | | Load 0x2,-0x2
0c54 e057 | W | Load 0x0,0x57
0c55 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c56 01cc | | Execute Vector,Catenate
0c57 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c58 ; --------------------------------------------------------------------------------------
0c58 ; SUBPROGRAM
0c58 ; --------------------------------------------------------------------------------------
0c58 0c5b | [ | .CONST 0x0c5b ; Address of begin
0c59 0004 | | .CONST 0x0004 ; Address of exception handler
0c5a 0001 | | .CONST 0x0001 ; Number of locals
0c5b BODY_0c58:
0c5b INIT_0c58:
0c5b e5fe | | Load 0x2,-0x2
0c5c 0c02 | | Execute_Immediate Greater_Equal,0x2
0c5d 6822 |h" | Jump_Zero 0xc80
0c5e e5fe | | Load 0x2,-0x2
0c5f e5ff | | Load 0x2,-0x1
0c60 e058 | X | Load 0x0,0x58
0c61 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0c62 027c | | | Execute Discrete,Less
0c63 681a |h | Jump_Zero 0xc7e
0c64 e5fe | | Load 0x2,-0x2
0c65 0aff | | Execute_Immediate Plus,-0x1
0c66 00d8 | | Load_Top At_Offset_0
0c67 00e4 | | Load_Encached Positive_Cache
0c68 0260 | ` | Execute Discrete,In_Type
0c69 7001 |p | Jump_Nonzero 0xc6b
0c6a 0801 | | Execute_Immediate Raise,0x1
0c6b e5ff | | Load 0x2,-0x1
0c6c e058 | X | Load 0x0,0x58
0c6d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0c6e 0f27 | ' | Execute_Immediate Equal,0x27
0c6f 680c |h | Jump_Zero 0xc7c
0c70 e5fe | | Load 0x2,-0x2
0c71 0a01 | | Execute_Immediate Plus,0x1
0c72 00d8 | | Load_Top At_Offset_0
0c73 00e4 | | Load_Encached Positive_Cache
0c74 0260 | ` | Execute Discrete,In_Type
0c75 7001 |p | Jump_Nonzero 0xc77
0c76 0801 | | Execute_Immediate Raise,0x1
0c77 e5ff | | Load 0x2,-0x1
0c78 e058 | X | Load 0x0,0x58
0c79 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0c7a 0f27 | ' | Execute_Immediate Equal,0x27
0c7b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0c7c 4800 |H | Short_Literal 0x0
0c7d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0c7e 4800 |H | Short_Literal 0x0
0c7f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0c80 4800 |H | Short_Literal 0x0
0c81 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0c82 0000 0000 | | .BLANK 0000[0x6]
0c88 ; --------------------------------------------------------------------------------------
0c88 ; SUBPROGRAM
0c88 ; --------------------------------------------------------------------------------------
0c88 0c8b | | .CONST 0x0c8b ; Address of begin
0c89 0004 | | .CONST 0x0004 ; Address of exception handler
0c8a 0001 | | .CONST 0x0001 ; Number of locals
0c8b BODY_0c88:
0c8b INIT_0c88:
0c8b e5fe | | Load 0x2,-0x2
0c8c e5ff | | Load 0x2,-0x1
0c8d 01dd | | Execute Vector,First
0c8e 027d | } | Execute Discrete,Greater
0c8f 6815 |h | Jump_Zero 0xca5
0c90 e5fe | | Load 0x2,-0x2
0c91 e5ff | | Load 0x2,-0x1
0c92 01dc | | Execute Vector,Last
0c93 027c | | | Execute Discrete,Less
0c94 680e |h | Jump_Zero 0xca3
0c95 e5fe | | Load 0x2,-0x2
0c96 0aff | | Execute_Immediate Plus,-0x1
0c97 e5ff | | Load 0x2,-0x1
0c98 01d7 | | Execute Vector,Field_Read
0c99 0f27 | ' | Execute_Immediate Equal,0x27
0c9a 6806 |h | Jump_Zero 0xca1
0c9b e5fe | | Load 0x2,-0x2
0c9c 0a01 | | Execute_Immediate Plus,0x1
0c9d e5ff | | Load 0x2,-0x1
0c9e 01d7 | | Execute Vector,Field_Read
0c9f 0f27 | ' | Execute_Immediate Equal,0x27
0ca0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ca1 4800 |H | Short_Literal 0x0
0ca2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ca3 4800 |H | Short_Literal 0x0
0ca4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ca5 4800 |H | Short_Literal 0x0
0ca6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ca7 0000 | | .XXX[0x1]
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; SUBPROGRAM
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0cb3 | | .CONST 0x0cb3 ; Address of begin
0ca9 0004 | | .CONST 0x0004 ; Address of exception handler
0caa 0003 | | .CONST 0x0003 ; Number of locals
0cab INIT_0ca8:
0cab e5ff | | Load 0x2,-0x1
0cac 01db | | Execute Vector,Length
0cad 00e3 | | Load_Encached Natural_Cache
0cae 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0caf e5ff | | Load 0x2,-0x1
0cb0 01dc | | Execute Vector,Last
0cb1 00e3 | | Load_Encached Natural_Cache
0cb2 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0cb3 BODY_0ca8:
0cb3 e402 | | Load 0x2,0x2
0cb4 0c03 | | Execute_Immediate Greater_Equal,0x3
0cb5 6813 |h | Jump_Zero 0xcc9
0cb6 00d8 | | Load_Top At_Offset_0
0cb7 0afe | | Execute_Immediate Plus,-0x2
0cb8 e403 | | Load 0x2,0x3
0cb9 e5ff | | Load 0x2,-0x1
0cba 01cf | | Execute Vector,Slice_Read
0cbb 0092 1bda | | Action Push_String_Extended,0x1bda ; ", )"
0cbd 01df | | Execute Vector,Equal
0cbe 680a |h | Jump_Zero 0xcc9
0cbf e5ff | | Load 0x2,-0x1
0cc0 01dd | | Execute Vector,First
0cc1 e403 | | Load 0x2,0x3
0cc2 0afd | | Execute_Immediate Plus,-0x3
0cc3 e5ff | | Load 0x2,-0x1
0cc4 01cf | | Execute Vector,Slice_Read
0cc5 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
0cc7 01cc | | Execute Vector,Catenate
0cc8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0cc9 e5ff | | Load 0x2,-0x1
0cca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ccb 0000 0000 | | .BLANK 0000[0x5]
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; SUBPROGRAM
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0cdc | | .CONST 0x0cdc ; Address of begin
0cd1 0004 | | .CONST 0x0004 ; Address of exception handler
0cd2 0003 | | .CONST 0x0003 ; Number of locals
0cd3 INIT_0cd0:
0cd3 e5fe | | Load 0x2,-0x2
0cd4 e058 | X | Load 0x0,0x58
0cd5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0cd6 00e3 | | Load_Encached Natural_Cache
0cd7 03f1 | | Declare_Variable Discrete,With_Value
0cd8 e5ff | | Load 0x2,-0x1
0cd9 01db | | Execute Vector,Length
0cda 00e3 | | Load_Encached Natural_Cache
0cdb 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0cdc BODY_0cd0:
0cdc e402 | | Load 0x2,0x2
0cdd 0c01 | | Execute_Immediate Greater_Equal,0x1
0cde 6818 |h | Jump_Zero 0xcf7
0cdf e402 | | Load 0x2,0x2
0ce0 00d8 | | Load_Top At_Offset_0
0ce1 00e4 | | Load_Encached Positive_Cache
0ce2 0260 | ` | Execute Discrete,In_Type
0ce3 7001 |p | Jump_Nonzero 0xce5
0ce4 0801 | | Execute_Immediate Raise,0x1
0ce5 e5fe | | Load 0x2,-0x2
0ce6 e058 | X | Load 0x0,0x58
0ce7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0ce8 0f0a | | Execute_Immediate Equal,0xa
0ce9 680d |h | Jump_Zero 0xcf7
0cea e5fe | | Load 0x2,-0x2
0ceb 4820 |H | Short_Literal 0x20
0cec e402 | | Load 0x2,0x2
0ced 0aff | | Execute_Immediate Plus,-0x1
0cee 00d8 | | Load_Top At_Offset_0
0cef 00e3 | | Load_Encached Natural_Cache
0cf0 0260 | ` | Execute Discrete,In_Type
0cf1 7001 |p | Jump_Nonzero 0xcf3
0cf2 0801 | | Execute_Immediate Raise,0x1
0cf3 e058 | X | Load 0x0,0x58
0cf4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0cf5 00d1 | | Pop_Control Pop_Count_1
0cf6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0cf7 00d8 | | Load_Top At_Offset_0
0cf8 0c01 | | Execute_Immediate Greater_Equal,0x1
0cf9 6823 |h# | Jump_Zero 0xd1d
0cfa e402 | | Load 0x2,0x2
0cfb e403 | | Load 0x2,0x3
0cfc 027d | } | Execute Discrete,Greater
0cfd 681f |h | Jump_Zero 0xd1d
0cfe e402 | | Load 0x2,0x2
0cff 00d8 | | Load_Top At_Offset_0
0d00 e403 | | Load 0x2,0x3
0d01 0272 | r | Execute Discrete,Minus
0d02 00d8 | | Load_Top At_Offset_0
0d03 00e4 | | Load_Encached Positive_Cache
0d04 0260 | ` | Execute Discrete,In_Type
0d05 7001 |p | Jump_Nonzero 0xd07
0d06 0801 | | Execute_Immediate Raise,0x1
0d07 e5fe | | Load 0x2,-0x2
0d08 e058 | X | Load 0x0,0x58
0d09 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0d0a 480a |H | Short_Literal 0xa
0d0b e5ff | | Load 0x2,-0x1
0d0c 01ca | | Execute Vector,Prepend
0d0d 01df | | Execute Vector,Equal
0d0e 680e |h | Jump_Zero 0xd1d
0d0f e5fe | | Load 0x2,-0x2
0d10 4820 |H | Short_Literal 0x20
0d11 e402 | | Load 0x2,0x2
0d12 e403 | | Load 0x2,0x3
0d13 0a01 | | Execute_Immediate Plus,0x1
0d14 0272 | r | Execute Discrete,Minus
0d15 00d8 | | Load_Top At_Offset_0
0d16 00e3 | | Load_Encached Natural_Cache
0d17 0260 | ` | Execute Discrete,In_Type
0d18 7001 |p | Jump_Nonzero 0xd1a
0d19 0801 | | Execute_Immediate Raise,0x1
0d1a e058 | X | Load 0x0,0x58
0d1b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0d1c 00d1 | | Pop_Control Pop_Count_1
0d1d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d1e 0000 0000 | | .XXX[0x2]
0d20 ; --------------------------------------------------------------------------------------
0d20 ; SUBPROGRAM
0d20 ; --------------------------------------------------------------------------------------
0d20 0d24 | $ | .CONST 0x0d24 ; Address of begin
0d21 0004 | | .CONST 0x0004 ; Address of exception handler
0d22 0002 | | .CONST 0x0002 ; Number of locals
0d23 INIT_0d20:
0d23 00e1 | | Load_Encached Boolean_Cache
0d24 BODY_0d20:
0d24 e5ff | | Load 0x2,-0x1
0d25 01db | | Execute Vector,Length
0d26 e5fe | | Load 0x2,-0x2
0d27 01db | | Execute Vector,Length
0d28 0273 | s | Execute Discrete,Plus
0d29 0a01 | | Execute_Immediate Plus,0x1
0d2a 0c50 | P | Execute_Immediate Greater_Equal,0x50
0d2b 6803 |h | Jump_Zero 0xd2f
0d2c 4801 |H | Short_Literal 0x1
0d2d a402 | | Store_Unchecked 0x2,0x2
0d2e 780c |x | Jump 0xd3b
0d2f 4800 |H | Short_Literal 0x0
0d30 e5fe | | Load 0x2,-0x2
0d31 480a |H | Short_Literal 0xa
0d32 e057 | W | Load 0x0,0x57
0d33 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0d34 0c01 | | Execute_Immediate Greater_Equal,0x1
0d35 6803 |h | Jump_Zero 0xd39
0d36 4801 |H | Short_Literal 0x1
0d37 a402 | | Store_Unchecked 0x2,0x2
0d38 7802 |x | Jump 0xd3b
0d39 4800 |H | Short_Literal 0x0
0d3a a402 | | Store_Unchecked 0x2,0x2
0d3b e5ff | | Load 0x2,-0x1
0d3c 00ea | | Load_Encached Null_String_Cache
0d3d e402 | | Load 0x2,0x2
0d3e 480a |H | Short_Literal 0xa
0d3f e5fd | | Load 0x2,-0x3
0d40 830e | | Call 0x1,0x10e
0d41 01ca | | Execute Vector,Prepend
0d42 830d | | Call 0x1,0x10d
0d43 01cc | | Execute Vector,Catenate
0d44 e5fe | | Load 0x2,-0x2
0d45 01cc | | Execute Vector,Catenate
0d46 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0d47 0000 | | .XXX[0x1]
0d48 ; --------------------------------------------------------------------------------------
0d48 ; SUBPROGRAM
0d48 ; --------------------------------------------------------------------------------------
0d48 0d4b | K | .CONST 0x0d4b ; Address of begin
0d49 0004 | | .CONST 0x0004 ; Address of exception handler
0d4a 0001 | | .CONST 0x0001 ; Number of locals
0d4b BODY_0d48:
0d4b INIT_0d48:
0d4b e5fd | | Load 0x2,-0x3
0d4c 6814 |h | Jump_Zero 0xd61
0d4d e5fe | | Load 0x2,-0x2
0d4e e5ff | | Load 0x2,-0x1
0d4f e058 | X | Load 0x0,0x58
0d50 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0d51 027c | | | Execute Discrete,Less
0d52 680c |h | Jump_Zero 0xd5f
0d53 e5fe | | Load 0x2,-0x2
0d54 0a01 | | Execute_Immediate Plus,0x1
0d55 00d8 | | Load_Top At_Offset_0
0d56 00e4 | | Load_Encached Positive_Cache
0d57 0260 | ` | Execute Discrete,In_Type
0d58 7001 |p | Jump_Nonzero 0xd5a
0d59 0801 | | Execute_Immediate Raise,0x1
0d5a e5ff | | Load 0x2,-0x1
0d5b e058 | X | Load 0x0,0x58
0d5c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0d5d 0f22 | " | Execute_Immediate Equal,0x22
0d5e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0d5f 4800 |H | Short_Literal 0x0
0d60 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0d61 4800 |H | Short_Literal 0x0
0d62 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0d63 0000 0000 | | .BLANK 0000[0x5]
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0004 | | .CONST 0x0004 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b e5fe | | Load 0x2,-0x2
0d6c 00d8 | | Load_Top At_Offset_0
0d6d 00e4 | | Load_Encached Positive_Cache
0d6e 0260 | ` | Execute Discrete,In_Type
0d6f 7001 |p | Jump_Nonzero 0xd71
0d70 0801 | | Execute_Immediate Raise,0x1
0d71 e5ff | | Load 0x2,-0x1
0d72 e058 | X | Load 0x0,0x58
0d73 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0d74 0f22 | " | Execute_Immediate Equal,0x22
0d75 7001 |p | Jump_Nonzero 0xd77
0d76 0887 | | Execute_Immediate Raise,0x87
0d77 e5fd | | Load 0x2,-0x3
0d78 e5fe | | Load 0x2,-0x2
0d79 e5ff | | Load 0x2,-0x1
0d7a 8316 | | Call 0x1,0x116
0d7b 6804 |h | Jump_Zero 0xd80
0d7c e5fe | | Load 0x2,-0x2
0d7d 0a01 | | Execute_Immediate Plus,0x1
0d7e c5fe | | Store 0x2,-0x2
0d7f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d80 e5fd | | Load 0x2,-0x3
0d81 6803 |h | Jump_Zero 0xd85
0d82 4800 |H | Short_Literal 0x0
0d83 a5fd | | Store_Unchecked 0x2,-0x3
0d84 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d85 e5fe | | Load 0x2,-0x2
0d86 e5ff | | Load 0x2,-0x1
0d87 8311 | | Call 0x1,0x111
0d88 6801 |h | Jump_Zero 0xd8a
0d89 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d8a 4801 |H | Short_Literal 0x1
0d8b a5fd | | Store_Unchecked 0x2,-0x3
0d8c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d8d 0000 0000 | | .XXX[0x3]
0d8f 0000 | |
0d90 ; --------------------------------------------------------------------------------------
0d90 ; SUBPROGRAM
0d90 ; --------------------------------------------------------------------------------------
0d90 0d93 | | .CONST 0x0d93 ; Address of begin
0d91 0004 | | .CONST 0x0004 ; Address of exception handler
0d92 0001 | | .CONST 0x0001 ; Number of locals
0d93 BODY_0d90:
0d93 INIT_0d90:
0d93 e5fe | | Load 0x2,-0x2
0d94 e5ff | | Load 0x2,-0x1
0d95 01d7 | | Execute Vector,Field_Read
0d96 0f22 | " | Execute_Immediate Equal,0x22
0d97 7001 |p | Jump_Nonzero 0xd99
0d98 0887 | | Execute_Immediate Raise,0x87
0d99 e5fe | | Load 0x2,-0x2
0d9a e5ff | | Load 0x2,-0x1
0d9b 8312 | | Call 0x1,0x112
0d9c 6801 |h | Jump_Zero 0xd9e
0d9d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d9e e5fd | | Load 0x2,-0x3
0d9f 6812 |h | Jump_Zero 0xdb2
0da0 e5fe | | Load 0x2,-0x2
0da1 e5ff | | Load 0x2,-0x1
0da2 01dc | | Execute Vector,Last
0da3 027c | | | Execute Discrete,Less
0da4 680a |h | Jump_Zero 0xdaf
0da5 e5fe | | Load 0x2,-0x2
0da6 0a01 | | Execute_Immediate Plus,0x1
0da7 e5ff | | Load 0x2,-0x1
0da8 01d7 | | Execute Vector,Field_Read
0da9 0f22 | " | Execute_Immediate Equal,0x22
0daa 6804 |h | Jump_Zero 0xdaf
0dab e5fe | | Load 0x2,-0x2
0dac 0a01 | | Execute_Immediate Plus,0x1
0dad c5fe | | Store 0x2,-0x2
0dae 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0daf 4800 |H | Short_Literal 0x0
0db0 a5fd | | Store_Unchecked 0x2,-0x3
0db1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0db2 4801 |H | Short_Literal 0x1
0db3 a5fd | | Store_Unchecked 0x2,-0x3
0db4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0db5 0000 0000 | | .XXX[0x3]
0db7 0000 | |
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dc5 | | .CONST 0x0dc5 ; Address of begin
0db9 0004 | | .CONST 0x0004 ; Address of exception handler
0dba 0005 | | .CONST 0x0005 ; Number of locals
0dbb INIT_0db8:
0dbb 00e1 | | Load_Encached Boolean_Cache
0dbc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0dbd e5fb | | Load 0x2,-0x5
0dbe e058 | X | Load 0x0,0x58
0dbf 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0dc0 00e3 | | Load_Encached Natural_Cache
0dc1 03f1 | | Declare_Variable Discrete,With_Value
0dc2 00e8 | | Load_Encached Character_Cache
0dc3 00e3 | | Load_Encached Natural_Cache
0dc4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0dc5 BODY_0db8:
0dc5 00cf | | Action Mark_Auxiliary
0dc6 783f |x? | Jump 0xe06
0dc7 e405 | | Load 0x2,0x5
0dc8 00d8 | | Load_Top At_Offset_0
0dc9 00e4 | | Load_Encached Positive_Cache
0dca 0260 | ` | Execute Discrete,In_Type
0dcb 7001 |p | Jump_Nonzero 0xdcd
0dcc 0801 | | Execute_Immediate Raise,0x1
0dcd e5fb | | Load 0x2,-0x5
0dce e058 | X | Load 0x0,0x58
0dcf 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0dd0 a404 | | Store_Unchecked 0x2,0x4
0dd1 e404 | | Load 0x2,0x4
0dd2 0f22 | " | Execute_Immediate Equal,0x22
0dd3 6807 |h | Jump_Zero 0xddb
0dd4 e402 | | Load 0x2,0x2
0dd5 e405 | | Load 0x2,0x5
0dd6 e5fb | | Load 0x2,-0x5
0dd7 8317 | | Call 0x1,0x117
0dd8 c405 | | Store 0x2,0x5
0dd9 c402 | | Store 0x2,0x2
0dda 7827 |x' | Jump 0xe02
0ddb e402 | | Load 0x2,0x2
0ddc 7025 |p% | Jump_Nonzero 0xe02
0ddd e405 | | Load 0x2,0x5
0dde e5fb | | Load 0x2,-0x5
0ddf 8311 | | Call 0x1,0x111
0de0 7021 |p! | Jump_Nonzero 0xe02
0de1 e404 | | Load 0x2,0x4
0de2 e5ff | | Load 0x2,-0x1
0de3 027f | | Execute Discrete,Equal
0de4 680d |h | Jump_Zero 0xdf2
0de5 e5fb | | Load 0x2,-0x5
0de6 4801 |H | Short_Literal 0x1
0de7 e5fe | | Load 0x2,-0x2
0de8 e405 | | Load 0x2,0x5
0de9 00d8 | | Load_Top At_Offset_0
0dea 00e4 | | Load_Encached Positive_Cache
0deb 0260 | ` | Execute Discrete,In_Type
0dec 7001 |p | Jump_Nonzero 0xdee
0ded 0801 | | Execute_Immediate Raise,0x1
0dee e058 | X | Load 0x0,0x58
0def 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0df0 00d1 | | Pop_Control Pop_Count_1
0df1 7810 |x | Jump 0xe02
0df2 e404 | | Load 0x2,0x4
0df3 e5fd | | Load 0x2,-0x3
0df4 027f | | Execute Discrete,Equal
0df5 680c |h | Jump_Zero 0xe02
0df6 e5fb | | Load 0x2,-0x5
0df7 4801 |H | Short_Literal 0x1
0df8 e5fc | | Load 0x2,-0x4
0df9 e405 | | Load 0x2,0x5
0dfa 00d8 | | Load_Top At_Offset_0
0dfb 00e4 | | Load_Encached Positive_Cache
0dfc 0260 | ` | Execute Discrete,In_Type
0dfd 7001 |p | Jump_Nonzero 0xdff
0dfe 0801 | | Execute_Immediate Raise,0x1
0dff e058 | X | Load 0x0,0x58
0e00 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e01 00d1 | | Pop_Control Pop_Count_1
0e02 e405 | | Load 0x2,0x5
0e03 0a01 | | Execute_Immediate Plus,0x1
0e04 c405 | | Store 0x2,0x5
0e05 00c9 | | Action Pop_Auxiliary_Loop
0e06 e405 | | Load 0x2,0x5
0e07 e403 | | Load 0x2,0x3
0e08 027a | z | Execute Discrete,Less_Equal
0e09 77bd |w | Jump_Nonzero 0xdc7
0e0a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e0b 0000 0000 | | .BLANK 0000[0x5]
0e10 ; --------------------------------------------------------------------------------------
0e10 ; SUBPROGRAM
0e10 ; --------------------------------------------------------------------------------------
0e10 0e21 | ! | .CONST 0x0e21 ; Address of begin
0e11 0004 | | .CONST 0x0004 ; Address of exception handler
0e12 0005 | | .CONST 0x0005 ; Number of locals
0e13 INIT_0e10:
0e13 e5fe | | Load 0x2,-0x2
0e14 01db | | Execute Vector,Length
0e15 00e3 | | Load_Encached Natural_Cache
0e16 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e17 e5ff | | Load 0x2,-0x1
0e18 01dd | | Execute Vector,First
0e19 00e3 | | Load_Encached Natural_Cache
0e1a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e1b e5ff | | Load 0x2,-0x1
0e1c 01dc | | Execute Vector,Last
0e1d 00e3 | | Load_Encached Natural_Cache
0e1e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e1f 00e1 | | Load_Encached Boolean_Cache
0e20 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0e21 BODY_0e10:
0e21 00cf | | Action Mark_Auxiliary
0e22 7843 |xC | Jump 0xe66
0e23 e403 | | Load 0x2,0x3
0e24 e5ff | | Load 0x2,-0x1
0e25 01d7 | | Execute Vector,Field_Read
0e26 0f22 | " | Execute_Immediate Equal,0x22
0e27 680a |h | Jump_Zero 0xe32
0e28 e405 | | Load 0x2,0x5
0e29 e403 | | Load 0x2,0x3
0e2a e5ff | | Load 0x2,-0x1
0e2b 8318 | | Call 0x1,0x118
0e2c c403 | | Store 0x2,0x3
0e2d c405 | | Store 0x2,0x5
0e2e e403 | | Load 0x2,0x3
0e2f 0a01 | | Execute_Immediate Plus,0x1
0e30 c403 | | Store 0x2,0x3
0e31 7833 |x3 | Jump 0xe65
0e32 e405 | | Load 0x2,0x5
0e33 702e |p. | Jump_Nonzero 0xe62
0e34 e403 | | Load 0x2,0x3
0e35 e402 | | Load 0x2,0x2
0e36 0273 | s | Execute Discrete,Plus
0e37 0aff | | Execute_Immediate Plus,-0x1
0e38 e404 | | Load 0x2,0x4
0e39 027a | z | Execute Discrete,Less_Equal
0e3a 6827 |h' | Jump_Zero 0xe62
0e3b e403 | | Load 0x2,0x3
0e3c 00d8 | | Load_Top At_Offset_0
0e3d e402 | | Load 0x2,0x2
0e3e 0273 | s | Execute Discrete,Plus
0e3f 0aff | | Execute_Immediate Plus,-0x1
0e40 00d8 | | Load_Top At_Offset_0
0e41 00e2 | | Load_Encached Integer_Cache
0e42 0260 | ` | Execute Discrete,In_Type
0e43 7001 |p | Jump_Nonzero 0xe45
0e44 0801 | | Execute_Immediate Raise,0x1
0e45 e5ff | | Load 0x2,-0x1
0e46 01cf | | Execute Vector,Slice_Read
0e47 e5fe | | Load 0x2,-0x2
0e48 01df | | Execute Vector,Equal
0e49 6818 |h | Jump_Zero 0xe62
0e4a e5ff | | Load 0x2,-0x1
0e4b 01dd | | Execute Vector,First
0e4c e403 | | Load 0x2,0x3
0e4d 0aff | | Execute_Immediate Plus,-0x1
0e4e e5ff | | Load 0x2,-0x1
0e4f 01cf | | Execute Vector,Slice_Read
0e50 e5fd | | Load 0x2,-0x3
0e51 01cc | | Execute Vector,Catenate
0e52 e5fd | | Load 0x2,-0x3
0e53 e5fe | | Load 0x2,-0x2
0e54 e403 | | Load 0x2,0x3
0e55 e402 | | Load 0x2,0x2
0e56 0273 | s | Execute Discrete,Plus
0e57 00d8 | | Load_Top At_Offset_0
0e58 00e2 | | Load_Encached Integer_Cache
0e59 0260 | ` | Execute Discrete,In_Type
0e5a 7001 |p | Jump_Nonzero 0xe5c
0e5b 0801 | | Execute_Immediate Raise,0x1
0e5c e404 | | Load 0x2,0x4
0e5d e5ff | | Load 0x2,-0x1
0e5e 01cf | | Execute Vector,Slice_Read
0e5f 831a | | Call 0x1,0x11a
0e60 01cc | | Execute Vector,Catenate
0e61 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0e62 e403 | | Load 0x2,0x3
0e63 0a01 | | Execute_Immediate Plus,0x1
0e64 c403 | | Store 0x2,0x3
0e65 00c9 | | Action Pop_Auxiliary_Loop
0e66 e403 | | Load 0x2,0x3
0e67 e404 | | Load 0x2,0x4
0e68 027a | z | Execute Discrete,Less_Equal
0e69 77b9 |w | Jump_Nonzero 0xe23
0e6a 00ce | | Action Pop_Auxiliary
0e6b e5ff | | Load 0x2,-0x1
0e6c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0e6d 0000 0000 | | .XXX[0x3]
0e6f 0000 | |
0e70 ; --------------------------------------------------------------------------------------
0e70 ; SUBPROGRAM
0e70 ; --------------------------------------------------------------------------------------
0e70 0e7d | } | .CONST 0x0e7d ; Address of begin
0e71 0004 | | .CONST 0x0004 ; Address of exception handler
0e72 0004 | | .CONST 0x0004 ; Number of locals
0e73 INIT_0e70:
0e73 e5fe | | Load 0x2,-0x2
0e74 01dd | | Execute Vector,First
0e75 00e3 | | Load_Encached Natural_Cache
0e76 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e77 e5fe | | Load 0x2,-0x2
0e78 01dc | | Execute Vector,Last
0e79 00e3 | | Load_Encached Natural_Cache
0e7a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0e7b 00e1 | | Load_Encached Boolean_Cache
0e7c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0e7d BODY_0e70:
0e7d 00cf | | Action Mark_Auxiliary
0e7e 781e |x | Jump 0xe9d
0e7f e402 | | Load 0x2,0x2
0e80 e5fe | | Load 0x2,-0x2
0e81 01d7 | | Execute Vector,Field_Read
0e82 0f22 | " | Execute_Immediate Equal,0x22
0e83 6807 |h | Jump_Zero 0xe8b
0e84 e404 | | Load 0x2,0x4
0e85 e402 | | Load 0x2,0x2
0e86 e5fe | | Load 0x2,-0x2
0e87 8318 | | Call 0x1,0x118
0e88 c402 | | Store 0x2,0x2
0e89 c404 | | Store 0x2,0x4
0e8a 780e |x | Jump 0xe99
0e8b e404 | | Load 0x2,0x4
0e8c 700c |p | Jump_Nonzero 0xe99
0e8d e402 | | Load 0x2,0x2
0e8e e5fe | | Load 0x2,-0x2
0e8f 01d7 | | Execute Vector,Field_Read
0e90 e5ff | | Load 0x2,-0x1
0e91 027f | | Execute Discrete,Equal
0e92 6806 |h | Jump_Zero 0xe99
0e93 e402 | | Load 0x2,0x2
0e94 e5fe | | Load 0x2,-0x2
0e95 8312 | | Call 0x1,0x112
0e96 7002 |p | Jump_Nonzero 0xe99
0e97 e402 | | Load 0x2,0x2
0e98 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e99 e402 | | Load 0x2,0x2
0e9a 0a01 | | Execute_Immediate Plus,0x1
0e9b c402 | | Store 0x2,0x2
0e9c 00c9 | | Action Pop_Auxiliary_Loop
0e9d e402 | | Load 0x2,0x2
0e9e e403 | | Load 0x2,0x3
0e9f 027a | z | Execute Discrete,Less_Equal
0ea0 77de |w | Jump_Nonzero 0xe7f
0ea1 00ce | | Action Pop_Auxiliary
0ea2 4800 |H | Short_Literal 0x0
0ea3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ea4 0000 0000 | | .BLANK 0000[0x4]
0ea8 ; --------------------------------------------------------------------------------------
0ea8 ; SUBPROGRAM
0ea8 ; --------------------------------------------------------------------------------------
0ea8 0eab | | .CONST 0x0eab ; Address of begin
0ea9 0004 | | .CONST 0x0004 ; Address of exception handler
0eaa 0001 | | .CONST 0x0001 ; Number of locals
0eab BODY_0ea8:
0eab INIT_0ea8:
0eab e5ff | | Load 0x2,-0x1
0eac 4828 |H( | Short_Literal 0x28
0ead 831b | | Call 0x1,0x11b
0eae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0eaf 0000 | | .XXX[0x1]
0eb0 ; --------------------------------------------------------------------------------------
0eb0 ; SUBPROGRAM
0eb0 ; --------------------------------------------------------------------------------------
0eb0 0eb3 | | .CONST 0x0eb3 ; Address of begin
0eb1 0004 | | .CONST 0x0004 ; Address of exception handler
0eb2 0001 | | .CONST 0x0001 ; Number of locals
0eb3 BODY_0eb0:
0eb3 INIT_0eb0:
0eb3 e5ff | | Load 0x2,-0x1
0eb4 01db | | Execute Vector,Length
0eb5 0c01 | | Execute_Immediate Greater_Equal,0x1
0eb6 680d |h | Jump_Zero 0xec4
0eb7 e5fe | | Load 0x2,-0x2
0eb8 e058 | X | Load 0x0,0x58
0eb9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0eba 480a |H | Short_Literal 0xa
0ebb 831b | | Call 0x1,0x11b
0ebc 0c01 | | Execute_Immediate Greater_Equal,0x1
0ebd 6806 |h | Jump_Zero 0xec4
0ebe e5fe | | Load 0x2,-0x2
0ebf e5ff | | Load 0x2,-0x1
0ec0 4801 |H | Short_Literal 0x1
0ec1 e058 | X | Load 0x0,0x58
0ec2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0ec3 00d1 | | Pop_Control Pop_Count_1
0ec4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ec5 0000 0000 | | .XXX[0x3]
0ec7 0000 | |
0ec8 ; --------------------------------------------------------------------------------------
0ec8 ; SUBPROGRAM
0ec8 ; --------------------------------------------------------------------------------------
0ec8 0ecb | | .CONST 0x0ecb ; Address of begin
0ec9 0004 | | .CONST 0x0004 ; Address of exception handler
0eca 0001 | | .CONST 0x0001 ; Number of locals
0ecb BODY_0ec8:
0ecb INIT_0ec8:
0ecb 4820 |H | Short_Literal 0x20
0ecc 4803 |H | Short_Literal 0x3
0ecd 4810 |H | Short_Literal 0x10
0ece e5ff | | Load 0x2,-0x1
0ecf e057 | W | Load 0x0,0x57
0ed0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ed1 0092 1bdc | | Action Push_String_Extended,0x1bdc ; ": "
0ed3 01cc | | Execute Vector,Catenate
0ed4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ed5 0000 0000 | | .XXX[0x3]
0ed7 0000 | |
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; SUBPROGRAM
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0f17 | | .CONST 0x0f17 ; Address of begin
0ed9 0004 | | .CONST 0x0004 ; Address of exception handler
0eda 000c | | .CONST 0x000c ; Number of locals
0edb INIT_0ed8:
0edb e5fe | | Load 0x2,-0x2
0edc 0a05 | | Execute_Immediate Plus,0x5
0edd 00d8 | | Load_Top At_Offset_0
0ede 00e3 | | Load_Encached Natural_Cache
0edf 0260 | ` | Execute Discrete,In_Type
0ee0 7001 |p | Jump_Nonzero 0xee2
0ee1 0801 | | Execute_Immediate Raise,0x1
0ee2 830e | | Call 0x1,0x10e
0ee3 00d8 | | Load_Top At_Offset_0
0ee4 01db | | Execute Vector,Length
0ee5 00e3 | | Load_Encached Natural_Cache
0ee6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0ee7 e5ff | | Load 0x2,-0x1
0ee8 01db | | Execute Vector,Length
0ee9 00d8 | | Load_Top At_Offset_0
0eea 00e3 | | Load_Encached Natural_Cache
0eeb 0260 | ` | Execute Discrete,In_Type
0eec 7001 |p | Jump_Nonzero 0xeee
0eed 0801 | | Execute_Immediate Raise,0x1
0eee 830f | | Call 0x1,0x10f
0eef 00e3 | | Load_Encached Natural_Cache
0ef0 03f1 | | Declare_Variable Discrete,With_Value
0ef1 00d8 | | Load_Top At_Offset_0
0ef2 e058 | X | Load 0x0,0x58
0ef3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ef4 1c08 | | Execute_Immediate Run_Utility,0x8
0ef5 00d8 | | Load_Top At_Offset_0
0ef6 1c00 | | Execute_Immediate Run_Utility,0x0
0ef7 029f 1b5b | [| Declare_Subprogram INIT_1b58,For_Call
0ef9 a059 | Y | Store_Unchecked 0x0,0x59
0efa 00c6 | | Action Check_Subprogram_Elaborated
0efb 4806 |H | Short_Literal 0x6
0efc 4802 |H | Short_Literal 0x2
0efd 0099 | | Action Reference_Dynamic
0efe 0093 0000 | | push_full_address 0x0
0f00 605b |`[ | Indirect_Literal Discrete,0xf5c,{0x80000000, 0x00020000}
0f01 0273 | s | Execute Discrete,Plus
0f02 e025 | % | Load 0x0,0x25
0f03 0273 | s | Execute Discrete,Plus
0f04 e05a | Z | Load 0x0,0x5a
0f05 0273 | s | Execute Discrete,Plus
0f06 4809 |H | Short_Literal 0x9
0f07 0007 | | Action Break_Optional
0f08 a05b | [ | Store_Unchecked 0x0,0x5b
0f09 00c6 | | Action Check_Subprogram_Elaborated
0f0a 4806 |H | Short_Literal 0x6
0f0b 4802 |H | Short_Literal 0x2
0f0c 0099 | | Action Reference_Dynamic
0f0d 0093 0000 | | push_full_address 0x0
0f0f 6048 |`H | Indirect_Literal Discrete,0xf58,{0x80000000, 0x00010000}
0f10 0273 | s | Execute Discrete,Plus
0f11 e025 | % | Load 0x0,0x25
0f12 0273 | s | Execute Discrete,Plus
0f13 e05c | \ | Load 0x0,0x5c
0f14 0273 | s | Execute Discrete,Plus
0f15 480c |H | Short_Literal 0xc
0f16 0007 | | Action Break_Optional
0f17 BODY_0ed8:
0f17 e405 | | Load 0x2,0x5
0f18 4820 |H | Short_Literal 0x20
0f19 4800 |H | Short_Literal 0x0
0f1a e058 | X | Load 0x0,0x58
0f1b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0f1c 00d1 | | Pop_Control Pop_Count_1
0f1d e5fd | | Load 0x2,-0x3
0f1e 680e |h | Jump_Zero 0xf2d
0f1f 4800 |H | Short_Literal 0x0
0f20 484f |HO | Short_Literal 0x4f
0f21 e403 | | Load 0x2,0x3
0f22 6031 |`1 | Indirect_Literal Discrete,0xf54,{0x00000000, 0x7fffffff}
0f23 4800 |H | Short_Literal 0x0
0f24 e5ff | | Load 0x2,-0x1
0f25 480a |H | Short_Literal 0xa
0f26 4802 |H | Short_Literal 0x2
0f27 0099 | | Action Reference_Dynamic
0f28 480b |H | Short_Literal 0xb
0f29 4802 |H | Short_Literal 0x2
0f2a 0099 | | Action Reference_Dynamic
0f2b 805b | [ | Call 0x0,0x5b
0f2c 7818 |x | Jump 0xf45
0f2d 484f |HO | Short_Literal 0x4f
0f2e e403 | | Load 0x2,0x3
0f2f 0272 | r | Execute Discrete,Minus
0f30 00d8 | | Load_Top At_Offset_0
0f31 00e4 | | Load_Encached Positive_Cache
0f32 0260 | ` | Execute Discrete,In_Type
0f33 7001 |p | Jump_Nonzero 0xf35
0f34 0801 | | Execute_Immediate Raise,0x1
0f35 e402 | | Load 0x2,0x2
0f36 e5ff | | Load 0x2,-0x1
0f37 4807 |H | Short_Literal 0x7
0f38 4802 |H | Short_Literal 0x2
0f39 0099 | | Action Reference_Dynamic
0f3a 4808 |H | Short_Literal 0x8
0f3b 4802 |H | Short_Literal 0x2
0f3c 0099 | | Action Reference_Dynamic
0f3d 8059 | Y | Call 0x0,0x59
0f3e e405 | | Load 0x2,0x5
0f3f 482c |H, | Short_Literal 0x2c
0f40 4809 |H | Short_Literal 0x9
0f41 4820 |H | Short_Literal 0x20
0f42 4800 |H | Short_Literal 0x0
0f43 8319 | | Call 0x1,0x119
0f44 00d1 | | Pop_Control Pop_Count_1
0f45 e405 | | Load 0x2,0x5
0f46 e402 | | Load 0x2,0x2
0f47 8314 | | Call 0x1,0x114
0f48 00d1 | | Pop_Control Pop_Count_1
0f49 e5fd | | Load 0x2,-0x3
0f4a 6804 |h | Jump_Zero 0xf4f
0f4b e405 | | Load 0x2,0x5
0f4c e402 | | Load 0x2,0x2
0f4d 831d | | Call 0x1,0x11d
0f4e 00d1 | | Pop_Control Pop_Count_1
0f4f e405 | | Load 0x2,0x5
0f50 e058 | X | Load 0x0,0x58
0f51 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f52 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0f53 0000 | | .XXX[0x1]
0f54 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0f58 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0f5c 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0f60 ; --------------------------------------------------------------------------------------
0f60 ; SUBPROGRAM
0f60 ; --------------------------------------------------------------------------------------
0f60 0f64 | d | .CONST 0x0f64 ; Address of begin
0f61 0004 | | .CONST 0x0004 ; Address of exception handler
0f62 0002 | | .CONST 0x0002 ; Number of locals
0f63 INIT_0f60:
0f63 00e3 | | Load_Encached Natural_Cache
0f64 BODY_0f60:
0f64 e5ff | | Load 0x2,-0x1
0f65 831c | | Call 0x1,0x11c
0f66 a402 | | Store_Unchecked 0x2,0x2
0f67 00d8 | | Load_Top At_Offset_0
0f68 0c01 | | Execute_Immediate Greater_Equal,0x1
0f69 6811 |h | Jump_Zero 0xf7b
0f6a e5fe | | Load 0x2,-0x2
0f6b 4801 |H | Short_Literal 0x1
0f6c e5fe | | Load 0x2,-0x2
0f6d e402 | | Load 0x2,0x2
0f6e e5ff | | Load 0x2,-0x1
0f6f 01dc | | Execute Vector,Last
0f70 e5ff | | Load 0x2,-0x1
0f71 01cf | | Execute Vector,Slice_Read
0f72 831f | | Call 0x1,0x11f
0f73 e5ff | | Load 0x2,-0x1
0f74 01dd | | Execute Vector,First
0f75 e402 | | Load 0x2,0x2
0f76 0aff | | Execute_Immediate Plus,-0x1
0f77 e5ff | | Load 0x2,-0x1
0f78 01cf | | Execute Vector,Slice_Read
0f79 8315 | | Call 0x1,0x115
0f7a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f7b 4800 |H | Short_Literal 0x0
0f7c e5fe | | Load 0x2,-0x2
0f7d e5ff | | Load 0x2,-0x1
0f7e 831f | | Call 0x1,0x11f
0f7f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f80 ; --------------------------------------------------------------------------------------
0f80 ; SUBPROGRAM
0f80 ; --------------------------------------------------------------------------------------
0f80 0f83 | | .CONST 0x0f83 ; Address of begin
0f81 0004 | | .CONST 0x0004 ; Address of exception handler
0f82 0001 | | .CONST 0x0001 ; Number of locals
0f83 BODY_0f80:
0f83 INIT_0f80:
0f83 e5fe | | Load 0x2,-0x2
0f84 831e | | Call 0x1,0x11e
0f85 e5fd | | Load 0x2,-0x3
0f86 830e | | Call 0x1,0x10e
0f87 01cc | | Execute Vector,Catenate
0f88 4800 |H | Short_Literal 0x0
0f89 e5fe | | Load 0x2,-0x2
0f8a e5ff | | Load 0x2,-0x1
0f8b 805d | ] | Call 0x0,0x5d
0f8c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0f8d 0000 0000 | | .XXX[0x3]
0f8f 0000 | |
0f90 ; --------------------------------------------------------------------------------------
0f90 ; SUBPROGRAM
0f90 ; --------------------------------------------------------------------------------------
0f90 0f93 | | .CONST 0x0f93 ; Address of begin
0f91 0004 | | .CONST 0x0004 ; Address of exception handler
0f92 0001 | | .CONST 0x0001 ; Number of locals
0f93 BODY_0f90:
0f93 INIT_0f90:
0f93 e5ff | | Load 0x2,-0x1
0f94 6802 |h | Jump_Zero 0xf97
0f95 4800 |H | Short_Literal 0x0
0f96 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f97 4820 |H | Short_Literal 0x20
0f98 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f99 0000 0000 | | .BLANK 0000[0x7]
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fa3 | | .CONST 0x0fa3 ; Address of begin
0fa1 0004 | | .CONST 0x0004 ; Address of exception handler
0fa2 0001 | | .CONST 0x0001 ; Number of locals
0fa3 BODY_0fa0:
0fa3 INIT_0fa0:
0fa3 4820 |H | Short_Literal 0x20
0fa4 4800 |H | Short_Literal 0x0
0fa5 4810 |H | Short_Literal 0x10
0fa6 e5ff | | Load 0x2,-0x1
0fa7 e057 | W | Load 0x0,0x57
0fa8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0fa9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0faa 0000 0000 | | .BLANK 0000[0x6]
0fb0 ; --------------------------------------------------------------------------------------
0fb0 ; SUBPROGRAM
0fb0 ; --------------------------------------------------------------------------------------
0fb0 0fb5 | | .CONST 0x0fb5 ; Address of begin
0fb1 0004 | | .CONST 0x0004 ; Address of exception handler
0fb2 0002 | | .CONST 0x0002 ; Number of locals
0fb3 INIT_0fb0:
0fb3 e5fe | | Load 0x2,-0x2
0fb4 8322 | " | Call 0x1,0x122
0fb5 BODY_0fb0:
0fb5 00d8 | | Load_Top At_Offset_0
0fb6 0092 1bdd | | Action Push_String_Extended,0x1bdd ; "#"
0fb8 e5ff | | Load 0x2,-0x1
0fb9 e048 | H | Load 0x0,0x48
0fba 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0fbb 8323 | # | Call 0x1,0x123
0fbc 01cc | | Execute Vector,Catenate
0fbd 01cb | | Execute Vector,Append
0fbe 0092 1bdd | | Action Push_String_Extended,0x1bdd ; "#"
0fc0 01cc | | Execute Vector,Catenate
0fc1 e5ff | | Load 0x2,-0x1
0fc2 e048 | H | Load 0x0,0x48
0fc3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0fc4 8323 | # | Call 0x1,0x123
0fc5 01cc | | Execute Vector,Catenate
0fc6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fc7 0000 | | .XXX[0x1]
0fc8 ; --------------------------------------------------------------------------------------
0fc8 ; SUBPROGRAM
0fc8 ; --------------------------------------------------------------------------------------
0fc8 0fcd | | .CONST 0x0fcd ; Address of begin
0fc9 0004 | | .CONST 0x0004 ; Address of exception handler
0fca 0002 | | .CONST 0x0002 ; Number of locals
0fcb INIT_0fc8:
0fcb e5ff | | Load 0x2,-0x1
0fcc 8322 | " | Call 0x1,0x122
0fcd BODY_0fc8:
0fcd e5fe | | Load 0x2,-0x2
0fce 680d |h | Jump_Zero 0xfdc
0fcf 00d8 | | Load_Top At_Offset_0
0fd0 0092 1bde | | Action Push_String_Extended,0x1bde ; "->"
0fd2 01ca | | Execute Vector,Prepend
0fd3 00ea | | Load_Encached Null_String_Cache
0fd4 e5ff | | Load 0x2,-0x1
0fd5 0f00 | | Execute_Immediate Equal,0x0
0fd6 e402 | | Load 0x2,0x2
0fd7 00ea | | Load_Encached Null_String_Cache
0fd8 01ca | | Execute Vector,Prepend
0fd9 830d | | Call 0x1,0x10d
0fda 01cc | | Execute Vector,Catenate
0fdb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fdc e2fc | | Load 0x1,0xfc
0fdd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fde 0000 0000 | | .XXX[0x2]
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; SUBPROGRAM
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0fe5 | | .CONST 0x0fe5 ; Address of begin
0fe1 0004 | | .CONST 0x0004 ; Address of exception handler
0fe2 0002 | | .CONST 0x0002 ; Number of locals
0fe3 INIT_0fe0:
0fe3 e5fe | | Load 0x2,-0x2
0fe4 8322 | " | Call 0x1,0x122
0fe5 BODY_0fe0:
0fe5 483e |H> | Short_Literal 0x3e
0fe6 483c |H< | Short_Literal 0x3c
0fe7 00ea | | Load_Encached Null_String_Cache
0fe8 e5fe | | Load 0x2,-0x2
0fe9 e402 | | Load 0x2,0x2
0fea 00ea | | Load_Encached Null_String_Cache
0feb 01ca | | Execute Vector,Prepend
0fec 830d | | Call 0x1,0x10d
0fed 01cb | | Execute Vector,Append
0fee e5fe | | Load 0x2,-0x2
0fef e5ff | | Load 0x2,-0x1
0ff0 8324 | $ | Call 0x1,0x124
0ff1 01cc | | Execute Vector,Catenate
0ff2 01cb | | Execute Vector,Append
0ff3 e5fd | | Load 0x2,-0x3
0ff4 e5fe | | Load 0x2,-0x2
0ff5 8325 | % | Call 0x1,0x125
0ff6 01cc | | Execute Vector,Catenate
0ff7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ff8 ; --------------------------------------------------------------------------------------
0ff8 ; SUBPROGRAM
0ff8 ; --------------------------------------------------------------------------------------
0ff8 0ffb | | .CONST 0x0ffb ; Address of begin
0ff9 0004 | | .CONST 0x0004 ; Address of exception handler
0ffa 0001 | | .CONST 0x0001 ; Number of locals
0ffb BODY_0ff8:
0ffb INIT_0ff8:
0ffb e5ff | | Load 0x2,-0x1
0ffc 0d01 | | Execute_Immediate Less,0x1
0ffd 6802 |h | Jump_Zero 0x1000
0ffe 00ea | | Load_Encached Null_String_Cache
0fff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1000 e327 | ' | Load 0x1,0x127
1001 e5ff | | Load 0x2,-0x1
1002 0aff | | Execute_Immediate Plus,-0x1
1003 00d8 | | Load_Top At_Offset_0
1004 00e2 | | Load_Encached Integer_Cache
1005 0260 | ` | Execute Discrete,In_Type
1006 7001 |p | Jump_Nonzero 0x1008
1007 0801 | | Execute_Immediate Raise,0x1
1008 8328 | ( | Call 0x1,0x128
1009 01cc | | Execute Vector,Catenate
100a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
100b 0000 0000 | | .BLANK 0000[0x5]
1010 ; --------------------------------------------------------------------------------------
1010 ; SUBPROGRAM
1010 ; --------------------------------------------------------------------------------------
1010 101a | | .CONST 0x101a ; Address of begin
1011 0004 | | .CONST 0x0004 ; Address of exception handler
1012 0005 | | .CONST 0x0005 ; Number of locals
1013 INIT_1010:
1013 e018 | | Load 0x0,0x18
1014 0322 | " | Declare_Variable Record
1015 00e6 | | Load_Encached Float_Cache
1016 e048 | H | Load 0x0,0x48
1017 1b15 | | Execute Package,Field_Read,Field_Number 0x15
1018 029f 1b6b | k| Declare_Subprogram INIT_1b68,For_Call
101a BODY_1010:
101a e5fe | | Load 0x2,-0x2
101b 828b | | Call 0x1,0x8b
101c 6807 |h | Jump_Zero 0x1024
101d 4820 |H | Short_Literal 0x20
101e 4800 |H | Short_Literal 0x0
101f 480a |H | Short_Literal 0xa
1020 e5ff | | Load 0x2,-0x1
1021 e057 | W | Load 0x0,0x57
1022 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1023 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1024 e5fe | | Load 0x2,-0x2
1025 8261 | a | Call 0x1,0x61
1026 e402 | | Load 0x2,0x2
1027 017d | } | Execute Record,Structure_Write
1028 e402 | | Load 0x2,0x2
1029 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
102a 82f3 | | Call 0x1,0xf3
102b 6829 |h) | Jump_Zero 0x1055
102c e402 | | Load 0x2,0x2
102d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
102e 82f5 | | Call 0x1,0xf5
102f 4609 |F | Jump_Case 0xa
1030 7809 |x | Jump 0x103a ; case 0x0
1031 7808 |x | Jump 0x103a ; case 0x1
1032 7807 |x | Jump 0x103a ; case 0x2
1033 7806 |x | Jump 0x103a ; case 0x3
1034 781b |x | Jump 0x1050 ; case 0x4
1035 781d |x | Jump 0x1053 ; case 0x5
1036 780b |x | Jump 0x1042 ; case 0x6
1037 7802 |x | Jump 0x103a ; case 0x7
1038 7808 |x | Jump 0x1041 ; case 0x8
1039 7800 |x | Jump 0x103a ; case 0x9
103a 4820 |H | Short_Literal 0x20
103b 4800 |H | Short_Literal 0x0
103c 480a |H | Short_Literal 0xa
103d e5ff | | Load 0x2,-0x1
103e e057 | W | Load 0x0,0x57
103f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1040 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1041 0887 | | Execute_Immediate Raise,0x87
1042 e5ff | | Load 0x2,-0x1
1043 e2bd | | Load 0x1,0xbd
1044 e2be | | Load 0x1,0xbe
1045 1dbf | | Execute_Immediate Reference_Lex_1,0xbf
1046 8002 | | Call 0x0,0x2
1047 a403 | | Store_Unchecked 0x2,0x3
1048 4805 |H | Short_Literal 0x5
1049 e05e | ^ | Load 0x0,0x5e
104a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
104b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
104c e403 | | Load 0x2,0x3
104d e05e | ^ | Load 0x0,0x5e
104e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
104f 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1050 e5ff | | Load 0x2,-0x1
1051 8351 | Q | Call 0x1,0x151
1052 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1053 8405 | | Call 0x2,0x5
1054 786e |xn | Jump 0x10c3
1055 e5fe | | Load 0x2,-0x2
1056 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1057 00d8 | | Load_Top At_Offset_0
1058 0d39 | 9 | Execute_Immediate Less,0x39
1059 7017 |p | Jump_Nonzero 0x1071
105a 00d8 | | Load_Top At_Offset_0
105b 0c44 | D | Execute_Immediate Greater_Equal,0x44
105c 7002 |p | Jump_Nonzero 0x105f
105d 00d1 | | Pop_Control Pop_Count_1
105e 0887 | | Execute_Immediate Raise,0x87
105f 00d8 | | Load_Top At_Offset_0
1060 0d6c | l | Execute_Immediate Less,0x6c
1061 700a |p | Jump_Nonzero 0x106c
1062 00d8 | | Load_Top At_Offset_0
1063 0c6d | m | Execute_Immediate Greater_Equal,0x6d
1064 7002 |p | Jump_Nonzero 0x1067
1065 00d1 | | Pop_Control Pop_Count_1
1066 0887 | | Execute_Immediate Raise,0x87
1067 0b74 | t | Execute_Immediate Case_Compare,0x74
1068 77fc |w | Jump_Nonzero 0x1065
1069 0f7c | | | Execute_Immediate Equal,0x7c
106a 77fb |w | Jump_Nonzero 0x1066
106b 7ff2 | | Jump 0x105e
106c 0b44 | D | Execute_Immediate Case_Compare,0x44
106d 77f7 |w | Jump_Nonzero 0x1065
106e 0f4c | L | Execute_Immediate Equal,0x4c
106f 77f6 |w | Jump_Nonzero 0x1066
1070 7fed | | Jump 0x105e
1071 00d8 | | Load_Top At_Offset_0
1072 0c19 | | Execute_Immediate Greater_Equal,0x19
1073 702d |p- | Jump_Nonzero 0x10a1
1074 4618 |F | Jump_Case 0x19
1075 782e |x. | Jump 0x10a4 ; case 0x0
1076 7fe7 | | Jump 0x105e ; case 0x1
1077 7fe6 | | Jump 0x105e ; case 0x2
1078 7fe5 | | Jump 0x105e ; case 0x3
1079 7fe4 | | Jump 0x105e ; case 0x4
107a 7fe3 | | Jump 0x105e ; case 0x5
107b 7fe2 | | Jump 0x105e ; case 0x6
107c 7fe1 | | Jump 0x105e ; case 0x7
107d 782d |x- | Jump 0x10ab ; case 0x8
107e 7fdf | | Jump 0x105e ; case 0x9
107f 7fde | | Jump 0x105e ; case 0xa
1080 7fdd | | Jump 0x105e ; case 0xb
1081 7fdc | | Jump 0x105e ; case 0xc
1082 7fdb | | Jump 0x105e ; case 0xd
1083 7fda | | Jump 0x105e ; case 0xe
1084 7fd9 | | Jump 0x105e ; case 0xf
1085 7833 |x3 | Jump 0x10b9 ; case 0x10
1086 7fd7 | | Jump 0x105e ; case 0x11
1087 7fd6 | | Jump 0x105e ; case 0x12
1088 7fd5 | | Jump 0x105e ; case 0x13
1089 7fd4 | | Jump 0x105e ; case 0x14
108a 7fd3 | | Jump 0x105e ; case 0x15
108b 7fd2 | | Jump 0x105e ; case 0x16
108c 7fd1 | | Jump 0x105e ; case 0x17
108d 7800 |x | Jump 0x108e ; case 0x18
108e e5ff | | Load 0x2,-0x1
108f e23d | = | Load 0x1,0x3d
1090 e23e | > | Load 0x1,0x3e
1091 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
1092 8002 | | Call 0x0,0x2
1093 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1094 a404 | | Store_Unchecked 0x2,0x4
1095 4820 |H | Short_Literal 0x20
1096 4800 |H | Short_Literal 0x0
1097 4810 |H | Short_Literal 0x10
1098 e404 | | Load 0x2,0x4
1099 00d8 | | Load_Top At_Offset_0
109a 00e2 | | Load_Encached Integer_Cache
109b 0260 | ` | Execute Discrete,In_Type
109c 7001 |p | Jump_Nonzero 0x109e
109d 0801 | | Execute_Immediate Raise,0x1
109e e057 | W | Load 0x0,0x57
109f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
10a0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
10a1 0f38 | 8 | Execute_Immediate Equal,0x38
10a2 7016 |p | Jump_Nonzero 0x10b9
10a3 7fba | | Jump 0x105e
10a4 4820 |H | Short_Literal 0x20
10a5 4800 |H | Short_Literal 0x0
10a6 480a |H | Short_Literal 0xa
10a7 e5ff | | Load 0x2,-0x1
10a8 e057 | W | Load 0x0,0x57
10a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
10aa 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
10ab e5ff | | Load 0x2,-0x1
10ac e2bd | | Load 0x1,0xbd
10ad e2be | | Load 0x1,0xbe
10ae 1dbf | | Execute_Immediate Reference_Lex_1,0xbf
10af 8002 | | Call 0x0,0x2
10b0 a403 | | Store_Unchecked 0x2,0x3
10b1 4805 |H | Short_Literal 0x5
10b2 e05e | ^ | Load 0x0,0x5e
10b3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10b4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
10b5 e403 | | Load 0x2,0x3
10b6 e05e | ^ | Load 0x0,0x5e
10b7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10b8 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
10b9 4800 |H | Short_Literal 0x0
10ba e5f9 | | Load 0x2,-0x7
10bb e5fa | | Load 0x2,-0x6
10bc e5fb | | Load 0x2,-0x5
10bd e5fc | | Load 0x2,-0x4
10be e5fd | | Load 0x2,-0x3
10bf e5fe | | Load 0x2,-0x2
10c0 e5ff | | Load 0x2,-0x1
10c1 832a | * | Call 0x1,0x12a
10c2 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
10c3 0831 | 1 | Execute_Immediate Raise,0x31
10c4 0000 0000 | | .BLANK 0000[0x4]
10c8 ; --------------------------------------------------------------------------------------
10c8 ; SUBPROGRAM
10c8 ; --------------------------------------------------------------------------------------
10c8 10db | | .CONST 0x10db ; Address of begin
10c9 0004 | | .CONST 0x0004 ; Address of exception handler
10ca 0003 | | .CONST 0x0003 ; Number of locals
10cb INIT_10c8:
10cb e027 | ' | Load 0x0,0x27
10cc 0322 | " | Declare_Variable Record
10cd 4800 |H | Short_Literal 0x0
10ce 00d8 | | Load_Top At_Offset_0
10cf e213 | | Load 0x1,0x13
10d0 0260 | ` | Execute Discrete,In_Type
10d1 7001 |p | Jump_Nonzero 0x10d3
10d2 0801 | | Execute_Immediate Raise,0x1
10d3 e5fe | | Load 0x2,-0x2
10d4 e266 | f | Load 0x1,0x66
10d5 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
10d6 8265 | e | Call 0x1,0x65
10d7 e402 | | Load 0x2,0x2
10d8 017d | } | Execute Record,Structure_Write
10d9 e048 | H | Load 0x0,0x48
10da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10db BODY_10c8:
10db e5ff | | Load 0x2,-0x1
10dc 7003 |p | Jump_Nonzero 0x10e0
10dd 4800 |H | Short_Literal 0x0
10de a403 | | Store_Unchecked 0x2,0x3
10df 7806 |x | Jump 0x10e6
10e0 e5ff | | Load 0x2,-0x1
10e1 e402 | | Load 0x2,0x2
10e2 e5fe | | Load 0x2,-0x2
10e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
10e4 8282 | | Call 0x1,0x82
10e5 a403 | | Store_Unchecked 0x2,0x3
10e6 e5f8 | | Load 0x2,-0x8
10e7 e5f9 | | Load 0x2,-0x7
10e8 e5fa | | Load 0x2,-0x6
10e9 e5fb | | Load 0x2,-0x5
10ea e5fc | | Load 0x2,-0x4
10eb e5fd | | Load 0x2,-0x3
10ec e402 | | Load 0x2,0x2
10ed 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
10ee e403 | | Load 0x2,0x3
10ef 834f | O | Call 0x1,0x14f
10f0 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
10f1 0000 0000 | | .BLANK 0000[0x7]
10f8 ; --------------------------------------------------------------------------------------
10f8 ; SUBPROGRAM
10f8 ; --------------------------------------------------------------------------------------
10f8 1112 | | .CONST 0x1112 ; Address of begin
10f9 0004 | | .CONST 0x0004 ; Address of exception handler
10fa 0003 | | .CONST 0x0003 ; Number of locals
10fb INIT_10f8:
10fb e027 | ' | Load 0x0,0x27
10fc 0322 | " | Declare_Variable Record
10fd 4800 |H | Short_Literal 0x0
10fe 00d8 | | Load_Top At_Offset_0
10ff e213 | | Load 0x1,0x13
1100 0260 | ` | Execute Discrete,In_Type
1101 7001 |p | Jump_Nonzero 0x1103
1102 0801 | | Execute_Immediate Raise,0x1
1103 e5fd | | Load 0x2,-0x3
1104 e266 | f | Load 0x1,0x66
1105 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
1106 8265 | e | Call 0x1,0x65
1107 e402 | | Load 0x2,0x2
1108 017d | } | Execute Record,Structure_Write
1109 e5fe | | Load 0x2,-0x2
110a e5ff | | Load 0x2,-0x1
110b e402 | | Load 0x2,0x2
110c e5fd | | Load 0x2,-0x3
110d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
110e 8285 | | Call 0x1,0x85
110f e048 | H | Load 0x0,0x48
1110 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1111 03f1 | | Declare_Variable Discrete,With_Value
1112 BODY_10f8:
1112 e5f7 | | Load 0x2,-0x9
1113 e5f8 | | Load 0x2,-0x8
1114 e5f9 | | Load 0x2,-0x7
1115 e5fa | | Load 0x2,-0x6
1116 e5fb | | Load 0x2,-0x5
1117 e5fc | | Load 0x2,-0x4
1118 e402 | | Load 0x2,0x2
1119 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
111a e403 | | Load 0x2,0x3
111b 834f | O | Call 0x1,0x14f
111c 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
111d 0000 0000 | | .XXX[0x3]
111f 0000 | |
1120 ; --------------------------------------------------------------------------------------
1120 ; SUBPROGRAM
1120 ; --------------------------------------------------------------------------------------
1120 1136 | 6 | .CONST 0x1136 ; Address of begin
1121 0004 | | .CONST 0x0004 ; Address of exception handler
1122 000c | | .CONST 0x000c ; Number of locals
1123 INIT_1120:
1123 e2b3 | | Load 0x1,0xb3
1124 00e5 | | Load_Encached Long_Integer_Cache
1125 03f1 | | Declare_Variable Discrete,With_Value
1126 e5ff | | Load 0x2,-0x1
1127 01dc | | Execute Vector,Last
1128 00e5 | | Load_Encached Long_Integer_Cache
1129 03f1 | | Declare_Variable Discrete,With_Value
112a e034 | 4 | Load 0x0,0x34
112b 0322 | " | Declare_Variable Record
112c e037 | 7 | Load 0x0,0x37
112d 0322 | " | Declare_Variable Record
112e 00e5 | | Load_Encached Long_Integer_Cache
112f 03e9 | | Declare_Variable Discrete,Duplicate
1130 03e9 | | Declare_Variable Discrete,Duplicate
1131 e048 | H | Load 0x0,0x48
1132 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1133 00e5 | | Load_Encached Long_Integer_Cache
1134 03e9 | | Declare_Variable Discrete,Duplicate
1135 03e9 | | Declare_Variable Discrete,Duplicate
1136 BODY_1120:
1136 e5fc | | Load 0x2,-0x4
1137 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1138 0f6c | l | Execute_Immediate Equal,0x6c
1139 7001 |p | Jump_Nonzero 0x113b
113a 0887 | | Execute_Immediate Raise,0x87
113b e5ff | | Load 0x2,-0x1
113c 01dd | | Execute Vector,First
113d 6801 |h | Jump_Zero 0x113f
113e 0887 | | Execute_Immediate Raise,0x87
113f e5fd | | Load 0x2,-0x3
1140 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1141 680d |h | Jump_Zero 0x114f
1142 e5fe | | Load 0x2,-0x2
1143 e5fd | | Load 0x2,-0x3
1144 e5ff | | Load 0x2,-0x1
1145 82ae | | Call 0x1,0xae
1146 e404 | | Load 0x2,0x4
1147 017d | } | Execute Record,Structure_Write
1148 e404 | | Load 0x2,0x4
1149 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
114a e5fd | | Load 0x2,-0x3
114b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
114c 0273 | s | Execute Discrete,Plus
114d a406 | | Store_Unchecked 0x2,0x6
114e 7803 |x | Jump 0x1152
114f e5fd | | Load 0x2,-0x3
1150 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
1151 a406 | | Store_Unchecked 0x2,0x6
1152 e406 | | Load 0x2,0x6
1153 e402 | | Load 0x2,0x2
1154 0273 | s | Execute Discrete,Plus
1155 0aff | | Execute_Immediate Plus,-0x1
1156 e403 | | Load 0x2,0x3
1157 027a | z | Execute Discrete,Less_Equal
1158 6808 |h | Jump_Zero 0x1161
1159 e406 | | Load 0x2,0x6
115a e403 | | Load 0x2,0x3
115b e5ff | | Load 0x2,-0x1
115c 01cf | | Execute Vector,Slice_Read
115d 82bb | | Call 0x1,0xbb
115e e405 | | Load 0x2,0x5
115f 017d | } | Execute Record,Structure_Write
1160 7806 |x | Jump 0x1167
1161 e406 | | Load 0x2,0x6
1162 e5fe | | Load 0x2,-0x2
1163 827c | | | Call 0x1,0x7c
1164 82ba | | Call 0x1,0xba
1165 e405 | | Load 0x2,0x5
1166 017d | } | Execute Record,Structure_Write
1167 00e5 | | Load_Encached Long_Integer_Cache
1168 00e5 | | Load_Encached Long_Integer_Cache
1169 00e5 | | Load_Encached Long_Integer_Cache
116a e405 | | Load 0x2,0x5
116b e5fc | | Load 0x2,-0x4
116c 834c | L | Call 0x1,0x14c
116d c40a | | Store 0x2,0xa
116e c40b | | Store 0x2,0xb
116f c40c | | Store 0x2,0xc
1170 00d8 | | Load_Top At_Offset_0
1171 e5fb | | Load 0x2,-0x5
1172 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
1173 027a | z | Execute Discrete,Less_Equal
1174 7001 |p | Jump_Nonzero 0x1176
1175 0887 | | Execute_Immediate Raise,0x87
1176 e406 | | Load 0x2,0x6
1177 e402 | | Load 0x2,0x2
1178 0273 | s | Execute Discrete,Plus
1179 a407 | | Store_Unchecked 0x2,0x7
117a e407 | | Load 0x2,0x7
117b e40c | | Load 0x2,0xc
117c 0273 | s | Execute Discrete,Plus
117d 0aff | | Execute_Immediate Plus,-0x1
117e a408 | | Store_Unchecked 0x2,0x8
117f e407 | | Load 0x2,0x7
1180 e5fe | | Load 0x2,-0x2
1181 827c | | | Call 0x1,0x7c
1182 a409 | | Store_Unchecked 0x2,0x9
1183 e408 | | Load 0x2,0x8
1184 e403 | | Load 0x2,0x3
1185 027a | z | Execute Discrete,Less_Equal
1186 6810 |h | Jump_Zero 0x1197
1187 e5f6 | | Load 0x2,-0xa
1188 e5f7 | | Load 0x2,-0x9
1189 e5f8 | | Load 0x2,-0x8
118a e5f9 | | Load 0x2,-0x7
118b e5fa | | Load 0x2,-0x6
118c e40b | | Load 0x2,0xb
118d e40a | | Load 0x2,0xa
118e e5fc | | Load 0x2,-0x4
118f e409 | | Load 0x2,0x9
1190 e407 | | Load 0x2,0x7
1191 e408 | | Load 0x2,0x8
1192 e5ff | | Load 0x2,-0x1
1193 01cf | | Execute Vector,Slice_Read
1194 8216 | | Call 0x1,0x16
1195 834a | J | Call 0x1,0x14a
1196 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1197 e5f6 | | Load 0x2,-0xa
1198 e5f7 | | Load 0x2,-0x9
1199 e5f8 | | Load 0x2,-0x8
119a e5f9 | | Load 0x2,-0x7
119b e5fa | | Load 0x2,-0x6
119c e40b | | Load 0x2,0xb
119d e40a | | Load 0x2,0xa
119e e5fc | | Load 0x2,-0x4
119f e409 | | Load 0x2,0x9
11a0 e215 | | Load 0x1,0x15
11a1 834a | J | Call 0x1,0x14a
11a2 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
11a3 0000 0000 | | .BLANK 0000[0x5]
11a8 ; --------------------------------------------------------------------------------------
11a8 ; SUBPROGRAM
11a8 ; --------------------------------------------------------------------------------------
11a8 11ab | | .CONST 0x11ab ; Address of begin
11a9 0004 | | .CONST 0x0004 ; Address of exception handler
11aa 0001 | | .CONST 0x0001 ; Number of locals
11ab BODY_11a8:
11ab INIT_11a8:
11ab e5fe | | Load 0x2,-0x2
11ac 8291 | | Call 0x1,0x91
11ad 6801 |h | Jump_Zero 0x11af
11ae 0887 | | Execute_Immediate Raise,0x87
11af e5fe | | Load 0x2,-0x2
11b0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
11b1 00d8 | | Load_Top At_Offset_0
11b2 0d6c | l | Execute_Immediate Less,0x6c
11b3 7013 |p | Jump_Nonzero 0x11c7
11b4 00d8 | | Load_Top At_Offset_0
11b5 0c6d | m | Execute_Immediate Greater_Equal,0x6d
11b6 700b |p | Jump_Nonzero 0x11c2
11b7 00d1 | | Pop_Control Pop_Count_1
11b8 e5f8 | | Load 0x2,-0x8
11b9 e5f9 | | Load 0x2,-0x7
11ba e5fa | | Load 0x2,-0x6
11bb e5fb | | Load 0x2,-0x5
11bc e5fc | | Load 0x2,-0x4
11bd e5fe | | Load 0x2,-0x2
11be e5ff | | Load 0x2,-0x1
11bf e215 | | Load 0x1,0x15
11c0 834b | K | Call 0x1,0x14b
11c1 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
11c2 0b74 | t | Execute_Immediate Case_Compare,0x74
11c3 7024 |p$ | Jump_Nonzero 0x11e8
11c4 0f7c | | | Execute_Immediate Equal,0x7c
11c5 7023 |p# | Jump_Nonzero 0x11e9
11c6 7824 |x$ | Jump 0x11eb
11c7 0b44 | D | Execute_Immediate Case_Compare,0x44
11c8 7003 |p | Jump_Nonzero 0x11cc
11c9 0f4c | L | Execute_Immediate Equal,0x4c
11ca 7010 |p | Jump_Nonzero 0x11db
11cb 781f |x | Jump 0x11eb
11cc 00d1 | | Pop_Control Pop_Count_1
11cd e5f8 | | Load 0x2,-0x8
11ce e5f9 | | Load 0x2,-0x7
11cf e5fa | | Load 0x2,-0x6
11d0 e5fb | | Load 0x2,-0x5
11d1 e5fc | | Load 0x2,-0x4
11d2 e5fd | | Load 0x2,-0x3
11d3 e5fe | | Load 0x2,-0x2
11d4 e5ff | | Load 0x2,-0x1
11d5 e5fd | | Load 0x2,-0x3
11d6 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
11d7 e5ff | | Load 0x2,-0x1
11d8 82b2 | | Call 0x1,0xb2
11d9 8330 | 0 | Call 0x1,0x130
11da 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
11db e5f8 | | Load 0x2,-0x8
11dc e5f9 | | Load 0x2,-0x7
11dd e5fa | | Load 0x2,-0x6
11de e5fb | | Load 0x2,-0x5
11df e5fc | | Load 0x2,-0x4
11e0 e5fe | | Load 0x2,-0x2
11e1 e5ff | | Load 0x2,-0x1
11e2 e5fd | | Load 0x2,-0x3
11e3 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
11e4 e5ff | | Load 0x2,-0x1
11e5 82b2 | | Call 0x1,0xb2
11e6 832f | / | Call 0x1,0x12f
11e7 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
11e8 00d1 | | Pop_Control Pop_Count_1
11e9 e30c | | Load 0x1,0x10c
11ea 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
11eb e5fe | | Load 0x2,-0x2
11ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
11ed e049 | I | Load 0x0,0x49
11ee 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
11ef 011c | | Execute Any,Convert_Unchecked
11f0 1c01 | | Execute_Immediate Run_Utility,0x1
11f1 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
11f2 0000 0000 | | .BLANK 0000[0x6]
11f8 ; --------------------------------------------------------------------------------------
11f8 ; SUBPROGRAM
11f8 ; --------------------------------------------------------------------------------------
11f8 11fb | | .CONST 0x11fb ; Address of begin
11f9 0004 | | .CONST 0x0004 ; Address of exception handler
11fa 0001 | | .CONST 0x0001 ; Number of locals
11fb BODY_11f8:
11fb INIT_11f8:
11fb e5fd | | Load 0x2,-0x3
11fc 8291 | | Call 0x1,0x91
11fd 6801 |h | Jump_Zero 0x11ff
11fe 0887 | | Execute_Immediate Raise,0x87
11ff e5fd | | Load 0x2,-0x3
1200 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1201 00d8 | | Load_Top At_Offset_0
1202 0d6c | l | Execute_Immediate Less,0x6c
1203 7013 |p | Jump_Nonzero 0x1217
1204 00d8 | | Load_Top At_Offset_0
1205 0c6d | m | Execute_Immediate Greater_Equal,0x6d
1206 700b |p | Jump_Nonzero 0x1212
1207 00d1 | | Pop_Control Pop_Count_1
1208 e5f7 | | Load 0x2,-0x9
1209 e5f8 | | Load 0x2,-0x8
120a e5f9 | | Load 0x2,-0x7
120b e5fa | | Load 0x2,-0x6
120c e5fb | | Load 0x2,-0x5
120d e5fd | | Load 0x2,-0x3
120e e5fe | | Load 0x2,-0x2
120f e5ff | | Load 0x2,-0x1
1210 834b | K | Call 0x1,0x14b
1211 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1212 0b74 | t | Execute_Immediate Case_Compare,0x74
1213 701e |p | Jump_Nonzero 0x1232
1214 0f7c | | | Execute_Immediate Equal,0x7c
1215 701d |p | Jump_Nonzero 0x1233
1216 781e |x | Jump 0x1235
1217 0b44 | D | Execute_Immediate Case_Compare,0x44
1218 7003 |p | Jump_Nonzero 0x121c
1219 0f4c | L | Execute_Immediate Equal,0x4c
121a 700d |p | Jump_Nonzero 0x1228
121b 7819 |x | Jump 0x1235
121c 00d1 | | Pop_Control Pop_Count_1
121d e5f7 | | Load 0x2,-0x9
121e e5f8 | | Load 0x2,-0x8
121f e5f9 | | Load 0x2,-0x7
1220 e5fa | | Load 0x2,-0x6
1221 e5fb | | Load 0x2,-0x5
1222 e5fc | | Load 0x2,-0x4
1223 e5fd | | Load 0x2,-0x3
1224 e5fe | | Load 0x2,-0x2
1225 e5ff | | Load 0x2,-0x1
1226 8330 | 0 | Call 0x1,0x130
1227 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1228 e5f7 | | Load 0x2,-0x9
1229 e5f8 | | Load 0x2,-0x8
122a e5f9 | | Load 0x2,-0x7
122b e5fa | | Load 0x2,-0x6
122c e5fb | | Load 0x2,-0x5
122d e5fd | | Load 0x2,-0x3
122e e5fe | | Load 0x2,-0x2
122f e5ff | | Load 0x2,-0x1
1230 832f | / | Call 0x1,0x12f
1231 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1232 00d1 | | Pop_Control Pop_Count_1
1233 e30c | | Load 0x1,0x10c
1234 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1235 e5fd | | Load 0x2,-0x3
1236 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1237 e049 | I | Load 0x0,0x49
1238 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
1239 011c | | Execute Any,Convert_Unchecked
123a 1c01 | | Execute_Immediate Run_Utility,0x1
123b 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
123c 0000 0000 | | .BLANK 0000[0x4]
1240 ; --------------------------------------------------------------------------------------
1240 ; SUBPROGRAM
1240 ; --------------------------------------------------------------------------------------
1240 1251 | Q | .CONST 0x1251 ; Address of begin
1241 0004 | | .CONST 0x0004 ; Address of exception handler
1242 0002 | | .CONST 0x0002 ; Number of locals
1243 INIT_1240:
1243 e029 | ) | Load 0x0,0x29
1244 0322 | " | Declare_Variable Record
1245 4800 |H | Short_Literal 0x0
1246 00d8 | | Load_Top At_Offset_0
1247 e213 | | Load 0x1,0x13
1248 0260 | ` | Execute Discrete,In_Type
1249 7001 |p | Jump_Nonzero 0x124b
124a 0801 | | Execute_Immediate Raise,0x1
124b e5fd | | Load 0x2,-0x3
124c e269 | i | Load 0x1,0x69
124d 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
124e 8265 | e | Call 0x1,0x65
124f e402 | | Load 0x2,0x2
1250 017d | } | Execute Record,Structure_Write
1251 BODY_1240:
1251 e5fb | | Load 0x2,-0x5
1252 0d01 | | Execute_Immediate Less,0x1
1253 6802 |h | Jump_Zero 0x1256
1254 e2fd | | Load 0x1,0xfd
1255 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1256 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "("
1258 e5f8 | | Load 0x2,-0x8
1259 e5f9 | | Load 0x2,-0x7
125a e5fa | | Load 0x2,-0x6
125b e5fb | | Load 0x2,-0x5
125c 0aff | | Execute_Immediate Plus,-0x1
125d 00d8 | | Load_Top At_Offset_0
125e 00e3 | | Load_Encached Natural_Cache
125f 0260 | ` | Execute Discrete,In_Type
1260 7001 |p | Jump_Nonzero 0x1262
1261 0801 | | Execute_Immediate Raise,0x1
1262 e5fc | | Load 0x2,-0x4
1263 4801 |H | Short_Literal 0x1
1264 e402 | | Load 0x2,0x2
1265 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
1266 e5fd | | Load 0x2,-0x3
1267 e5fe | | Load 0x2,-0x2
1268 e5ff | | Load 0x2,-0x1
1269 8337 | 7 | Call 0x1,0x137
126a 01cc | | Execute Vector,Catenate
126b e5f8 | | Load 0x2,-0x8
126c e5f9 | | Load 0x2,-0x7
126d e5fa | | Load 0x2,-0x6
126e e5fb | | Load 0x2,-0x5
126f 0aff | | Execute_Immediate Plus,-0x1
1270 00d8 | | Load_Top At_Offset_0
1271 00e3 | | Load_Encached Natural_Cache
1272 0260 | ` | Execute Discrete,In_Type
1273 7001 |p | Jump_Nonzero 0x1275
1274 0801 | | Execute_Immediate Raise,0x1
1275 e5fc | | Load 0x2,-0x4
1276 e402 | | Load 0x2,0x2
1277 e5fd | | Load 0x2,-0x3
1278 00d8 | | Load_Top At_Offset_0
1279 e5fe | | Load 0x2,-0x2
127a e5ff | | Load 0x2,-0x1
127b 8339 | 9 | Call 0x1,0x139
127c 01cc | | Execute Vector,Catenate
127d 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
127f 01cc | | Execute Vector,Catenate
1280 8313 | | Call 0x1,0x113
1281 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1282 0000 0000 | | .BLANK 0000[0x6]
1288 ; --------------------------------------------------------------------------------------
1288 ; SUBPROGRAM
1288 ; --------------------------------------------------------------------------------------
1288 128f | | .CONST 0x128f ; Address of begin
1289 0004 | | .CONST 0x0004 ; Address of exception handler
128a 0002 | | .CONST 0x0002 ; Number of locals
128b INIT_1288:
128b e5fc | | Load 0x2,-0x4
128c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
128d e05f | _ | Load 0x0,0x5f
128e 03f1 | | Declare_Variable Discrete,With_Value
128f BODY_1288:
128f e5ff | | Load 0x2,-0x1
1290 01db | | Execute Vector,Length
1291 e5fc | | Load 0x2,-0x4
1292 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
1293 027a | z | Execute Discrete,Less_Equal
1294 7001 |p | Jump_Nonzero 0x1296
1295 0887 | | Execute_Immediate Raise,0x87
1296 e5fa | | Load 0x2,-0x6
1297 0d01 | | Execute_Immediate Less,0x1
1298 6802 |h | Jump_Zero 0x129b
1299 e2fd | | Load 0x1,0xfd
129a 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
129b 00d8 | | Load_Top At_Offset_0
129c 7003 |p | Jump_Nonzero 0x12a0
129d 0092 1be0 | | Action Push_String_Extended,0x1be0 ; "()"
129f 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
12a0 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "("
12a2 e5f7 | | Load 0x2,-0x9
12a3 e5f8 | | Load 0x2,-0x8
12a4 e5f9 | | Load 0x2,-0x7
12a5 e5fa | | Load 0x2,-0x6
12a6 0aff | | Execute_Immediate Plus,-0x1
12a7 00d8 | | Load_Top At_Offset_0
12a8 00e3 | | Load_Encached Natural_Cache
12a9 0260 | ` | Execute Discrete,In_Type
12aa 7001 |p | Jump_Nonzero 0x12ac
12ab 0801 | | Execute_Immediate Raise,0x1
12ac e5fb | | Load 0x2,-0x5
12ad 4800 |H | Short_Literal 0x0
12ae e402 | | Load 0x2,0x2
12af 0aff | | Execute_Immediate Plus,-0x1
12b0 00d8 | | Load_Top At_Offset_0
12b1 e05f | _ | Load 0x0,0x5f
12b2 0260 | ` | Execute Discrete,In_Type
12b3 7001 |p | Jump_Nonzero 0x12b5
12b4 0801 | | Execute_Immediate Raise,0x1
12b5 e5fd | | Load 0x2,-0x3
12b6 e5fe | | Load 0x2,-0x2
12b7 e5ff | | Load 0x2,-0x1
12b8 8337 | 7 | Call 0x1,0x137
12b9 01cc | | Execute Vector,Catenate
12ba 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
12bc 01cc | | Execute Vector,Catenate
12bd 8313 | | Call 0x1,0x113
12be 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
12bf 0000 | | .XXX[0x1]
12c0 ; --------------------------------------------------------------------------------------
12c0 ; SUBPROGRAM
12c0 ; --------------------------------------------------------------------------------------
12c0 12c9 | | .CONST 0x12c9 ; Address of begin
12c1 0004 | | .CONST 0x0004 ; Address of exception handler
12c2 0002 | | .CONST 0x0002 ; Number of locals
12c3 INIT_12c0:
12c3 e018 | | Load 0x0,0x18
12c4 0322 | " | Declare_Variable Record
12c5 e5fd | | Load 0x2,-0x3
12c6 8261 | a | Call 0x1,0x61
12c7 e402 | | Load 0x2,0x2
12c8 017d | } | Execute Record,Structure_Write
12c9 BODY_12c0:
12c9 e5fd | | Load 0x2,-0x3
12ca 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
12cb 0b44 | D | Execute_Immediate Case_Compare,0x44
12cc 7003 |p | Jump_Nonzero 0x12d0
12cd 0f4c | L | Execute_Immediate Equal,0x4c
12ce 700d |p | Jump_Nonzero 0x12dc
12cf 0887 | | Execute_Immediate Raise,0x87
12d0 00d1 | | Pop_Control Pop_Count_1
12d1 e5f8 | | Load 0x2,-0x8
12d2 e5f9 | | Load 0x2,-0x7
12d3 e5fa | | Load 0x2,-0x6
12d4 e5fb | | Load 0x2,-0x5
12d5 e5fc | | Load 0x2,-0x4
12d6 e402 | | Load 0x2,0x2
12d7 e5fd | | Load 0x2,-0x3
12d8 e5fe | | Load 0x2,-0x2
12d9 e5ff | | Load 0x2,-0x1
12da 8330 | 0 | Call 0x1,0x130
12db 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
12dc e5f8 | | Load 0x2,-0x8
12dd e5f9 | | Load 0x2,-0x7
12de e5fa | | Load 0x2,-0x6
12df e5fb | | Load 0x2,-0x5
12e0 e5fc | | Load 0x2,-0x4
12e1 e5fd | | Load 0x2,-0x3
12e2 e5fe | | Load 0x2,-0x2
12e3 e5ff | | Load 0x2,-0x1
12e4 832f | / | Call 0x1,0x12f
12e5 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
12e6 0000 0000 | | .XXX[0x2]
12e8 ; --------------------------------------------------------------------------------------
12e8 ; SUBPROGRAM
12e8 ; --------------------------------------------------------------------------------------
12e8 12f0 | | .CONST 0x12f0 ; Address of begin
12e9 0004 | | .CONST 0x0004 ; Address of exception handler
12ea 0002 | | .CONST 0x0002 ; Number of locals
12eb INIT_12e8:
12eb e5fd | | Load 0x2,-0x3
12ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
12ed e049 | I | Load 0x0,0x49
12ee 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
12ef 03f1 | | Declare_Variable Discrete,With_Value
12f0 BODY_12e8:
12f0 e5fc | | Load 0x2,-0x4
12f1 6803 |h | Jump_Zero 0x12f5
12f2 0092 1be1 | | Action Push_String_Extended,0x1be1 ; " => Field\x00not\x00initialized"
12f4 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
12f5 00d8 | | Load_Top At_Offset_0
12f6 828c | | Call 0x1,0x8c
12f7 680b |h | Jump_Zero 0x1303
12f8 4801 |H | Short_Literal 0x1
12f9 e5f7 | | Load 0x2,-0x9
12fa e5f8 | | Load 0x2,-0x8
12fb e5f9 | | Load 0x2,-0x7
12fc e5fa | | Load 0x2,-0x6
12fd e5fb | | Load 0x2,-0x5
12fe e5fd | | Load 0x2,-0x3
12ff e5fe | | Load 0x2,-0x2
1300 e5ff | | Load 0x2,-0x1
1301 832b | + | Call 0x1,0x12b
1302 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1303 e2fc | | Load 0x1,0xfc
1304 e5f7 | | Load 0x2,-0x9
1305 e5f8 | | Load 0x2,-0x8
1306 e5f9 | | Load 0x2,-0x7
1307 e5fa | | Load 0x2,-0x6
1308 e5fb | | Load 0x2,-0x5
1309 e5fd | | Load 0x2,-0x3
130a e5ff | | Load 0x2,-0x1
130b 8272 | r | Call 0x1,0x72
130c 8329 | ) | Call 0x1,0x129
130d 01cc | | Execute Vector,Catenate
130e 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
130f 0000 | | .XXX[0x1]
1310 ; --------------------------------------------------------------------------------------
1310 ; SUBPROGRAM
1310 ; --------------------------------------------------------------------------------------
1310 1320 | | .CONST 0x1320 ; Address of begin
1311 135d | ] | .CONST 0x135d ; Address of exception handler
1312 0003 | | .CONST 0x0003 ; Number of locals
1313 INIT_1310:
1313 e03c | < | Load 0x0,0x3c
1314 0322 | " | Declare_Variable Record
1315 e5fd | | Load 0x2,-0x3
1316 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1317 e402 | | Load 0x2,0x2
1318 017d | } | Execute Record,Structure_Write
1319 e5ff | | Load 0x2,-0x1
131a 01db | | Execute Vector,Length
131b e5fd | | Load 0x2,-0x3
131c 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
131d 027c | | | Execute Discrete,Less
131e 00e1 | | Load_Encached Boolean_Cache
131f 03f1 | | Declare_Variable Discrete,With_Value
1320 BODY_1310:
1320 e402 | | Load 0x2,0x2
1321 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1322 82f9 | | Call 0x1,0xf9
1323 680b |h | Jump_Zero 0x132f
1324 e5f8 | | Load 0x2,-0x8
1325 e5f9 | | Load 0x2,-0x7
1326 e5fa | | Load 0x2,-0x6
1327 e5fb | | Load 0x2,-0x5
1328 e5fc | | Load 0x2,-0x4
1329 e403 | | Load 0x2,0x3
132a e402 | | Load 0x2,0x2
132b e5fe | | Load 0x2,-0x2
132c e5ff | | Load 0x2,-0x1
132d 8332 | 2 | Call 0x1,0x132
132e 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
132f e402 | | Load 0x2,0x2
1330 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1331 828d | | Call 0x1,0x8d
1332 6816 |h | Jump_Zero 0x1349
1333 e2fc | | Load 0x1,0xfc
1334 e5f8 | | Load 0x2,-0x8
1335 e5f9 | | Load 0x2,-0x7
1336 e5fa | | Load 0x2,-0x6
1337 e5fb | | Load 0x2,-0x5
1338 e5fc | | Load 0x2,-0x4
1339 0a01 | | Execute_Immediate Plus,0x1
133a 00d8 | | Load_Top At_Offset_0
133b 00e2 | | Load_Encached Integer_Cache
133c 0260 | ` | Execute Discrete,In_Type
133d 7001 |p | Jump_Nonzero 0x133f
133e 0801 | | Execute_Immediate Raise,0x1
133f e402 | | Load 0x2,0x2
1340 e5fd | | Load 0x2,-0x3
1341 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
1342 e5fe | | Load 0x2,-0x2
1343 827c | | | Call 0x1,0x7c
1344 e5ff | | Load 0x2,-0x1
1345 8216 | | Call 0x1,0x16
1346 8331 | 1 | Call 0x1,0x131
1347 01cc | | Execute Vector,Catenate
1348 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1349 e2fc | | Load 0x1,0xfc
134a e5f8 | | Load 0x2,-0x8
134b e5f9 | | Load 0x2,-0x7
134c e5fa | | Load 0x2,-0x6
134d e5fb | | Load 0x2,-0x5
134e e5fc | | Load 0x2,-0x4
134f 0a01 | | Execute_Immediate Plus,0x1
1350 00d8 | | Load_Top At_Offset_0
1351 00e2 | | Load_Encached Integer_Cache
1352 0260 | ` | Execute Discrete,In_Type
1353 7001 |p | Jump_Nonzero 0x1355
1354 0801 | | Execute_Immediate Raise,0x1
1355 e402 | | Load 0x2,0x2
1356 8261 | a | Call 0x1,0x61
1357 e402 | | Load 0x2,0x2
1358 e5fe | | Load 0x2,-0x2
1359 e5ff | | Load 0x2,-0x1
135a 832e | . | Call 0x1,0x12e
135b 01cc | | Execute Vector,Catenate
135c 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
135d TRAP_1310:
135d 4884 |H | Short_Literal 0x84
135e 010f | | Execute Exception,Equal
135f 6803 |h | Jump_Zero 0x1363
1360 0092 1be2 | | Action Push_String_Extended,0x1be2 ; " => Field\x00value\x00not\x00readable"
1362 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1363 0092 1be3 | | Action Push_String_Extended,0x1be3 ; " => Exception\x00raised\x00reading\x00field\x00value: "
1365 e04a | J | Load 0x0,0x4a
1366 180d | | Execute Package,Field_Execute,Field_Number 0xd
1367 01cc | | Execute Vector,Catenate
1368 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1369 0000 0000 | | .BLANK 0000[0x7]
1370 ; --------------------------------------------------------------------------------------
1370 ; SUBPROGRAM
1370 ; --------------------------------------------------------------------------------------
1370 1386 | | .CONST 0x1386 ; Address of begin
1371 13e1 | | .CONST 0x13e1 ; Address of exception handler
1372 0007 | | .CONST 0x0007 ; Number of locals
1373 INIT_1370:
1373 e03c | < | Load 0x0,0x3c
1374 0322 | " | Declare_Variable Record
1375 e5fd | | Load 0x2,-0x3
1376 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1377 e402 | | Load 0x2,0x2
1378 017d | } | Execute Record,Structure_Write
1379 e018 | | Load 0x0,0x18
137a 0322 | " | Declare_Variable Record
137b e402 | | Load 0x2,0x2
137c 8261 | a | Call 0x1,0x61
137d e403 | | Load 0x2,0x3
137e 017d | } | Execute Record,Structure_Write
137f e052 | R | Load 0x0,0x52
1380 0007 | | Action Break_Optional
1381 e034 | 4 | Load 0x0,0x34
1382 0322 | " | Declare_Variable Record
1383 e052 | R | Load 0x0,0x52
1384 0007 | | Action Break_Optional
1385 00e5 | | Load_Encached Long_Integer_Cache
1386 BODY_1370:
1386 e402 | | Load 0x2,0x2
1387 8291 | | Call 0x1,0x91
1388 6815 |h | Jump_Zero 0x139e
1389 e2fc | | Load 0x1,0xfc
138a e5f8 | | Load 0x2,-0x8
138b e5f9 | | Load 0x2,-0x7
138c e5fa | | Load 0x2,-0x6
138d e5fb | | Load 0x2,-0x5
138e e5fc | | Load 0x2,-0x4
138f 0a01 | | Execute_Immediate Plus,0x1
1390 00d8 | | Load_Top At_Offset_0
1391 00e2 | | Load_Encached Integer_Cache
1392 0260 | ` | Execute Discrete,In_Type
1393 7001 |p | Jump_Nonzero 0x1395
1394 0801 | | Execute_Immediate Raise,0x1
1395 e402 | | Load 0x2,0x2
1396 8261 | a | Call 0x1,0x61
1397 e402 | | Load 0x2,0x2
1398 e5fd | | Load 0x2,-0x3
1399 e5fe | | Load 0x2,-0x2
139a e5ff | | Load 0x2,-0x1
139b 832c | , | Call 0x1,0x12c
139c 01cc | | Execute Vector,Catenate
139d 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
139e e5fd | | Load 0x2,-0x3
139f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
13a0 6810 |h | Jump_Zero 0x13b1
13a1 e5fe | | Load 0x2,-0x2
13a2 e5fd | | Load 0x2,-0x3
13a3 e5ff | | Load 0x2,-0x1
13a4 82ae | | Call 0x1,0xae
13a5 e405 | | Load 0x2,0x5
13a6 017d | } | Execute Record,Structure_Write
13a7 e5fd | | Load 0x2,-0x3
13a8 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
13a9 e405 | | Load 0x2,0x5
13aa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
13ab 0273 | s | Execute Discrete,Plus
13ac c406 | | Store 0x2,0x6
13ad e405 | | Load 0x2,0x5
13ae 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
13af a404 | | Store_Unchecked 0x2,0x4
13b0 7806 |x | Jump 0x13b7
13b1 e403 | | Load 0x2,0x3
13b2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
13b3 a404 | | Store_Unchecked 0x2,0x4
13b4 e5fd | | Load 0x2,-0x3
13b5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
13b6 a406 | | Store_Unchecked 0x2,0x6
13b7 e404 | | Load 0x2,0x4
13b8 e406 | | Load 0x2,0x6
13b9 8292 | | Call 0x1,0x92
13ba a407 | | Store_Unchecked 0x2,0x7
13bb 00d8 | | Load_Top At_Offset_0
13bc e5ff | | Load 0x2,-0x1
13bd 01dc | | Execute Vector,Last
13be 027a | z | Execute Discrete,Less_Equal
13bf 680d |h | Jump_Zero 0x13cd
13c0 e5f8 | | Load 0x2,-0x8
13c1 e5f9 | | Load 0x2,-0x7
13c2 e5fa | | Load 0x2,-0x6
13c3 e5fb | | Load 0x2,-0x5
13c4 e5fc | | Load 0x2,-0x4
13c5 e5fd | | Load 0x2,-0x3
13c6 e5fe | | Load 0x2,-0x2
13c7 e406 | | Load 0x2,0x6
13c8 e407 | | Load 0x2,0x7
13c9 e5ff | | Load 0x2,-0x1
13ca 01cf | | Execute Vector,Slice_Read
13cb 8333 | 3 | Call 0x1,0x133
13cc 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
13cd e5ff | | Load 0x2,-0x1
13ce 01db | | Execute Vector,Length
13cf 700e |p | Jump_Nonzero 0x13de
13d0 e5f8 | | Load 0x2,-0x8
13d1 e5f9 | | Load 0x2,-0x7
13d2 e5fa | | Load 0x2,-0x6
13d3 e5fb | | Load 0x2,-0x5
13d4 e5fc | | Load 0x2,-0x4
13d5 e5fd | | Load 0x2,-0x3
13d6 e5fe | | Load 0x2,-0x2
13d7 e404 | | Load 0x2,0x4
13d8 e406 | | Load 0x2,0x6
13d9 e5fe | | Load 0x2,-0x2
13da 827c | | | Call 0x1,0x7c
13db 82b2 | | Call 0x1,0xb2
13dc 8333 | 3 | Call 0x1,0x133
13dd 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
13de 0092 1be1 | | Action Push_String_Extended,0x1be1 ; " => Field\x00not\x00initialized"
13e0 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
13e1 TRAP_1370:
13e1 4884 |H | Short_Literal 0x84
13e2 010f | | Execute Exception,Equal
13e3 6803 |h | Jump_Zero 0x13e7
13e4 0092 1be2 | | Action Push_String_Extended,0x1be2 ; " => Field\x00value\x00not\x00readable"
13e6 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
13e7 0092 1be3 | | Action Push_String_Extended,0x1be3 ; " => Exception\x00raised\x00reading\x00field\x00value: "
13e9 e04a | J | Load 0x0,0x4a
13ea 180d | | Execute Package,Field_Execute,Field_Number 0xd
13eb 01cc | | Execute Vector,Catenate
13ec 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
13ed 0000 0000 | | .XXX[0x3]
13ef 0000 | |
13f0 ; --------------------------------------------------------------------------------------
13f0 ; SUBPROGRAM
13f0 ; --------------------------------------------------------------------------------------
13f0 13f3 | | .CONST 0x13f3 ; Address of begin
13f1 0004 | | .CONST 0x0004 ; Address of exception handler
13f2 0001 | | .CONST 0x0001 ; Number of locals
13f3 BODY_13f0:
13f3 INIT_13f0:
13f3 e5fc | | Load 0x2,-0x4
13f4 8328 | ( | Call 0x1,0x128
13f5 0092 1be4 | | Action Push_String_Extended,0x1be4 ; "F"
13f7 01cc | | Execute Vector,Catenate
13f8 4820 |H | Short_Literal 0x20
13f9 4800 |H | Short_Literal 0x0
13fa 480a |H | Short_Literal 0xa
13fb e5fd | | Load 0x2,-0x3
13fc 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
13fd e057 | W | Load 0x0,0x57
13fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16
13ff 01cc | | Execute Vector,Catenate
1400 e5f8 | | Load 0x2,-0x8
1401 e5f9 | | Load 0x2,-0x7
1402 e5fa | | Load 0x2,-0x6
1403 e5fb | | Load 0x2,-0x5
1404 e5fc | | Load 0x2,-0x4
1405 e5fd | | Load 0x2,-0x3
1406 e5fe | | Load 0x2,-0x2
1407 e5ff | | Load 0x2,-0x1
1408 8334 | 4 | Call 0x1,0x134
1409 01cc | | Execute Vector,Catenate
140a 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
140b 0000 0000 | | .BLANK 0000[0x5]
1410 ; --------------------------------------------------------------------------------------
1410 ; SUBPROGRAM
1410 ; --------------------------------------------------------------------------------------
1410 141a | | .CONST 0x141a ; Address of begin
1411 0004 | | .CONST 0x0004 ; Address of exception handler
1412 0002 | | .CONST 0x0002 ; Number of locals
1413 INIT_1410:
1413 e01b | | Load 0x0,0x1b
1414 0322 | " | Declare_Variable Record
1415 e5fc | | Load 0x2,-0x4
1416 e5fd | | Load 0x2,-0x3
1417 8262 | b | Call 0x1,0x62
1418 e402 | | Load 0x2,0x2
1419 017d | } | Execute Record,Structure_Write
141a BODY_1410:
141a e5fc | | Load 0x2,-0x4
141b e402 | | Load 0x2,0x2
141c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
141d 027f | | Execute Discrete,Equal
141e 7001 |p | Jump_Nonzero 0x1420
141f 0887 | | Execute_Immediate Raise,0x87
1420 e5f7 | | Load 0x2,-0x9
1421 e5f8 | | Load 0x2,-0x8
1422 e5f9 | | Load 0x2,-0x7
1423 e5fa | | Load 0x2,-0x6
1424 e5fb | | Load 0x2,-0x5
1425 e402 | | Load 0x2,0x2
1426 e5fe | | Load 0x2,-0x2
1427 e5ff | | Load 0x2,-0x1
1428 8335 | 5 | Call 0x1,0x135
1429 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
142a 0000 0000 | | .BLANK 0000[0x6]
1430 ; --------------------------------------------------------------------------------------
1430 ; SUBPROGRAM
1430 ; --------------------------------------------------------------------------------------
1430 1433 | 3 | .CONST 0x1433 ; Address of begin
1431 0004 | | .CONST 0x0004 ; Address of exception handler
1432 0001 | | .CONST 0x0001 ; Number of locals
1433 BODY_1430:
1433 INIT_1430:
1433 e5fb | | Load 0x2,-0x5
1434 e5fc | | Load 0x2,-0x4
1435 027d | } | Execute Discrete,Greater
1436 6802 |h | Jump_Zero 0x1439
1437 00ea | | Load_Encached Null_String_Cache
1438 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1439 e5f6 | | Load 0x2,-0xa
143a e5f7 | | Load 0x2,-0x9
143b e5f8 | | Load 0x2,-0x8
143c e5f9 | | Load 0x2,-0x7
143d e5fa | | Load 0x2,-0x6
143e e5fb | | Load 0x2,-0x5
143f e5fd | | Load 0x2,-0x3
1440 e5fe | | Load 0x2,-0x2
1441 e5ff | | Load 0x2,-0x1
1442 8336 | 6 | Call 0x1,0x136
1443 0092 1be5 | | Action Push_String_Extended,0x1be5 ; ", "
1445 01cc | | Execute Vector,Catenate
1446 e5f6 | | Load 0x2,-0xa
1447 e5f7 | | Load 0x2,-0x9
1448 e5f8 | | Load 0x2,-0x8
1449 e5f9 | | Load 0x2,-0x7
144a e5fa | | Load 0x2,-0x6
144b e5fb | | Load 0x2,-0x5
144c 0a01 | | Execute_Immediate Plus,0x1
144d 00d8 | | Load_Top At_Offset_0
144e e05f | _ | Load 0x0,0x5f
144f 0260 | ` | Execute Discrete,In_Type
1450 7001 |p | Jump_Nonzero 0x1452
1451 0801 | | Execute_Immediate Raise,0x1
1452 e5fc | | Load 0x2,-0x4
1453 e5fd | | Load 0x2,-0x3
1454 e5fe | | Load 0x2,-0x2
1455 e5ff | | Load 0x2,-0x1
1456 8337 | 7 | Call 0x1,0x137
1457 01cc | | Execute Vector,Catenate
1458 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1459 0000 0000 | | .BLANK 0000[0x7]
1460 ; --------------------------------------------------------------------------------------
1460 ; SUBPROGRAM
1460 ; --------------------------------------------------------------------------------------
1460 146f | o | .CONST 0x146f ; Address of begin
1461 0004 | | .CONST 0x0004 ; Address of exception handler
1462 0005 | | .CONST 0x0005 ; Number of locals
1463 INIT_1460:
1463 e5fe | | Load 0x2,-0x2
1464 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
1465 0a01 | | Execute_Immediate Plus,0x1
1466 e05f | _ | Load 0x0,0x5f
1467 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1468 e5fe | | Load 0x2,-0x2
1469 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
146a e05f | _ | Load 0x0,0x5f
146b 03f1 | | Declare_Variable Discrete,With_Value
146c e01b | | Load 0x0,0x1b
146d 0322 | " | Declare_Variable Record
146e e05f | _ | Load 0x0,0x5f
146f BODY_1460:
146f 00cf | | Action Mark_Auxiliary
1470 e403 | | Load 0x2,0x3
1471 4801 |H | Short_Literal 0x1
1472 0263 | c | Execute Discrete,Above_Bound
1473 701a |p | Jump_Nonzero 0x148e
1474 00d8 | | Load_Top At_Offset_0
1475 e5fd | | Load 0x2,-0x3
1476 027f | | Execute Discrete,Equal
1477 6802 |h | Jump_Zero 0x147a
1478 e402 | | Load 0x2,0x2
1479 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
147a e402 | | Load 0x2,0x2
147b e5ff | | Load 0x2,-0x1
147c 8262 | b | Call 0x1,0x62
147d e404 | | Load 0x2,0x4
147e 017d | } | Execute Record,Structure_Write
147f e404 | | Load 0x2,0x4
1480 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1481 e408 | | Load 0x2,0x8
1482 027f | | Execute Discrete,Equal
1483 7001 |p | Jump_Nonzero 0x1485
1484 0887 | | Execute_Immediate Raise,0x87
1485 e404 | | Load 0x2,0x4
1486 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1487 a405 | | Store_Unchecked 0x2,0x5
1488 e402 | | Load 0x2,0x2
1489 e405 | | Load 0x2,0x5
148a 0273 | s | Execute Discrete,Plus
148b c402 | | Store 0x2,0x2
148c 00c8 | | Action Pop_Auxiliary_Range
148d 3fe6 |? | Loop_Increasing 0x1474
148e 00ce | | Action Pop_Auxiliary
148f 4800 |H | Short_Literal 0x0
1490 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1491 0000 0000 | | .BLANK 0000[0x7]
1498 ; --------------------------------------------------------------------------------------
1498 ; SUBPROGRAM
1498 ; --------------------------------------------------------------------------------------
1498 14a1 | | .CONST 0x14a1 ; Address of begin
1499 0004 | | .CONST 0x0004 ; Address of exception handler
149a 0004 | | .CONST 0x0004 ; Number of locals
149b INIT_1498:
149b e05f | _ | Load 0x0,0x5f
149c 0007 | | Action Break_Optional
149d 00d8 | | Load_Top At_Offset_0
149e 0007 | | Action Break_Optional
149f e01b | | Load 0x0,0x1b
14a0 0322 | " | Declare_Variable Record
14a1 BODY_1498:
14a1 e5ff | | Load 0x2,-0x1
14a2 01db | | Execute Vector,Length
14a3 e29b | | Load 0x1,0x9b
14a4 027a | z | Execute Discrete,Less_Equal
14a5 6804 |h | Jump_Zero 0x14aa
14a6 e5fe | | Load 0x2,-0x2
14a7 82a4 | | Call 0x1,0xa4
14a8 a402 | | Store_Unchecked 0x2,0x2
14a9 7803 |x | Jump 0x14ad
14aa e5ff | | Load 0x2,-0x1
14ab 82a2 | | Call 0x1,0xa2
14ac a402 | | Store_Unchecked 0x2,0x2
14ad e5fb | | Load 0x2,-0x5
14ae 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
14af 6803 |h | Jump_Zero 0x14b3
14b0 e402 | | Load 0x2,0x2
14b1 0fff | | Execute_Immediate Equal,-0x1
14b2 6802 |h | Jump_Zero 0x14b5
14b3 00ea | | Load_Encached Null_String_Cache
14b4 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
14b5 e5fb | | Load 0x2,-0x5
14b6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
14b7 6804 |h | Jump_Zero 0x14bc
14b8 e5fb | | Load 0x2,-0x5
14b9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
14ba a403 | | Store_Unchecked 0x2,0x3
14bb 7805 |x | Jump 0x14c1
14bc e402 | | Load 0x2,0x2
14bd e5fb | | Load 0x2,-0x5
14be e5fc | | Load 0x2,-0x4
14bf 8338 | 8 | Call 0x1,0x138
14c0 a403 | | Store_Unchecked 0x2,0x3
14c1 e403 | | Load 0x2,0x3
14c2 7002 |p | Jump_Nonzero 0x14c5
14c3 00ea | | Load_Encached Null_String_Cache
14c4 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
14c5 e403 | | Load 0x2,0x3
14c6 e5fc | | Load 0x2,-0x4
14c7 8262 | b | Call 0x1,0x62
14c8 e404 | | Load 0x2,0x4
14c9 017d | } | Execute Record,Structure_Write
14ca e5f6 | | Load 0x2,-0xa
14cb e5f7 | | Load 0x2,-0x9
14cc e5f8 | | Load 0x2,-0x8
14cd e5f9 | | Load 0x2,-0x7
14ce e5fa | | Load 0x2,-0x6
14cf e404 | | Load 0x2,0x4
14d0 e403 | | Load 0x2,0x3
14d1 e5fc | | Load 0x2,-0x4
14d2 e5fd | | Load 0x2,-0x3
14d3 e5fe | | Load 0x2,-0x2
14d4 e5ff | | Load 0x2,-0x1
14d5 833c | < | Call 0x1,0x13c
14d6 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
14d7 0000 | | .XXX[0x1]
14d8 ; --------------------------------------------------------------------------------------
14d8 ; SUBPROGRAM
14d8 ; --------------------------------------------------------------------------------------
14d8 14db | | .CONST 0x14db ; Address of begin
14d9 0004 | | .CONST 0x0004 ; Address of exception handler
14da 0001 | | .CONST 0x0001 ; Number of locals
14db BODY_14d8:
14db INIT_14d8:
14db e5ff | | Load 0x2,-0x1
14dc e5f5 | | Load 0x2,-0xb
14dd e5f6 | | Load 0x2,-0xa
14de e5f7 | | Load 0x2,-0x9
14df e5f8 | | Load 0x2,-0x8
14e0 e5f9 | | Load 0x2,-0x7
14e1 0a01 | | Execute_Immediate Plus,0x1
14e2 00d8 | | Load_Top At_Offset_0
14e3 00e2 | | Load_Encached Integer_Cache
14e4 0260 | ` | Execute Discrete,In_Type
14e5 7001 |p | Jump_Nonzero 0x14e7
14e6 0801 | | Execute_Immediate Raise,0x1
14e7 4801 |H | Short_Literal 0x1
14e8 e5fa | | Load 0x2,-0x6
14e9 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
14ea e5fb | | Load 0x2,-0x5
14eb e5fd | | Load 0x2,-0x3
14ec e5fe | | Load 0x2,-0x2
14ed 8337 | 7 | Call 0x1,0x137
14ee 01cc | | Execute Vector,Catenate
14ef e5f5 | | Load 0x2,-0xb
14f0 e5f6 | | Load 0x2,-0xa
14f1 e5f7 | | Load 0x2,-0x9
14f2 e5f8 | | Load 0x2,-0x8
14f3 e5f9 | | Load 0x2,-0x7
14f4 0a01 | | Execute_Immediate Plus,0x1
14f5 00d8 | | Load_Top At_Offset_0
14f6 00e2 | | Load_Encached Integer_Cache
14f7 0260 | ` | Execute Discrete,In_Type
14f8 7001 |p | Jump_Nonzero 0x14fa
14f9 0801 | | Execute_Immediate Raise,0x1
14fa e5fa | | Load 0x2,-0x6
14fb e5fb | | Load 0x2,-0x5
14fc e5fc | | Load 0x2,-0x4
14fd e5fd | | Load 0x2,-0x3
14fe e5fe | | Load 0x2,-0x2
14ff 8339 | 9 | Call 0x1,0x139
1500 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
1502 01cc | | Execute Vector,Catenate
1503 8313 | | Call 0x1,0x113
1504 01cc | | Execute Vector,Catenate
1505 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
1506 0000 0000 | | .XXX[0x2]
1508 ; --------------------------------------------------------------------------------------
1508 ; SUBPROGRAM
1508 ; --------------------------------------------------------------------------------------
1508 1533 | 3 | .CONST 0x1533 ; Address of begin
1509 0004 | | .CONST 0x0004 ; Address of exception handler
150a 0007 | | .CONST 0x0007 ; Number of locals
150b INIT_1508:
150b e03c | < | Load 0x0,0x3c
150c 0322 | " | Declare_Variable Record
150d e5fc | | Load 0x2,-0x4
150e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
150f e402 | | Load 0x2,0x2
1510 017d | } | Execute Record,Structure_Write
1511 e034 | 4 | Load 0x0,0x34
1512 0322 | " | Declare_Variable Record
1513 e5fc | | Load 0x2,-0x4
1514 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
1515 e5ff | | Load 0x2,-0x1
1516 82ac | | Call 0x1,0xac
1517 e403 | | Load 0x2,0x3
1518 017d | } | Execute Record,Structure_Write
1519 00d8 | | Load_Top At_Offset_0
151a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
151b e5fc | | Load 0x2,-0x4
151c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
151d 0273 | s | Execute Discrete,Plus
151e 00e5 | | Load_Encached Long_Integer_Cache
151f 03f1 | | Declare_Variable Discrete,With_Value
1520 00d8 | | Load_Top At_Offset_0
1521 e403 | | Load 0x2,0x3
1522 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1523 0273 | s | Execute Discrete,Plus
1524 0aff | | Execute_Immediate Plus,-0x1
1525 00e5 | | Load_Encached Long_Integer_Cache
1526 03f1 | | Declare_Variable Discrete,With_Value
1527 e404 | | Load 0x2,0x4
1528 e5fe | | Load 0x2,-0x2
1529 827c | | | Call 0x1,0x7c
152a e048 | H | Load 0x0,0x48
152b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
152c 03f1 | | Declare_Variable Discrete,With_Value
152d e5fa | | Load 0x2,-0x6
152e 8328 | ( | Call 0x1,0x128
152f 0092 1be6 | | Action Push_String_Extended,0x1be6 ; "Anon_Inner_Rec => ("
1531 01cc | | Execute Vector,Catenate
1532 0007 | | Action Break_Optional
1533 BODY_1508:
1533 e402 | | Load 0x2,0x2
1534 828f | | Call 0x1,0x8f
1535 680d |h | Jump_Zero 0x1543
1536 e5f6 | | Load 0x2,-0xa
1537 e5f7 | | Load 0x2,-0x9
1538 e5f8 | | Load 0x2,-0x8
1539 e5f9 | | Load 0x2,-0x7
153a e5fa | | Load 0x2,-0x6
153b e5fb | | Load 0x2,-0x5
153c e402 | | Load 0x2,0x2
153d e5fd | | Load 0x2,-0x3
153e e406 | | Load 0x2,0x6
153f e215 | | Load 0x1,0x15
1540 e407 | | Load 0x2,0x7
1541 833a | : | Call 0x1,0x13a
1542 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1543 e405 | | Load 0x2,0x5
1544 e5ff | | Load 0x2,-0x1
1545 01dc | | Execute Vector,Last
1546 027a | z | Execute Discrete,Less_Equal
1547 6811 |h | Jump_Zero 0x1559
1548 e5f6 | | Load 0x2,-0xa
1549 e5f7 | | Load 0x2,-0x9
154a e5f8 | | Load 0x2,-0x8
154b e5f9 | | Load 0x2,-0x7
154c e5fa | | Load 0x2,-0x6
154d e5fb | | Load 0x2,-0x5
154e e402 | | Load 0x2,0x2
154f e5fd | | Load 0x2,-0x3
1550 e406 | | Load 0x2,0x6
1551 e404 | | Load 0x2,0x4
1552 e405 | | Load 0x2,0x5
1553 e5ff | | Load 0x2,-0x1
1554 01cf | | Execute Vector,Slice_Read
1555 8216 | | Call 0x1,0x16
1556 e407 | | Load 0x2,0x7
1557 833a | : | Call 0x1,0x13a
1558 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1559 e5f6 | | Load 0x2,-0xa
155a e5f7 | | Load 0x2,-0x9
155b e5f8 | | Load 0x2,-0x8
155c e5f9 | | Load 0x2,-0x7
155d e5fa | | Load 0x2,-0x6
155e e5fb | | Load 0x2,-0x5
155f e402 | | Load 0x2,0x2
1560 e5fd | | Load 0x2,-0x3
1561 e406 | | Load 0x2,0x6
1562 e403 | | Load 0x2,0x3
1563 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1564 e406 | | Load 0x2,0x6
1565 82b2 | | Call 0x1,0xb2
1566 e407 | | Load 0x2,0x7
1567 833a | : | Call 0x1,0x13a
1568 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1569 0000 0000 | | .BLANK 0000[0x7]
1570 ; --------------------------------------------------------------------------------------
1570 ; SUBPROGRAM
1570 ; --------------------------------------------------------------------------------------
1570 157b | { | .CONST 0x157b ; Address of begin
1571 0004 | | .CONST 0x0004 ; Address of exception handler
1572 0004 | | .CONST 0x0004 ; Number of locals
1573 INIT_1570:
1573 e5fa | | Load 0x2,-0x6
1574 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1575 e05f | _ | Load 0x0,0x5f
1576 03f1 | | Declare_Variable Discrete,With_Value
1577 e029 | ) | Load 0x0,0x29
1578 0322 | " | Declare_Variable Record
1579 00e1 | | Load_Encached Boolean_Cache
157a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
157b BODY_1570:
157b e5fa | | Load 0x2,-0x6
157c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
157d 6816 |h | Jump_Zero 0x1594
157e e5fa | | Load 0x2,-0x6
157f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1580 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1581 0f4c | L | Execute_Immediate Equal,0x4c
1582 6811 |h | Jump_Zero 0x1594
1583 4800 |H | Short_Literal 0x0
1584 00d8 | | Load_Top At_Offset_0
1585 e213 | | Load 0x1,0x13
1586 0260 | ` | Execute Discrete,In_Type
1587 7001 |p | Jump_Nonzero 0x1589
1588 0801 | | Execute_Immediate Raise,0x1
1589 e5fa | | Load 0x2,-0x6
158a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
158b e269 | i | Load 0x1,0x69
158c 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
158d 8265 | e | Call 0x1,0x65
158e e403 | | Load 0x2,0x3
158f 017d | } | Execute Record,Structure_Write
1590 e403 | | Load 0x2,0x3
1591 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
1592 0f00 | | Execute_Immediate Equal,0x0
1593 a404 | | Store_Unchecked 0x2,0x4
1594 00d8 | | Load_Top At_Offset_0
1595 6810 |h | Jump_Zero 0x15a6
1596 e402 | | Load 0x2,0x2
1597 0f01 | | Execute_Immediate Equal,0x1
1598 7001 |p | Jump_Nonzero 0x159a
1599 0887 | | Execute_Immediate Raise,0x87
159a e5f5 | | Load 0x2,-0xb
159b e5f6 | | Load 0x2,-0xa
159c e5f7 | | Load 0x2,-0x9
159d e5f8 | | Load 0x2,-0x8
159e e5f9 | | Load 0x2,-0x7
159f e403 | | Load 0x2,0x3
15a0 e5fa | | Load 0x2,-0x6
15a1 e5fd | | Load 0x2,-0x3
15a2 e5fe | | Load 0x2,-0x2
15a3 e5ff | | Load 0x2,-0x1
15a4 833b | ; | Call 0x1,0x13b
15a5 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
15a6 e402 | | Load 0x2,0x2
15a7 0c01 | | Execute_Immediate Greater_Equal,0x1
15a8 7001 |p | Jump_Nonzero 0x15aa
15a9 0887 | | Execute_Immediate Raise,0x87
15aa e5f5 | | Load 0x2,-0xb
15ab e5f6 | | Load 0x2,-0xa
15ac e5f7 | | Load 0x2,-0x9
15ad e5f8 | | Load 0x2,-0x8
15ae e5f9 | | Load 0x2,-0x7
15af e5fb | | Load 0x2,-0x5
15b0 00d8 | | Load_Top At_Offset_0
15b1 e402 | | Load 0x2,0x2
15b2 0273 | s | Execute Discrete,Plus
15b3 0aff | | Execute_Immediate Plus,-0x1
15b4 00d8 | | Load_Top At_Offset_0
15b5 e05f | _ | Load 0x0,0x5f
15b6 0260 | ` | Execute Discrete,In_Type
15b7 7001 |p | Jump_Nonzero 0x15b9
15b8 0801 | | Execute_Immediate Raise,0x1
15b9 e5fc | | Load 0x2,-0x4
15ba e5fe | | Load 0x2,-0x2
15bb e5ff | | Load 0x2,-0x1
15bc 8337 | 7 | Call 0x1,0x137
15bd 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
15be 0000 0000 | | .XXX[0x2]
15c0 ; --------------------------------------------------------------------------------------
15c0 ; SUBPROGRAM
15c0 ; --------------------------------------------------------------------------------------
15c0 15c3 | | .CONST 0x15c3 ; Address of begin
15c1 0004 | | .CONST 0x0004 ; Address of exception handler
15c2 0001 | | .CONST 0x0001 ; Number of locals
15c3 BODY_15c0:
15c3 INIT_15c0:
15c3 4820 |H | Short_Literal 0x20
15c4 4800 |H | Short_Literal 0x0
15c5 480a |H | Short_Literal 0xa
15c6 e5ff | | Load 0x2,-0x1
15c7 e057 | W | Load 0x0,0x57
15c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
15c9 e2fe | | Load 0x1,0xfe
15ca 01cc | | Execute Vector,Catenate
15cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15cc 0000 0000 | | .BLANK 0000[0x4]
15d0 ; --------------------------------------------------------------------------------------
15d0 ; SUBPROGRAM
15d0 ; --------------------------------------------------------------------------------------
15d0 15d8 | | .CONST 0x15d8 ; Address of begin
15d1 0004 | | .CONST 0x0004 ; Address of exception handler
15d2 0002 | | .CONST 0x0002 ; Number of locals
15d3 INIT_15d0:
15d3 e5fe | | Load 0x2,-0x2
15d4 e5fd | | Load 0x2,-0x3
15d5 0272 | r | Execute Discrete,Minus
15d6 00e5 | | Load_Encached Long_Integer_Cache
15d7 03f1 | | Declare_Variable Discrete,With_Value
15d8 BODY_15d0:
15d8 e5ff | | Load 0x2,-0x1
15d9 6809 |h | Jump_Zero 0x15e3
15da e5fd | | Load 0x2,-0x3
15db 833d | = | Call 0x1,0x13d
15dc 00ea | | Load_Encached Null_String_Cache
15dd e402 | | Load 0x2,0x2
15de 0c02 | | Execute_Immediate Greater_Equal,0x2
15df e2ff | | Load 0x1,0xff
15e0 830d | | Call 0x1,0x10d
15e1 01cc | | Execute Vector,Catenate
15e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
15e3 00ea | | Load_Encached Null_String_Cache
15e4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
15e5 0000 0000 | | .XXX[0x3]
15e7 0000 | |
15e8 ; --------------------------------------------------------------------------------------
15e8 ; SUBPROGRAM
15e8 ; --------------------------------------------------------------------------------------
15e8 15f0 | | .CONST 0x15f0 ; Address of begin
15e9 0004 | | .CONST 0x0004 ; Address of exception handler
15ea 0002 | | .CONST 0x0002 ; Number of locals
15eb INIT_15e8:
15eb e5fd | | Load 0x2,-0x3
15ec e5fe | | Load 0x2,-0x2
15ed 0272 | r | Execute Discrete,Minus
15ee 00e5 | | Load_Encached Long_Integer_Cache
15ef 03f1 | | Declare_Variable Discrete,With_Value
15f0 BODY_15e8:
15f0 e5ff | | Load 0x2,-0x1
15f1 680f |h | Jump_Zero 0x1601
15f2 00d8 | | Load_Top At_Offset_0
15f3 0c02 | | Execute_Immediate Greater_Equal,0x2
15f4 6806 |h | Jump_Zero 0x15fb
15f5 0092 1be7 | | Action Push_String_Extended,0x1be7 ; ", ... => ..., "
15f7 e5fd | | Load 0x2,-0x3
15f8 833d | = | Call 0x1,0x13d
15f9 01cc | | Execute Vector,Catenate
15fa 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
15fb 0092 1be5 | | Action Push_String_Extended,0x1be5 ; ", "
15fd e5fd | | Load 0x2,-0x3
15fe 833d | = | Call 0x1,0x13d
15ff 01cc | | Execute Vector,Catenate
1600 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1601 00ea | | Load_Encached Null_String_Cache
1602 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1603 0000 0000 | | .BLANK 0000[0x5]
1608 ; --------------------------------------------------------------------------------------
1608 ; SUBPROGRAM
1608 ; --------------------------------------------------------------------------------------
1608 1611 | | .CONST 0x1611 ; Address of begin
1609 0004 | | .CONST 0x0004 ; Address of exception handler
160a 0002 | | .CONST 0x0002 ; Number of locals
160b INIT_1608:
160b e5fe | | Load 0x2,-0x2
160c e5ff | | Load 0x2,-0x1
160d 0272 | r | Execute Discrete,Minus
160e 0a01 | | Execute_Immediate Plus,0x1
160f 00e5 | | Load_Encached Long_Integer_Cache
1610 03f1 | | Declare_Variable Discrete,With_Value
1611 BODY_1608:
1611 00d8 | | Load_Top At_Offset_0
1612 0b01 | | Execute_Immediate Case_Compare,0x1
1613 700a |p | Jump_Nonzero 0x161e
1614 0f02 | | Execute_Immediate Equal,0x2
1615 700c |p | Jump_Nonzero 0x1622
1616 e5ff | | Load 0x2,-0x1
1617 833d | = | Call 0x1,0x13d
1618 e2ff | | Load 0x1,0xff
1619 01cc | | Execute Vector,Catenate
161a e5fe | | Load 0x2,-0x2
161b 833d | = | Call 0x1,0x13d
161c 01cc | | Execute Vector,Catenate
161d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
161e 00d1 | | Pop_Control Pop_Count_1
161f e5ff | | Load 0x2,-0x1
1620 833d | = | Call 0x1,0x13d
1621 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1622 e5ff | | Load 0x2,-0x1
1623 833d | = | Call 0x1,0x13d
1624 e5fe | | Load 0x2,-0x2
1625 833d | = | Call 0x1,0x13d
1626 01cc | | Execute Vector,Catenate
1627 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1628 ; --------------------------------------------------------------------------------------
1628 ; SUBPROGRAM
1628 ; --------------------------------------------------------------------------------------
1628 1637 | 7 | .CONST 0x1637 ; Address of begin
1629 166d | m | .CONST 0x166d ; Address of exception handler
162a 0005 | | .CONST 0x0005 ; Number of locals
162b INIT_1628:
162b e5fd | | Load 0x2,-0x3
162c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
162d e049 | I | Load 0x0,0x49
162e 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
162f 03f1 | | Declare_Variable Discrete,With_Value
1630 00e5 | | Load_Encached Long_Integer_Cache
1631 e018 | | Load 0x0,0x18
1632 0322 | " | Declare_Variable Record
1633 e402 | | Load 0x2,0x2
1634 828c | | Call 0x1,0x8c
1635 00e1 | | Load_Encached Boolean_Cache
1636 03f1 | | Declare_Variable Discrete,With_Value
1637 BODY_1628:
1637 e5ff | | Load 0x2,-0x1
1638 01db | | Execute Vector,Length
1639 7003 |p | Jump_Nonzero 0x163d
163a 0092 1be8 | | Action Push_String_Extended,0x1be8 ; " => Element\x00not\x00initialized"
163c 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
163d e402 | | Load 0x2,0x2
163e 82f9 | | Call 0x1,0xf9
163f 681b |h | Jump_Zero 0x165b
1640 00d8 | | Load_Top At_Offset_0
1641 680b |h | Jump_Zero 0x164d
1642 4801 |H | Short_Literal 0x1
1643 e5f8 | | Load 0x2,-0x8
1644 e5f9 | | Load 0x2,-0x7
1645 e5fa | | Load 0x2,-0x6
1646 e5fb | | Load 0x2,-0x5
1647 e5fc | | Load 0x2,-0x4
1648 e5fd | | Load 0x2,-0x3
1649 e5fe | | Load 0x2,-0x2
164a e5ff | | Load 0x2,-0x1
164b 832b | + | Call 0x1,0x12b
164c 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
164d e5ff | | Load 0x2,-0x1
164e 8272 | r | Call 0x1,0x72
164f a403 | | Store_Unchecked 0x2,0x3
1650 e2fc | | Load 0x1,0xfc
1651 e5f8 | | Load 0x2,-0x8
1652 e5f9 | | Load 0x2,-0x7
1653 e5fa | | Load 0x2,-0x6
1654 e5fb | | Load 0x2,-0x5
1655 e5fc | | Load 0x2,-0x4
1656 e5fd | | Load 0x2,-0x3
1657 e403 | | Load 0x2,0x3
1658 8329 | ) | Call 0x1,0x129
1659 01cc | | Execute Vector,Catenate
165a 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
165b e5fd | | Load 0x2,-0x3
165c 8261 | a | Call 0x1,0x61
165d e404 | | Load 0x2,0x4
165e 017d | } | Execute Record,Structure_Write
165f e2fc | | Load 0x1,0xfc
1660 e5f8 | | Load 0x2,-0x8
1661 e5f9 | | Load 0x2,-0x7
1662 e5fa | | Load 0x2,-0x6
1663 e5fb | | Load 0x2,-0x5
1664 e5fc | | Load 0x2,-0x4
1665 e404 | | Load 0x2,0x4
1666 e5fd | | Load 0x2,-0x3
1667 e5fe | | Load 0x2,-0x2
1668 e5ff | | Load 0x2,-0x1
1669 8216 | | Call 0x1,0x16
166a 832e | . | Call 0x1,0x12e
166b 01cc | | Execute Vector,Catenate
166c 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
166d TRAP_1628:
166d 4884 |H | Short_Literal 0x84
166e 010f | | Execute Exception,Equal
166f 6803 |h | Jump_Zero 0x1673
1670 0092 1be9 | | Action Push_String_Extended,0x1be9 ; " => Element\x00value\x00not\x00readable"
1672 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1673 0092 1bea | | Action Push_String_Extended,0x1bea ; " => Exception\x00raised\x00readingelement\x00value: "
1675 e04a | J | Load 0x0,0x4a
1676 180d | | Execute Package,Field_Execute,Field_Number 0xd
1677 01cc | | Execute Vector,Catenate
1678 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1679 0000 0000 | | .BLANK 0000[0x7]
1680 ; --------------------------------------------------------------------------------------
1680 ; SUBPROGRAM
1680 ; --------------------------------------------------------------------------------------
1680 1683 | | .CONST 0x1683 ; Address of begin
1681 0004 | | .CONST 0x0004 ; Address of exception handler
1682 0001 | | .CONST 0x0001 ; Number of locals
1683 BODY_1680:
1683 INIT_1680:
1683 4820 |H | Short_Literal 0x20
1684 4800 |H | Short_Literal 0x0
1685 480a |H | Short_Literal 0xa
1686 e5fc | | Load 0x2,-0x4
1687 e057 | W | Load 0x0,0x57
1688 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1689 e5f7 | | Load 0x2,-0x9
168a e5f8 | | Load 0x2,-0x8
168b e5f9 | | Load 0x2,-0x7
168c e5fa | | Load 0x2,-0x6
168d e5fb | | Load 0x2,-0x5
168e e5fd | | Load 0x2,-0x3
168f e5fe | | Load 0x2,-0x2
1690 e5ff | | Load 0x2,-0x1
1691 8341 | A | Call 0x1,0x141
1692 01cc | | Execute Vector,Catenate
1693 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9
1694 0000 0000 | | .BLANK 0000[0x4]
1698 ; --------------------------------------------------------------------------------------
1698 ; SUBPROGRAM
1698 ; --------------------------------------------------------------------------------------
1698 16a1 | | .CONST 0x16a1 ; Address of begin
1699 0004 | | .CONST 0x0004 ; Address of exception handler
169a 0002 | | .CONST 0x0002 ; Number of locals
169b INIT_1698:
169b e5fe | | Load 0x2,-0x2
169c e5fd | | Load 0x2,-0x3
169d 0273 | s | Execute Discrete,Plus
169e 0aff | | Execute_Immediate Plus,-0x1
169f 00e5 | | Load_Encached Long_Integer_Cache
16a0 03f1 | | Declare_Variable Discrete,With_Value
16a1 BODY_1698:
16a1 00d8 | | Load_Top At_Offset_0
16a2 e5ff | | Load 0x2,-0x1
16a3 01dc | | Execute Vector,Last
16a4 027a | z | Execute Discrete,Less_Equal
16a5 6805 |h | Jump_Zero 0x16ab
16a6 e5fe | | Load 0x2,-0x2
16a7 e402 | | Load 0x2,0x2
16a8 e5ff | | Load 0x2,-0x1
16a9 01cf | | Execute Vector,Slice_Read
16aa 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
16ab e215 | | Load 0x1,0x15
16ac 0335 | 5 | Declare_Variable Array,Duplicate
16ad 00cd | | Action Spare6_Action
16ae 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
16af 0000 | | .XXX[0x1]
16b0 ; --------------------------------------------------------------------------------------
16b0 ; SUBPROGRAM
16b0 ; --------------------------------------------------------------------------------------
16b0 16b3 | | .CONST 0x16b3 ; Address of begin
16b1 0004 | | .CONST 0x0004 ; Address of exception handler
16b2 0001 | | .CONST 0x0001 ; Number of locals
16b3 BODY_16b0:
16b3 INIT_16b0:
16b3 e5fa | | Load 0x2,-0x6
16b4 e5f9 | | Load 0x2,-0x7
16b5 027b | { | Execute Discrete,Greater_Equal
16b6 6810 |h | Jump_Zero 0x16c7
16b7 e5f4 | | Load 0x2,-0xc
16b8 e5f5 | | Load 0x2,-0xb
16b9 e5f6 | | Load 0x2,-0xa
16ba e5f7 | | Load 0x2,-0x9
16bb e5f8 | | Load 0x2,-0x8
16bc e5fa | | Load 0x2,-0x6
16bd e5fc | | Load 0x2,-0x4
16be e5fd | | Load 0x2,-0x3
16bf e5fe | | Load 0x2,-0x2
16c0 827c | | | Call 0x1,0x7c
16c1 e5fb | | Load 0x2,-0x5
16c2 e5fd | | Load 0x2,-0x3
16c3 e5ff | | Load 0x2,-0x1
16c4 8343 | C | Call 0x1,0x143
16c5 8342 | B | Call 0x1,0x142
16c6 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc
16c7 e5f4 | | Load 0x2,-0xc
16c8 e5f5 | | Load 0x2,-0xb
16c9 e5f6 | | Load 0x2,-0xa
16ca e5f7 | | Load 0x2,-0x9
16cb e5f8 | | Load 0x2,-0x8
16cc e5fa | | Load 0x2,-0x6
16cd e5fc | | Load 0x2,-0x4
16ce e5fd | | Load 0x2,-0x3
16cf e5fe | | Load 0x2,-0x2
16d0 827c | | | Call 0x1,0x7c
16d1 e5fb | | Load 0x2,-0x5
16d2 e5fd | | Load 0x2,-0x3
16d3 e5ff | | Load 0x2,-0x1
16d4 8343 | C | Call 0x1,0x143
16d5 8342 | B | Call 0x1,0x142
16d6 0092 1be5 | | Action Push_String_Extended,0x1be5 ; ", "
16d8 01cc | | Execute Vector,Catenate
16d9 e5f4 | | Load 0x2,-0xc
16da e5f5 | | Load 0x2,-0xb
16db e5f6 | | Load 0x2,-0xa
16dc e5f7 | | Load 0x2,-0x9
16dd e5f8 | | Load 0x2,-0x8
16de e5f9 | | Load 0x2,-0x7
16df e5fa | | Load 0x2,-0x6
16e0 0a01 | | Execute_Immediate Plus,0x1
16e1 e5fb | | Load 0x2,-0x5
16e2 e5fc | | Load 0x2,-0x4
16e3 e5fd | | Load 0x2,-0x3
16e4 e5fb | | Load 0x2,-0x5
16e5 0273 | s | Execute Discrete,Plus
16e6 e5fe | | Load 0x2,-0x2
16e7 e5ff | | Load 0x2,-0x1
16e8 8344 | D | Call 0x1,0x144
16e9 01cc | | Execute Vector,Catenate
16ea 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc
16eb 0000 0000 | | .BLANK 0000[0x5]
16f0 ; --------------------------------------------------------------------------------------
16f0 ; SUBPROGRAM
16f0 ; --------------------------------------------------------------------------------------
16f0 16f4 | | .CONST 0x16f4 ; Address of begin
16f1 0004 | | .CONST 0x0004 ; Address of exception handler
16f2 0002 | | .CONST 0x0002 ; Number of locals
16f3 INIT_16f0:
16f3 00e8 | | Load_Encached Character_Cache
16f4 BODY_16f0:
16f4 e5ff | | Load 0x2,-0x1
16f5 827a | z | Call 0x1,0x7a
16f6 a402 | | Store_Unchecked 0x2,0x2
16f7 00d8 | | Load_Top At_Offset_0
16f8 0f22 | " | Execute_Immediate Equal,0x22
16f9 6803 |h | Jump_Zero 0x16fd
16fa 0092 1beb | | Action Push_String_Extended,0x1beb ; "\x22\x22"
16fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
16fd 00d8 | | Load_Top At_Offset_0
16fe 00ea | | Load_Encached Null_String_Cache
16ff 01ca | | Execute Vector,Prepend
1700 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1701 0000 0000 | | .BLANK 0000[0x7]
1708 ; --------------------------------------------------------------------------------------
1708 ; SUBPROGRAM
1708 ; --------------------------------------------------------------------------------------
1708 170b | | .CONST 0x170b ; Address of begin
1709 0004 | | .CONST 0x0004 ; Address of exception handler
170a 0001 | | .CONST 0x0001 ; Number of locals
170b BODY_1708:
170b INIT_1708:
170b e5ff | | Load 0x2,-0x1
170c 01db | | Execute Vector,Length
170d 0d08 | | Execute_Immediate Less,0x8
170e 6802 |h | Jump_Zero 0x1711
170f 00ea | | Load_Encached Null_String_Cache
1710 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1711 e5ff | | Load 0x2,-0x1
1712 01dd | | Execute Vector,First
1713 e5ff | | Load 0x2,-0x1
1714 01dd | | Execute Vector,First
1715 0a07 | | Execute_Immediate Plus,0x7
1716 e5ff | | Load 0x2,-0x1
1717 01cf | | Execute Vector,Slice_Read
1718 8345 | E | Call 0x1,0x145
1719 e5ff | | Load 0x2,-0x1
171a 01dd | | Execute Vector,First
171b 0a08 | | Execute_Immediate Plus,0x8
171c e5ff | | Load 0x2,-0x1
171d 01dc | | Execute Vector,Last
171e e5ff | | Load 0x2,-0x1
171f 01cf | | Execute Vector,Slice_Read
1720 8346 | F | Declare_Type Array,Constrained_Incomplete,Bounds_With_Object
1721 01cc | | Execute Vector,Catenate
1722 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1723 0000 0000 | | .BLANK 0000[0x5]
1728 ; --------------------------------------------------------------------------------------
1728 ; SUBPROGRAM
1728 ; --------------------------------------------------------------------------------------
1728 172b | + | .CONST 0x172b ; Address of begin
1729 0004 | | .CONST 0x0004 ; Address of exception handler
172a 0001 | | .CONST 0x0001 ; Number of locals
172b BODY_1728:
172b INIT_1728:
172b e5ff | | Load 0x2,-0x1
172c 01db | | Execute Vector,Length
172d 0c08 | | Execute_Immediate Greater_Equal,0x8
172e 6811 |h | Jump_Zero 0x1740
172f 4822 |H" | Short_Literal 0x22
1730 4822 |H" | Short_Literal 0x22
1731 00ea | | Load_Encached Null_String_Cache
1732 e5fe | | Load 0x2,-0x2
1733 e2fd | | Load 0x1,0xfd
1734 830d | | Call 0x1,0x10d
1735 01ca | | Execute Vector,Prepend
1736 e5ff | | Load 0x2,-0x1
1737 8346 | F | Declare_Type Array,Constrained_Incomplete,Bounds_With_Object
1738 01cc | | Execute Vector,Catenate
1739 00ea | | Load_Encached Null_String_Cache
173a e5fd | | Load 0x2,-0x3
173b e2fd | | Load 0x1,0xfd
173c 830d | | Call 0x1,0x10d
173d 01cc | | Execute Vector,Catenate
173e 01cb | | Execute Vector,Append
173f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1740 e5fe | | Load 0x2,-0x2
1741 e5fd | | Load 0x2,-0x3
1742 0278 | x | Execute Discrete,Or
1743 6803 |h | Jump_Zero 0x1747
1744 0092 1bec | | Action Push_String_Extended,0x1bec ; "\x22...\x22"
1746 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1747 e303 | | Load 0x1,0x103
1748 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1749 0000 0000 | | .BLANK 0000[0x7]
1750 ; --------------------------------------------------------------------------------------
1750 ; SUBPROGRAM
1750 ; --------------------------------------------------------------------------------------
1750 175b | [ | .CONST 0x175b ; Address of begin
1751 0004 | | .CONST 0x0004 ; Address of exception handler
1752 0006 | | .CONST 0x0006 ; Number of locals
1753 INIT_1750:
1753 00e1 | | Load_Encached Boolean_Cache
1754 03e9 | | Declare_Variable Discrete,Duplicate
1755 00e5 | | Load_Encached Long_Integer_Cache
1756 03e9 | | Declare_Variable Discrete,Duplicate
1757 e5fd | | Load 0x2,-0x3
1758 82f7 | | Call 0x1,0xf7
1759 00e1 | | Load_Encached Boolean_Cache
175a 03f1 | | Declare_Variable Discrete,With_Value
175b BODY_1750:
175b 00e5 | | Load_Encached Long_Integer_Cache
175c 00e5 | | Load_Encached Long_Integer_Cache
175d e406 | | Load 0x2,0x6
175e e5f5 | | Load 0x2,-0xb
175f e5f6 | | Load 0x2,-0xa
1760 e5fa | | Load 0x2,-0x6
1761 e5fb | | Load 0x2,-0x5
1762 8289 | | Call 0x1,0x89
1763 c404 | | Store 0x2,0x4
1764 c405 | | Store 0x2,0x5
1765 e404 | | Load 0x2,0x4
1766 e5fb | | Load 0x2,-0x5
1767 027d | } | Execute Discrete,Greater
1768 a402 | | Store_Unchecked 0x2,0x2
1769 e405 | | Load 0x2,0x5
176a e5fa | | Load 0x2,-0x6
176b 027c | | | Execute Discrete,Less
176c 7004 |p | Jump_Nonzero 0x1771
176d e404 | | Load 0x2,0x4
176e e405 | | Load 0x2,0x5
176f 027d | } | Execute Discrete,Greater
1770 7801 |x | Jump 0x1772
1771 4801 |H | Short_Literal 0x1
1772 a403 | | Store_Unchecked 0x2,0x3
1773 00d8 | | Load_Top At_Offset_0
1774 6816 |h | Jump_Zero 0x178b
1775 e5fc | | Load 0x2,-0x4
1776 0f08 | | Execute_Immediate Equal,0x8
1777 7001 |p | Jump_Nonzero 0x1779
1778 0887 | | Execute_Immediate Raise,0x87
1779 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "("
177b 4800 |H | Short_Literal 0x0
177c e5fa | | Load 0x2,-0x6
177d e5fb | | Load 0x2,-0x5
177e 8310 | | Call 0x1,0x110
177f 01cc | | Execute Vector,Catenate
1780 e2fc | | Load 0x1,0xfc
1781 01cc | | Execute Vector,Catenate
1782 e403 | | Load 0x2,0x3
1783 e402 | | Load 0x2,0x2
1784 e5ff | | Load 0x2,-0x1
1785 8347 | G | Call 0x1,0x147
1786 01cc | | Execute Vector,Catenate
1787 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
1789 01cc | | Execute Vector,Catenate
178a 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
178b e5fb | | Load 0x2,-0x5
178c e5fa | | Load 0x2,-0x6
178d 027d | } | Execute Discrete,Greater
178e 6802 |h | Jump_Zero 0x1791
178f e304 | | Load 0x1,0x104
1790 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
1791 e404 | | Load 0x2,0x4
1792 e405 | | Load 0x2,0x5
1793 027d | } | Execute Discrete,Greater
1794 680b |h | Jump_Zero 0x17a0
1795 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "("
1797 e5fa | | Load 0x2,-0x6
1798 e5fb | | Load 0x2,-0x5
1799 8340 | @ | Call 0x1,0x140
179a 01cc | | Execute Vector,Catenate
179b 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
179d 01cc | | Execute Vector,Catenate
179e 8313 | | Call 0x1,0x113
179f 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
17a0 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "("
17a2 e5fb | | Load 0x2,-0x5
17a3 e404 | | Load 0x2,0x4
17a4 e402 | | Load 0x2,0x2
17a5 833e | > | Call 0x1,0x13e
17a6 01cc | | Execute Vector,Catenate
17a7 e5f5 | | Load 0x2,-0xb
17a8 e5f6 | | Load 0x2,-0xa
17a9 e5f7 | | Load 0x2,-0x9
17aa e5f8 | | Load 0x2,-0x8
17ab 0aff | | Execute_Immediate Plus,-0x1
17ac 00d8 | | Load_Top At_Offset_0
17ad 00e3 | | Load_Encached Natural_Cache
17ae 0260 | ` | Execute Discrete,In_Type
17af 7001 |p | Jump_Nonzero 0x17b1
17b0 0801 | | Execute_Immediate Raise,0x1
17b1 e5f9 | | Load 0x2,-0x7
17b2 e405 | | Load 0x2,0x5
17b3 e404 | | Load 0x2,0x4
17b4 e5fc | | Load 0x2,-0x4
17b5 e5fd | | Load 0x2,-0x3
17b6 e5ff | | Load 0x2,-0x1
17b7 01dd | | Execute Vector,First
17b8 e5fe | | Load 0x2,-0x2
17b9 e5ff | | Load 0x2,-0x1
17ba 8344 | D | Call 0x1,0x144
17bb 01cc | | Execute Vector,Catenate
17bc e5fa | | Load 0x2,-0x6
17bd e405 | | Load 0x2,0x5
17be e403 | | Load 0x2,0x3
17bf 833f | ? | Call 0x1,0x13f
17c0 01cc | | Execute Vector,Catenate
17c1 0092 1bdb | | Action Push_String_Extended,0x1bdb ; ")"
17c3 01cc | | Execute Vector,Catenate
17c4 8313 | | Call 0x1,0x113
17c5 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb
17c6 0000 0000 | | .XXX[0x2]
17c8 ; --------------------------------------------------------------------------------------
17c8 ; SUBPROGRAM
17c8 ; --------------------------------------------------------------------------------------
17c8 17d2 | | .CONST 0x17d2 ; Address of begin
17c9 0004 | | .CONST 0x0004 ; Address of exception handler
17ca 0004 | | .CONST 0x0004 ; Number of locals
17cb INIT_17c8:
17cb e5fc | | Load 0x2,-0x4
17cc e5fd | | Load 0x2,-0x3
17cd 0271 | q | Execute Discrete,Times
17ce 00e5 | | Load_Encached Long_Integer_Cache
17cf 03f1 | | Declare_Variable Discrete,With_Value
17d0 00e5 | | Load_Encached Long_Integer_Cache
17d1 00e5 | | Load_Encached Long_Integer_Cache
17d2 BODY_17c8:
17d2 e5fb | | Load 0x2,-0x5
17d3 e5fa | | Load 0x2,-0x6
17d4 027d | } | Execute Discrete,Greater
17d5 6804 |h | Jump_Zero 0x17da
17d6 e215 | | Load 0x1,0x15
17d7 0335 | 5 | Declare_Variable Array,Duplicate
17d8 00cd | | Action Spare6_Action
17d9 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
17da e5fa | | Load 0x2,-0x6
17db e5fd | | Load 0x2,-0x3
17dc 0271 | q | Execute Discrete,Times
17dd 0aff | | Execute_Immediate Plus,-0x1
17de a403 | | Store_Unchecked 0x2,0x3
17df e403 | | Load 0x2,0x3
17e0 e402 | | Load 0x2,0x2
17e1 0272 | r | Execute Discrete,Minus
17e2 0a01 | | Execute_Immediate Plus,0x1
17e3 a404 | | Store_Unchecked 0x2,0x4
17e4 e5ff | | Load 0x2,-0x1
17e5 01db | | Execute Vector,Length
17e6 e403 | | Load 0x2,0x3
17e7 027b | { | Execute Discrete,Greater_Equal
17e8 6805 |h | Jump_Zero 0x17ee
17e9 e402 | | Load 0x2,0x2
17ea e403 | | Load 0x2,0x3
17eb e5ff | | Load 0x2,-0x1
17ec 01cf | | Execute Vector,Slice_Read
17ed 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
17ee 00d8 | | Load_Top At_Offset_0
17ef e402 | | Load 0x2,0x2
17f0 e5fe | | Load 0x2,-0x2
17f1 827c | | | Call 0x1,0x7c
17f2 82b2 | | Call 0x1,0xb2
17f3 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
17f4 0000 0000 | | .BLANK 0000[0x4]
17f8 ; --------------------------------------------------------------------------------------
17f8 ; SUBPROGRAM
17f8 ; --------------------------------------------------------------------------------------
17f8 1804 | | .CONST 0x1804 ; Address of begin
17f9 0004 | | .CONST 0x0004 ; Address of exception handler
17fa 0007 | | .CONST 0x0007 ; Number of locals
17fb INIT_17f8:
17fb 00e3 | | Load_Encached Natural_Cache
17fc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
17fd e01e | | Load 0x0,0x1e
17fe 0322 | " | Declare_Variable Record
17ff e03c | < | Load 0x0,0x3c
1800 0322 | " | Declare_Variable Record
1801 00e5 | | Load_Encached Long_Integer_Cache
1802 00e5 | | Load_Encached Long_Integer_Cache
1803 00e5 | | Load_Encached Long_Integer_Cache
1804 BODY_17f8:
1804 e5f9 | | Load 0x2,-0x7
1805 0d01 | | Execute_Immediate Less,0x1
1806 6802 |h | Jump_Zero 0x1809
1807 e2fd | | Load 0x1,0xfd
1808 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1809 e402 | | Load 0x2,0x2
180a e5fd | | Load 0x2,-0x3
180b 8263 | c | Call 0x1,0x63
180c e403 | | Load 0x2,0x3
180d 017d | } | Execute Record,Structure_Write
180e e403 | | Load 0x2,0x3
180f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1810 e404 | | Load 0x2,0x4
1811 017d | } | Execute Record,Structure_Write
1812 00e5 | | Load_Encached Long_Integer_Cache
1813 00e5 | | Load_Encached Long_Integer_Cache
1814 e404 | | Load 0x2,0x4
1815 82f7 | | Call 0x1,0xf7
1816 e5f6 | | Load 0x2,-0xa
1817 e5f7 | | Load 0x2,-0x9
1818 e5fb | | Load 0x2,-0x5
1819 e5fc | | Load 0x2,-0x4
181a 8289 | | Call 0x1,0x89
181b c406 | | Store 0x2,0x6
181c c407 | | Store 0x2,0x7
181d e403 | | Load 0x2,0x3
181e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
181f a405 | | Store_Unchecked 0x2,0x5
1820 e5f6 | | Load 0x2,-0xa
1821 e5f7 | | Load 0x2,-0x9
1822 e5f8 | | Load 0x2,-0x8
1823 e5f9 | | Load 0x2,-0x7
1824 e5fa | | Load 0x2,-0x6
1825 e5fb | | Load 0x2,-0x5
1826 e5fc | | Load 0x2,-0x4
1827 e405 | | Load 0x2,0x5
1828 e404 | | Load 0x2,0x4
1829 e5fe | | Load 0x2,-0x2
182a e407 | | Load 0x2,0x7
182b e406 | | Load 0x2,0x6
182c e5f7 | | Load 0x2,-0x9
182d 00d8 | | Load_Top At_Offset_0
182e 00e3 | | Load_Encached Natural_Cache
182f 0260 | ` | Execute Discrete,In_Type
1830 7001 |p | Jump_Nonzero 0x1832
1831 0801 | | Execute_Immediate Raise,0x1
1832 e405 | | Load 0x2,0x5
1833 e5fe | | Load 0x2,-0x2
1834 e5ff | | Load 0x2,-0x1
1835 8216 | | Call 0x1,0x16
1836 8349 | I | Call 0x1,0x149
1837 8348 | H | Call 0x1,0x148
1838 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
1839 0000 0000 | | .BLANK 0000[0x7]
1840 ; --------------------------------------------------------------------------------------
1840 ; SUBPROGRAM
1840 ; --------------------------------------------------------------------------------------
1840 1854 | T | .CONST 0x1854 ; Address of begin
1841 0004 | | .CONST 0x0004 ; Address of exception handler
1842 0004 | | .CONST 0x0004 ; Number of locals
1843 INIT_1840:
1843 e021 | ! | Load 0x0,0x21
1844 0322 | " | Declare_Variable Record
1845 4800 |H | Short_Literal 0x0
1846 e5fd | | Load 0x2,-0x3
1847 8264 | d | Call 0x1,0x64
1848 e402 | | Load 0x2,0x2
1849 017d | } | Execute Record,Structure_Write
184a 00d8 | | Load_Top At_Offset_0
184b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
184c 00e5 | | Load_Encached Long_Integer_Cache
184d 03f1 | | Declare_Variable Discrete,With_Value
184e e402 | | Load 0x2,0x2
184f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1850 e403 | | Load 0x2,0x3
1851 8286 | | Call 0x1,0x86
1852 00e5 | | Load_Encached Long_Integer_Cache
1853 03f1 | | Declare_Variable Discrete,With_Value
1854 BODY_1840:
1854 e5f8 | | Load 0x2,-0x8
1855 e5f9 | | Load 0x2,-0x7
1856 e5fa | | Load 0x2,-0x6
1857 e5fb | | Load 0x2,-0x5
1858 e5fc | | Load 0x2,-0x4
1859 e404 | | Load 0x2,0x4
185a e403 | | Load 0x2,0x3
185b e5fd | | Load 0x2,-0x3
185c e5fe | | Load 0x2,-0x2
185d e5ff | | Load 0x2,-0x1
185e 834a | J | Call 0x1,0x14a
185f 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1860 ; --------------------------------------------------------------------------------------
1860 ; SUBPROGRAM
1860 ; --------------------------------------------------------------------------------------
1860 186a | j | .CONST 0x186a ; Address of begin
1861 0004 | | .CONST 0x0004 ; Address of exception handler
1862 0002 | | .CONST 0x0002 ; Number of locals
1863 INIT_1860:
1863 e01e | | Load 0x0,0x1e
1864 0322 | " | Declare_Variable Record
1865 4800 |H | Short_Literal 0x0
1866 e5ff | | Load 0x2,-0x1
1867 8263 | c | Call 0x1,0x63
1868 e402 | | Load 0x2,0x2
1869 017d | } | Execute Record,Structure_Write
186a BODY_1860:
186a e5fe | | Load 0x2,-0x2
186b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
186c a5fd | | Store_Unchecked 0x2,-0x3
186d e5fe | | Load 0x2,-0x2
186e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
186f e5fe | | Load 0x2,-0x2
1870 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1871 8286 | | Call 0x1,0x86
1872 a5fc | | Store_Unchecked 0x2,-0x4
1873 00d8 | | Load_Top At_Offset_0
1874 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1875 e5fc | | Load 0x2,-0x4
1876 e5fd | | Load 0x2,-0x3
1877 0272 | r | Execute Discrete,Minus
1878 0a01 | | Execute_Immediate Plus,0x1
1879 0271 | q | Execute Discrete,Times
187a a5fb | | Store_Unchecked 0x2,-0x5
187b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
187c 0000 0000 | | .BLANK 0000[0x4]
1880 ; --------------------------------------------------------------------------------------
1880 ; SUBPROGRAM
1880 ; --------------------------------------------------------------------------------------
1880 1892 | | .CONST 0x1892 ; Address of begin
1881 0004 | | .CONST 0x0004 ; Address of exception handler
1882 0006 | | .CONST 0x0006 ; Number of locals
1883 INIT_1880:
1883 e037 | 7 | Load 0x0,0x37
1884 0322 | " | Declare_Variable Record
1885 e5ff | | Load 0x2,-0x1
1886 82ba | | Call 0x1,0xba
1887 e402 | | Load 0x2,0x2
1888 017d | } | Execute Record,Structure_Write
1889 00e5 | | Load_Encached Long_Integer_Cache
188a 03e9 | | Declare_Variable Discrete,Duplicate
188b 00e5 | | Load_Encached Long_Integer_Cache
188c e2b3 | | Load 0x1,0xb3
188d e5ff | | Load 0x2,-0x1
188e 827c | | | Call 0x1,0x7c
188f e048 | H | Load 0x0,0x48
1890 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1891 03f1 | | Declare_Variable Discrete,With_Value
1892 BODY_1880:
1892 00e5 | | Load_Encached Long_Integer_Cache
1893 00e5 | | Load_Encached Long_Integer_Cache
1894 00e5 | | Load_Encached Long_Integer_Cache
1895 e402 | | Load 0x2,0x2
1896 e5fe | | Load 0x2,-0x2
1897 834c | L | Call 0x1,0x14c
1898 c403 | | Store 0x2,0x3
1899 c404 | | Store 0x2,0x4
189a c405 | | Store 0x2,0x5
189b e5f9 | | Load 0x2,-0x7
189c e5fa | | Load 0x2,-0x6
189d e5fb | | Load 0x2,-0x5
189e e5fc | | Load 0x2,-0x4
189f e5fd | | Load 0x2,-0x3
18a0 e404 | | Load 0x2,0x4
18a1 e403 | | Load 0x2,0x3
18a2 e5fe | | Load 0x2,-0x2
18a3 e406 | | Load 0x2,0x6
18a4 e215 | | Load 0x1,0x15
18a5 834a | J | Call 0x1,0x14a
18a6 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18a7 0000 | | .XXX[0x1]
18a8 ; --------------------------------------------------------------------------------------
18a8 ; SUBPROGRAM
18a8 ; --------------------------------------------------------------------------------------
18a8 18ad | | .CONST 0x18ad ; Address of begin
18a9 18df | | .CONST 0x18df ; Address of exception handler
18aa 0002 | | .CONST 0x0002 ; Number of locals
18ab INIT_18a8:
18ab e018 | | Load 0x0,0x18
18ac 0322 | " | Declare_Variable Record
18ad BODY_18a8:
18ad e5fe | | Load 0x2,-0x2
18ae 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
18af 8290 | | Call 0x1,0x90
18b0 6802 |h | Jump_Zero 0x18b3
18b1 e30c | | Load 0x1,0x10c
18b2 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18b3 e5fe | | Load 0x2,-0x2
18b4 8261 | a | Call 0x1,0x61
18b5 e402 | | Load 0x2,0x2
18b6 017d | } | Execute Record,Structure_Write
18b7 e5fe | | Load 0x2,-0x2
18b8 8291 | | Call 0x1,0x91
18b9 680e |h | Jump_Zero 0x18c8
18ba e5fe | | Load 0x2,-0x2
18bb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
18bc 0f6c | l | Execute_Immediate Equal,0x6c
18bd 7001 |p | Jump_Nonzero 0x18bf
18be 0887 | | Execute_Immediate Raise,0x87
18bf e5f9 | | Load 0x2,-0x7
18c0 e5fa | | Load 0x2,-0x6
18c1 e5fb | | Load 0x2,-0x5
18c2 e5fc | | Load 0x2,-0x4
18c3 e5fd | | Load 0x2,-0x3
18c4 e5fe | | Load 0x2,-0x2
18c5 e5ff | | Load 0x2,-0x1
18c6 834d | M | Call 0x1,0x14d
18c7 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18c8 e5fe | | Load 0x2,-0x2
18c9 828f | | Call 0x1,0x8f
18ca 680a |h | Jump_Zero 0x18d5
18cb e5f9 | | Load 0x2,-0x7
18cc e5fa | | Load 0x2,-0x6
18cd e5fb | | Load 0x2,-0x5
18ce e5fc | | Load 0x2,-0x4
18cf e5fd | | Load 0x2,-0x3
18d0 e5fe | | Load 0x2,-0x2
18d1 e5ff | | Load 0x2,-0x1
18d2 e215 | | Load 0x1,0x15
18d3 832f | / | Call 0x1,0x12f
18d4 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18d5 e5f9 | | Load 0x2,-0x7
18d6 e5fa | | Load 0x2,-0x6
18d7 e5fb | | Load 0x2,-0x5
18d8 e5fc | | Load 0x2,-0x4
18d9 e5fd | | Load 0x2,-0x3
18da e402 | | Load 0x2,0x2
18db e5fe | | Load 0x2,-0x2
18dc e5ff | | Load 0x2,-0x1
18dd 832d | - | Call 0x1,0x12d
18de 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18df TRAP_18a8:
18df 010d | | Execute Exception,Is_Numeric_Error
18e0 6802 |h | Jump_Zero 0x18e3
18e1 e30b | | Load 0x1,0x10b
18e2 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18e3 00d8 | | Load_Top At_Offset_0
18e4 0101 | | Execute Exception,Reraise
18e5 0000 0000 | | .XXX[0x3]
18e7 0000 | |
18e8 ; --------------------------------------------------------------------------------------
18e8 ; SUBPROGRAM
18e8 ; --------------------------------------------------------------------------------------
18e8 18f9 | | .CONST 0x18f9 ; Address of begin
18e9 0004 | | .CONST 0x0004 ; Address of exception handler
18ea 0006 | | .CONST 0x0006 ; Number of locals
18eb INIT_18e8:
18eb e048 | H | Load 0x0,0x48
18ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
18ed 00e5 | | Load_Encached Long_Integer_Cache
18ee e027 | ' | Load 0x0,0x27
18ef 0322 | " | Declare_Variable Record
18f0 4800 |H | Short_Literal 0x0
18f1 e5f8 | | Load 0x2,-0x8
18f2 e5ff | | Load 0x2,-0x1
18f3 8326 | & | Call 0x1,0x126
18f4 e5fe | | Load 0x2,-0x2
18f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
18f6 e049 | I | Load 0x0,0x49
18f7 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
18f8 03f1 | | Declare_Variable Discrete,With_Value
18f9 BODY_18e8:
18f9 e5ff | | Load 0x2,-0x1
18fa 0f00 | | Execute_Immediate Equal,0x0
18fb 6803 |h | Jump_Zero 0x18ff
18fc 0092 1bed | | Action Push_String_Extended,0x1bed ; " => null"
18fe 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
18ff e5fb | | Load 0x2,-0x5
1900 0d01 | | Execute_Immediate Less,0x1
1901 6804 |h | Jump_Zero 0x1906
1902 e405 | | Load 0x2,0x5
1903 e2fd | | Load 0x1,0xfd
1904 01cc | | Execute Vector,Catenate
1905 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1906 00d8 | | Load_Top At_Offset_0
1907 828c | | Call 0x1,0x8c
1908 683d |h= | Jump_Zero 0x1946
1909 4800 |H | Short_Literal 0x0
190a 00d8 | | Load_Top At_Offset_0
190b e213 | | Load 0x1,0x13
190c 0260 | ` | Execute Discrete,In_Type
190d 7001 |p | Jump_Nonzero 0x190f
190e 0801 | | Execute_Immediate Raise,0x1
190f e5fe | | Load 0x2,-0x2
1910 e266 | f | Load 0x1,0x66
1911 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
1912 8265 | e | Call 0x1,0x65
1913 e404 | | Load 0x2,0x4
1914 017d | } | Execute Record,Structure_Write
1915 00d8 | | Load_Top At_Offset_0
1916 0f10 | | Execute_Immediate Equal,0x10
1917 6809 |h | Jump_Zero 0x1921
1918 e5fe | | Load 0x2,-0x2
1919 e5ff | | Load 0x2,-0x1
191a e295 | | Load 0x1,0x95
191b 1d96 | | Execute_Immediate Reference_Lex_1,0x96
191c 8294 | | Call 0x1,0x94
191d e404 | | Load 0x2,0x4
191e 8280 | | Call 0x1,0x80
191f a402 | | Store_Unchecked 0x2,0x2
1920 7807 |x | Jump 0x1928
1921 e5fe | | Load 0x2,-0x2
1922 e5ff | | Load 0x2,-0x1
1923 e298 | | Load 0x1,0x98
1924 1d99 | | Execute_Immediate Reference_Lex_1,0x99
1925 8294 | | Call 0x1,0x94
1926 8281 | | Call 0x1,0x81
1927 a402 | | Store_Unchecked 0x2,0x2
1928 e402 | | Load 0x2,0x2
1929 0f00 | | Execute_Immediate Equal,0x0
192a 6805 |h | Jump_Zero 0x1930
192b e405 | | Load 0x2,0x5
192c 0092 1bee | | Action Push_String_Extended,0x1bee ; "null"
192e 01cc | | Execute Vector,Catenate
192f 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1930 4801 |H | Short_Literal 0x1
1931 e5f8 | | Load 0x2,-0x8
1932 e5ff | | Load 0x2,-0x1
1933 8326 | & | Call 0x1,0x126
1934 e5f8 | | Load 0x2,-0x8
1935 e5f9 | | Load 0x2,-0x7
1936 e5fa | | Load 0x2,-0x6
1937 e5fb | | Load 0x2,-0x5
1938 0aff | | Execute_Immediate Plus,-0x1
1939 00d8 | | Load_Top At_Offset_0
193a 00e3 | | Load_Encached Natural_Cache
193b 0260 | ` | Execute Discrete,In_Type
193c 7001 |p | Jump_Nonzero 0x193e
193d 0801 | | Execute_Immediate Raise,0x1
193e e5fc | | Load 0x2,-0x4
193f e5fd | | Load 0x2,-0x3
1940 e404 | | Load 0x2,0x4
1941 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1942 e402 | | Load 0x2,0x2
1943 834f | O | Call 0x1,0x14f
1944 01cc | | Execute Vector,Catenate
1945 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
1946 00d8 | | Load_Top At_Offset_0
1947 82f9 | | Call 0x1,0xf9
1948 6815 |h | Jump_Zero 0x195e
1949 e5fe | | Load 0x2,-0x2
194a e5ff | | Load 0x2,-0x1
194b 82bc | | Call 0x1,0xbc
194c a403 | | Store_Unchecked 0x2,0x3
194d e405 | | Load 0x2,0x5
194e e5f9 | | Load 0x2,-0x7
194f e5fa | | Load 0x2,-0x6
1950 e5fb | | Load 0x2,-0x5
1951 0aff | | Execute_Immediate Plus,-0x1
1952 00d8 | | Load_Top At_Offset_0
1953 00e3 | | Load_Encached Natural_Cache
1954 0260 | ` | Execute Discrete,In_Type
1955 7001 |p | Jump_Nonzero 0x1957
1956 0801 | | Execute_Immediate Raise,0x1
1957 e5fc | | Load 0x2,-0x4
1958 e5fd | | Load 0x2,-0x3
1959 e5fe | | Load 0x2,-0x2
195a e403 | | Load 0x2,0x3
195b 8329 | ) | Call 0x1,0x129
195c 01cc | | Execute Vector,Catenate
195d 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
195e e405 | | Load 0x2,0x5
195f e5f9 | | Load 0x2,-0x7
1960 e5fa | | Load 0x2,-0x6
1961 e5fb | | Load 0x2,-0x5
1962 0aff | | Execute_Immediate Plus,-0x1
1963 00d8 | | Load_Top At_Offset_0
1964 00e3 | | Load_Encached Natural_Cache
1965 0260 | ` | Execute Discrete,In_Type
1966 7001 |p | Jump_Nonzero 0x1968
1967 0801 | | Execute_Immediate Raise,0x1
1968 e5fc | | Load 0x2,-0x4
1969 e5fd | | Load 0x2,-0x3
196a e5fe | | Load 0x2,-0x2
196b e5ff | | Load 0x2,-0x1
196c 834e | N | Call 0x1,0x14e
196d 01cc | | Execute Vector,Catenate
196e 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
196f 0000 | | .XXX[0x1]
1970 ; --------------------------------------------------------------------------------------
1970 ; SUBPROGRAM
1970 ; --------------------------------------------------------------------------------------
1970 1973 | s | .CONST 0x1973 ; Address of begin
1971 0004 | | .CONST 0x0004 ; Address of exception handler
1972 0001 | | .CONST 0x0001 ; Number of locals
1973 BODY_1970:
1973 INIT_1970:
1973 e5ff | | Load 0x2,-0x1
1974 01db | | Execute Vector,Length
1975 0c01 | | Execute_Immediate Greater_Equal,0x1
1976 680b |h | Jump_Zero 0x1982
1977 e5ff | | Load 0x2,-0x1
1978 01dd | | Execute Vector,First
1979 e5ff | | Load 0x2,-0x1
197a 01d7 | | Execute Vector,Field_Read
197b 0e27 | ' | Execute_Immediate Not_Equal,0x27
197c 6805 |h | Jump_Zero 0x1982
197d 0092 1bef | | Action Push_String_Extended,0x1bef ; "ASCII."
197f e5ff | | Load 0x2,-0x1
1980 01cc | | Execute Vector,Catenate
1981 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1982 e5ff | | Load 0x2,-0x1
1983 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1984 0000 0000 | | .BLANK 0000[0x4]
1988 ; --------------------------------------------------------------------------------------
1988 ; SUBPROGRAM
1988 ; --------------------------------------------------------------------------------------
1988 198c | | .CONST 0x198c ; Address of begin
1989 19ac | | .CONST 0x19ac ; Address of exception handler
198a 0002 | | .CONST 0x0002 ; Number of locals
198b INIT_1988:
198b 00e8 | | Load_Encached Character_Cache
198c BODY_1988:
198c e5ff | | Load 0x2,-0x1
198d 00d8 | | Load_Top At_Offset_0
198e 00e8 | | Load_Encached Character_Cache
198f 0260 | ` | Execute Discrete,In_Type
1990 7001 |p | Jump_Nonzero 0x1992
1991 0801 | | Execute_Immediate Raise,0x1
1992 a402 | | Store_Unchecked 0x2,0x2
1993 00d8 | | Load_Top At_Offset_0
1994 0b2c | , | Execute_Immediate Case_Compare,0x2c
1995 700d |p | Jump_Nonzero 0x19a3
1996 0f29 | ) | Execute_Immediate Equal,0x29
1997 700c |p | Jump_Nonzero 0x19a4
1998 e5ff | | Load 0x2,-0x1
1999 00d8 | | Load_Top At_Offset_0
199a 00e8 | | Load_Encached Character_Cache
199b 0260 | ` | Execute Discrete,In_Type
199c 7001 |p | Jump_Nonzero 0x199e
199d 0801 | | Execute_Immediate Raise,0x1
199e 00e8 | | Load_Encached Character_Cache
199f 011c | | Execute Any,Convert_Unchecked
19a0 1c01 | | Execute_Immediate Run_Utility,0x1
19a1 8350 | P | Call 0x1,0x150
19a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
19a3 00d1 | | Pop_Control Pop_Count_1
19a4 00d8 | | Load_Top At_Offset_0
19a5 0092 1bf0 | | Action Push_String_Extended,0x1bf0 ; "'\x1b"
19a7 01cb | | Execute Vector,Append
19a8 0092 1bf1 | | Action Push_String_Extended,0x1bf1 ; "'"
19aa 01cc | | Execute Vector,Catenate
19ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
19ac TRAP_1988:
19ac 010e | | Execute Exception,Is_Constraint_Error
19ad 6802 |h | Jump_Zero 0x19b0
19ae e30a | | Load 0x1,0x10a
19af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
19b0 0100 | | Execute Exception,Raise
19b1 0000 0000 | | .BLANK 0000[0x7]
19b8 ; --------------------------------------------------------------------------------------
19b8 ; SUBPROGRAM
19b8 ; --------------------------------------------------------------------------------------
19b8 19c9 | | .CONST 0x19c9 ; Address of begin
19b9 0004 | | .CONST 0x0004 ; Address of exception handler
19ba 0005 | | .CONST 0x0005 ; Number of locals
19bb INIT_19b8:
19bb e5ff | | Load 0x2,-0x1
19bc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
19bd 00e5 | | Load_Encached Long_Integer_Cache
19be 03f1 | | Declare_Variable Discrete,With_Value
19bf e03c | < | Load 0x0,0x3c
19c0 0322 | " | Declare_Variable Record
19c1 e5ff | | Load 0x2,-0x1
19c2 82c7 | | Call 0x1,0xc7
19c3 e403 | | Load 0x2,0x3
19c4 017d | } | Execute Record,Structure_Write
19c5 e048 | H | Load 0x0,0x48
19c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
19c7 e010 | | Load 0x0,0x10
19c8 0322 | " | Declare_Variable Record
19c9 BODY_19b8:
19c9 e5fa | | Load 0x2,-0x6
19ca 82f9 | | Call 0x1,0xf9
19cb 6809 |h | Jump_Zero 0x19d5
19cc e5fb | | Load 0x2,-0x5
19cd e5fc | | Load 0x2,-0x4
19ce e5fd | | Load 0x2,-0x3
19cf e5fe | | Load 0x2,-0x2
19d0 4800 |H | Short_Literal 0x0
19d1 e403 | | Load 0x2,0x3
19d2 e402 | | Load 0x2,0x2
19d3 8329 | ) | Call 0x1,0x129
19d4 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
19d5 e5fa | | Load 0x2,-0x6
19d6 82fb | | Call 0x1,0xfb
19d7 6814 |h | Jump_Zero 0x19ec
19d8 e402 | | Load 0x2,0x2
19d9 e242 | B | Load 0x1,0x42
19da e243 | C | Load 0x1,0x43
19db 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
19dc 8002 | | Call 0x0,0x2
19dd e405 | | Load 0x2,0x5
19de 017d | } | Execute Record,Structure_Write
19df 4800 |H | Short_Literal 0x0
19e0 e405 | | Load 0x2,0x5
19e1 827f | | Call 0x1,0x7f
19e2 a404 | | Store_Unchecked 0x2,0x4
19e3 e5fb | | Load 0x2,-0x5
19e4 e5fc | | Load 0x2,-0x4
19e5 e5fd | | Load 0x2,-0x3
19e6 e5fe | | Load 0x2,-0x2
19e7 4800 |H | Short_Literal 0x0
19e8 e403 | | Load 0x2,0x3
19e9 e404 | | Load 0x2,0x4
19ea 834e | N | Call 0x1,0x14e
19eb 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
19ec 0831 | 1 | Execute_Immediate Raise,0x31
19ed 0000 0000 | | .XXX[0x3]
19ef 0000 | |
19f0 ; --------------------------------------------------------------------------------------
19f0 ; SUBPROGRAM
19f0 ; --------------------------------------------------------------------------------------
19f0 19f3 | | .CONST 0x19f3 ; Address of begin
19f1 1a25 | % | .CONST 0x1a25 ; Address of exception handler
19f2 0001 | | .CONST 0x0001 ; Number of locals
19f3 BODY_19f0:
19f3 INIT_19f0:
19f3 e2cc | | Load 0x1,0xcc
19f4 1dcd | | Execute_Immediate Reference_Lex_1,0xcd
19f5 82c8 | | Call 0x1,0xc8
19f6 a2e8 | | Store_Unchecked 0x1,0xe8
19f7 e2cf | | Load 0x1,0xcf
19f8 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0
19f9 82c9 | | Call 0x1,0xc9
19fa e2ea | | Load 0x1,0xea
19fb 017d | } | Execute Record,Structure_Write
19fc e2d2 | | Load 0x1,0xd2
19fd 1dd3 | | Execute_Immediate Reference_Lex_1,0xd3
19fe 82c9 | | Call 0x1,0xc9
19ff e2eb | | Load 0x1,0xeb
1a00 017d | } | Execute Record,Structure_Write
1a01 e2d5 | | Load 0x1,0xd5
1a02 1dd6 | | Execute_Immediate Reference_Lex_1,0xd6
1a03 82c9 | | Call 0x1,0xc9
1a04 e2ec | | Load 0x1,0xec
1a05 017d | } | Execute Record,Structure_Write
1a06 e2d8 | | Load 0x1,0xd8
1a07 1dd9 | | Execute_Immediate Reference_Lex_1,0xd9
1a08 82c9 | | Call 0x1,0xc9
1a09 e2ed | | Load 0x1,0xed
1a0a 017d | } | Execute Record,Structure_Write
1a0b e2db | | Load 0x1,0xdb
1a0c 1ddc | | Execute_Immediate Reference_Lex_1,0xdc
1a0d 82c9 | | Call 0x1,0xc9
1a0e e2ee | | Load 0x1,0xee
1a0f 017d | } | Execute Record,Structure_Write
1a10 e2de | | Load 0x1,0xde
1a11 1ddf | | Execute_Immediate Reference_Lex_1,0xdf
1a12 82c9 | | Call 0x1,0xc9
1a13 e2ef | | Load 0x1,0xef
1a14 017d | } | Execute Record,Structure_Write
1a15 e2e1 | | Load 0x1,0xe1
1a16 1de2 | | Execute_Immediate Reference_Lex_1,0xe2
1a17 82c9 | | Call 0x1,0xc9
1a18 e2f0 | | Load 0x1,0xf0
1a19 017d | } | Execute Record,Structure_Write
1a1a e2e4 | | Load 0x1,0xe4
1a1b 1de5 | | Execute_Immediate Reference_Lex_1,0xe5
1a1c 82c9 | | Call 0x1,0xc9
1a1d e2f1 | | Load 0x1,0xf1
1a1e 017d | } | Execute Record,Structure_Write
1a1f 82ca | | Call 0x1,0xca
1a20 e2f2 | | Load 0x1,0xf2
1a21 017d | } | Execute Record,Structure_Write
1a22 4801 |H | Short_Literal 0x1
1a23 a2e7 | | Store_Unchecked 0x1,0xe7
1a24 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a25 TRAP_19f0:
1a25 0007 | | Action Break_Optional
1a26 4800 |H | Short_Literal 0x0
1a27 a2e7 | | Store_Unchecked 0x1,0xe7
1a28 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a29 0000 0000 | | .BLANK 0000[0x7]
1a30 ; --------------------------------------------------------------------------------------
1a30 ; SUBPROGRAM
1a30 ; --------------------------------------------------------------------------------------
1a30 1a33 | 3 | .CONST 0x1a33 ; Address of begin
1a31 1a3a | : | .CONST 0x1a3a ; Address of exception handler
1a32 0001 | | .CONST 0x0001 ; Number of locals
1a33 BODY_1a30:
1a33 INIT_1a30:
1a33 4802 |H | Short_Literal 0x2
1a34 e404 | | Load 0x2,0x4
1a35 e25d | ] | Load 0x1,0x5d
1a36 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e
1a37 8024 | $ | Call 0x0,0x24
1a38 00cb | | Action Pop_Block_With_Result
1a39 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a3a TRAP_1a30:
1a3a 4884 |H | Short_Literal 0x84
1a3b 010f | | Execute Exception,Equal
1a3c 6801 |h | Jump_Zero 0x1a3e
1a3d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a3e 00d8 | | Load_Top At_Offset_0
1a3f 0101 | | Execute Exception,Reraise
1a40 ; --------------------------------------------------------------------------------------
1a40 ; SUBPROGRAM
1a40 ; --------------------------------------------------------------------------------------
1a40 1a43 | C | .CONST 0x1a43 ; Address of begin
1a41 1a5c | \ | .CONST 0x1a5c ; Address of exception handler
1a42 0001 | | .CONST 0x0001 ; Number of locals
1a43 BODY_1a40:
1a43 INIT_1a40:
1a43 4804 |H | Short_Literal 0x4
1a44 e5fd | | Load 0x2,-0x3
1a45 e40d | | Load 0x2,0xd
1a46 480e |H | Short_Literal 0xe
1a47 4802 |H | Short_Literal 0x2
1a48 0099 | | Action Reference_Dynamic
1a49 8024 | $ | Call 0x0,0x24
1a4a e40a | | Load 0x2,0xa
1a4b e40b | | Load 0x2,0xb
1a4c 0272 | r | Execute Discrete,Minus
1a4d 0a01 | | Execute_Immediate Plus,0x1
1a4e e40a | | Load 0x2,0xa
1a4f e409 | | Load 0x2,0x9
1a50 01ce | | Execute Vector,Slice_Write
1a51 e409 | | Load 0x2,0x9
1a52 e404 | | Load 0x2,0x4
1a53 e405 | | Load 0x2,0x5
1a54 4806 |H | Short_Literal 0x6
1a55 4802 |H | Short_Literal 0x2
1a56 0099 | | Action Reference_Dynamic
1a57 8002 | | Call 0x0,0x2
1a58 e5fe | | Load 0x2,-0x2
1a59 011d | | Execute Any,Convert_To_Formal
1a5a 00cb | | Action Pop_Block_With_Result
1a5b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
1a5c TRAP_1a40:
1a5c 4884 |H | Short_Literal 0x84
1a5d 010f | | Execute Exception,Equal
1a5e 6801 |h | Jump_Zero 0x1a60
1a5f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a60 00d8 | | Load_Top At_Offset_0
1a61 0101 | | Execute Exception,Reraise
1a62 0000 0000 | | .BLANK 0000[0x6]
1a68 ; --------------------------------------------------------------------------------------
1a68 ; SUBPROGRAM
1a68 ; --------------------------------------------------------------------------------------
1a68 1a6b | k | .CONST 0x1a6b ; Address of begin
1a69 1a7b | { | .CONST 0x1a7b ; Address of exception handler
1a6a 0001 | | .CONST 0x0001 ; Number of locals
1a6b BODY_1a68:
1a6b INIT_1a68:
1a6b 4804 |H | Short_Literal 0x4
1a6c e5ff | | Load 0x2,-0x1
1a6d e402 | | Load 0x2,0x2
1a6e 4803 |H | Short_Literal 0x3
1a6f 4802 |H | Short_Literal 0x2
1a70 0099 | | Action Reference_Dynamic
1a71 8024 | $ | Call 0x0,0x24
1a72 e405 | | Load 0x2,0x5
1a73 01d4 | | Execute Vector,Structure_Write
1a74 e405 | | Load 0x2,0x5
1a75 e29d | | Load 0x1,0x9d
1a76 e29e | | Load 0x1,0x9e
1a77 1d9f | | Execute_Immediate Reference_Lex_1,0x9f
1a78 8002 | | Call 0x0,0x2
1a79 00cb | | Action Pop_Block_With_Result
1a7a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1a7b TRAP_1a68:
1a7b 4884 |H | Short_Literal 0x84
1a7c 010f | | Execute Exception,Equal
1a7d 6801 |h | Jump_Zero 0x1a7f
1a7e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a7f 00d8 | | Load_Top At_Offset_0
1a80 0101 | | Execute Exception,Reraise
1a81 0000 0000 | | .BLANK 0000[0x7]
1a88 ; --------------------------------------------------------------------------------------
1a88 ; SUBPROGRAM
1a88 ; --------------------------------------------------------------------------------------
1a88 1a8b | | .CONST 0x1a8b ; Address of begin
1a89 1a9b | | .CONST 0x1a9b ; Address of exception handler
1a8a 0001 | | .CONST 0x0001 ; Number of locals
1a8b BODY_1a88:
1a8b INIT_1a88:
1a8b 4804 |H | Short_Literal 0x4
1a8c e5ff | | Load 0x2,-0x1
1a8d e402 | | Load 0x2,0x2
1a8e 4803 |H | Short_Literal 0x3
1a8f 4802 |H | Short_Literal 0x2
1a90 0099 | | Action Reference_Dynamic
1a91 8024 | $ | Call 0x0,0x24
1a92 e405 | | Load 0x2,0x5
1a93 01d4 | | Execute Vector,Structure_Write
1a94 e405 | | Load 0x2,0x5
1a95 e2a7 | | Load 0x1,0xa7
1a96 e2a8 | | Load 0x1,0xa8
1a97 1da9 | | Execute_Immediate Reference_Lex_1,0xa9
1a98 8002 | | Call 0x0,0x2
1a99 00cb | | Action Pop_Block_With_Result
1a9a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1a9b TRAP_1a88:
1a9b 4884 |H | Short_Literal 0x84
1a9c 010f | | Execute Exception,Equal
1a9d 6801 |h | Jump_Zero 0x1a9f
1a9e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a9f 00d8 | | Load_Top At_Offset_0
1aa0 0101 | | Execute Exception,Reraise
1aa1 0000 0000 | | .BLANK 0000[0x7]
1aa8 ; --------------------------------------------------------------------------------------
1aa8 ; SUBPROGRAM
1aa8 ; --------------------------------------------------------------------------------------
1aa8 1aab | | .CONST 0x1aab ; Address of begin
1aa9 1ab6 | | .CONST 0x1ab6 ; Address of exception handler
1aaa 0001 | | .CONST 0x0001 ; Number of locals
1aab BODY_1aa8:
1aab INIT_1aa8:
1aab 4804 |H | Short_Literal 0x4
1aac e5ff | | Load 0x2,-0x1
1aad e403 | | Load 0x2,0x3
1aae 4804 |H | Short_Literal 0x4
1aaf 4802 |H | Short_Literal 0x2
1ab0 0099 | | Action Reference_Dynamic
1ab1 8024 | $ | Call 0x0,0x24
1ab2 e2af | | Load 0x1,0xaf
1ab3 01c6 | | Execute Vector,Convert_To_Formal
1ab4 00cb | | Action Pop_Block_With_Result
1ab5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1ab6 TRAP_1aa8:
1ab6 4884 |H | Short_Literal 0x84
1ab7 010f | | Execute Exception,Equal
1ab8 6801 |h | Jump_Zero 0x1aba
1ab9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1aba 00d8 | | Load_Top At_Offset_0
1abb 0101 | | Execute Exception,Reraise
1abc 0000 0000 | | .BLANK 0000[0x4]
1ac0 ; --------------------------------------------------------------------------------------
1ac0 ; SUBPROGRAM
1ac0 ; --------------------------------------------------------------------------------------
1ac0 1ac3 | | .CONST 0x1ac3 ; Address of begin
1ac1 1ace | | .CONST 0x1ace ; Address of exception handler
1ac2 0001 | | .CONST 0x0001 ; Number of locals
1ac3 BODY_1ac0:
1ac3 INIT_1ac0:
1ac3 4804 |H | Short_Literal 0x4
1ac4 e5ff | | Load 0x2,-0x1
1ac5 e403 | | Load 0x2,0x3
1ac6 4804 |H | Short_Literal 0x4
1ac7 4802 |H | Short_Literal 0x2
1ac8 0099 | | Action Reference_Dynamic
1ac9 8024 | $ | Call 0x0,0x24
1aca e214 | | Load 0x1,0x14
1acb 01c6 | | Execute Vector,Convert_To_Formal
1acc 00cb | | Action Pop_Block_With_Result
1acd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1ace TRAP_1ac0:
1ace 4884 |H | Short_Literal 0x84
1acf 010f | | Execute Exception,Equal
1ad0 6801 |h | Jump_Zero 0x1ad2
1ad1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1ad2 00d8 | | Load_Top At_Offset_0
1ad3 0101 | | Execute Exception,Reraise
1ad4 0000 0000 | | .BLANK 0000[0x4]
1ad8 ; --------------------------------------------------------------------------------------
1ad8 ; SUBPROGRAM
1ad8 ; --------------------------------------------------------------------------------------
1ad8 1adb | | .CONST 0x1adb ; Address of begin
1ad9 1ae5 | | .CONST 0x1ae5 ; Address of exception handler
1ada 0001 | | .CONST 0x0001 ; Number of locals
1adb BODY_1ad8:
1adb INIT_1ad8:
1adb e405 | | Load 0x2,0x5
1adc 82b0 | | Call 0x1,0xb0
1add e406 | | Load 0x2,0x6
1ade 00d8 | | Load_Top At_Offset_0
1adf 6014 |` | Indirect_Literal Discrete,0x1af4,{0x00000000, 0x00002000}
1ae0 0273 | s | Execute Discrete,Plus
1ae1 0aff | | Execute_Immediate Plus,-0x1
1ae2 e402 | | Load 0x2,0x2
1ae3 01ce | | Execute Vector,Slice_Write
1ae4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1ae5 TRAP_1ad8:
1ae5 4884 |H | Short_Literal 0x84
1ae6 010f | | Execute Exception,Equal
1ae7 6809 |h | Jump_Zero 0x1af1
1ae8 4800 |H | Short_Literal 0x0
1ae9 e406 | | Load 0x2,0x6
1aea 0aff | | Execute_Immediate Plus,-0x1
1aeb e402 | | Load 0x2,0x2
1aec 01cf | | Execute Vector,Slice_Read
1aed e214 | | Load 0x1,0x14
1aee 01c6 | | Execute Vector,Convert_To_Formal
1aef 00cb | | Action Pop_Block_With_Result
1af0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1af1 0100 | | Execute Exception,Raise
1af2 0000 0000 | | .XXX[0x2]
1af4 0000 0000 | | .LITERAL {0x00000000, 0x00002000}
1af8 ; --------------------------------------------------------------------------------------
1af8 ; SUBPROGRAM
1af8 ; --------------------------------------------------------------------------------------
1af8 1afb | | .CONST 0x1afb ; Address of begin
1af9 1b04 | | .CONST 0x1b04 ; Address of exception handler
1afa 0001 | | .CONST 0x0001 ; Number of locals
1afb BODY_1af8:
1afb INIT_1af8:
1afb e404 | | Load 0x2,0x4
1afc e405 | | Load 0x2,0x5
1afd 82b1 | | Call 0x1,0xb1
1afe e406 | | Load 0x2,0x6
1aff e402 | | Load 0x2,0x2
1b00 01dc | | Execute Vector,Last
1b01 e402 | | Load 0x2,0x2
1b02 01ce | | Execute Vector,Slice_Write
1b03 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1b04 TRAP_1af8:
1b04 4884 |H | Short_Literal 0x84
1b05 010f | | Execute Exception,Equal
1b06 6809 |h | Jump_Zero 0x1b10
1b07 4800 |H | Short_Literal 0x0
1b08 e406 | | Load 0x2,0x6
1b09 0aff | | Execute_Immediate Plus,-0x1
1b0a e402 | | Load 0x2,0x2
1b0b 01cf | | Execute Vector,Slice_Read
1b0c e214 | | Load 0x1,0x14
1b0d 01c6 | | Execute Vector,Convert_To_Formal
1b0e 00cb | | Action Pop_Block_With_Result
1b0f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1b10 0100 | | Execute Exception,Raise
1b11 0000 0000 | | .BLANK 0000[0x7]
1b18 ; --------------------------------------------------------------------------------------
1b18 ; SUBPROGRAM
1b18 ; --------------------------------------------------------------------------------------
1b18 1b1b | | .CONST 0x1b1b ; Address of begin
1b19 1b2b | + | .CONST 0x1b2b ; Address of exception handler
1b1a 0001 | | .CONST 0x0001 ; Number of locals
1b1b BODY_1b18:
1b1b INIT_1b18:
1b1b 4804 |H | Short_Literal 0x4
1b1c e5ff | | Load 0x2,-0x1
1b1d e402 | | Load 0x2,0x2
1b1e 4803 |H | Short_Literal 0x3
1b1f 4802 |H | Short_Literal 0x2
1b20 0099 | | Action Reference_Dynamic
1b21 8024 | $ | Call 0x0,0x24
1b22 e405 | | Load 0x2,0x5
1b23 01d4 | | Execute Vector,Structure_Write
1b24 e405 | | Load 0x2,0x5
1b25 e2b5 | | Load 0x1,0xb5
1b26 e2b6 | | Load 0x1,0xb6
1b27 1db7 | | Execute_Immediate Reference_Lex_1,0xb7
1b28 8002 | | Call 0x0,0x2
1b29 00cb | | Action Pop_Block_With_Result
1b2a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b2b TRAP_1b18:
1b2b 4884 |H | Short_Literal 0x84
1b2c 010f | | Execute Exception,Equal
1b2d 6801 |h | Jump_Zero 0x1b2f
1b2e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1b2f 00d8 | | Load_Top At_Offset_0
1b30 0101 | | Execute Exception,Reraise
1b31 0000 0000 | | .BLANK 0000[0x7]
1b38 ; --------------------------------------------------------------------------------------
1b38 ; SUBPROGRAM
1b38 ; --------------------------------------------------------------------------------------
1b38 1b3b | ; | .CONST 0x1b3b ; Address of begin
1b39 1b50 | P | .CONST 0x1b50 ; Address of exception handler
1b3a 0001 | | .CONST 0x0001 ; Number of locals
1b3b BODY_1b38:
1b3b INIT_1b38:
1b3b 4804 |H | Short_Literal 0x4
1b3c e5ff | | Load 0x2,-0x1
1b3d e405 | | Load 0x2,0x5
1b3e 4806 |H | Short_Literal 0x6
1b3f 4802 |H | Short_Literal 0x2
1b40 0099 | | Action Reference_Dynamic
1b41 8024 | $ | Call 0x0,0x24
1b42 4840 |H@ | Short_Literal 0x40
1b43 e403 | | Load 0x2,0x3
1b44 0272 | r | Execute Discrete,Minus
1b45 0a01 | | Execute_Immediate Plus,0x1
1b46 4840 |H@ | Short_Literal 0x40
1b47 e402 | | Load 0x2,0x2
1b48 01ce | | Execute Vector,Slice_Write
1b49 e402 | | Load 0x2,0x2
1b4a e26d | m | Load 0x1,0x6d
1b4b e26e | n | Load 0x1,0x6e
1b4c 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f
1b4d 8002 | | Call 0x0,0x2
1b4e 00cb | | Action Pop_Block_With_Result
1b4f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1b50 TRAP_1b38:
1b50 4884 |H | Short_Literal 0x84
1b51 010f | | Execute Exception,Equal
1b52 6801 |h | Jump_Zero 0x1b54
1b53 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1b54 00d8 | | Load_Top At_Offset_0
1b55 0101 | | Execute Exception,Reraise
1b56 0000 0000 | | .XXX[0x2]
1b58 ; --------------------------------------------------------------------------------------
1b58 ; SUBPROGRAM
1b58 ; --------------------------------------------------------------------------------------
1b58 1b5b | [ | .CONST 0x1b5b ; Address of begin
1b59 1b64 | d | .CONST 0x1b64 ; Address of exception handler
1b5a 0001 | | .CONST 0x0001 ; Number of locals
1b5b BODY_1b58:
1b5b INIT_1b58:
1b5b e405 | | Load 0x2,0x5
1b5c 480a |H | Short_Literal 0xa
1b5d e7ff | | Load 0x3,-0x1
1b5e 01cb | | Execute Vector,Append
1b5f e402 | | Load 0x2,0x2
1b60 01cc | | Execute Vector,Catenate
1b61 e058 | X | Load 0x0,0x58
1b62 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1b63 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1b64 TRAP_1b58:
1b64 010e | | Execute Exception,Is_Constraint_Error
1b65 6801 |h | Jump_Zero 0x1b67
1b66 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1b67 0100 | | Execute Exception,Raise
1b68 ; --------------------------------------------------------------------------------------
1b68 ; SUBPROGRAM
1b68 ; --------------------------------------------------------------------------------------
1b68 1b6b | k | .CONST 0x1b6b ; Address of begin
1b69 1b76 | v | .CONST 0x1b76 ; Address of exception handler
1b6a 0001 | | .CONST 0x0001 ; Number of locals
1b6b BODY_1b68:
1b6b INIT_1b68:
1b6b e5ff | | Load 0x2,-0x1
1b6c 00d8 | | Load_Top At_Offset_0
1b6d 00e1 | | Load_Encached Boolean_Cache
1b6e 0260 | ` | Execute Discrete,In_Type
1b6f 7001 |p | Jump_Nonzero 0x1b71
1b70 0801 | | Execute_Immediate Raise,0x1
1b71 00e1 | | Load_Encached Boolean_Cache
1b72 011c | | Execute Any,Convert_Unchecked
1b73 1c01 | | Execute_Immediate Run_Utility,0x1
1b74 00cb | | Action Pop_Block_With_Result
1b75 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1b76 TRAP_1b68:
1b76 010e | | Execute Exception,Is_Constraint_Error
1b77 6803 |h | Jump_Zero 0x1b7b
1b78 e309 | | Load 0x1,0x109
1b79 00cb | | Action Pop_Block_With_Result
1b7a 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1b7b 0100 | | Execute Exception,Raise
1b7c 0000 0000 | | .BLANK 0000[0x4]
1b80 ; --------------------------------------------------------------------------------------
1b80 ; SUBPROGRAM
1b80 ; --------------------------------------------------------------------------------------
1b80 1b90 | | .CONST 0x1b90 ; Address of begin
1b81 0004 | | .CONST 0x0004 ; Address of exception handler
1b82 000f | | .CONST 0x000f ; Number of locals
1b83 INIT_1b80:
1b83 029a 1b9b | | Declare_Subprogram INIT_1b98,For_Outer_Call,Visible,Unelaborated
1b85 029a 1bab | | Declare_Subprogram INIT_1ba8,For_Outer_Call,Visible,Unelaborated
1b87 029a 1bb3 | | Declare_Subprogram INIT_1bb0,For_Outer_Call,Visible,Unelaborated
1b89 00bf | | Action Accept_Activation
1b8a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
1b8b 00c7 | | Action Elaborate_Subprogram
1b8c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
1b8d 00c7 | | Action Elaborate_Subprogram
1b8e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
1b8f 00c7 | | Action Elaborate_Subprogram
1b90 BODY_1b80:
1b90 00bc | | Action Signal_Activated
1b91 00bb | | Action Signal_Completion
1b92 0000 0000 | | .BLANK 0000[0x6]
1b98 ; --------------------------------------------------------------------------------------
1b98 ; SUBPROGRAM
1b98 ; --------------------------------------------------------------------------------------
1b98 1b9b | | .CONST 0x1b9b ; Address of begin
1b99 0004 | | .CONST 0x0004 ; Address of exception handler
1b9a 0001 | | .CONST 0x0001 ; Number of locals
1b9b BODY_1b98:
1b9b INIT_1b98:
1b9b 00db | | Load_Top At_Offset_3
1b9c 00db | | Load_Top At_Offset_3
1b9d 4820 |H | Short_Literal 0x20
1b9e 0251 | Q | Execute Discrete,Logical_Shift
1b9f 0278 | x | Execute Discrete,Or
1ba0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1ba1 0831 | 1 | .XXX[0x1]
1ba2 0000 0000 | | .BLANK 0000[0x6]
1ba8 ; --------------------------------------------------------------------------------------
1ba8 ; SUBPROGRAM
1ba8 ; --------------------------------------------------------------------------------------
1ba8 1bab | | .CONST 0x1bab ; Address of begin
1ba9 0004 | | .CONST 0x0004 ; Address of exception handler
1baa 0001 | | .CONST 0x0001 ; Number of locals
1bab BODY_1ba8:
1bab INIT_1ba8:
1bab 00da | | Load_Top At_Offset_2
1bac 4fe0 |O | Short_Literal -0x20
1bad 0251 | Q | Execute Discrete,Logical_Shift
1bae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1baf 0831 | 1 | .XXX[0x1]
1bb0 ; --------------------------------------------------------------------------------------
1bb0 ; SUBPROGRAM
1bb0 ; --------------------------------------------------------------------------------------
1bb0 1bb3 | | .CONST 0x1bb3 ; Address of begin
1bb1 0004 | | .CONST 0x0004 ; Address of exception handler
1bb2 0001 | | .CONST 0x0001 ; Number of locals
1bb3 BODY_1bb0:
1bb3 INIT_1bb0:
1bb3 00da | | Load_Top At_Offset_2
1bb4 4820 |H | Short_Literal 0x20
1bb5 0251 | Q | Execute Discrete,Logical_Shift
1bb6 4fe0 |O | Short_Literal -0x20
1bb7 0251 | Q | Execute Discrete,Logical_Shift
1bb8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1bb9 0831 | 1 | .XXX[0x1]
1bba ; --------------------------------------------------------------------------------------
1bba ; STRING TABLE
1bba ; --------------------------------------------------------------------------------------
1bba 0072 | r | .STRTAB 0x0072->0x1bf3 ; "INTEGER_TYPE"
1bbb 007c | | | .STRTAB 0x007c->0x1bf9 ; "LONG_INTEGER_TYPE"
1bbc 008b | | .STRTAB 0x008b->0x1c01 ; "NATURAL_TYPE"
1bbd 0095 | | .STRTAB 0x0095->0x1c07 ; "POSITIVE_TYPE"
1bbe 00a0 | | .STRTAB 0x00a0->0x1c0e ; "CHARACTER_TYPE"
1bbf 00ac | | .STRTAB 0x00ac->0x1c15 ; "BOOLEAN_TYPE"
1bc0 00b6 | | .STRTAB 0x00b6->0x1c1b ; "FLOAT_TYPE"
1bc1 00be | | .STRTAB 0x00be->0x1c20 ; "DURATION_TYPE"
1bc2 00c9 | | .STRTAB 0x00c9->0x1c26 ; "STRING_TYPE"
1bc3 00d2 | | .STRTAB 0x00d2->0x1c2c ; "OTHER_TYPE"
1bc4 00da | | .STRTAB 0x00da->0x1c31 ; " => "
1bc5 00dc | | .STRTAB 0x00dc->0x1c33 ; "..."
1bc6 00dd | | .STRTAB 0x00dd->0x1c34 ; " => ..., "
1bc7 00e4 | | .STRTAB 0x00e4->0x1c39 ; "... => ..., "
1bc8 00ee | | .STRTAB 0x00ee->0x1c3f ; "Value\x00not\x00readable"
1bc9 00fe | | .STRTAB 0x00fe->0x1c48 ; "Field\x00not\x00initialized"
1bca 0111 | | .STRTAB 0x0111->0x1c52 ; "Element\x00not\x00initialized"
1bcb 0126 | & | .STRTAB 0x0126->0x1c5e ; "Null\x00string"
1bcc 012f | / | .STRTAB 0x012f->0x1c63 ; "Null\x00vector"
1bcd 0138 | 8 | .STRTAB 0x0138->0x1c69 ; "Field\x00value\x00not\x00readable"
1bce 014e | N | .STRTAB 0x014e->0x1c75 ; "Exception\x00raised\x00reading\x00field\x00value"
1bcf 0170 | p | .STRTAB 0x0170->0x1c87 ; "Element\x00value\x00not\x00readable"
1bd0 0188 | | .STRTAB 0x0188->0x1c94 ; "Exception\x00raised\x00readingelement\x00value"
1bd1 01ab | | .STRTAB 0x01ab->0x1ca6 ; "Uninitialized\x00boolean\x00value"
1bd2 01c4 | | .STRTAB 0x01c4->0x1cb4 ; "Uninitialized\x00character\x00value"
1bd3 01df | | .STRTAB 0x01df->0x1cc2 ; "Object\x00too\x00big"
1bd4 01eb | | .STRTAB 0x01eb->0x1cc9 ; "Multi-dimensional\x00array"
1bd5 0200 | | .STRTAB 0x0200->0x1cd5 ; "Inner_"
1bd6 0204 | | .STRTAB 0x0204->0x1cd8 ; " = "
1bd7 0205 | | .STRTAB 0x0205->0x1cd9 ; "Value not readable"
1bd8 0215 | | .STRTAB 0x0215->0x1ce2 ; "Exception raised: "
1bd9 0225 | % | .STRTAB 0x0225->0x1ceb ; ".."
1bda 0225 | % | .STRTAB 0x0225->0x1cec ; ", )"
1bdb 0226 | & | .STRTAB 0x0226->0x1cee ; ")"
1bdc 0225 | % | .STRTAB 0x0225->0x1cee ; ": "
1bdd 0225 | % | .STRTAB 0x0225->0x1cef ; "#"
1bde 0224 | $ | .STRTAB 0x0224->0x1cf0 ; "->"
1bdf 0224 | $ | .STRTAB 0x0224->0x1cf1 ; "("
1be0 0223 | # | .STRTAB 0x0223->0x1cf1 ; "()"
1be1 0223 | # | .STRTAB 0x0223->0x1cf2 ; " => Field\x00not\x00initialized"
1be2 023a | : | .STRTAB 0x023a->0x1cff ; " => Field\x00value\x00not\x00readable"
1be3 0254 | T | .STRTAB 0x0254->0x1d0d ; " => Exception\x00raised\x00reading\x00field\x00value: "
1be4 027c | | | .STRTAB 0x027c->0x1d22 ; "F"
1be5 027b | { | .STRTAB 0x027b->0x1d22 ; ", "
1be6 027b | { | .STRTAB 0x027b->0x1d23 ; "Anon_Inner_Rec => ("
1be7 028c | | .STRTAB 0x028c->0x1d2d ; ", ... => ..., "
1be8 0298 | | .STRTAB 0x0298->0x1d34 ; " => Element\x00not\x00initialized"
1be9 02b1 | | .STRTAB 0x02b1->0x1d41 ; " => Element\x00value\x00not\x00readable"
1bea 02cd | | .STRTAB 0x02cd->0x1d50 ; " => Exception\x00raised\x00readingelement\x00value: "
1beb 02f6 | | .STRTAB 0x02f6->0x1d66 ; "\x22\x22"
1bec 02f6 | | .STRTAB 0x02f6->0x1d67 ; "\x22...\x22"
1bed 02f9 | | .STRTAB 0x02f9->0x1d69 ; " => null"
1bee 02ff | | .STRTAB 0x02ff->0x1d6d ; "null"
1bef 0301 | | .STRTAB 0x0301->0x1d6f ; "ASCII."
1bf0 0305 | | .STRTAB 0x0305->0x1d72 ; "'\x1b"
1bf1 0305 | | .STRTAB 0x0305->0x1d73 ; "'"
1bf2 0304 | | .STREND 0x0304->0x1d74
1bf3 494e 5445 |INTE| .STRTAB_STRINGS
1d74 0000 0000 | | .BLANK 0000[0x4]
1d78 ; --------------------------------------------------------------------------------------
1d78 ; Debug Table
1d78 ; --------------------------------------------------------------------------------------
1d78 0004 0010 | | .DEBUG4 0x0004,0x0010,0x09c5,0x0000,0x0001,0x0000
1d7e e8be 88ca | | .XXX[0x82]
1d80 cce6 5c9c | \ |
1d82 ead8 d8be | |
1d84 9cca e8ee | |
1d86 dee4 d6be | |
1d88 9cc2 daca | |
1d8a 0000 0020 | |
1d8c 0000 004e | N|
1d8e dcca e8ee | |
1d90 dee4 d6d2 | |
1d92 dcce 5ce8 | \ |
1d94 e4c2 dce6 | |
1d96 e0de e4e8 | |
1d98 5cdc ead8 |\ |
1d9a d8be c6de | |
1d9c dcdc cac6 | |
1d9e e8d2 dedc | |
1da0 bed2 c800 | |
1da2 0000 0400 | |
1da4 0000 2400 | $ |
1da6 0000 b885 | |
1da8 51bd bdb1 |Q |
1daa ccb9 3995 | 9 |
1dac d1dd bdc9 | |
1dae ada5 b99c | |
1db0 b951 c985 | Q |
1db2 b9cd c1bd | |
1db4 c9d0 b939 | 9|
1db6 d5b1 b17d | }|
1db8 0dbd b9b9 | |
1dba 958d d1a5 | |
1dbc bdb9 7d25 | }%|
1dbe 9000 0000 | |
1dc0 4000 0000 |@ |
1dc2 89b9 95d1 | |
1dc4 ddbd c9ad | |
1dc6 a5b9 9cb9 | |
1dc8 d1c9 85b9 | |
1dca cdc1 bdc9 | |
1dcc d17d cd95 | } |
1dce c9d9 95c8 | |
1dd0 b98d c995 | |
1dd2 85d1 9400 | |
1dd4 0000 0800 | |
1dd6 0000 4800 | H |
1dd8 0001 490a | I |
1dda a37b 7b63 | {{c|
1ddc 9972 732b | rs+|
1dde a3bb 7b93 | { |
1de0 5b4b 7339 |[Ks9|
1de2 72a3 930b |r |
1de4 739b 837b |s {|
1de6 93a2 fa9b | |
1de8 2b93 b32b |+ +|
1dea 9172 1b93 | r |
1dec 2b0b a328 |+ (|
1dee 0000 0080 | |
1df0 0000 00f3 | |
1df2 732b a3bb |s+ |
1df4 7b93 5b4b |{ [K|
1df6 7339 73a3 |s9s |
1df8 930b 739b | s |
1dfa 837b 93a2 | { |
1dfc fb73 0b6b | s k|
1dfe 2973 732b |)ss+|