|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5120 (0x1400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 08a8 | | .CONST 0x08a8 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 008a | | .CONST 0x008a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002b | + | .CONST 0x002b ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000e 0129 | ) | Execute Any,Make_Visible
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d e001 | | Load 0x0,0x1
001e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001f e20d | | Load 0x1,0xd
0020 00e2 | | Load_Encached Integer_Cache
0021 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call
0023 4803 |H | Short_Literal 0x3
0024 032e | . | Declare_Type Record,Defined,Visible
0025 c215 | | Store 0x1,0x15
0026 00e2 | | Load_Encached Integer_Cache
0027 0266 | f | Execute Discrete,Bounds
0028 e215 | | Load 0x1,0x15
0029 029f 0093 | | Declare_Subprogram INIT_0090,For_Call
002b 4801 |H | Short_Literal 0x1
002c 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
002d c20f | | Store 0x1,0xf
002e 00e2 | | Load_Encached Integer_Cache
002f 4801 |H | Short_Literal 0x1
0030 6073 |`s | Indirect_Literal Discrete,0xa4,{0x00000000, 0x7fffffff}
0031 e20f | | Load 0x1,0xf
0032 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
0033 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call
0035 4800 |H | Short_Literal 0x0
0036 4801 |H | Short_Literal 0x1
0037 4800 |H | Short_Literal 0x0
0038 4800 |H | Short_Literal 0x0
0039 4801 |H | Short_Literal 0x1
003a 4801 |H | Short_Literal 0x1
003b 031e | | Declare_Type Variant_Record,Defined,Visible
003c c210 | | Store 0x1,0x10
003d e001 | | Load 0x0,0x1
003e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
003f e001 | | Load 0x0,0x1
0040 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0041 029f 0813 | | Declare_Subprogram INIT_0810,For_Call
0043 4802 |H | Short_Literal 0x2
0044 032e | . | Declare_Type Record,Defined,Visible
0045 c211 | | Store 0x1,0x11
0046 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
0048 c216 | | Store 0x1,0x16
0049 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
004b c213 | | Store 0x1,0x13
004c 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
004e c217 | | Store 0x1,0x17
004f 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
0051 c218 | | Store 0x1,0x18
0052 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0054 c219 | | Store 0x1,0x19
0055 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0057 c21a | | Store 0x1,0x1a
0058 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
005a c21b | | Store 0x1,0x1b
005b 00bf | | Action Accept_Activation
005c 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call
005e 029d 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call
0060 029d 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call
0062 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call
0064 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call
0066 029d 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call
0068 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
006a 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call
006c 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call
006e 029d 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call
0070 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call
0072 029d 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call
0074 029d 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call
0076 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
0078 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call
007a 029d 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call
007c 1d16 | | Execute_Immediate Reference_Lex_1,0x16
007d 00c7 | | Action Elaborate_Subprogram
007e 1d13 | | Execute_Immediate Reference_Lex_1,0x13
007f 00c7 | | Action Elaborate_Subprogram
0080 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0081 00c7 | | Action Elaborate_Subprogram
0082 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0083 00c7 | | Action Elaborate_Subprogram
0084 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0085 00c7 | | Action Elaborate_Subprogram
0086 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0087 00c7 | | Action Elaborate_Subprogram
0088 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0089 00c7 | | Action Elaborate_Subprogram
008a BODY_0008:
008a 00bc | | Action Signal_Activated
008b 00bb | | Action Signal_Completion
008c 0000 0000 | | .BLANK 0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00d1 | | Pop_Control Pop_Count_1
0094 00da | | Load_Top At_Offset_2
0095 01dc | | Execute Vector,Last
0096 00db | | Load_Top At_Offset_3
0097 01dd | | Execute Vector,First
0098 0263 | c | Execute Discrete,Above_Bound
0099 7006 |p | Jump_Nonzero 0xa0
009a 00d8 | | Load_Top At_Offset_0
009b e5ff | | Load 0x2,-0x1
009c 01d5 | | Execute Vector,Field_Reference
009d 1c00 | | Execute_Immediate Run_Utility,0x0
009e 0a01 | | Execute_Immediate Plus,0x1
009f 7ff8 | | Jump 0x98
00a0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00a1 0000 0000 | | .XXX[0x3]
00a3 0000 | |
00a4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00cd | | .CONST 0x00cd ; Address of begin
00a9 0186 | | .CONST 0x0186 ; Address of exception handler
00aa 0009 | | .CONST 0x0009 ; Number of locals
00ab INIT_00a8:
00ab e001 | | Load 0x0,0x1
00ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ad 02c7 | | Declare_Variable Any
00ae 00d8 | | Load_Top At_Offset_0
00af 1c00 | | Execute_Immediate Run_Utility,0x0
00b0 e001 | | Load 0x0,0x1
00b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00b2 02c7 | | Declare_Variable Any
00b3 00d8 | | Load_Top At_Offset_0
00b4 1c00 | | Execute_Immediate Run_Utility,0x0
00b5 e002 | | Load 0x0,0x2
00b6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00b7 e002 | | Load 0x0,0x2
00b8 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00b9 02c7 | | Declare_Variable Any
00ba 00d8 | | Load_Top At_Offset_0
00bb 1c00 | | Execute_Immediate Run_Utility,0x0
00bc e002 | | Load 0x0,0x2
00bd 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00be 02c7 | | Declare_Variable Any
00bf 00d8 | | Load_Top At_Offset_0
00c0 1c00 | | Execute_Immediate Run_Utility,0x0
00c1 e002 | | Load 0x0,0x2
00c2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
00c3 02c7 | | Declare_Variable Any
00c4 00d8 | | Load_Top At_Offset_0
00c5 1c00 | | Execute_Immediate Run_Utility,0x0
00c6 e002 | | Load 0x0,0x2
00c7 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
00c8 02c7 | | Declare_Variable Any
00c9 00d8 | | Load_Top At_Offset_0
00ca 1c00 | | Execute_Immediate Run_Utility,0x0
00cb 029f 0553 | S| Declare_Subprogram INIT_0550,For_Call
00cd BODY_00a8:
00cd 4800 |H | Short_Literal 0x0
00ce a5fd | | Store_Unchecked 0x2,-0x3
00cf 4800 |H | Short_Literal 0x0
00d0 a5fc | | Store_Unchecked 0x2,-0x4
00d1 4800 |H | Short_Literal 0x0
00d2 a5fb | | Store_Unchecked 0x2,-0x5
00d3 e5fe | | Load 0x2,-0x2
00d4 e5ff | | Load 0x2,-0x1
00d5 e003 | | Load 0x0,0x3
00d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00d7 7001 |p | Jump_Nonzero 0xd9
00d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00d9 e5fe | | Load 0x2,-0x2
00da 4801 |H | Short_Literal 0x1
00db e5ff | | Load 0x2,-0x1
00dc e003 | | Load 0x0,0x3
00dd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00de c402 | | Store 0x2,0x2
00df e5fe | | Load 0x2,-0x2
00e0 4801 |H | Short_Literal 0x1
00e1 e402 | | Load 0x2,0x2
00e2 e003 | | Load 0x0,0x3
00e3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00e4 c403 | | Store 0x2,0x3
00e5 e002 | | Load 0x0,0x2
00e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00e7 e405 | | Load 0x2,0x5
00e8 0120 | | Execute Any,Is_Value
00e9 6803 |h | Jump_Zero 0xed
00ea e002 | | Load 0x0,0x2
00eb 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00ec 7801 |x | Jump 0xee
00ed e405 | | Load 0x2,0x5
00ee e004 | | Load 0x0,0x4
00ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f0 e403 | | Load 0x2,0x3
00f1 e003 | | Load 0x0,0x3
00f2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00f3 0092 082b | +| Action Push_String_Extended,0x82b ; ".state.cmvc_database"
00f5 01cc | | Execute Vector,Catenate
00f6 e002 | | Load 0x0,0x2
00f7 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
00f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f9 c405 | | Store 0x2,0x5
00fa c404 | | Store 0x2,0x4
00fb e404 | | Load 0x2,0x4
00fc e002 | | Load 0x0,0x2
00fd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00fe 6817 |h | Jump_Zero 0x116
00ff e5fe | | Load 0x2,-0x2
0100 4801 |H | Short_Literal 0x1
0101 4801 |H | Short_Literal 0x1
0102 e005 | | Load 0x0,0x5
0103 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0104 035b | [ | Declare_Type Array,Constrained
0105 0337 | 7 | Declare_Variable Array
0106 e403 | | Load 0x2,0x3
0107 e003 | | Load 0x0,0x3
0108 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0109 e005 | | Load 0x0,0x5
010a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
010b 0119 | | Execute Any,Check_In_Formal_Type
010c 4801 |H | Short_Literal 0x1
010d 00da | | Load_Top At_Offset_2
010e 01d6 | | Execute Vector,Field_Write
010f 6094 |` | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x000081c7}
0110 e006 | | Load 0x0,0x6
0111 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0112 6091 |` | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x000081c7}
0113 a5fb | | Store_Unchecked 0x2,-0x5
0114 e007 | | Load 0x0,0x7
0115 0257 | W | Execute Discrete,Raise
0116 e002 | | Load 0x0,0x2
0117 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0118 00db | | Load_Top At_Offset_3
0119 0120 | | Execute Any,Is_Value
011a 6803 |h | Jump_Zero 0x11e
011b e002 | | Load 0x0,0x2
011c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
011d 7801 |x | Jump 0x11f
011e 00db | | Load_Top At_Offset_3
011f e405 | | Load 0x2,0x5
0120 e402 | | Load 0x2,0x2
0121 e003 | | Load 0x0,0x3
0122 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0123 e001 | | Load 0x0,0x1
0124 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0125 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0126 e002 | | Load 0x0,0x2
0127 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0128 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0129 c407 | | Store 0x2,0x7
012a c404 | | Store 0x2,0x4
012b e404 | | Load 0x2,0x4
012c e002 | | Load 0x0,0x2
012d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
012e 6817 |h | Jump_Zero 0x146
012f e5fe | | Load 0x2,-0x2
0130 4801 |H | Short_Literal 0x1
0131 4801 |H | Short_Literal 0x1
0132 e005 | | Load 0x0,0x5
0133 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0134 035b | [ | Declare_Type Array,Constrained
0135 0337 | 7 | Declare_Variable Array
0136 e402 | | Load 0x2,0x2
0137 e003 | | Load 0x0,0x3
0138 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0139 e005 | | Load 0x0,0x5
013a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013b 0119 | | Execute Any,Check_In_Formal_Type
013c 4801 |H | Short_Literal 0x1
013d 00da | | Load_Top At_Offset_2
013e 01d6 | | Execute Vector,Field_Write
013f 6060 |`` | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x000081c8}
0140 e006 | | Load 0x0,0x6
0141 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0142 605d |`] | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x000081c8}
0143 a5fb | | Store_Unchecked 0x2,-0x5
0144 e007 | | Load 0x0,0x7
0145 0257 | W | Execute Discrete,Raise
0146 8409 | | Call 0x2,0x9
0147 e002 | | Load 0x0,0x2
0148 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0149 00da | | Load_Top At_Offset_2
014a 0120 | | Execute Any,Is_Value
014b 6803 |h | Jump_Zero 0x14f
014c e002 | | Load 0x0,0x2
014d 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
014e 7801 |x | Jump 0x150
014f 00da | | Load_Top At_Offset_2
0150 e407 | | Load 0x2,0x7
0151 e406 | | Load 0x2,0x6
0152 e002 | | Load 0x0,0x2
0153 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0154 180f | | Execute Package,Field_Execute,Field_Number 0xf
0155 c408 | | Store 0x2,0x8
0156 c404 | | Store 0x2,0x4
0157 e404 | | Load 0x2,0x4
0158 e002 | | Load 0x0,0x2
0159 1816 | | Execute Package,Field_Execute,Field_Number 0x16
015a 6817 |h | Jump_Zero 0x172
015b e5fe | | Load 0x2,-0x2
015c 4801 |H | Short_Literal 0x1
015d 4801 |H | Short_Literal 0x1
015e e005 | | Load 0x0,0x5
015f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0160 035b | [ | Declare_Type Array,Constrained
0161 0337 | 7 | Declare_Variable Array
0162 e5ff | | Load 0x2,-0x1
0163 e003 | | Load 0x0,0x3
0164 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0165 e005 | | Load 0x0,0x5
0166 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0167 0119 | | Execute Any,Check_In_Formal_Type
0168 4801 |H | Short_Literal 0x1
0169 00da | | Load_Top At_Offset_2
016a 01d6 | | Execute Vector,Field_Write
016b 6030 |`0 | Indirect_Literal Discrete,0x19c,{0x00000000, 0x000081c9}
016c e006 | | Load 0x0,0x6
016d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
016e 602d |`- | Indirect_Literal Discrete,0x19c,{0x00000000, 0x000081c9}
016f a5fb | | Store_Unchecked 0x2,-0x5
0170 e007 | | Load 0x0,0x7
0171 0257 | W | Execute Discrete,Raise
0172 00da | | Load_Top At_Offset_2
0173 e406 | | Load 0x2,0x6
0174 e002 | | Load 0x0,0x2
0175 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0176 180d | | Execute Package,Field_Execute,Field_Number 0xd
0177 a5fd | | Store_Unchecked 0x2,-0x3
0178 00d9 | | Load_Top At_Offset_1
0179 e002 | | Load 0x0,0x2
017a 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
017b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017c a5fc | | Store_Unchecked 0x2,-0x4
017d e002 | | Load 0x0,0x2
017e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
017f 4800 |H | Short_Literal 0x0
0180 e405 | | Load 0x2,0x5
0181 e002 | | Load 0x0,0x2
0182 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0183 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0184 c404 | | Store 0x2,0x4
0185 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0186 TRAP_00a8:
0186 e007 | | Load 0x0,0x7
0187 010f | | Execute Exception,Equal
0188 6809 |h | Jump_Zero 0x192
0189 e002 | | Load 0x0,0x2
018a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
018b 4800 |H | Short_Literal 0x0
018c e405 | | Load 0x2,0x5
018d e002 | | Load 0x0,0x2
018e 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
018f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0190 c404 | | Store 0x2,0x4
0191 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0192 6005 |` | Indirect_Literal Discrete,0x198,{0x00000000, 0x0000813b}
0193 a5fb | | Store_Unchecked 0x2,-0x5
0194 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
019c 0000 0000 | | .LITERAL {0x00000000, 0x000081c9}
01a0 0000 0000 | | .LITERAL {0x00000000, 0x000081c8}
01a4 0000 0000 | | .LITERAL {0x00000000, 0x000081c7}
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ba | | .CONST 0x01ba ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0005 | | .CONST 0x0005 ; Number of locals
01ab INIT_01a8:
01ab e001 | | Load 0x0,0x1
01ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01ad 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01ae 02c7 | | Declare_Variable Any
01af 00d8 | | Load_Top At_Offset_0
01b0 1c00 | | Execute_Immediate Run_Utility,0x0
01b1 4800 |H | Short_Literal 0x0
01b2 e210 | | Load 0x1,0x10
01b3 1c08 | | Execute_Immediate Run_Utility,0x8
01b4 00d8 | | Load_Top At_Offset_0
01b5 1c00 | | Execute_Immediate Run_Utility,0x0
01b6 00e2 | | Load_Encached Integer_Cache
01b7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01b8 029f 058b | | Declare_Subprogram INIT_0588,For_Call
01ba BODY_01a8:
01ba e5ff | | Load 0x2,-0x1
01bb e003 | | Load 0x0,0x3
01bc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01bd 0092 082c | ,| Action Push_String_Extended,0x82c ; ".units.??'c(~library)"
01bf 01cc | | Execute Vector,Catenate
01c0 8220 | | Call 0x1,0x20
01c1 c402 | | Store 0x2,0x2
01c2 00db | | Load_Top At_Offset_3
01c3 8222 | " | Call 0x1,0x22
01c4 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01c5 00d9 | | Load_Top At_Offset_1
01c6 0c01 | | Execute_Immediate Greater_Equal,0x1
01c7 6801 |h | Jump_Zero 0x1c9
01c8 8405 | | Call 0x2,0x5
01c9 00da | | Load_Top At_Offset_2
01ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01cb 0000 0000 | | .BLANK 0000[0x5]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 01f4 | | .CONST 0x01f4 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 4800 |H | Short_Literal 0x0
01d4 a5f8 | | Store_Unchecked 0x2,-0x8
01d5 e5f9 | | Load 0x2,-0x7
01d6 e5fc | | Load 0x2,-0x4
01d7 e5fd | | Load 0x2,-0x3
01d8 8226 | & | Call 0x1,0x26
01d9 e5f9 | | Load 0x2,-0x7
01da e5fb | | Load 0x2,-0x5
01db e5fa | | Load 0x2,-0x6
01dc e5fd | | Load 0x2,-0x3
01dd e5fe | | Load 0x2,-0x2
01de e5ff | | Load 0x2,-0x1
01df 8229 | ) | Call 0x1,0x29
01e0 e5f9 | | Load 0x2,-0x7
01e1 e5fb | | Load 0x2,-0x5
01e2 e5fa | | Load 0x2,-0x6
01e3 e5fd | | Load 0x2,-0x3
01e4 e5fe | | Load 0x2,-0x2
01e5 e5ff | | Load 0x2,-0x1
01e6 8228 | ( | Call 0x1,0x28
01e7 e006 | | Load 0x0,0x6
01e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e9 e5f9 | | Load 0x2,-0x7
01ea e5fe | | Load 0x2,-0x2
01eb e003 | | Load 0x0,0x3
01ec 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01ed 0092 082d | -| Action Push_String_Extended,0x82d ; ".units"
01ef 01cc | | Execute Vector,Catenate
01f0 e008 | | Load 0x0,0x8
01f1 1884 | | Execute Package,Field_Execute,Field_Number 0x84
01f2 c5f8 | | Store 0x2,-0x8
01f3 4508 |E | Exit_Suprogram New_Top_Offset 0x8
01f4 TRAP_01d0:
01f4 0007 | | Action Break_Optional
01f5 6002 |` | Indirect_Literal Discrete,0x1f8,{0x00000000, 0x0000813b}
01f6 a5f8 | | Store_Unchecked 0x2,-0x8
01f7 4508 |E | Exit_Suprogram New_Top_Offset 0x8
01f8 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
01fc 0000 0000 | | .BLANK 0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0217 | | .CONST 0x0217 ; Address of begin
0201 0223 | # | .CONST 0x0223 ; Address of exception handler
0202 0007 | | .CONST 0x0007 ; Number of locals
0203 INIT_0200:
0203 4800 |H | Short_Literal 0x0
0204 e210 | | Load 0x1,0x10
0205 1c08 | | Execute_Immediate Run_Utility,0x8
0206 00d8 | | Load_Top At_Offset_0
0207 1c00 | | Execute_Immediate Run_Utility,0x0
0208 e001 | | Load 0x0,0x1
0209 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
020a 1b18 | | Execute Package,Field_Read,Field_Number 0x18
020b 02c7 | | Declare_Variable Any
020c 00d8 | | Load_Top At_Offset_0
020d 1c00 | | Execute_Immediate Run_Utility,0x0
020e 00e2 | | Load_Encached Integer_Cache
020f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0210 00e1 | | Load_Encached Boolean_Cache
0211 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0212 e006 | | Load 0x0,0x6
0213 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0214 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0215 029f 05cb | | Declare_Subprogram INIT_05c8,For_Call
0217 BODY_0200:
0217 e5ff | | Load 0x2,-0x1
0218 8220 | | Call 0x1,0x20
0219 c403 | | Store 0x2,0x3
021a e403 | | Load 0x2,0x3
021b 8222 | " | Call 0x1,0x22
021c a404 | | Store_Unchecked 0x2,0x4
021d 00db | | Load_Top At_Offset_3
021e 0c01 | | Execute_Immediate Greater_Equal,0x1
021f 6801 |h | Jump_Zero 0x221
0220 8407 | | Call 0x2,0x7
0221 e402 | | Load 0x2,0x2
0222 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0223 TRAP_0200:
0223 0007 | | Action Break_Optional
0224 e402 | | Load 0x2,0x2
0225 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0226 0000 0000 | | .XXX[0x2]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 023f | ? | .CONST 0x023f ; Address of begin
0229 024b | K | .CONST 0x024b ; Address of exception handler
022a 0007 | | .CONST 0x0007 ; Number of locals
022b INIT_0228:
022b 4800 |H | Short_Literal 0x0
022c e210 | | Load 0x1,0x10
022d 1c08 | | Execute_Immediate Run_Utility,0x8
022e 00d8 | | Load_Top At_Offset_0
022f 1c00 | | Execute_Immediate Run_Utility,0x0
0230 e001 | | Load 0x0,0x1
0231 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0232 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0233 02c7 | | Declare_Variable Any
0234 00d8 | | Load_Top At_Offset_0
0235 1c00 | | Execute_Immediate Run_Utility,0x0
0236 00e2 | | Load_Encached Integer_Cache
0237 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0238 00e1 | | Load_Encached Boolean_Cache
0239 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
023a e006 | | Load 0x0,0x6
023b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
023d 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
023f BODY_0228:
023f e5ff | | Load 0x2,-0x1
0240 8220 | | Call 0x1,0x20
0241 c403 | | Store 0x2,0x3
0242 e403 | | Load 0x2,0x3
0243 8222 | " | Call 0x1,0x22
0244 a404 | | Store_Unchecked 0x2,0x4
0245 00db | | Load_Top At_Offset_3
0246 0c01 | | Execute_Immediate Greater_Equal,0x1
0247 6801 |h | Jump_Zero 0x249
0248 8407 | | Call 0x2,0x7
0249 e402 | | Load 0x2,0x2
024a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
024b TRAP_0228:
024b 0007 | | Action Break_Optional
024c e402 | | Load 0x2,0x2
024d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
024e 0000 0000 | | .XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0266 | f | .CONST 0x0266 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 4800 |H | Short_Literal 0x0
0254 a5fc | | Store_Unchecked 0x2,-0x4
0255 00cf | | Action Mark_Auxiliary
0256 00db | | Load_Top At_Offset_3
0257 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0258 4801 |H | Short_Literal 0x1
0259 0263 | c | Execute Discrete,Above_Bound
025a 700a |p | Jump_Nonzero 0x265
025b e5fd | | Load 0x2,-0x3
025c e5fe | | Load 0x2,-0x2
025d 00da | | Load_Top At_Offset_2
025e e5ff | | Load 0x2,-0x1
025f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0260 01d5 | | Execute Vector,Field_Reference
0261 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0262 8224 | $ | Call 0x1,0x24
0263 00c8 | | Action Pop_Auxiliary_Range
0264 3ff6 |? | Loop_Increasing 0x25b
0265 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0266 TRAP_0250:
0266 0007 | | Action Break_Optional
0267 6004 |` | Indirect_Literal Discrete,0x26c,{0x00000000, 0x0000813b}
0268 a5fc | | Store_Unchecked 0x2,-0x4
0269 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026a 0000 0000 | | .XXX[0x2]
026c 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0278 | x | .CONST 0x0278 ; Address of begin
0271 0299 | | .CONST 0x0299 ; Address of exception handler
0272 0002 | | .CONST 0x0002 ; Number of locals
0273 INIT_0270:
0273 e001 | | Load 0x0,0x1
0274 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0275 02c7 | | Declare_Variable Any
0276 00d8 | | Load_Top At_Offset_0
0277 1c00 | | Execute_Immediate Run_Utility,0x0
0278 BODY_0270:
0278 4800 |H | Short_Literal 0x0
0279 a5fb | | Store_Unchecked 0x2,-0x5
027a e5fe | | Load 0x2,-0x2
027b 7001 |p | Jump_Nonzero 0x27d
027c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
027d 00cf | | Action Mark_Auxiliary
027e e5ff | | Load 0x2,-0x1
027f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0280 4801 |H | Short_Literal 0x1
0281 0263 | c | Execute Discrete,Above_Bound
0282 7015 |p | Jump_Nonzero 0x298
0283 00d8 | | Load_Top At_Offset_0
0284 e5ff | | Load 0x2,-0x1
0285 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0286 01d5 | | Execute Vector,Field_Reference
0287 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0288 c402 | | Store 0x2,0x2
0289 00d8 | | Load_Top At_Offset_0
028a e5ff | | Load 0x2,-0x1
028b 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
028c 01d5 | | Execute Vector,Field_Reference
028d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
028e e402 | | Load 0x2,0x2
028f 821d | | Call 0x1,0x1d
0290 027d | } | Execute Discrete,Greater
0291 6804 |h | Jump_Zero 0x296
0292 e5fc | | Load 0x2,-0x4
0293 e5fd | | Load 0x2,-0x3
0294 e402 | | Load 0x2,0x2
0295 8225 | % | Call 0x1,0x25
0296 00c8 | | Action Pop_Auxiliary_Range
0297 3feb |? | Loop_Increasing 0x283
0298 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0299 TRAP_0270:
0299 0007 | | Action Break_Optional
029a 67d1 |g | Indirect_Literal Discrete,0x26c,{0x00000000, 0x0000813b}
029b a5fb | | Store_Unchecked 0x2,-0x5
029c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
029d 0000 0000 | | .XXX[0x3]
029f 0000 | |
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02ad | | .CONST 0x02ad ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 00db | | Load_Top At_Offset_3
02a4 4801 |H | Short_Literal 0x1
02a5 e5ff | | Load 0x2,-0x1
02a6 e003 | | Load 0x0,0x3
02a7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02a8 e003 | | Load 0x0,0x3
02a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02aa 00db | | Load_Top At_Offset_3
02ab e003 | | Load 0x0,0x3
02ac 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02ad BODY_02a0:
02ad 00d8 | | Load_Top At_Offset_0
02ae 01dd | | Execute Vector,First
02af 00da | | Load_Top At_Offset_2
02b0 01db | | Execute Vector,Length
02b1 0273 | s | Execute Discrete,Plus
02b2 0a01 | | Execute_Immediate Plus,0x1
02b3 00d8 | | Load_Top At_Offset_0
02b4 00e2 | | Load_Encached Integer_Cache
02b5 0260 | ` | Execute Discrete,In_Type
02b6 7001 |p | Jump_Nonzero 0x2b8
02b7 0801 | | Execute_Immediate Raise,0x1
02b8 00d9 | | Load_Top At_Offset_1
02b9 01dc | | Execute Vector,Last
02ba 00da | | Load_Top At_Offset_2
02bb 01cf | | Execute Vector,Slice_Read
02bc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02bd 0000 0000 | | .XXX[0x3]
02bf 0000 | |
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c8 | | .CONST 0x02c8 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0003 | | .CONST 0x0003 ; Number of locals
02c3 INIT_02c0:
02c3 e001 | | Load 0x0,0x1
02c4 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
02c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c6 e001 | | Load 0x0,0x1
02c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c8 BODY_02c0:
02c8 e001 | | Load 0x0,0x1
02c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ca e001 | | Load 0x0,0x1
02cb 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
02cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02cd 600e |` | Indirect_Literal Discrete,0x2dc,{0x00000000, 0x00004000}
02ce e004 | | Load 0x0,0x4
02cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d0 4800 |H | Short_Literal 0x0
02d1 e5ff | | Load 0x2,-0x1
02d2 e001 | | Load 0x0,0x1
02d3 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d5 e001 | | Load 0x0,0x1
02d6 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
02d7 180f | | Execute Package,Field_Execute,Field_Number 0xf
02d8 005b | [ | Store_Top Discrete,At_Offset_3
02d9 0059 | Y | Store_Top Discrete,At_Offset_1
02da 00d9 | | Load_Top At_Offset_1
02db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02dc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02ee | | .CONST 0x02ee ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0005 | | .CONST 0x0005 ; Number of locals
02e3 INIT_02e0:
02e3 e001 | | Load 0x0,0x1
02e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02e5 02c7 | | Declare_Variable Any
02e6 00d8 | | Load_Top At_Offset_0
02e7 1c00 | | Execute_Immediate Run_Utility,0x0
02e8 e006 | | Load 0x0,0x6
02e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ea 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02eb 00e1 | | Load_Encached Boolean_Cache
02ec 029f 06bb | | Declare_Subprogram INIT_06b8,For_Call
02ee BODY_02e0:
02ee e5ff | | Load 0x2,-0x1
02ef e001 | | Load 0x0,0x1
02f0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f1 012f | / | Execute Any,Equal
02f2 6801 |h | Jump_Zero 0x2f4
02f3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02f4 e5fd | | Load 0x2,-0x3
02f5 e003 | | Load 0x0,0x3
02f6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02f7 e009 | | Load 0x0,0x9
02f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02f9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02fa 6801 |h | Jump_Zero 0x2fc
02fb 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02fc 8405 | | Call 0x2,0x5
02fd e006 | | Load 0x0,0x6
02fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ff e5fc | | Load 0x2,-0x4
0300 e5fe | | Load 0x2,-0x2
0301 e003 | | Load 0x0,0x3
0302 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0303 0092 082d | -| Action Push_String_Extended,0x82d ; ".units"
0305 01cc | | Execute Vector,Catenate
0306 e008 | | Load 0x0,0x8
0307 1883 | | Execute Package,Field_Execute,Field_Number 0x83
0308 005b | [ | Store_Top Discrete,At_Offset_3
0309 e006 | | Load 0x0,0x6
030a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
030b e5fc | | Load 0x2,-0x4
030c e5fe | | Load 0x2,-0x2
030d e003 | | Load 0x0,0x3
030e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
030f 0092 082d | -| Action Push_String_Extended,0x82d ; ".units"
0311 01cc | | Execute Vector,Catenate
0312 e008 | | Load 0x0,0x8
0313 1884 | | Execute Package,Field_Execute,Field_Number 0x84
0314 005b | [ | Store_Top Discrete,At_Offset_3
0315 4800 |H | Short_Literal 0x0
0316 00db | | Load_Top At_Offset_3
0317 e006 | | Load 0x0,0x6
0318 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0319 7003 |p | Jump_Nonzero 0x31d
031a e006 | | Load 0x0,0x6
031b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
031c 0257 | W | Execute Discrete,Raise
031d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
031e 0000 0000 | | .XXX[0x2]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0328 | ( | .CONST 0x0328 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0003 | | .CONST 0x0003 ; Number of locals
0323 INIT_0320:
0323 e001 | | Load 0x0,0x1
0324 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0325 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0326 e001 | | Load 0x0,0x1
0327 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0328 BODY_0320:
0328 e001 | | Load 0x0,0x1
0329 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032a e001 | | Load 0x0,0x1
032b 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
032c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032d 6012 |` | Indirect_Literal Discrete,0x340,{0x00000000, 0x00004000}
032e e004 | | Load 0x0,0x4
032f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0330 4800 |H | Short_Literal 0x0
0331 e5ff | | Load 0x2,-0x1
0332 e001 | | Load 0x0,0x1
0333 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0334 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0335 e001 | | Load 0x0,0x1
0336 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0337 180f | | Execute Package,Field_Execute,Field_Number 0xf
0338 005b | [ | Store_Top Discrete,At_Offset_3
0339 0059 | Y | Store_Top Discrete,At_Offset_1
033a 00d9 | | Load_Top At_Offset_1
033b 0f04 | | Execute_Immediate Equal,0x4
033c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033d 0000 0000 | | .XXX[0x3]
033f 0000 | |
0340 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0344 0000 0000 | | .BLANK 0000[0x4]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0354 | T | .CONST 0x0354 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0003 | | .CONST 0x0003 ; Number of locals
034b INIT_0348:
034b e001 | | Load 0x0,0x1
034c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
034e 02c7 | | Declare_Variable Any
034f 00d8 | | Load_Top At_Offset_0
0350 1c00 | | Execute_Immediate Run_Utility,0x0
0351 e001 | | Load 0x0,0x1
0352 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0353 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0354 BODY_0348:
0354 e001 | | Load 0x0,0x1
0355 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0356 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0357 00da | | Load_Top At_Offset_2
0358 67e7 |g | Indirect_Literal Discrete,0x340,{0x00000000, 0x00004000}
0359 e004 | | Load 0x0,0x4
035a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
035b e00a | | Load 0x0,0xa
035c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
035d e00b | | Load 0x0,0xb
035e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
035f 4801 |H | Short_Literal 0x1
0360 4800 |H | Short_Literal 0x0
0361 e00a | | Load 0x0,0xa
0362 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0363 e001 | | Load 0x0,0x1
0364 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0365 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0366 e5ff | | Load 0x2,-0x1
0367 e001 | | Load 0x0,0x1
0368 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0369 181b | | Execute Package,Field_Execute,Field_Number 0x1b
036a c402 | | Store 0x2,0x2
036b 0059 | Y | Store_Top Discrete,At_Offset_1
036c 00d8 | | Load_Top At_Offset_0
036d 0e00 | | Execute_Immediate Not_Equal,0x0
036e 00d9 | | Load_Top At_Offset_1
036f 0e03 | | Execute_Immediate Not_Equal,0x3
0370 0279 | y | Execute Discrete,And
0371 6804 |h | Jump_Zero 0x376
0372 e001 | | Load 0x0,0x1
0373 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0374 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0375 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0376 00d9 | | Load_Top At_Offset_1
0377 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0381 | | .CONST 0x0381 ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0004 | | .CONST 0x0004 ; Number of locals
037b INIT_0378:
037b 00e2 | | Load_Encached Integer_Cache
037c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
037d 03e9 | | Declare_Variable Discrete,Duplicate
037e e006 | | Load 0x0,0x6
037f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0380 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0381 BODY_0378:
0381 e006 | | Load 0x0,0x6
0382 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0383 00e3 | | Load_Encached Natural_Cache
0384 00e3 | | Load_Encached Natural_Cache
0385 e5fe | | Load 0x2,-0x2
0386 e5ff | | Load 0x2,-0x1
0387 8216 | | Call 0x1,0x16
0388 c402 | | Store 0x2,0x2
0389 005b | [ | Store_Top Discrete,At_Offset_3
038a 0059 | Y | Store_Top Discrete,At_Offset_1
038b 4800 |H | Short_Literal 0x0
038c 00d9 | | Load_Top At_Offset_1
038d e006 | | Load 0x0,0x6
038e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
038f 7002 |p | Jump_Nonzero 0x392
0390 4800 |H | Short_Literal 0x0
0391 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0392 00da | | Load_Top At_Offset_2
0393 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0394 0000 0000 | | .BLANK 0000[0x4]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a3 | | .CONST 0x03a3 ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0003 | | .CONST 0x0003 ; Number of locals
039b INIT_0398:
039b 00e2 | | Load_Encached Integer_Cache
039c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
039d e001 | | Load 0x0,0x1
039e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
039f 1b18 | | Execute Package,Field_Read,Field_Number 0x18
03a0 02c7 | | Declare_Variable Any
03a1 e5ff | | Load 0x2,-0x1
03a2 a403 | | Store_Unchecked 0x2,0x3
03a3 BODY_0398:
03a3 00d8 | | Load_Top At_Offset_0
03a4 e001 | | Load 0x0,0x1
03a5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03a6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03a7 6802 |h | Jump_Zero 0x3aa
03a8 4800 |H | Short_Literal 0x0
03a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03aa 00d8 | | Load_Top At_Offset_0
03ab e001 | | Load 0x0,0x1
03ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ad 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03ae c403 | | Store 0x2,0x3
03af 00cf | | Action Mark_Auxiliary
03b0 7809 |x | Jump 0x3ba
03b1 00da | | Load_Top At_Offset_2
03b2 0a01 | | Execute_Immediate Plus,0x1
03b3 005b | [ | Store_Top Discrete,At_Offset_3
03b4 00d9 | | Load_Top At_Offset_1
03b5 e001 | | Load 0x0,0x1
03b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b7 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03b8 c403 | | Store 0x2,0x3
03b9 00c9 | | Action Pop_Auxiliary_Loop
03ba 00d9 | | Load_Top At_Offset_1
03bb e001 | | Load 0x0,0x1
03bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03bd 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03be 6ff2 |o | Jump_Zero 0x3b1
03bf 00ce | | Action Pop_Auxiliary
03c0 00d8 | | Load_Top At_Offset_0
03c1 e001 | | Load 0x0,0x1
03c2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03c3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03c4 c403 | | Store 0x2,0x3
03c5 00d9 | | Load_Top At_Offset_1
03c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03c7 0000 | | .XXX[0x1]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb e004 | | Load 0x0,0x4
03cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03cd 00db | | Load_Top At_Offset_3
03ce e00c | | Load 0x0,0xc
03cf 180d | | Execute Package,Field_Execute,Field_Number 0xd
03d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d1 0000 0000 | | .BLANK 0000[0x7]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00da | | Load_Top At_Offset_2
03dc 821f | | Call 0x1,0x1f
03dd 682a |h* | Jump_Zero 0x408
03de 00db | | Load_Top At_Offset_3
03df 7016 |p | Jump_Nonzero 0x3f6
03e0 e5fd | | Load 0x2,-0x3
03e1 4801 |H | Short_Literal 0x1
03e2 4801 |H | Short_Literal 0x1
03e3 e005 | | Load 0x0,0x5
03e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03e5 035b | [ | Declare_Type Array,Constrained
03e6 0337 | 7 | Declare_Variable Array
03e7 e5ff | | Load 0x2,-0x1
03e8 e003 | | Load 0x0,0x3
03e9 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03ea e005 | | Load 0x0,0x5
03eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ec 0119 | | Execute Any,Check_In_Formal_Type
03ed 4801 |H | Short_Literal 0x1
03ee 00da | | Load_Top At_Offset_2
03ef 01d6 | | Execute Vector,Field_Write
03f0 601b |` | Indirect_Literal Discrete,0x40c,{0x00000000, 0x000081ca}
03f1 e006 | | Load 0x0,0x6
03f2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03f3 e006 | | Load 0x0,0x6
03f4 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03f5 0257 | W | Execute Discrete,Raise
03f6 4801 |H | Short_Literal 0x1
03f7 4801 |H | Short_Literal 0x1
03f8 4800 |H | Short_Literal 0x0
03f9 4801 |H | Short_Literal 0x1
03fa e5fd | | Load 0x2,-0x3
03fb e003 | | Load 0x0,0x3
03fc 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
03fd e00d | | Load 0x0,0xd
03fe 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
03ff 4800 |H | Short_Literal 0x0
0400 0092 082e | .| Action Push_String_Extended,0x82e ; "<ALL_WORLDS>"
0402 4802 |H | Short_Literal 0x2
0403 e5ff | | Load 0x2,-0x1
0404 e003 | | Load 0x0,0x3
0405 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0406 e00e | | Load 0x0,0xe
0407 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0408 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0409 0000 0000 | | .XXX[0x3]
040b 0000 | |
040c 0000 0000 | | .LITERAL {0x00000000, 0x000081ca}
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 4800 |H | Short_Literal 0x0
0414 4801 |H | Short_Literal 0x1
0415 4800 |H | Short_Literal 0x0
0416 4801 |H | Short_Literal 0x1
0417 e5fd | | Load 0x2,-0x3
0418 e003 | | Load 0x0,0x3
0419 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
041a e00d | | Load 0x0,0xd
041b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
041c 4800 |H | Short_Literal 0x0
041d 0092 082f | /| Action Push_String_Extended,0x82f ; "<WORLDS>"
041f e5fe | | Load 0x2,-0x2
0420 4803 |H | Short_Literal 0x3
0421 e5ff | | Load 0x2,-0x1
0422 e003 | | Load 0x0,0x3
0423 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0424 e00e | | Load 0x0,0xe
0425 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0426 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0427 0000 | | .XXX[0x1]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0436 | 6 | .CONST 0x0436 ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0004 | | .CONST 0x0004 ; Number of locals
042b INIT_0428:
042b e001 | | Load 0x0,0x1
042c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
042d 02c7 | | Declare_Variable Any
042e 00d8 | | Load_Top At_Offset_0
042f 1c00 | | Execute_Immediate Run_Utility,0x0
0430 e001 | | Load 0x0,0x1
0431 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0432 02c7 | | Declare_Variable Any
0433 00d8 | | Load_Top At_Offset_0
0434 1c00 | | Execute_Immediate Run_Utility,0x0
0435 00e1 | | Load_Encached Boolean_Cache
0436 BODY_0428:
0436 00cf | | Action Mark_Auxiliary
0437 e5ff | | Load 0x2,-0x1
0438 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0439 4801 |H | Short_Literal 0x1
043a 0263 | c | Execute Discrete,Above_Bound
043b 702a |p* | Jump_Nonzero 0x466
043c 00d8 | | Load_Top At_Offset_0
043d e5ff | | Load 0x2,-0x1
043e 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
043f 01d5 | | Execute Vector,Field_Reference
0440 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0441 c402 | | Store 0x2,0x2
0442 00d8 | | Load_Top At_Offset_0
0443 e5ff | | Load 0x2,-0x1
0444 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0445 01d5 | | Execute Vector,Field_Reference
0446 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0447 e5fd | | Load 0x2,-0x3
0448 e402 | | Load 0x2,0x2
0449 8221 | ! | Call 0x1,0x21
044a 027c | | | Execute Discrete,Less
044b 6818 |h | Jump_Zero 0x464
044c e402 | | Load 0x2,0x2
044d e003 | | Load 0x0,0x3
044e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
044f 7014 |p | Jump_Nonzero 0x464
0450 00e1 | | Load_Encached Boolean_Cache
0451 e403 | | Load 0x2,0x3
0452 0120 | | Execute Any,Is_Value
0453 6803 |h | Jump_Zero 0x457
0454 e001 | | Load 0x0,0x1
0455 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0456 7801 |x | Jump 0x458
0457 e403 | | Load 0x2,0x3
0458 e5fd | | Load 0x2,-0x3
0459 e402 | | Load 0x2,0x2
045a e008 | | Load 0x0,0x8
045b 1887 | | Execute Package,Field_Execute,Field_Number 0x87
045c c403 | | Store 0x2,0x3
045d c404 | | Store 0x2,0x4
045e 00db | | Load_Top At_Offset_3
045f 6804 |h | Jump_Zero 0x464
0460 e5fd | | Load 0x2,-0x3
0461 e5fe | | Load 0x2,-0x2
0462 e403 | | Load 0x2,0x3
0463 8224 | $ | Call 0x1,0x24
0464 00c8 | | Action Pop_Auxiliary_Range
0465 3fd6 |? | Loop_Increasing 0x43c
0466 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0467 0000 | | .XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b | k | .CONST 0x046b ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0001 | | .CONST 0x0001 ; Number of locals
046b BODY_0468:
046b INIT_0468:
046b 00cf | | Action Mark_Auxiliary
046c e5fe | | Load 0x2,-0x2
046d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
046e 4801 |H | Short_Literal 0x1
046f 0263 | c | Execute Discrete,Above_Bound
0470 700c |p | Jump_Nonzero 0x47d
0471 e5ff | | Load 0x2,-0x1
0472 00d9 | | Load_Top At_Offset_1
0473 e5fe | | Load 0x2,-0x2
0474 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0475 01d5 | | Execute Vector,Field_Reference
0476 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0477 012f | / | Execute Any,Equal
0478 6802 |h | Jump_Zero 0x47b
0479 4801 |H | Short_Literal 0x1
047a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
047b 00c8 | | Action Pop_Auxiliary_Range
047c 3ff4 |? | Loop_Increasing 0x471
047d 00ce | | Action Pop_Auxiliary
047e 4800 |H | Short_Literal 0x0
047f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 048e | | .CONST 0x048e ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0003 | | .CONST 0x0003 ; Number of locals
0483 INIT_0480:
0483 e001 | | Load 0x0,0x1
0484 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0485 02c7 | | Declare_Variable Any
0486 00d8 | | Load_Top At_Offset_0
0487 1c00 | | Execute_Immediate Run_Utility,0x0
0488 e001 | | Load 0x0,0x1
0489 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
048a 1b18 | | Execute Package,Field_Read,Field_Number 0x18
048b 02c7 | | Declare_Variable Any
048c 00d8 | | Load_Top At_Offset_0
048d 1c00 | | Execute_Immediate Run_Utility,0x0
048e BODY_0480:
048e e5fe | | Load 0x2,-0x2
048f e003 | | Load 0x0,0x3
0490 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0491 0092 0830 | 0| Action Push_String_Extended,0x830 ; ".units.??'c(ada)'if(controlled)"
0493 01cc | | Execute Vector,Catenate
0494 8220 | | Call 0x1,0x20
0495 c403 | | Store 0x2,0x3
0496 00cf | | Action Mark_Auxiliary
0497 781b |x | Jump 0x4b3
0498 e5fa | | Load 0x2,-0x6
0499 4801 |H | Short_Literal 0x1
049a 00db | | Load_Top At_Offset_3
049b e003 | | Load 0x0,0x3
049c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
049d c402 | | Store 0x2,0x2
049e e5fd | | Load 0x2,-0x3
049f 00db | | Load_Top At_Offset_3
04a0 8227 | ' | Call 0x1,0x27
04a1 700b |p | Jump_Nonzero 0x4ad
04a2 e5fa | | Load 0x2,-0x6
04a3 00db | | Load_Top At_Offset_3
04a4 e5fe | | Load 0x2,-0x2
04a5 e5ff | | Load 0x2,-0x1
04a6 821e | | Call 0x1,0x1e
04a7 e5fb | | Load 0x2,-0x5
04a8 6804 |h | Jump_Zero 0x4ad
04a9 e5fa | | Load 0x2,-0x6
04aa e5fc | | Load 0x2,-0x4
04ab e402 | | Load 0x2,0x2
04ac 8225 | % | Call 0x1,0x25
04ad 00d9 | | Load_Top At_Offset_1
04ae e001 | | Load 0x0,0x1
04af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04b1 c403 | | Store 0x2,0x3
04b2 00c9 | | Action Pop_Auxiliary_Loop
04b3 00d9 | | Load_Top At_Offset_1
04b4 e001 | | Load 0x0,0x1
04b5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b6 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04b7 6fe0 |o | Jump_Zero 0x498
04b8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
04b9 0000 0000 | | .BLANK 0000[0x7]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c8 | | .CONST 0x04c8 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0002 | | .CONST 0x0002 ; Number of locals
04c3 INIT_04c0:
04c3 e001 | | Load 0x0,0x1
04c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04c5 02c7 | | Declare_Variable Any
04c6 00d8 | | Load_Top At_Offset_0
04c7 1c00 | | Execute_Immediate Run_Utility,0x0
04c8 BODY_04c0:
04c8 00cf | | Action Mark_Auxiliary
04c9 e5fd | | Load 0x2,-0x3
04ca 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04cb 4801 |H | Short_Literal 0x1
04cc 0263 | c | Execute Discrete,Above_Bound
04cd 7031 |p1 | Jump_Nonzero 0x4ff
04ce 00d8 | | Load_Top At_Offset_0
04cf e5fd | | Load 0x2,-0x3
04d0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
04d1 01d5 | | Execute Vector,Field_Reference
04d2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04d3 c402 | | Store 0x2,0x2
04d4 00db | | Load_Top At_Offset_3
04d5 e003 | | Load 0x0,0x3
04d6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04d7 6825 |h% | Jump_Zero 0x4fd
04d8 00d8 | | Load_Top At_Offset_0
04d9 e5fd | | Load 0x2,-0x3
04da 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
04db 01d5 | | Execute Vector,Field_Reference
04dc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04dd e5fa | | Load 0x2,-0x6
04de e402 | | Load 0x2,0x2
04df 8221 | ! | Call 0x1,0x21
04e0 027c | | | Execute Discrete,Less
04e1 680c |h | Jump_Zero 0x4ee
04e2 e5fa | | Load 0x2,-0x6
04e3 e402 | | Load 0x2,0x2
04e4 e5fe | | Load 0x2,-0x2
04e5 e5ff | | Load 0x2,-0x1
04e6 821e | | Call 0x1,0x1e
04e7 e5fb | | Load 0x2,-0x5
04e8 6814 |h | Jump_Zero 0x4fd
04e9 e5fa | | Load 0x2,-0x6
04ea e5fc | | Load 0x2,-0x4
04eb e402 | | Load 0x2,0x2
04ec 8225 | % | Call 0x1,0x25
04ed 780f |x | Jump 0x4fd
04ee 00d8 | | Load_Top At_Offset_0
04ef e5fd | | Load 0x2,-0x3
04f0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
04f1 01d5 | | Execute Vector,Field_Reference
04f2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04f3 e402 | | Load 0x2,0x2
04f4 821d | | Call 0x1,0x1d
04f5 027d | } | Execute Discrete,Greater
04f6 6806 |h | Jump_Zero 0x4fd
04f7 e5fb | | Load 0x2,-0x5
04f8 6804 |h | Jump_Zero 0x4fd
04f9 e5fa | | Load 0x2,-0x6
04fa e5fc | | Load 0x2,-0x4
04fb e402 | | Load 0x2,0x2
04fc 8225 | % | Call 0x1,0x25
04fd 00c8 | | Action Pop_Auxiliary_Range
04fe 3fcf |? | Loop_Increasing 0x4ce
04ff 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0515 | | .CONST 0x0515 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0007 | | .CONST 0x0007 ; Number of locals
0503 INIT_0500:
0503 e001 | | Load 0x0,0x1
0504 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0505 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0506 02c7 | | Declare_Variable Any
0507 00d8 | | Load_Top At_Offset_0
0508 1c00 | | Execute_Immediate Run_Utility,0x0
0509 e001 | | Load 0x0,0x1
050a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
050b 02c7 | | Declare_Variable Any
050c 00d8 | | Load_Top At_Offset_0
050d 1c00 | | Execute_Immediate Run_Utility,0x0
050e e006 | | Load 0x0,0x6
050f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0510 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0511 00e2 | | Load_Encached Integer_Cache
0512 00e1 | | Load_Encached Boolean_Cache
0513 029f 0763 | c| Declare_Subprogram INIT_0760,For_Call
0515 BODY_0500:
0515 e5ff | | Load 0x2,-0x1
0516 e003 | | Load 0x0,0x3
0517 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0518 7001 |p | Jump_Nonzero 0x51a
0519 8407 | | Call 0x2,0x7
051a 4800 |H | Short_Literal 0x0
051b a5fc | | Store_Unchecked 0x2,-0x4
051c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
051d 0000 0000 | | .XXX[0x3]
051f 0000 | |
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0529 | ) | .CONST 0x0529 ; Address of begin
0521 0004 | | .CONST 0x0004 ; Address of exception handler
0522 0004 | | .CONST 0x0004 ; Number of locals
0523 INIT_0520:
0523 e006 | | Load 0x0,0x6
0524 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0525 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0526 00e2 | | Load_Encached Integer_Cache
0527 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0528 03e9 | | Declare_Variable Discrete,Duplicate
0529 BODY_0520:
0529 e006 | | Load 0x0,0x6
052a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052b 00e3 | | Load_Encached Natural_Cache
052c 00e3 | | Load_Encached Natural_Cache
052d e5fc | | Load 0x2,-0x4
052e e5ff | | Load 0x2,-0x1
052f 8216 | | Call 0x1,0x16
0530 c403 | | Store 0x2,0x3
0531 005a | Z | Store_Top Discrete,At_Offset_2
0532 005b | [ | Store_Top Discrete,At_Offset_3
0533 4800 |H | Short_Literal 0x0
0534 00db | | Load_Top At_Offset_3
0535 e006 | | Load 0x0,0x6
0536 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0537 7002 |p | Jump_Nonzero 0x53a
0538 4800 |H | Short_Literal 0x0
0539 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
053a e5fe | | Load 0x2,-0x2
053b 4fff |O | Short_Literal -0x1
053c 027f | | Execute Discrete,Equal
053d 6805 |h | Jump_Zero 0x543
053e 00d9 | | Load_Top At_Offset_1
053f 0f01 | | Execute_Immediate Equal,0x1
0540 6802 |h | Jump_Zero 0x543
0541 4800 |H | Short_Literal 0x0
0542 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0543 00d9 | | Load_Top At_Offset_1
0544 e5fe | | Load 0x2,-0x2
0545 027f | | Execute Discrete,Equal
0546 6802 |h | Jump_Zero 0x549
0547 4800 |H | Short_Literal 0x0
0548 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0549 4801 |H | Short_Literal 0x1
054a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
054b 0000 0000 | | .BLANK 0000[0x5]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0556 | V | .CONST 0x0556 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0002 | | .CONST 0x0002 ; Number of locals
0553 INIT_0550:
0553 e5fe | | Load 0x2,-0x2
0554 e5ff | | Load 0x2,-0x1
0555 821c | | Call 0x1,0x1c
0556 BODY_0550:
0556 e002 | | Load 0x0,0x2
0557 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0558 e406 | | Load 0x2,0x6
0559 0120 | | Execute Any,Is_Value
055a 6803 |h | Jump_Zero 0x55e
055b e002 | | Load 0x0,0x2
055c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
055d 7801 |x | Jump 0x55f
055e e406 | | Load 0x2,0x6
055f e405 | | Load 0x2,0x5
0560 00db | | Load_Top At_Offset_3
0561 e002 | | Load 0x0,0x2
0562 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0563 180e | | Execute Package,Field_Execute,Field_Number 0xe
0564 c406 | | Store 0x2,0x6
0565 c404 | | Store 0x2,0x4
0566 e404 | | Load 0x2,0x4
0567 e002 | | Load 0x0,0x2
0568 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0569 6817 |h | Jump_Zero 0x581
056a e5fe | | Load 0x2,-0x2
056b 4801 |H | Short_Literal 0x1
056c 4801 |H | Short_Literal 0x1
056d e005 | | Load 0x0,0x5
056e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
056f 035b | [ | Declare_Type Array,Constrained
0570 0337 | 7 | Declare_Variable Array
0571 e5ff | | Load 0x2,-0x1
0572 e003 | | Load 0x0,0x3
0573 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0574 e005 | | Load 0x0,0x5
0575 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0576 0119 | | Execute Any,Check_In_Formal_Type
0577 4801 |H | Short_Literal 0x1
0578 00da | | Load_Top At_Offset_2
0579 01d6 | | Execute Vector,Field_Write
057a 6009 |` | Indirect_Literal Discrete,0x584,{0x00000000, 0x000081c9}
057b e006 | | Load 0x0,0x6
057c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
057d 6006 |` | Indirect_Literal Discrete,0x584,{0x00000000, 0x000081c9}
057e a5fb | | Store_Unchecked 0x2,-0x5
057f e007 | | Load 0x0,0x7
0580 0257 | W | Execute Discrete,Raise
0581 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0582 0000 0000 | | .XXX[0x2]
0584 0000 0000 | | .LITERAL {0x00000000, 0x000081c9}
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 0597 | | .CONST 0x0597 ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0004 | | .CONST 0x0004 ; Number of locals
058b INIT_0588:
058b e404 | | Load 0x2,0x4
058c e210 | | Load 0x1,0x10
058d 1c08 | | Execute_Immediate Run_Utility,0x8
058e 00d8 | | Load_Top At_Offset_0
058f 1c00 | | Execute_Immediate Run_Utility,0x0
0590 00e2 | | Load_Encached Integer_Cache
0591 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0592 e001 | | Load 0x0,0x1
0593 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0594 02c7 | | Declare_Variable Any
0595 00d8 | | Load_Top At_Offset_0
0596 1c00 | | Execute_Immediate Run_Utility,0x0
0597 BODY_0588:
0597 00cf | | Action Mark_Auxiliary
0598 7824 |x$ | Jump 0x5bd
0599 00da | | Load_Top At_Offset_2
059a 0a01 | | Execute_Immediate Plus,0x1
059b 005b | [ | Store_Top Discrete,At_Offset_3
059c e5fe | | Load 0x2,-0x2
059d 4801 |H | Short_Literal 0x1
059e e402 | | Load 0x2,0x2
059f e003 | | Load 0x0,0x3
05a0 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
05a1 c604 | | Store 0x3,0x4
05a2 00d9 | | Load_Top At_Offset_1
05a3 00db | | Load_Top At_Offset_3
05a4 e602 | | Load 0x3,0x2
05a5 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
05a6 01d5 | | Execute Vector,Field_Reference
05a7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05a8 00d9 | | Load_Top At_Offset_1
05a9 821d | | Call 0x1,0x1d
05aa 00db | | Load_Top At_Offset_3
05ab e602 | | Load 0x3,0x2
05ac 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
05ad 01d5 | | Execute Vector,Field_Reference
05ae 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05af e5fe | | Load 0x2,-0x2
05b0 00da | | Load_Top At_Offset_2
05b1 8221 | ! | Call 0x1,0x21
05b2 00db | | Load_Top At_Offset_3
05b3 e602 | | Load 0x3,0x2
05b4 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
05b5 01d5 | | Execute Vector,Field_Reference
05b6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05b7 e402 | | Load 0x2,0x2
05b8 e001 | | Load 0x0,0x1
05b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ba 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05bb c402 | | Store 0x2,0x2
05bc 00c9 | | Action Pop_Auxiliary_Loop
05bd e402 | | Load 0x2,0x2
05be e001 | | Load 0x0,0x1
05bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05c0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05c1 6fd7 |o | Jump_Zero 0x599
05c2 00ce | | Action Pop_Auxiliary
05c3 00da | | Load_Top At_Offset_2
05c4 00cb | | Action Pop_Block_With_Result
05c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05c6 0000 0000 | | .XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05de | | .CONST 0x05de ; Address of begin
05c9 0004 | | .CONST 0x0004 ; Address of exception handler
05ca 0006 | | .CONST 0x0006 ; Number of locals
05cb INIT_05c8:
05cb e404 | | Load 0x2,0x4
05cc e210 | | Load 0x1,0x10
05cd 1c08 | | Execute_Immediate Run_Utility,0x8
05ce 00d8 | | Load_Top At_Offset_0
05cf 1c00 | | Execute_Immediate Run_Utility,0x0
05d0 00e2 | | Load_Encached Integer_Cache
05d1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05d2 e001 | | Load 0x0,0x1
05d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d4 02c7 | | Declare_Variable Any
05d5 00d8 | | Load_Top At_Offset_0
05d6 1c00 | | Execute_Immediate Run_Utility,0x0
05d7 e001 | | Load 0x0,0x1
05d8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d9 02c7 | | Declare_Variable Any
05da 00d8 | | Load_Top At_Offset_0
05db 1c00 | | Execute_Immediate Run_Utility,0x0
05dc 029f 07a3 | | Declare_Subprogram INIT_07a0,For_Call
05de BODY_05c8:
05de 00cf | | Action Mark_Auxiliary
05df 784e |xN | Jump 0x62e
05e0 e5fe | | Load 0x2,-0x2
05e1 4801 |H | Short_Literal 0x1
05e2 e403 | | Load 0x2,0x3
05e3 e003 | | Load 0x0,0x3
05e4 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
05e5 c604 | | Store 0x3,0x4
05e6 00db | | Load_Top At_Offset_3
05e7 e003 | | Load 0x0,0x3
05e8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05e9 703e |p> | Jump_Nonzero 0x628
05ea e5fe | | Load 0x2,-0x2
05eb e604 | | Load 0x3,0x4
05ec e003 | | Load 0x0,0x3
05ed 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05ee 6839 |h9 | Jump_Zero 0x628
05ef e5fe | | Load 0x2,-0x2
05f0 e604 | | Load 0x3,0x4
05f1 e003 | | Load 0x0,0x3
05f2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05f3 6834 |h4 | Jump_Zero 0x628
05f4 00e1 | | Load_Encached Boolean_Cache
05f5 00db | | Load_Top At_Offset_3
05f6 0120 | | Execute Any,Is_Value
05f7 6803 |h | Jump_Zero 0x5fb
05f8 e001 | | Load 0x0,0x1
05f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05fa 7801 |x | Jump 0x5fc
05fb 00db | | Load_Top At_Offset_3
05fc e5fe | | Load 0x2,-0x2
05fd e604 | | Load 0x3,0x4
05fe 822a | * | Call 0x1,0x2a
05ff c605 | | Store 0x3,0x5
0600 c405 | | Store 0x2,0x5
0601 e405 | | Load 0x2,0x5
0602 6825 |h% | Jump_Zero 0x628
0603 e006 | | Load 0x0,0x6
0604 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0605 e5fe | | Load 0x2,-0x2
0606 e604 | | Load 0x3,0x4
0607 e008 | | Load 0x0,0x8
0608 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
0609 c406 | | Store 0x2,0x6
060a 4800 |H | Short_Literal 0x0
060b e406 | | Load 0x2,0x6
060c e006 | | Load 0x0,0x6
060d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
060e 7003 |p | Jump_Nonzero 0x612
060f e006 | | Load 0x0,0x6
0610 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0611 0257 | W | Execute Discrete,Raise
0612 e603 | | Load 0x3,0x3
0613 0a01 | | Execute_Immediate Plus,0x1
0614 c603 | | Store 0x3,0x3
0615 00da | | Load_Top At_Offset_2
0616 e603 | | Load 0x3,0x3
0617 e602 | | Load 0x3,0x2
0618 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0619 01d5 | | Execute Vector,Field_Reference
061a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
061b 00da | | Load_Top At_Offset_2
061c 821d | | Call 0x1,0x1d
061d e603 | | Load 0x3,0x3
061e e602 | | Load 0x3,0x2
061f 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0620 01d5 | | Execute Vector,Field_Reference
0621 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0622 4800 |H | Short_Literal 0x0
0623 e603 | | Load 0x3,0x3
0624 e602 | | Load 0x3,0x2
0625 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0626 01d5 | | Execute Vector,Field_Reference
0627 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0628 e403 | | Load 0x2,0x3
0629 e001 | | Load 0x0,0x1
062a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
062b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
062c c403 | | Store 0x2,0x3
062d 00c9 | | Action Pop_Auxiliary_Loop
062e e403 | | Load 0x2,0x3
062f e001 | | Load 0x0,0x1
0630 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0631 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0632 6fad |o | Jump_Zero 0x5e0
0633 00ce | | Action Pop_Auxiliary
0634 00db | | Load_Top At_Offset_3
0635 0c01 | | Execute_Immediate Greater_Equal,0x1
0636 6801 |h | Jump_Zero 0x638
0637 8606 | | Call 0x3,0x6
0638 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0639 0000 0000 | | .BLANK 0000[0x7]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0656 | V | .CONST 0x0656 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0006 | | .CONST 0x0006 ; Number of locals
0643 INIT_0640:
0643 e404 | | Load 0x2,0x4
0644 e210 | | Load 0x1,0x10
0645 1c08 | | Execute_Immediate Run_Utility,0x8
0646 00d8 | | Load_Top At_Offset_0
0647 1c00 | | Execute_Immediate Run_Utility,0x0
0648 00e2 | | Load_Encached Integer_Cache
0649 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
064a e001 | | Load 0x0,0x1
064b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
064c 02c7 | | Declare_Variable Any
064d 00d8 | | Load_Top At_Offset_0
064e 1c00 | | Execute_Immediate Run_Utility,0x0
064f e001 | | Load 0x0,0x1
0650 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0651 02c7 | | Declare_Variable Any
0652 00d8 | | Load_Top At_Offset_0
0653 1c00 | | Execute_Immediate Run_Utility,0x0
0654 029f 07bb | | Declare_Subprogram INIT_07b8,For_Call
0656 BODY_0640:
0656 00cf | | Action Mark_Auxiliary
0657 7854 |xT | Jump 0x6ac
0658 e5fc | | Load 0x2,-0x4
0659 4801 |H | Short_Literal 0x1
065a e403 | | Load 0x2,0x3
065b e003 | | Load 0x0,0x3
065c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
065d c604 | | Store 0x3,0x4
065e 00db | | Load_Top At_Offset_3
065f e003 | | Load 0x0,0x3
0660 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0661 7044 |pD | Jump_Nonzero 0x6a6
0662 e5fc | | Load 0x2,-0x4
0663 e604 | | Load 0x3,0x4
0664 e003 | | Load 0x0,0x3
0665 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0666 683f |h? | Jump_Zero 0x6a6
0667 e5fc | | Load 0x2,-0x4
0668 e604 | | Load 0x3,0x4
0669 e003 | | Load 0x0,0x3
066a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
066b 703a |p: | Jump_Nonzero 0x6a6
066c 00e1 | | Load_Encached Boolean_Cache
066d 00db | | Load_Top At_Offset_3
066e 0120 | | Execute Any,Is_Value
066f 6803 |h | Jump_Zero 0x673
0670 e001 | | Load 0x0,0x1
0671 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0672 7801 |x | Jump 0x674
0673 00db | | Load_Top At_Offset_3
0674 e5fc | | Load 0x2,-0x4
0675 e604 | | Load 0x3,0x4
0676 822a | * | Call 0x1,0x2a
0677 c605 | | Store 0x3,0x5
0678 c405 | | Store 0x2,0x5
0679 e405 | | Load 0x2,0x5
067a 682b |h+ | Jump_Zero 0x6a6
067b e5fc | | Load 0x2,-0x4
067c e5fd | | Load 0x2,-0x3
067d e5fe | | Load 0x2,-0x2
067e e604 | | Load 0x3,0x4
067f 822b | + | Call 0x1,0x2b
0680 6825 |h% | Jump_Zero 0x6a6
0681 e006 | | Load 0x0,0x6
0682 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0683 e5fc | | Load 0x2,-0x4
0684 e604 | | Load 0x3,0x4
0685 e008 | | Load 0x0,0x8
0686 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
0687 c406 | | Store 0x2,0x6
0688 4800 |H | Short_Literal 0x0
0689 e406 | | Load 0x2,0x6
068a e006 | | Load 0x0,0x6
068b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
068c 7003 |p | Jump_Nonzero 0x690
068d e006 | | Load 0x0,0x6
068e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
068f 0257 | W | Execute Discrete,Raise
0690 e603 | | Load 0x3,0x3
0691 0a01 | | Execute_Immediate Plus,0x1
0692 c603 | | Store 0x3,0x3
0693 00da | | Load_Top At_Offset_2
0694 e603 | | Load 0x3,0x3
0695 e602 | | Load 0x3,0x2
0696 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0697 01d5 | | Execute Vector,Field_Reference
0698 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0699 00da | | Load_Top At_Offset_2
069a 821d | | Call 0x1,0x1d
069b e603 | | Load 0x3,0x3
069c e602 | | Load 0x3,0x2
069d 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
069e 01d5 | | Execute Vector,Field_Reference
069f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
06a0 4800 |H | Short_Literal 0x0
06a1 e603 | | Load 0x3,0x3
06a2 e602 | | Load 0x3,0x2
06a3 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
06a4 01d5 | | Execute Vector,Field_Reference
06a5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
06a6 e403 | | Load 0x2,0x3
06a7 e001 | | Load 0x0,0x1
06a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06a9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
06aa c403 | | Store 0x2,0x3
06ab 00c9 | | Action Pop_Auxiliary_Loop
06ac e403 | | Load 0x2,0x3
06ad e001 | | Load 0x0,0x1
06ae 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06af 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06b0 6fa7 |o | Jump_Zero 0x658
06b1 00ce | | Action Pop_Auxiliary
06b2 00db | | Load_Top At_Offset_3
06b3 0c01 | | Execute_Immediate Greater_Equal,0x1
06b4 6801 |h | Jump_Zero 0x6b6
06b5 8606 | | Call 0x3,0x6
06b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06b7 0000 | | .XXX[0x1]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06d1 | | .CONST 0x06d1 ; Address of begin
06b9 0004 | | .CONST 0x0004 ; Address of exception handler
06ba 0005 | | .CONST 0x0005 ; Number of locals
06bb INIT_06b8:
06bb e5fc | | Load 0x2,-0x4
06bc 00d8 | | Load_Top At_Offset_0
06bd 4801 |H | Short_Literal 0x1
06be e5fd | | Load 0x2,-0x3
06bf e003 | | Load 0x0,0x3
06c0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06c1 821c | | Call 0x1,0x1c
06c2 00d8 | | Load_Top At_Offset_0
06c3 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
06c5 01cc | | Execute Vector,Catenate
06c6 e5fd | | Load 0x2,-0x3
06c7 e003 | | Load 0x0,0x3
06c8 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
06c9 01cc | | Execute Vector,Catenate
06ca 0007 | | Action Break_Optional
06cb e5ff | | Load 0x2,-0x1
06cc e003 | | Load 0x0,0x3
06cd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06ce e5fe | | Load 0x2,-0x2
06cf e003 | | Load 0x0,0x3
06d0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06d1 BODY_06b8:
06d1 e5fd | | Load 0x2,-0x3
06d2 e003 | | Load 0x0,0x3
06d3 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
06d4 6842 |hB | Jump_Zero 0x717
06d5 00ea | | Load_Encached Null_String_Cache
06d6 4801 |H | Short_Literal 0x1
06d7 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
06d9 4801 |H | Short_Literal 0x1
06da e604 | | Load 0x3,0x4
06db 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
06dd 01cc | | Execute Vector,Catenate
06de e603 | | Load 0x3,0x3
06df 01cc | | Execute Vector,Catenate
06e0 0092 0833 | 3| Action Push_String_Extended,0x833 ; "_secondary_@_spec"
06e2 01cc | | Execute Vector,Catenate
06e3 e604 | | Load 0x3,0x4
06e4 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
06e6 01cc | | Execute Vector,Catenate
06e7 e603 | | Load 0x3,0x3
06e8 01cc | | Execute Vector,Catenate
06e9 0092 0834 | 4| Action Push_String_Extended,0x834 ; "'spec.<secondary_@>"
06eb 01cc | | Execute Vector,Catenate
06ec e00f | | Load 0x0,0xf
06ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ee 00ea | | Load_Encached Null_String_Cache
06ef 4801 |H | Short_Literal 0x1
06f0 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
06f2 4801 |H | Short_Literal 0x1
06f3 e605 | | Load 0x3,0x5
06f4 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
06f6 01cc | | Execute Vector,Catenate
06f7 e603 | | Load 0x3,0x3
06f8 01cc | | Execute Vector,Catenate
06f9 0092 0833 | 3| Action Push_String_Extended,0x833 ; "_secondary_@_spec"
06fb 01cc | | Execute Vector,Catenate
06fc e604 | | Load 0x3,0x4
06fd 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
06ff 01cc | | Execute Vector,Catenate
0700 e603 | | Load 0x3,0x3
0701 01cc | | Execute Vector,Catenate
0702 0092 0833 | 3| Action Push_String_Extended,0x833 ; "_secondary_@_spec"
0704 01cc | | Execute Vector,Catenate
0705 e00f | | Load 0x0,0xf
0706 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0707 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
0709 0092 0835 | 5| Action Push_String_Extended,0x835 ; "<DIRECTORIES>"
070b 00db | | Load_Top At_Offset_3
070c 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
070e 01cc | | Execute Vector,Catenate
070f e603 | | Load 0x3,0x3
0710 01cc | | Execute Vector,Catenate
0711 0092 0833 | 3| Action Push_String_Extended,0x833 ; "_secondary_@_spec"
0713 01cc | | Execute Vector,Catenate
0714 e00f | | Load 0x0,0xf
0715 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0716 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0717 00ea | | Load_Encached Null_String_Cache
0718 4801 |H | Short_Literal 0x1
0719 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
071b 4801 |H | Short_Literal 0x1
071c e604 | | Load 0x3,0x4
071d 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
071f 01cc | | Execute Vector,Catenate
0720 e603 | | Load 0x3,0x3
0721 01cc | | Execute Vector,Catenate
0722 0092 0836 | 6| Action Push_String_Extended,0x836 ; "_secondary_@_body"
0724 01cc | | Execute Vector,Catenate
0725 e604 | | Load 0x3,0x4
0726 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
0728 01cc | | Execute Vector,Catenate
0729 e603 | | Load 0x3,0x3
072a 01cc | | Execute Vector,Catenate
072b 0092 0837 | 7| Action Push_String_Extended,0x837 ; "'body.<secondary_@>"
072d 01cc | | Execute Vector,Catenate
072e e00f | | Load 0x0,0xf
072f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0730 00ea | | Load_Encached Null_String_Cache
0731 4801 |H | Short_Literal 0x1
0732 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
0734 4801 |H | Short_Literal 0x1
0735 e605 | | Load 0x3,0x5
0736 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
0738 01cc | | Execute Vector,Catenate
0739 e603 | | Load 0x3,0x3
073a 01cc | | Execute Vector,Catenate
073b 0092 0836 | 6| Action Push_String_Extended,0x836 ; "_secondary_@_body"
073d 01cc | | Execute Vector,Catenate
073e e604 | | Load 0x3,0x4
073f 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
0741 01cc | | Execute Vector,Catenate
0742 e603 | | Load 0x3,0x3
0743 01cc | | Execute Vector,Catenate
0744 0092 0836 | 6| Action Push_String_Extended,0x836 ; "_secondary_@_body"
0746 01cc | | Execute Vector,Catenate
0747 e00f | | Load 0x0,0xf
0748 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0749 0092 0832 | 2| Action Push_String_Extended,0x832 ; "<QUIET>"
074b 0092 0835 | 5| Action Push_String_Extended,0x835 ; "<DIRECTORIES>"
074d 00db | | Load_Top At_Offset_3
074e 0092 0831 | 1| Action Push_String_Extended,0x831 ; "."
0750 01cc | | Execute Vector,Catenate
0751 e603 | | Load 0x3,0x3
0752 01cc | | Execute Vector,Catenate
0753 0092 0836 | 6| Action Push_String_Extended,0x836 ; "_secondary_@_body"
0755 01cc | | Execute Vector,Catenate
0756 e00f | | Load 0x0,0xf
0757 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0758 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0759 0000 0000 | | .BLANK 0000[0x7]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0775 | u | .CONST 0x0775 ; Address of begin
0761 0004 | | .CONST 0x0004 ; Address of exception handler
0762 0002 | | .CONST 0x0002 ; Number of locals
0763 INIT_0760:
0763 e5fe | | Load 0x2,-0x2
0764 4801 |H | Short_Literal 0x1
0765 e5ff | | Load 0x2,-0x1
0766 e003 | | Load 0x0,0x3
0767 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0768 e003 | | Load 0x0,0x3
0769 1817 | | Execute Package,Field_Execute,Field_Number 0x17
076a 0092 0838 | 8| Action Push_String_Extended,0x838 ; ".@'c(ada).<secondary_"
076c 01cc | | Execute Vector,Catenate
076d e5ff | | Load 0x2,-0x1
076e e003 | | Load 0x0,0x3
076f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0770 01cc | | Execute Vector,Catenate
0771 0092 0839 | 9| Action Push_String_Extended,0x839 ; ">"
0773 01cc | | Execute Vector,Catenate
0774 0007 | | Action Break_Optional
0775 BODY_0760:
0775 00d8 | | Load_Top At_Offset_0
0776 8220 | | Call 0x1,0x20
0777 c402 | | Store 0x2,0x2
0778 e402 | | Load 0x2,0x2
0779 e001 | | Load 0x0,0x1
077a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
077b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
077c 7022 |p" | Jump_Nonzero 0x79f
077d e402 | | Load 0x2,0x2
077e e001 | | Load 0x0,0x1
077f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0780 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0781 701d |p | Jump_Nonzero 0x79f
0782 e5fe | | Load 0x2,-0x2
0783 4801 |H | Short_Literal 0x1
0784 e402 | | Load 0x2,0x2
0785 e003 | | Load 0x0,0x3
0786 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0787 c403 | | Store 0x2,0x3
0788 e006 | | Load 0x0,0x6
0789 1b0d | | Execute Package,Field_Read,Field_Number 0xd
078a 00e2 | | Load_Encached Integer_Cache
078b 00e1 | | Load_Encached Boolean_Cache
078c e5fd | | Load 0x2,-0x3
078d 0120 | | Execute Any,Is_Value
078e 6803 |h | Jump_Zero 0x792
078f e001 | | Load 0x0,0x1
0790 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0791 7801 |x | Jump 0x793
0792 e5fd | | Load 0x2,-0x3
0793 e5fe | | Load 0x2,-0x2
0794 e403 | | Load 0x2,0x3
0795 e008 | | Load 0x0,0x8
0796 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0797 c5fd | | Store 0x2,-0x3
0798 c406 | | Store 0x2,0x6
0799 c405 | | Store 0x2,0x5
079a c404 | | Store 0x2,0x4
079b e406 | | Load 0x2,0x6
079c a5fc | | Store_Unchecked 0x2,-0x4
079d 00cc | | Action Pop_Block
079e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
079f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a8 | | .CONST 0x07a8 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0002 | | .CONST 0x0002 ; Number of locals
07a3 INIT_07a0:
07a3 e603 | | Load 0x3,0x3
07a4 e210 | | Load 0x1,0x10
07a5 1c08 | | Execute_Immediate Run_Utility,0x8
07a6 00d8 | | Load_Top At_Offset_0
07a7 1c00 | | Execute_Immediate Run_Utility,0x0
07a8 BODY_07a0:
07a8 4801 |H | Short_Literal 0x1
07a9 e603 | | Load 0x3,0x3
07aa e602 | | Load 0x3,0x2
07ab 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
07ac 01cf | | Execute Vector,Slice_Read
07ad 4801 |H | Short_Literal 0x1
07ae e603 | | Load 0x3,0x3
07af 00db | | Load_Top At_Offset_3
07b0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
07b1 01ce | | Execute Vector,Slice_Write
07b2 00d8 | | Load_Top At_Offset_0
07b3 00cb | | Action Pop_Block_With_Result
07b4 00cb | | Action Pop_Block_With_Result
07b5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07b6 0000 0000 | | .XXX[0x2]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07c0 | | .CONST 0x07c0 ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0002 | | .CONST 0x0002 ; Number of locals
07bb INIT_07b8:
07bb e603 | | Load 0x3,0x3
07bc e210 | | Load 0x1,0x10
07bd 1c08 | | Execute_Immediate Run_Utility,0x8
07be 00d8 | | Load_Top At_Offset_0
07bf 1c00 | | Execute_Immediate Run_Utility,0x0
07c0 BODY_07b8:
07c0 4801 |H | Short_Literal 0x1
07c1 e603 | | Load 0x3,0x3
07c2 e602 | | Load 0x3,0x2
07c3 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
07c4 01cf | | Execute Vector,Slice_Read
07c5 4801 |H | Short_Literal 0x1
07c6 e603 | | Load 0x3,0x3
07c7 00db | | Load_Top At_Offset_3
07c8 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
07c9 01ce | | Execute Vector,Slice_Write
07ca 00d8 | | Load_Top At_Offset_0
07cb 00cb | | Action Pop_Block_With_Result
07cc 00cb | | Action Pop_Block_With_Result
07cd 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
07ce 0000 0000 | | .XXX[0x2]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 4608 |F | Jump_Case 0x9
07d4 7808 |x | Jump 0x7dd ; case 0x0
07d5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
07d6 780d |x | Jump 0x7e4 ; case 0x2
07d7 780c |x | Jump 0x7e4 ; case 0x3
07d8 780b |x | Jump 0x7e4 ; case 0x4
07d9 780a |x | Jump 0x7e4 ; case 0x5
07da 7809 |x | Jump 0x7e4 ; case 0x6
07db 7808 |x | Jump 0x7e4 ; case 0x7
07dc 7807 |x | Jump 0x7e4 ; case 0x8
07dd 00da | | Load_Top At_Offset_2
07de 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
07df 0125 | % | Execute Any,Set_Constraint
07e0 00da | | Load_Top At_Offset_2
07e1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
07e2 1c00 | | Execute_Immediate Run_Utility,0x0
07e3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07e4 0869 | i | Execute_Immediate Raise,0x69
07e5 0000 0000 | | .XXX[0x3]
07e7 0000 | |
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07eb | | .CONST 0x07eb ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0001 | | .CONST 0x0001 ; Number of locals
07eb BODY_07e8:
07eb INIT_07e8:
07eb 4608 |F | Jump_Case 0x9
07ec 7808 |x | Jump 0x7f5 ; case 0x0
07ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
07ee 781d |x | Jump 0x80c ; case 0x2
07ef 781c |x | Jump 0x80c ; case 0x3
07f0 781b |x | Jump 0x80c ; case 0x4
07f1 781a |x | Jump 0x80c ; case 0x5
07f2 7819 |x | Jump 0x80c ; case 0x6
07f3 7805 |x | Jump 0x7f9 ; case 0x7
07f4 780d |x | Jump 0x802 ; case 0x8
07f5 00da | | Load_Top At_Offset_2
07f6 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
07f7 1c00 | | Execute_Immediate Run_Utility,0x0
07f8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07f9 00db | | Load_Top At_Offset_3
07fa 4801 |H | Short_Literal 0x1
07fb e5fe | | Load 0x2,-0x2
07fc e20f | | Load 0x1,0xf
07fd 035b | [ | Declare_Type Array,Constrained
07fe 4801 |H | Short_Literal 0x1
07ff e5ff | | Load 0x2,-0x1
0800 031b | | Declare_Type Variant_Record,Constrained
0801 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0802 00db | | Load_Top At_Offset_3
0803 00db | | Load_Top At_Offset_3
0804 02fc | | Declare_Variable Variant_Record,With_Constraint
0805 4801 |H | Short_Literal 0x1
0806 e5fe | | Load 0x2,-0x2
0807 e20f | | Load 0x1,0xf
0808 0334 | 4 | Declare_Variable Array,With_Constraint
0809 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
080a 016a | j | QQ_execute Variant_Record,XXX
080b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
080c 0869 | i | Execute_Immediate Raise,0x69
080d 0000 0000 | | .XXX[0x3]
080f 0000 | |
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813 | | .CONST 0x0813 ; Address of begin
0811 0004 | | .CONST 0x0004 ; Address of exception handler
0812 0001 | | .CONST 0x0001 ; Number of locals
0813 BODY_0810:
0813 INIT_0810:
0813 4608 |F | Jump_Case 0x9
0814 7808 |x | Jump 0x81d ; case 0x0
0815 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0816 7813 |x | Jump 0x82a ; case 0x2
0817 7812 |x | Jump 0x82a ; case 0x3
0818 7811 |x | Jump 0x82a ; case 0x4
0819 7810 |x | Jump 0x82a ; case 0x5
081a 780f |x | Jump 0x82a ; case 0x6
081b 780e |x | Jump 0x82a ; case 0x7
081c 780d |x | Jump 0x82a ; case 0x8
081d 00da | | Load_Top At_Offset_2
081e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
081f 0125 | % | Execute Any,Set_Constraint
0820 00da | | Load_Top At_Offset_2
0821 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0822 1c00 | | Execute_Immediate Run_Utility,0x0
0823 00da | | Load_Top At_Offset_2
0824 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0825 0125 | % | Execute Any,Set_Constraint
0826 00da | | Load_Top At_Offset_2
0827 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0828 1c00 | | Execute_Immediate Run_Utility,0x0
0829 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
082a 0869 | i | Execute_Immediate Raise,0x69
082b ; --------------------------------------------------------------------------------------
082b ; STRING TABLE
082b ; --------------------------------------------------------------------------------------
082b 0020 | | .STRTAB 0x0020->0x083b ; ".state.cmvc_database"
082c 0032 | 2 | .STRTAB 0x0032->0x0845 ; ".units.??'c(~library)"
082d 0045 | E | .STRTAB 0x0045->0x084f ; ".units"
082e 0049 | I | .STRTAB 0x0049->0x0852 ; "<ALL_WORLDS>"
082f 0053 | S | .STRTAB 0x0053->0x0858 ; "<WORLDS>"
0830 0059 | Y | .STRTAB 0x0059->0x085c ; ".units.??'c(ada)'if(controlled)"
0831 0076 | v | .STRTAB 0x0076->0x086c ; "."
0832 0075 | u | .STRTAB 0x0075->0x086c ; "<QUIET>"
0833 007a | z | .STRTAB 0x007a->0x0870 ; "_secondary_@_spec"
0834 0089 | | .STRTAB 0x0089->0x0878 ; "'spec.<secondary_@>"
0835 009a | | .STRTAB 0x009a->0x0882 ; "<DIRECTORIES>"
0836 00a5 | | .STRTAB 0x00a5->0x0888 ; "_secondary_@_body"
0837 00b4 | | .STRTAB 0x00b4->0x0891 ; "'body.<secondary_@>"
0838 00c5 | | .STRTAB 0x00c5->0x089a ; ".@'c(ada).<secondary_"
0839 00d8 | | .STRTAB 0x00d8->0x08a5 ; ">"
083a 00d7 | | .STREND 0x00d7->0x08a5
083b 2e73 7461 |.sta| .STRTAB_STRINGS
08a6 0000 0000 | | .XXX[0x2]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; Debug Table
08a8 ; --------------------------------------------------------------------------------------
08a8 0004 000d | | .DEBUG4 0x0004,0x000d,0x4e73,0x0000,0x0001,0x0000
08ae 0000 0000 | | .XXX[0xce]
08b0 005b c4da | [ |
08b2 0000 0036 | 6|
08b4 004a 500e | JP |
08b6 0000 0f32 | 2|
08b8 005b c4da | [ |
08ba 0000 0036 | 6|
08bc 004a 500e | JP |
08be 0000 1032 | 2|
08c0 005b c4da | [ |
08c2 0000 0036 | 6|
08c4 004a 500e | JP |
08c6 0000 12b2 | |
08c8 005b c4da | [ |
08ca 0000 0036 | 6|
08cc 004a 500e | JP |
08ce 0000 1432 | 2|
08d0 005b c4da | [ |
08d2 0000 0036 | 6|
08d4 004a 500e | JP |
08d6 0000 16b2 | |
08d8 005b c4da | [ |
08da 0000 0036 | 6|
08dc 004a 500e | JP |
08de 0000 17b2 | |
08e0 005b c4da | [ |
08e2 0000 0036 | 6|
08e4 004a 500e | JP |
08e6 0000 18b2 | |
08e8 005b c4da | [ |
08ea 0000 0036 | 6|
08ec 004a 500e | JP |
08ee 0000 19b2 | |
08f0 005b c4da | [ |
08f2 0000 0036 | 6|
08f4 004a 500e | JP |
08f6 0000 1a32 | 2|
08f8 005b c4da | [ |
08fa 0000 0036 | 6|
08fc 004a 500e | JP |
08fe 0000 1b32 | 2|
0900 005b c4da | [ |
0902 0000 0036 | 6|
0904 004a 500e | JP |
0906 0000 1c32 | 2|
0908 005b c4da | [ |
090a 0000 0036 | 6|
090c 004a 500e | JP |
090e 0000 1d32 | 2|
0910 005b c4da | [ |
0912 0000 0036 | 6|
0914 004a 500e | JP |
0916 0000 1e32 | 2|
0918 005b c4da | [ |
091a 0000 0036 | 6|
091c 004a 500e | JP |
091e 0000 1f32 | 2|
0920 005b c4da | [ |
0922 0000 0036 | 6|
0924 004a 500e | JP |
0926 0000 20b2 | |
0928 005b c4da | [ |
092a 0000 0036 | 6|
092c 004a 500e | JP |
092e 0000 2232 | "2|
0930 005b c4da | [ |
0932 0000 0036 | 6|
0934 004a 500e | JP |
0936 0000 23b2 | # |
0938 005b c4da | [ |
093a 0000 0036 | 6|
093c 004a 500e | JP |
093e 0000 2532 | %2|
0940 005b c4da | [ |
0942 0000 0036 | 6|
0944 004a 500e | JP |
0946 0000 2732 | '2|
0948 005b c4da | [ |
094a 0000 0036 | 6|
094c 004a 500e | JP |
094e 0000 28b2 | ( |
0950 005b c4da | [ |
0952 0000 0036 | 6|
0954 004a 500e | JP |
0956 0000 2ab2 | * |
0958 005b c4da | [ |
095a 0000 0036 | 6|
095c 004a 500e | JP |
095e 0000 2d32 | -2|
0960 005b c4da | [ |
0962 0000 07d8 | |
0964 005b ccda | [ |
0966 0000 0000 | |
0968 0006 f804 | |
096a 0000 0032 | 2|
096c 0006 f804 | |
096e 0000 0720 | |
0970 0006 f804 | |
0972 0000 0032 | 2|
0974 0006 f804 | |
0976 0000 06a0 | |
0978 0001 0404 | |
097a 0800 0888 | |
097c 0000 0000 | | .BLANK 0000[0xa]
0986 0057 26c5 | W& | .XXX[0x2]
0988 0000 0000 | | .BLANK 0000[0x7]
098f 0048 | H | .XXX[0x1]
0990 0000 0000 | | .BLANK 0000[0x8]
0998 005b c4da | [ | .XXX[0x5]
099a 0800 0480 | |
099c 8000 | |
099d 0000 0000 | | .BLANK 0000[0x9]
09a6 0057 26c5 | W& | .XXX[0x2]
09a8 0000 0000 | | .BLANK 0000[0x7]
09af 0054 | T | .XXX[0x1]
09b0 0000 0000 | | .BLANK 0000[0x8]
09b8 005b c4da | [ | .XXX[0x5]
09ba 0800 0600 | |
09bc 8000 | |
09bd 0000 0000 | | .BLANK 0000[0x9]
09c6 0057 26c5 | W& | .XXX[0x2]
09c8 0000 0000 | | .BLANK 0000[0x7]
09cf 0060 | ` | .XXX[0x1]
09d0 0000 0000 | | .BLANK 0000[0x8]
09d8 0001 0404 | | .XXX[0x5]
09da 0000 0280 | |
09dc 8000 | |
09dd 0000 0000 | | .BLANK 0000[0x9]
09e6 0057 26c5 | W& | .XXX[0x2]
09e8 0000 0000 | | .BLANK 0000[0x7]
09ef 006c | l | .XXX[0x1]
09f0 0000 0000 | | .BLANK 0000[0x8]
09f8 0001 0404 | | .XXX[0x8]
09fa 0000 0700 | |
09fc 8000 0000 | |
09fe 0000 0000 | |