|
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: 19456 (0x4c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 24a8 |$ | .CONST 0x24a8 ; 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 8017 | | .CONST 0x8017 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0418 | | .CONST 0x0418 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 00c7 | | .CONST 0x00c7 ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 0129 | ) | Execute Any,Make_Visible
000e e002 | | Load 0x0,0x2
000f 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0010 0129 | ) | Execute Any,Make_Visible
0011 e002 | | Load 0x0,0x2
0012 190f | | Execute Package,Field_Reference,Field_Number 0xf
0013 0129 | ) | Execute Any,Make_Visible
0014 e002 | | Load 0x0,0x2
0015 190e | | Execute Package,Field_Reference,Field_Number 0xe
0016 0129 | ) | Execute Any,Make_Visible
0017 e002 | | Load 0x0,0x2
0018 191a | | Execute Package,Field_Reference,Field_Number 0x1a
0019 0129 | ) | Execute Any,Make_Visible
001a e001 | | Load 0x0,0x1
001b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
001c 0129 | ) | Execute Any,Make_Visible
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 00c4 | | Action Make_Default
0040 00c4 | | Action Make_Default
0041 00c4 | | Action Make_Default
0042 00c4 | | Action Make_Default
0043 00c4 | | Action Make_Default
0044 00c4 | | Action Make_Default
0045 00c4 | | Action Make_Default
0046 00c4 | | Action Make_Default
0047 00c4 | | Action Make_Default
0048 00c4 | | Action Make_Default
0049 00c4 | | Action Make_Default
004a 00c4 | | Action Make_Default
004b 00c4 | | Action Make_Default
004c 00c4 | | Action Make_Default
004d 00c4 | | Action Make_Default
004e 00c4 | | Action Make_Default
004f 00c4 | | Action Make_Default
0050 00c4 | | Action Make_Default
0051 00c4 | | Action Make_Default
0052 00c4 | | Action Make_Default
0053 00c4 | | Action Make_Default
0054 00c4 | | Action Make_Default
0055 00c4 | | Action Make_Default
0056 00c4 | | Action Make_Default
0057 00c4 | | Action Make_Default
0058 00c4 | | Action Make_Default
0059 00c4 | | Action Make_Default
005a 00c4 | | Action Make_Default
005b 00c4 | | Action Make_Default
005c 00c4 | | Action Make_Default
005d 00c4 | | Action Make_Default
005e 00c4 | | Action Make_Default
005f 00c4 | | Action Make_Default
0060 00c4 | | Action Make_Default
0061 00c4 | | Action Make_Default
0062 00c4 | | Action Make_Default
0063 00c4 | | Action Make_Default
0064 00c4 | | Action Make_Default
0065 00c4 | | Action Make_Default
0066 00c4 | | Action Make_Default
0067 00c4 | | Action Make_Default
0068 00c4 | | Action Make_Default
0069 00c4 | | Action Make_Default
006a 00c4 | | Action Make_Default
006b 00c4 | | Action Make_Default
006c 00c4 | | Action Make_Default
006d 00c4 | | Action Make_Default
006e 00c4 | | Action Make_Default
006f 00c4 | | Action Make_Default
0070 00c4 | | Action Make_Default
0071 00c4 | | Action Make_Default
0072 00c4 | | Action Make_Default
0073 00c4 | | Action Make_Default
0074 00c4 | | Action Make_Default
0075 00c4 | | Action Make_Default
0076 00c4 | | Action Make_Default
0077 00c4 | | Action Make_Default
0078 00c4 | | Action Make_Default
0079 00c4 | | Action Make_Default
007a 00c4 | | Action Make_Default
007b 00c4 | | Action Make_Default
007c 00c4 | | Action Make_Default
007d 00c4 | | Action Make_Default
007e 00c4 | | Action Make_Default
007f 00c4 | | Action Make_Default
0080 00c4 | | Action Make_Default
0081 00c4 | | Action Make_Default
0082 00c4 | | Action Make_Default
0083 00c4 | | Action Make_Default
0084 00c4 | | Action Make_Default
0085 00c4 | | Action Make_Default
0086 00c4 | | Action Make_Default
0087 00c4 | | Action Make_Default
0088 00c4 | | Action Make_Default
0089 00c4 | | Action Make_Default
008a 00c4 | | Action Make_Default
008b 4805 |H | Short_Literal 0x5
008c 480a |H | Short_Literal 0xa
008d e212 | | Load 0x1,0x12
008e 03f9 | | Declare_Type Discrete,Constrained,Visible
008f c277 | w | Store 0x1,0x77
0090 4801 |H | Short_Literal 0x1
0091 4805 |H | Short_Literal 0x5
0092 e212 | | Load 0x1,0x12
0093 03f9 | | Declare_Type Discrete,Constrained,Visible
0094 c213 | | Store 0x1,0x13
0095 4807 |H | Short_Literal 0x7
0096 480a |H | Short_Literal 0xa
0097 e212 | | Load 0x1,0x12
0098 03f9 | | Declare_Type Discrete,Constrained,Visible
0099 c253 | S | Store 0x1,0x53
009a e003 | | Load 0x0,0x3
009b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
009c 0129 | ) | Execute Any,Make_Visible
009d c247 | G | Store 0x1,0x47
009e e003 | | Load 0x0,0x3
009f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00a0 0129 | ) | Execute Any,Make_Visible
00a1 c265 | e | Store 0x1,0x65
00a2 4802 |H | Short_Literal 0x2
00a3 032b | + | Declare_Type Record,Incomplete,Visible
00a4 c266 | f | Store 0x1,0x66
00a5 00c4 | | Action Make_Default
00a6 00d1 | | Pop_Control Pop_Count_1
00a7 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated
00a9 c268 | h | Store 0x1,0x68
00aa 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated
00ac c269 | i | Store 0x1,0x69
00ad 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated
00af c26a | j | Store 0x1,0x6a
00b0 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated
00b2 c26b | k | Store 0x1,0x6b
00b3 4818 |H | Short_Literal 0x18
00b4 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected
00b5 c215 | | Store 0x1,0x15
00b6 00c4 | | Action Make_Default
00b7 00d1 | | Pop_Control Pop_Count_1
00b8 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated
00ba c255 | U | Store 0x1,0x55
00bb 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated
00bd c26c | l | Store 0x1,0x6c
00be 029a 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Visible,Unelaborated
00c0 c26d | m | Store 0x1,0x6d
00c1 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated
00c3 c26e | n | Store 0x1,0x6e
00c4 480a |H | Short_Literal 0xa
00c5 032b | + | Declare_Type Record,Incomplete,Visible
00c6 c216 | | Store 0x1,0x16
00c7 00c4 | | Action Make_Default
00c8 00d1 | | Pop_Control Pop_Count_1
00c9 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated
00cb c21a | | Store 0x1,0x1a
00cc 00e4 | | Load_Encached Positive_Cache
00cd 0129 | ) | Execute Any,Make_Visible
00ce c21b | | Store 0x1,0x1b
00cf e21b | | Load 0x1,0x1b
00d0 0266 | f | Execute Discrete,Bounds
00d1 e216 | | Load 0x1,0x16
00d2 029f 0603 | | Declare_Subprogram INIT_0600,For_Call
00d4 4801 |H | Short_Literal 0x1
00d5 0349 | I | Declare_Type Array,Defined_Incomplete,Visible,Bounds_With_Object
00d6 c21c | | Store 0x1,0x1c
00d7 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated
00d9 c21d | | Store 0x1,0x1d
00da 029a 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call,Visible,Unelaborated
00dc c21e | | Store 0x1,0x1e
00dd 00e3 | | Load_Encached Natural_Cache
00de 0129 | ) | Execute Any,Make_Visible
00df c220 | | Store 0x1,0x20
00e0 00e9 | | Load_Encached String_Cache
00e1 0129 | ) | Execute Any,Make_Visible
00e2 c257 | W | Store 0x1,0x57
00e3 0092 1f4c | L| Action Push_String_Extended,0x1f4c ; "<UNDEFINED_ID>"
00e5 0129 | ) | Execute Any,Make_Visible
00e6 c26f | o | Store 0x1,0x6f
00e7 e002 | | Load 0x0,0x2
00e8 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00e9 0129 | ) | Execute Any,Make_Visible
00ea c278 | x | Store 0x1,0x78
00eb 029c 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible
00ed c279 | y | Store 0x1,0x79
00ee 029c 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible
00f0 c27a | z | Store 0x1,0x7a
00f1 029c 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible
00f3 c27b | { | Store 0x1,0x7b
00f4 029c 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible
00f6 c27c | | | Store 0x1,0x7c
00f7 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated
00f9 c27d | } | Store 0x1,0x7d
00fa 029a 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Visible,Unelaborated
00fc c270 | p | Store 0x1,0x70
00fd 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated
00ff c271 | q | Store 0x1,0x71
0100 029a 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call,Visible,Unelaborated
0102 c272 | r | Store 0x1,0x72
0103 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated
0105 c256 | V | Store 0x1,0x56
0106 029a 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call,Visible,Unelaborated
0108 c226 | & | Store 0x1,0x26
0109 029a 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call,Visible,Unelaborated
010b c227 | ' | Store 0x1,0x27
010c 029a 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Visible,Unelaborated
010e c275 | u | Store 0x1,0x75
010f 029a 078b | | Declare_Subprogram INIT_0788,For_Outer_Call,Visible,Unelaborated
0111 c22a | * | Store 0x1,0x2a
0112 029a 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call,Visible,Unelaborated
0114 c22b | + | Store 0x1,0x2b
0115 4800 |H | Short_Literal 0x0
0116 4801 |H | Short_Literal 0x1
0117 029f 07cb | | Declare_Subprogram INIT_07c8,For_Call
0119 03fe | | Declare_Type Discrete,Defined,Visible
011a c22c | , | Store 0x1,0x2c
011b 4800 |H | Short_Literal 0x0
011c 4801 |H | Short_Literal 0x1
011d 029f 07f3 | | Declare_Subprogram INIT_07f0,For_Call
011f 03fe | | Declare_Type Discrete,Defined,Visible
0120 c22d | - | Store 0x1,0x2d
0121 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated
0123 c22e | . | Store 0x1,0x2e
0124 029a 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call,Visible,Unelaborated
0126 c27e | ~ | Store 0x1,0x7e
0127 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated
0129 c27f | | Store 0x1,0x7f
012a 029a 089b | | Declare_Subprogram INIT_0898,For_Outer_Call,Visible,Unelaborated
012c c25b | [ | Store 0x1,0x5b
012d 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated
012f c230 | 0 | Store 0x1,0x30
0130 029a 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call,Visible,Unelaborated
0132 c231 | 1 | Store 0x1,0x31
0133 029a 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call,Visible,Unelaborated
0135 c280 | | Store 0x1,0x80
0136 029a 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call,Visible,Unelaborated
0138 c232 | 2 | Store 0x1,0x32
0139 029a 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call,Visible,Unelaborated
013b c234 | 4 | Store 0x1,0x34
013c 029a 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call,Visible,Unelaborated
013e c235 | 5 | Store 0x1,0x35
013f 029a 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call,Visible,Unelaborated
0141 c236 | 6 | Store 0x1,0x36
0142 029a 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call,Visible,Unelaborated
0144 c25c | \ | Store 0x1,0x5c
0145 029a 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call,Visible,Unelaborated
0147 c238 | 8 | Store 0x1,0x38
0148 029a 09fb | | Declare_Subprogram INIT_09f8,For_Outer_Call,Visible,Unelaborated
014a c25d | ] | Store 0x1,0x5d
014b 029a 0a0b | | Declare_Subprogram INIT_0a08,For_Outer_Call,Visible,Unelaborated
014d c23a | : | Store 0x1,0x3a
014e 029a 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call,Visible,Unelaborated
0150 c274 | t | Store 0x1,0x74
0151 029a 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call,Visible,Unelaborated
0153 c23b | ; | Store 0x1,0x3b
0154 029a 0abb | | Declare_Subprogram INIT_0ab8,For_Outer_Call,Visible,Unelaborated
0156 c264 | d | Store 0x1,0x64
0157 029a 0aeb | | Declare_Subprogram INIT_0ae8,For_Outer_Call,Visible,Unelaborated
0159 c23c | < | Store 0x1,0x3c
015a 029a 0b03 | | Declare_Subprogram INIT_0b00,For_Outer_Call,Visible,Unelaborated
015c c23d | = | Store 0x1,0x3d
015d 029a 0b2b | +| Declare_Subprogram INIT_0b28,For_Outer_Call,Visible,Unelaborated
015f c240 | @ | Store 0x1,0x40
0160 029a 0bd3 | | Declare_Subprogram INIT_0bd0,For_Outer_Call,Visible,Unelaborated
0162 c241 | A | Store 0x1,0x41
0163 029a 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call,Visible,Unelaborated
0165 c242 | B | Store 0x1,0x42
0166 029a 0cdb | | Declare_Subprogram INIT_0cd8,For_Outer_Call,Visible,Unelaborated
0168 c245 | E | Store 0x1,0x45
0169 4801 |H | Short_Literal 0x1
016a 480b |H | Short_Literal 0xb
016b e20e | | Load 0x1,0xe
016c 029f 0d2b | +| Declare_Subprogram INIT_0d28,For_Call
016e 4801 |H | Short_Literal 0x1
016f 035e | ^ | Declare_Type Array,Defined,Visible
0170 c246 | F | Store 0x1,0x46
0171 029a 0d43 | C| Declare_Subprogram INIT_0d40,For_Outer_Call,Visible,Unelaborated
0173 c248 | H | Store 0x1,0x48
0174 029a 0d53 | S| Declare_Subprogram INIT_0d50,For_Outer_Call,Visible,Unelaborated
0176 c249 | I | Store 0x1,0x49
0177 029a 0dd3 | | Declare_Subprogram INIT_0dd0,For_Outer_Call,Visible,Unelaborated
0179 c24a | J | Store 0x1,0x4a
017a 029a 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call,Visible,Unelaborated
017c c276 | v | Store 0x1,0x76
017d 029a 0ea3 | | Declare_Subprogram INIT_0ea0,For_Outer_Call,Visible,Unelaborated
017f c260 | ` | Store 0x1,0x60
0180 029a 0f2b | +| Declare_Subprogram INIT_0f28,For_Outer_Call,Visible,Unelaborated
0182 c24b | K | Store 0x1,0x4b
0183 480a |H | Short_Literal 0xa
0184 032a | * | Declare_Type Record,Incomplete
0185 c273 | s | Store 0x1,0x73
0186 e273 | s | Load 0x1,0x73
0187 02a0 | | Declare_Subprogram Null_Subprogram
0188 e215 | | Load 0x1,0x15
0189 03c7 | | Complete_Type Access,By_Defining
018a e215 | | Load 0x1,0x15
018b 0129 | ) | Execute Any,Make_Visible
018c c254 | T | Store 0x1,0x54
018d 00e5 | | Load_Encached Long_Integer_Cache
018e c261 | a | Store 0x1,0x61
018f e001 | | Load 0x0,0x1
0190 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0191 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0192 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0193 e20d | | Load 0x1,0xd
0194 e261 | a | Load 0x1,0x61
0195 e212 | | Load 0x1,0x12
0196 e004 | | Load 0x0,0x4
0197 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0198 00e3 | | Load_Encached Natural_Cache
0199 e001 | | Load 0x0,0x1
019a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
019b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
019c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
019d e001 | | Load 0x0,0x1
019e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
019f 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
01a0 e004 | | Load 0x0,0x4
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 00e1 | | Load_Encached Boolean_Cache
01a3 029f 1ee3 | | Declare_Subprogram INIT_1ee0,For_Call
01a5 e216 | | Load 0x1,0x16
01a6 0326 | & | Complete_Type Record,By_Defining
01a7 e21c | | Load 0x1,0x1c
01a8 0340 | @ | Complete_Type Array,By_Component_Completion
01a9 e216 | | Load 0x1,0x16
01aa 0322 | " | Declare_Variable Record
01ab e001 | | Load 0x0,0x1
01ac 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01ad 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01ae 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01af e216 | | Load 0x1,0x16
01b0 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
01b1 0119 | | Execute Any,Check_In_Formal_Type
01b2 00d9 | | Load_Top At_Offset_1
01b3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01b4 e210 | | Load 0x1,0x10
01b5 e216 | | Load 0x1,0x16
01b6 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
01b7 0119 | | Execute Any,Check_In_Formal_Type
01b8 00d9 | | Load_Top At_Offset_1
01b9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01ba 6275 |bu | Indirect_Literal Discrete,0x430,{0x80000000, 0x00000000}
01bb 00d9 | | Load_Top At_Offset_1
01bc 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01bd 480b |H | Short_Literal 0xb
01be 00d9 | | Load_Top At_Offset_1
01bf 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01c0 e004 | | Load 0x0,0x4
01c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c2 00d9 | | Load_Top At_Offset_1
01c3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01c4 4800 |H | Short_Literal 0x0
01c5 00d9 | | Load_Top At_Offset_1
01c6 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01c7 e001 | | Load 0x0,0x1
01c8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01c9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01ca 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01cb e216 | | Load 0x1,0x16
01cc 3006 |0 | Execute Record,Field_Type,Field_Number 0x6
01cd 0119 | | Execute Any,Check_In_Formal_Type
01ce 00d9 | | Load_Top At_Offset_1
01cf 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01d0 e001 | | Load 0x0,0x1
01d1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01d2 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
01d3 00d9 | | Load_Top At_Offset_1
01d4 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
01d5 e004 | | Load 0x0,0x4
01d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d7 00d9 | | Load_Top At_Offset_1
01d8 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
01d9 4801 |H | Short_Literal 0x1
01da 00d9 | | Load_Top At_Offset_1
01db 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01dc 0129 | ) | Execute Any,Make_Visible
01dd c219 | | Store 0x1,0x19
01de e216 | | Load 0x1,0x16
01df e247 | G | Load 0x1,0x47
01e0 029f 1f33 | 3| Declare_Subprogram INIT_1f30,For_Call
01e2 e266 | f | Load 0x1,0x66
01e3 0326 | & | Complete_Type Record,By_Defining
01e4 e266 | f | Load 0x1,0x66
01e5 0322 | " | Declare_Variable Record
01e6 e219 | | Load 0x1,0x19
01e7 00d9 | | Load_Top At_Offset_1
01e8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e9 e003 | | Load 0x0,0x3
01ea 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
01eb e266 | f | Load 0x1,0x66
01ec 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
01ed 0119 | | Execute Any,Check_In_Formal_Type
01ee 00d9 | | Load_Top At_Offset_1
01ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01f0 0129 | ) | Execute Any,Make_Visible
01f1 c267 | g | Store 0x1,0x67
01f2 00bf | | Action Accept_Activation
01f3 e005 | | Load 0x0,0x5
01f4 e006 | | Load 0x0,0x6
01f5 4864 |Hd | Short_Literal 0x64
01f6 e007 | | Load 0x0,0x7
01f7 0387 | | Declare_Variable Package
01f8 00d8 | | Load_Top At_Offset_0
01f9 020f | | Execute Module,Activate
01fa 00d8 | | Load_Top At_Offset_0
01fb 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01fc e246 | F | Load 0x1,0x46
01fd 0337 | 7 | Declare_Variable Array
01fe 00d8 | | Load_Top At_Offset_0
01ff 0335 | 5 | Declare_Variable Array,Duplicate
0200 00cd | | Action Spare6_Action
0201 480b |H | Short_Literal 0xb
0202 4801 |H | Short_Literal 0x1
0203 e211 | | Load 0x1,0x11
0204 e002 | | Load 0x0,0x2
0205 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0206 0119 | | Execute Any,Check_In_Formal_Type
0207 00d9 | | Load_Top At_Offset_1
0208 e284 | | Load 0x1,0x84
0209 01d6 | | Execute Vector,Field_Write
020a 3ff8 |? | Loop_Increasing 0x203
020b 00d9 | | Load_Top At_Offset_1
020c 01d4 | | Execute Vector,Structure_Write
020d e008 | | Load 0x0,0x8
020e 191c | | Execute Package,Field_Reference,Field_Number 0x1c
020f 0007 | | Action Break_Optional
0210 e008 | | Load 0x0,0x8
0211 191d | | Execute Package,Field_Reference,Field_Number 0x1d
0212 0007 | | Action Break_Optional
0213 e008 | | Load 0x0,0x8
0214 191d | | Execute Package,Field_Reference,Field_Number 0x1d
0215 0007 | | Action Break_Optional
0216 e008 | | Load 0x0,0x8
0217 191d | | Execute Package,Field_Reference,Field_Number 0x1d
0218 0007 | | Action Break_Optional
0219 0092 1f4d | M| Action Push_String_Extended,0x1f4d ; "COMPONENTS"
021b e009 | | Load 0x0,0x9
021c e00a | | Load 0x0,0xa
021d e212 | | Load 0x1,0x12
021e 00db | | Load_Top At_Offset_3
021f e00b | | Load 0x0,0xb
0220 0387 | | Declare_Variable Package
0221 00d8 | | Load_Top At_Offset_0
0222 020f | | Execute Module,Activate
0223 00d8 | | Load_Top At_Offset_0
0224 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0225 190f | | Execute Package,Field_Reference,Field_Number 0xf
0226 0007 | | Action Break_Optional
0227 00d9 | | Load_Top At_Offset_1
0228 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0229 1910 | | Execute Package,Field_Reference,Field_Number 0x10
022a 0007 | | Action Break_Optional
022b 029b 0f43 | C| Declare_Subprogram INIT_0f40,For_Outer_Call,Unelaborated
022d e00c | | Load 0x0,0xc
022e e00d | | Load 0x0,0xd
022f 4bfd |K | Short_Literal 0x3fd
0230 e216 | | Load 0x1,0x16
0231 4801 |H | Short_Literal 0x1
0232 e00e | | Load 0x0,0xe
0233 0387 | | Declare_Variable Package
0234 00d8 | | Load_Top At_Offset_0
0235 020f | | Execute Module,Activate
0236 e00f | | Load 0x0,0xf
0237 e010 | | Load 0x0,0x10
0238 4bfd |K | Short_Literal 0x3fd
0239 e20d | | Load 0x1,0xd
023a e216 | | Load 0x1,0x16
023b 1d8c | | Execute_Immediate Reference_Lex_1,0x8c
023c e011 | | Load 0x0,0x11
023d 0387 | | Declare_Variable Package
023e 00d8 | | Load_Top At_Offset_0
023f 020f | | Execute Module,Activate
0240 e21c | | Load 0x1,0x1c
0241 02a0 | | Declare_Subprogram Null_Subprogram
0242 4818 |H | Short_Literal 0x18
0243 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0244 e246 | F | Load 0x1,0x46
0245 e261 | a | Load 0x1,0x61
0246 00db | | Load_Top At_Offset_3
0247 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0248 e266 | f | Load 0x1,0x66
0249 00e1 | | Load_Encached Boolean_Cache
024a e28d | | Load 0x1,0x8d
024b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
024c e20d | | Load 0x1,0xd
024d 00d8 | | Load_Top At_Offset_0
024e e265 | e | Load 0x1,0x65
024f e28f | | Load 0x1,0x8f
0250 029f 0f53 | S| Declare_Subprogram INIT_0f50,For_Call
0252 e273 | s | Load 0x1,0x73
0253 0326 | & | Complete_Type Record,By_Defining
0254 4801 |H | Short_Literal 0x1
0255 480b |H | Short_Literal 0xb
0256 00e1 | | Load_Encached Boolean_Cache
0257 02a0 | | Declare_Subprogram Null_Subprogram
0258 4801 |H | Short_Literal 0x1
0259 035d | ] | Declare_Type Array,Defined
025a 00d8 | | Load_Top At_Offset_0
025b 0337 | 7 | Declare_Variable Array
025c 480b |H | Short_Literal 0xb
025d 4801 |H | Short_Literal 0x1
025e 4800 |H | Short_Literal 0x0
025f 00d9 | | Load_Top At_Offset_1
0260 e291 | | Load 0x1,0x91
0261 01d6 | | Execute Vector,Field_Write
0262 3ffb |? | Loop_Increasing 0x25e
0263 00d9 | | Load_Top At_Offset_1
0264 01c3 | | Execute Vector,Check_In_Type
0265 0007 | | Action Break_Optional
0266 4801 |H | Short_Literal 0x1
0267 480b |H | Short_Literal 0xb
0268 00db | | Load_Top At_Offset_3
0269 02a0 | | Declare_Subprogram Null_Subprogram
026a 4801 |H | Short_Literal 0x1
026b 035d | ] | Declare_Type Array,Defined
026c 00d8 | | Load_Top At_Offset_0
026d 0337 | 7 | Declare_Variable Array
026e 00db | | Load_Top At_Offset_3
026f 0337 | 7 | Declare_Variable Array
0270 4801 |H | Short_Literal 0x1
0271 4803 |H | Short_Literal 0x3
0272 00da | | Load_Top At_Offset_2
0273 01d6 | | Execute Vector,Field_Write
0274 4801 |H | Short_Literal 0x1
0275 4804 |H | Short_Literal 0x4
0276 00da | | Load_Top At_Offset_2
0277 01d6 | | Execute Vector,Field_Write
0278 4801 |H | Short_Literal 0x1
0279 4805 |H | Short_Literal 0x5
027a 00da | | Load_Top At_Offset_2
027b 01d6 | | Execute Vector,Field_Write
027c 4800 |H | Short_Literal 0x0
027d 4801 |H | Short_Literal 0x1
027e 00da | | Load_Top At_Offset_2
027f 01d6 | | Execute Vector,Field_Write
0280 4800 |H | Short_Literal 0x0
0281 4802 |H | Short_Literal 0x2
0282 00da | | Load_Top At_Offset_2
0283 01d6 | | Execute Vector,Field_Write
0284 480b |H | Short_Literal 0xb
0285 4806 |H | Short_Literal 0x6
0286 4800 |H | Short_Literal 0x0
0287 00d9 | | Load_Top At_Offset_1
0288 e294 | | Load 0x1,0x94
0289 01d6 | | Execute Vector,Field_Write
028a 3ffb |? | Loop_Increasing 0x286
028b e290 | | Load 0x1,0x90
028c 0119 | | Execute Any,Check_In_Formal_Type
028d 4801 |H | Short_Literal 0x1
028e 00da | | Load_Top At_Offset_2
028f 01d6 | | Execute Vector,Field_Write
0290 00db | | Load_Top At_Offset_3
0291 0337 | 7 | Declare_Variable Array
0292 4801 |H | Short_Literal 0x1
0293 4803 |H | Short_Literal 0x3
0294 00da | | Load_Top At_Offset_2
0295 01d6 | | Execute Vector,Field_Write
0296 4801 |H | Short_Literal 0x1
0297 4804 |H | Short_Literal 0x4
0298 00da | | Load_Top At_Offset_2
0299 01d6 | | Execute Vector,Field_Write
029a 4801 |H | Short_Literal 0x1
029b 4805 |H | Short_Literal 0x5
029c 00da | | Load_Top At_Offset_2
029d 01d6 | | Execute Vector,Field_Write
029e 4800 |H | Short_Literal 0x0
029f 4801 |H | Short_Literal 0x1
02a0 00da | | Load_Top At_Offset_2
02a1 01d6 | | Execute Vector,Field_Write
02a2 4800 |H | Short_Literal 0x0
02a3 4802 |H | Short_Literal 0x2
02a4 00da | | Load_Top At_Offset_2
02a5 01d6 | | Execute Vector,Field_Write
02a6 480b |H | Short_Literal 0xb
02a7 4806 |H | Short_Literal 0x6
02a8 4800 |H | Short_Literal 0x0
02a9 00d9 | | Load_Top At_Offset_1
02aa e294 | | Load 0x1,0x94
02ab 01d6 | | Execute Vector,Field_Write
02ac 3ffb |? | Loop_Increasing 0x2a8
02ad e290 | | Load 0x1,0x90
02ae 0119 | | Execute Any,Check_In_Formal_Type
02af 4803 |H | Short_Literal 0x3
02b0 00da | | Load_Top At_Offset_2
02b1 01d6 | | Execute Vector,Field_Write
02b2 00da | | Load_Top At_Offset_2
02b3 e290 | | Load 0x1,0x90
02b4 0119 | | Execute Any,Check_In_Formal_Type
02b5 4802 |H | Short_Literal 0x2
02b6 00da | | Load_Top At_Offset_2
02b7 01d6 | | Execute Vector,Field_Write
02b8 00da | | Load_Top At_Offset_2
02b9 e290 | | Load 0x1,0x90
02ba 0119 | | Execute Any,Check_In_Formal_Type
02bb 4806 |H | Short_Literal 0x6
02bc 00da | | Load_Top At_Offset_2
02bd 01d6 | | Execute Vector,Field_Write
02be 00da | | Load_Top At_Offset_2
02bf e290 | | Load 0x1,0x90
02c0 0119 | | Execute Any,Check_In_Formal_Type
02c1 4804 |H | Short_Literal 0x4
02c2 00da | | Load_Top At_Offset_2
02c3 01d6 | | Execute Vector,Field_Write
02c4 00db | | Load_Top At_Offset_3
02c5 0337 | 7 | Declare_Variable Array
02c6 4801 |H | Short_Literal 0x1
02c7 4807 |H | Short_Literal 0x7
02c8 00da | | Load_Top At_Offset_2
02c9 01d6 | | Execute Vector,Field_Write
02ca 4801 |H | Short_Literal 0x1
02cb 4809 |H | Short_Literal 0x9
02cc 00da | | Load_Top At_Offset_2
02cd 01d6 | | Execute Vector,Field_Write
02ce 4801 |H | Short_Literal 0x1
02cf 480a |H | Short_Literal 0xa
02d0 00da | | Load_Top At_Offset_2
02d1 01d6 | | Execute Vector,Field_Write
02d2 4806 |H | Short_Literal 0x6
02d3 4801 |H | Short_Literal 0x1
02d4 4800 |H | Short_Literal 0x0
02d5 00d9 | | Load_Top At_Offset_1
02d6 e294 | | Load 0x1,0x94
02d7 01d6 | | Execute Vector,Field_Write
02d8 3ffb |? | Loop_Increasing 0x2d4
02d9 4800 |H | Short_Literal 0x0
02da 4808 |H | Short_Literal 0x8
02db 00da | | Load_Top At_Offset_2
02dc 01d6 | | Execute Vector,Field_Write
02dd 4800 |H | Short_Literal 0x0
02de 480b |H | Short_Literal 0xb
02df 00da | | Load_Top At_Offset_2
02e0 01d6 | | Execute Vector,Field_Write
02e1 e290 | | Load 0x1,0x90
02e2 0119 | | Execute Any,Check_In_Formal_Type
02e3 4805 |H | Short_Literal 0x5
02e4 00da | | Load_Top At_Offset_2
02e5 01d6 | | Execute Vector,Field_Write
02e6 00db | | Load_Top At_Offset_3
02e7 0337 | 7 | Declare_Variable Array
02e8 480a |H | Short_Literal 0xa
02e9 4807 |H | Short_Literal 0x7
02ea 4801 |H | Short_Literal 0x1
02eb 00d9 | | Load_Top At_Offset_1
02ec e294 | | Load 0x1,0x94
02ed 01d6 | | Execute Vector,Field_Write
02ee 3ffb |? | Loop_Increasing 0x2ea
02ef 4806 |H | Short_Literal 0x6
02f0 4801 |H | Short_Literal 0x1
02f1 4800 |H | Short_Literal 0x0
02f2 00d9 | | Load_Top At_Offset_1
02f3 e294 | | Load 0x1,0x94
02f4 01d6 | | Execute Vector,Field_Write
02f5 3ffb |? | Loop_Increasing 0x2f1
02f6 4800 |H | Short_Literal 0x0
02f7 480b |H | Short_Literal 0xb
02f8 00da | | Load_Top At_Offset_2
02f9 01d6 | | Execute Vector,Field_Write
02fa e290 | | Load 0x1,0x90
02fb 0119 | | Execute Any,Check_In_Formal_Type
02fc 4807 |H | Short_Literal 0x7
02fd 00da | | Load_Top At_Offset_2
02fe 01d6 | | Execute Vector,Field_Write
02ff 00db | | Load_Top At_Offset_3
0300 0337 | 7 | Declare_Variable Array
0301 480b |H | Short_Literal 0xb
0302 4801 |H | Short_Literal 0x1
0303 4800 |H | Short_Literal 0x0
0304 00d9 | | Load_Top At_Offset_1
0305 e294 | | Load 0x1,0x94
0306 01d6 | | Execute Vector,Field_Write
0307 3ffb |? | Loop_Increasing 0x303
0308 e290 | | Load 0x1,0x90
0309 0119 | | Execute Any,Check_In_Formal_Type
030a 4808 |H | Short_Literal 0x8
030b 00da | | Load_Top At_Offset_2
030c 01d6 | | Execute Vector,Field_Write
030d 00db | | Load_Top At_Offset_3
030e 0337 | 7 | Declare_Variable Array
030f 480a |H | Short_Literal 0xa
0310 4807 |H | Short_Literal 0x7
0311 4801 |H | Short_Literal 0x1
0312 00d9 | | Load_Top At_Offset_1
0313 e294 | | Load 0x1,0x94
0314 01d6 | | Execute Vector,Field_Write
0315 3ffb |? | Loop_Increasing 0x311
0316 4806 |H | Short_Literal 0x6
0317 4801 |H | Short_Literal 0x1
0318 4800 |H | Short_Literal 0x0
0319 00d9 | | Load_Top At_Offset_1
031a e294 | | Load 0x1,0x94
031b 01d6 | | Execute Vector,Field_Write
031c 3ffb |? | Loop_Increasing 0x318
031d 4800 |H | Short_Literal 0x0
031e 480b |H | Short_Literal 0xb
031f 00da | | Load_Top At_Offset_2
0320 01d6 | | Execute Vector,Field_Write
0321 e290 | | Load 0x1,0x90
0322 0119 | | Execute Any,Check_In_Formal_Type
0323 4809 |H | Short_Literal 0x9
0324 00da | | Load_Top At_Offset_2
0325 01d6 | | Execute Vector,Field_Write
0326 00db | | Load_Top At_Offset_3
0327 0337 | 7 | Declare_Variable Array
0328 480a |H | Short_Literal 0xa
0329 4807 |H | Short_Literal 0x7
032a 4801 |H | Short_Literal 0x1
032b 00d9 | | Load_Top At_Offset_1
032c e294 | | Load 0x1,0x94
032d 01d6 | | Execute Vector,Field_Write
032e 3ffb |? | Loop_Increasing 0x32a
032f 4806 |H | Short_Literal 0x6
0330 4801 |H | Short_Literal 0x1
0331 4800 |H | Short_Literal 0x0
0332 00d9 | | Load_Top At_Offset_1
0333 e294 | | Load 0x1,0x94
0334 01d6 | | Execute Vector,Field_Write
0335 3ffb |? | Loop_Increasing 0x331
0336 4800 |H | Short_Literal 0x0
0337 480b |H | Short_Literal 0xb
0338 00da | | Load_Top At_Offset_2
0339 01d6 | | Execute Vector,Field_Write
033a e290 | | Load 0x1,0x90
033b 0119 | | Execute Any,Check_In_Formal_Type
033c 480a |H | Short_Literal 0xa
033d 00da | | Load_Top At_Offset_2
033e 01d6 | | Execute Vector,Field_Write
033f 00da | | Load_Top At_Offset_2
0340 e290 | | Load 0x1,0x90
0341 0119 | | Execute Any,Check_In_Formal_Type
0342 480b |H | Short_Literal 0xb
0343 00da | | Load_Top At_Offset_2
0344 01d6 | | Execute Vector,Field_Write
0345 00d9 | | Load_Top At_Offset_1
0346 01c3 | | Execute Vector,Check_In_Type
0347 0007 | | Action Break_Optional
0348 029d 0f83 | | Declare_Subprogram INIT_0f80,For_Outer_Call
034a 029d 0f93 | | Declare_Subprogram INIT_0f90,For_Outer_Call
034c 1d8c | | Execute_Immediate Reference_Lex_1,0x8c
034d 00c7 | | Action Elaborate_Subprogram
034e 029d 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call
0350 029d 0fc3 | | Declare_Subprogram INIT_0fc0,For_Outer_Call
0352 029d 0fd3 | | Declare_Subprogram INIT_0fd0,For_Outer_Call
0354 029d 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call
0356 029d 0ffb | | Declare_Subprogram INIT_0ff8,For_Outer_Call
0358 029d 100b | | Declare_Subprogram INIT_1008,For_Outer_Call
035a 029d 1043 | C| Declare_Subprogram INIT_1040,For_Outer_Call
035c 029d 107b | {| Declare_Subprogram INIT_1078,For_Outer_Call
035e 029d 1093 | | Declare_Subprogram INIT_1090,For_Outer_Call
0360 029d 10a3 | | Declare_Subprogram INIT_10a0,For_Outer_Call
0362 029d 10ab | | Declare_Subprogram INIT_10a8,For_Outer_Call
0364 029d 10db | | Declare_Subprogram INIT_10d8,For_Outer_Call
0366 029d 10eb | | Declare_Subprogram INIT_10e8,For_Outer_Call
0368 029d 1103 | | Declare_Subprogram INIT_1100,For_Outer_Call
036a 029d 114b | K| Declare_Subprogram INIT_1148,For_Outer_Call
036c 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
036d 00c7 | | Action Elaborate_Subprogram
036e 029d 1163 | c| Declare_Subprogram INIT_1160,For_Outer_Call
0370 029d 116b | k| Declare_Subprogram INIT_1168,For_Outer_Call
0372 029d 1193 | | Declare_Subprogram INIT_1190,For_Outer_Call
0374 029d 11a3 | | Declare_Subprogram INIT_11a0,For_Outer_Call
0376 029d 11b3 | | Declare_Subprogram INIT_11b0,For_Outer_Call
0378 029d 11c3 | | Declare_Subprogram INIT_11c0,For_Outer_Call
037a 029d 11d3 | | Declare_Subprogram INIT_11d0,For_Outer_Call
037c 029d 120b | | Declare_Subprogram INIT_1208,For_Outer_Call
037e 029d 128b | | Declare_Subprogram INIT_1288,For_Outer_Call
0380 029d 12a3 | | Declare_Subprogram INIT_12a0,For_Outer_Call
0382 029d 1313 | | Declare_Subprogram INIT_1310,For_Outer_Call
0384 029d 136b | k| Declare_Subprogram INIT_1368,For_Outer_Call
0386 029d 1393 | | Declare_Subprogram INIT_1390,For_Outer_Call
0388 029d 13b3 | | Declare_Subprogram INIT_13b0,For_Outer_Call
038a 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
038b 00c7 | | Action Elaborate_Subprogram
038c 029d 13cb | | Declare_Subprogram INIT_13c8,For_Outer_Call
038e 029d 1473 | s| Declare_Subprogram INIT_1470,For_Outer_Call
0390 029d 14db | | Declare_Subprogram INIT_14d8,For_Outer_Call
0392 029d 1543 | C| Declare_Subprogram INIT_1540,For_Outer_Call
0394 029d 1593 | | Declare_Subprogram INIT_1590,For_Outer_Call
0396 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
0397 00c7 | | Action Elaborate_Subprogram
0398 029d 15bb | | Declare_Subprogram INIT_15b8,For_Outer_Call
039a 029d 1613 | | Declare_Subprogram INIT_1610,For_Outer_Call
039c 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c
039d 00c7 | | Action Elaborate_Subprogram
039e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
039f 00c7 | | Action Elaborate_Subprogram
03a0 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
03a1 00c7 | | Action Elaborate_Subprogram
03a2 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
03a3 00c7 | | Action Elaborate_Subprogram
03a4 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d
03a5 00c7 | | Action Elaborate_Subprogram
03a6 1d69 | i | Execute_Immediate Reference_Lex_1,0x69
03a7 00c7 | | Action Elaborate_Subprogram
03a8 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
03a9 00c7 | | Action Elaborate_Subprogram
03aa 1d68 | h | Execute_Immediate Reference_Lex_1,0x68
03ab 00c7 | | Action Elaborate_Subprogram
03ac 1d72 | r | Execute_Immediate Reference_Lex_1,0x72
03ad 00c7 | | Action Elaborate_Subprogram
03ae 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b
03af 00c7 | | Action Elaborate_Subprogram
03b0 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e
03b1 00c7 | | Action Elaborate_Subprogram
03b2 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
03b3 00c7 | | Action Elaborate_Subprogram
03b4 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
03b5 00c7 | | Action Elaborate_Subprogram
03b6 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
03b7 00c7 | | Action Elaborate_Subprogram
03b8 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
03b9 00c7 | | Action Elaborate_Subprogram
03ba 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
03bb 00c7 | | Action Elaborate_Subprogram
03bc 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
03bd 00c7 | | Action Elaborate_Subprogram
03be 029d 1693 | | Declare_Subprogram INIT_1690,For_Outer_Call
03c0 1d7f | | Execute_Immediate Reference_Lex_1,0x7f
03c1 00c7 | | Action Elaborate_Subprogram
03c2 1d7e | ~ | Execute_Immediate Reference_Lex_1,0x7e
03c3 00c7 | | Action Elaborate_Subprogram
03c4 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
03c5 00c7 | | Action Elaborate_Subprogram
03c6 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
03c7 00c7 | | Action Elaborate_Subprogram
03c8 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
03c9 00c7 | | Action Elaborate_Subprogram
03ca 1d80 | | Execute_Immediate Reference_Lex_1,0x80
03cb 00c7 | | Action Elaborate_Subprogram
03cc 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
03cd 00c7 | | Action Elaborate_Subprogram
03ce 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
03cf 00c7 | | Action Elaborate_Subprogram
03d0 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
03d1 00c7 | | Action Elaborate_Subprogram
03d2 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
03d3 00c7 | | Action Elaborate_Subprogram
03d4 029d 16c3 | | Declare_Subprogram INIT_16c0,For_Outer_Call
03d6 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
03d7 00c7 | | Action Elaborate_Subprogram
03d8 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
03d9 00c7 | | Action Elaborate_Subprogram
03da 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
03db 00c7 | | Action Elaborate_Subprogram
03dc 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
03dd 00c7 | | Action Elaborate_Subprogram
03de 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
03df 00c7 | | Action Elaborate_Subprogram
03e0 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
03e1 00c7 | | Action Elaborate_Subprogram
03e2 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
03e3 00c7 | | Action Elaborate_Subprogram
03e4 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
03e5 00c7 | | Action Elaborate_Subprogram
03e6 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
03e7 00c7 | | Action Elaborate_Subprogram
03e8 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
03e9 00c7 | | Action Elaborate_Subprogram
03ea 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
03eb 00c7 | | Action Elaborate_Subprogram
03ec 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
03ed 00c7 | | Action Elaborate_Subprogram
03ee 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
03ef 00c7 | | Action Elaborate_Subprogram
03f0 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
03f1 00c7 | | Action Elaborate_Subprogram
03f2 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
03f3 00c7 | | Action Elaborate_Subprogram
03f4 1d71 | q | Execute_Immediate Reference_Lex_1,0x71
03f5 00c7 | | Action Elaborate_Subprogram
03f6 1d70 | p | Execute_Immediate Reference_Lex_1,0x70
03f7 00c7 | | Action Elaborate_Subprogram
03f8 1d74 | t | Execute_Immediate Reference_Lex_1,0x74
03f9 00c7 | | Action Elaborate_Subprogram
03fa 1d75 | u | Execute_Immediate Reference_Lex_1,0x75
03fb 00c7 | | Action Elaborate_Subprogram
03fc 1d76 | v | Execute_Immediate Reference_Lex_1,0x76
03fd 00c7 | | Action Elaborate_Subprogram
03fe 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d
03ff 00c7 | | Action Elaborate_Subprogram
0400 029d 16e3 | | Declare_Subprogram INIT_16e0,For_Outer_Call
0402 e012 | | Load 0x0,0x12
0403 1917 | | Execute Package,Field_Reference,Field_Number 0x17
0404 00c6 | | Action Check_Subprogram_Elaborated
0405 e28d | | Load 0x1,0x8d
0406 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0407 1dbc | | Execute_Immediate Reference_Lex_1,0xbc
0408 e013 | | Load 0x0,0x13
0409 e014 | | Load 0x0,0x14
040a 4800 |H | Short_Literal 0x0
040b 0007 | | Action Break_Optional
040c 029d 1713 | | Declare_Subprogram INIT_1710,For_Outer_Call
040e e012 | | Load 0x0,0x12
040f 1917 | | Execute Package,Field_Reference,Field_Number 0x17
0410 00c6 | | Action Check_Subprogram_Elaborated
0411 e28e | | Load 0x1,0x8e
0412 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0413 1dc2 | | Execute_Immediate Reference_Lex_1,0xc2
0414 e015 | | Load 0x0,0x15
0415 e016 | | Load 0x0,0x16
0416 4800 |H | Short_Literal 0x0
0417 0007 | | Action Break_Optional
0418 BODY_0008:
0418 e2bd | | Load 0x1,0xbd
0419 1dbe | | Execute_Immediate Reference_Lex_1,0xbe
041a 1dbf | | Execute_Immediate Reference_Lex_1,0xbf
041b e012 | | Load 0x0,0x12
041c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
041d e2c3 | | Load 0x1,0xc3
041e 1dc4 | | Execute_Immediate Reference_Lex_1,0xc4
041f 1dc5 | | Execute_Immediate Reference_Lex_1,0xc5
0420 e012 | | Load 0x0,0x12
0421 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0422 00bc | | Action Signal_Activated
0423 00bb | | Action Signal_Completion
0424 0000 0000 | | .BLANK 0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 00da | | Load_Top At_Offset_2
042c e267 | g | Load 0x1,0x67
042d 017f | | Execute Record,Equal
042e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
042f 0000 | | .XXX[0x1]
0430 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
0434 0000 0000 | | .BLANK 0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b e5fd | | Load 0x2,-0x3
043c e5fe | | Load 0x2,-0x2
043d e5ff | | Load 0x2,-0x1
043e e003 | | Load 0x0,0x3
043f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0440 826a | j | Call 0x1,0x6a
0441 00d1 | | Pop_Control Pop_Count_1
0442 c5fd | | Store 0x2,-0x3
0443 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0444 0000 0000 | | .BLANK 0000[0x4]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 0465 | e | .CONST 0x0465 ; Address of begin
0449 04af | | .CONST 0x04af ; Address of exception handler
044a 0007 | | .CONST 0x0007 ; Number of locals
044b INIT_0448:
044b e289 | | Load 0x1,0x89
044c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
044d 0322 | " | Declare_Variable Record
044e 00d8 | | Load_Top At_Offset_0
044f 1c00 | | Execute_Immediate Run_Utility,0x0
0450 e003 | | Load 0x0,0x3
0451 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0452 02c7 | | Declare_Variable Any
0453 00d8 | | Load_Top At_Offset_0
0454 1c00 | | Execute_Immediate Run_Utility,0x0
0455 e289 | | Load 0x1,0x89
0456 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0457 02c7 | | Declare_Variable Any
0458 00d8 | | Load_Top At_Offset_0
0459 1c00 | | Execute_Immediate Run_Utility,0x0
045a e003 | | Load 0x0,0x3
045b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
045c 02c7 | | Declare_Variable Any
045d e5ff | | Load 0x2,-0x1
045e e003 | | Load 0x0,0x3
045f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0460 a405 | | Store_Unchecked 0x2,0x5
0461 029f 1753 | S| Declare_Subprogram INIT_1750,For_Call
0463 029f 17f3 | | Declare_Subprogram INIT_17f0,For_Call
0465 BODY_0448:
0465 00be | | Action Activate_Tasks
0466 e5fd | | Load 0x2,-0x3
0467 e017 | | Load 0x0,0x17
0468 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0469 180e | | Execute Package,Field_Execute,Field_Number 0xe
046a 0092 1f4e | N| Action Push_String_Extended,0x1f4e ; "Invalid view reference"
046c e008 | | Load 0x0,0x8
046d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
046e e5ff | | Load 0x2,-0x1
046f 829b | | Call 0x1,0x9b
0470 c5fd | | Store 0x2,-0x3
0471 00da | | Load_Top At_Offset_2
0472 e018 | | Load 0x0,0x18
0473 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0474 4606 |F | Jump_Case 0x7
0475 7813 |x | Jump 0x489 ; case 0x0
0476 7815 |x | Jump 0x48c ; case 0x1
0477 781a |x | Jump 0x492 ; case 0x2
0478 781c |x | Jump 0x495 ; case 0x3
0479 781b |x | Jump 0x495 ; case 0x4
047a 7814 |x | Jump 0x48f ; case 0x5
047b 7800 |x | Jump 0x47c ; case 0x6
047c e5fd | | Load 0x2,-0x3
047d e5ff | | Load 0x2,-0x1
047e e017 | | Load 0x0,0x17
047f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0480 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0481 0092 1f4f | O| Action Push_String_Extended,0x1f4f ; " is not a Rational_2167a view"
0483 01cc | | Execute Vector,Catenate
0484 e008 | | Load 0x0,0x8
0485 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0486 829a | | Call 0x1,0x9a
0487 c5fd | | Store 0x2,-0x3
0488 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0489 4801 |H | Short_Literal 0x1
048a 8406 | | Call 0x2,0x6
048b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
048c 4803 |H | Short_Literal 0x3
048d 8406 | | Call 0x2,0x6
048e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
048f 4804 |H | Short_Literal 0x4
0490 8406 | | Call 0x2,0x6
0491 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0492 4805 |H | Short_Literal 0x5
0493 8406 | | Call 0x2,0x6
0494 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0495 e5fd | | Load 0x2,-0x3
0496 e403 | | Load 0x2,0x3
0497 0120 | | Execute Any,Is_Value
0498 6803 |h | Jump_Zero 0x49c
0499 e003 | | Load 0x0,0x3
049a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
049b 7801 |x | Jump 0x49d
049c e403 | | Load 0x2,0x3
049d e405 | | Load 0x2,0x5
049e 0120 | | Execute Any,Is_Value
049f 6803 |h | Jump_Zero 0x4a3
04a0 e003 | | Load 0x0,0x3
04a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a2 7801 |x | Jump 0x4a4
04a3 e405 | | Load 0x2,0x5
04a4 e5ff | | Load 0x2,-0x1
04a5 e018 | | Load 0x0,0x18
04a6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
04a7 c405 | | Store 0x2,0x5
04a8 c403 | | Store 0x2,0x3
04a9 c5fd | | Store 0x2,-0x3
04aa e5fd | | Load 0x2,-0x3
04ab 8298 | | Call 0x1,0x98
04ac c5fd | | Store 0x2,-0x3
04ad 8407 | | Call 0x2,0x7
04ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04af TRAP_0448:
04af e019 | | Load 0x0,0x19
04b0 010f | | Execute Exception,Equal
04b1 6808 |h | Jump_Zero 0x4ba
04b2 e402 | | Load 0x2,0x2
04b3 e289 | | Load 0x1,0x89
04b4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04b5 00d1 | | Pop_Control Pop_Count_1
04b6 e267 | g | Load 0x1,0x67
04b7 e5fe | | Load 0x2,-0x2
04b8 017d | } | Execute Record,Structure_Write
04b9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04ba e402 | | Load 0x2,0x2
04bb e289 | | Load 0x1,0x89
04bc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04bd 00d1 | | Pop_Control Pop_Count_1
04be e267 | g | Load 0x1,0x67
04bf e5fe | | Load 0x2,-0x2
04c0 017d | } | Execute Record,Structure_Write
04c1 e5fd | | Load 0x2,-0x3
04c2 0092 1f50 | P| Action Push_String_Extended,0x1f50 ; "Resolve_Context"
04c4 829d | | Call 0x1,0x9d
04c5 c5fd | | Store 0x2,-0x3
04c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04c7 0000 | | .XXX[0x1]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 00da | | Load_Top At_Offset_2
04cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04cd 00d8 | | Load_Top At_Offset_0
04ce 0120 | | Execute Any,Is_Value
04cf 7002 |p | Jump_Nonzero 0x4d2
04d0 00d8 | | Load_Top At_Offset_0
04d1 011e | | Execute Any,Convert
04d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04d3 0000 0000 | | .BLANK 0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db 00da | | Load_Top At_Offset_2
04dc e215 | | Load 0x1,0x15
04dd 022f | / | Execute Access,Equal
04de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04df 0000 | | .XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04ea | | .CONST 0x04ea ; Address of begin
04e1 05c2 | | .CONST 0x05c2 ; Address of exception handler
04e2 0003 | | .CONST 0x0003 ; Number of locals
04e3 INIT_04e0:
04e3 e003 | | Load 0x0,0x3
04e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e5 02c7 | | Declare_Variable Any
04e6 00d8 | | Load_Top At_Offset_0
04e7 1c00 | | Execute_Immediate Run_Utility,0x0
04e8 029f 1883 | | Declare_Subprogram INIT_1880,For_Call
04ea BODY_04e0:
04ea e215 | | Load 0x1,0x15
04eb 03bc | | Declare_Variable Access,By_Allocation
04ec 00d8 | | Load_Top At_Offset_0
04ed 0227 | ' | Execute Access,All_Reference
04ee 1c00 | | Execute_Immediate Run_Utility,0x0
04ef a5fe | | Store_Unchecked 0x2,-0x2
04f0 e5fe | | Load 0x2,-0x2
04f1 0229 | ) | Execute Access,All_Read
04f2 e28d | | Load 0x1,0x8d
04f3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
04f4 e28d | | Load 0x1,0x8d
04f5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04f6 00d9 | | Load_Top At_Offset_1
04f7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
04f8 00d1 | | Pop_Control Pop_Count_1
04f9 e5fe | | Load 0x2,-0x2
04fa 0229 | ) | Execute Access,All_Read
04fb e28e | | Load 0x1,0x8e
04fc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
04fd e28e | | Load 0x1,0x8e
04fe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04ff 00d9 | | Load_Top At_Offset_1
0500 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0501 00d1 | | Pop_Control Pop_Count_1
0502 e283 | | Load 0x1,0x83
0503 e5fe | | Load 0x2,-0x2
0504 0227 | ' | Execute Access,All_Reference
0505 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0506 e5ff | | Load 0x2,-0x1
0507 e5fe | | Load 0x2,-0x2
0508 0227 | ' | Execute Access,All_Reference
0509 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
050a e5ff | | Load 0x2,-0x1
050b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
050c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
050d e5fe | | Load 0x2,-0x2
050e 0227 | ' | Execute Access,All_Reference
050f 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0510 e5ff | | Load 0x2,-0x1
0511 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0512 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0513 0aff | | Execute_Immediate Plus,-0x1
0514 460a |F | Jump_Case 0xb
0515 781e |x | Jump 0x534 ; case 0x0
0516 7809 |x | Jump 0x520 ; case 0x1
0517 7809 |x | Jump 0x521 ; case 0x2
0518 7808 |x | Jump 0x521 ; case 0x3
0519 7834 |x4 | Jump 0x54e ; case 0x4
051a 7805 |x | Jump 0x520 ; case 0x5
051b 7804 |x | Jump 0x520 ; case 0x6
051c 7803 |x | Jump 0x520 ; case 0x7
051d 7802 |x | Jump 0x520 ; case 0x8
051e 7801 |x | Jump 0x520 ; case 0x9
051f 7800 |x | Jump 0x520 ; case 0xa
0520 08e2 | | Execute_Immediate Raise,0xe2
0521 4801 |H | Short_Literal 0x1
0522 e5fe | | Load 0x2,-0x2
0523 0227 | ' | Execute Access,All_Reference
0524 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0525 e017 | | Load 0x0,0x17
0526 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0527 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0528 e5fe | | Load 0x2,-0x2
0529 0227 | ' | Execute Access,All_Reference
052a 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
052b e5fd | | Load 0x2,-0x3
052c e5fe | | Load 0x2,-0x2
052d e5ff | | Load 0x2,-0x1
052e 82b9 | | Call 0x1,0xb9
052f c5fd | | Store 0x2,-0x3
0530 e5fd | | Load 0x2,-0x3
0531 8298 | | Call 0x1,0x98
0532 c5fd | | Store 0x2,-0x3
0533 786b |xk | Jump 0x59f
0534 e017 | | Load 0x0,0x17
0535 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0536 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0537 e5fe | | Load 0x2,-0x2
0538 0227 | ' | Execute Access,All_Reference
0539 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
053a 4800 |H | Short_Literal 0x0
053b e5fe | | Load 0x2,-0x2
053c 0227 | ' | Execute Access,All_Reference
053d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
053e e5fd | | Load 0x2,-0x3
053f e5fe | | Load 0x2,-0x2
0540 e5ff | | Load 0x2,-0x1
0541 82b9 | | Call 0x1,0xb9
0542 c5fd | | Store 0x2,-0x3
0543 e5fd | | Load 0x2,-0x3
0544 8298 | | Call 0x1,0x98
0545 c5fd | | Store 0x2,-0x3
0546 8403 | | Call 0x2,0x3
0547 e5fe | | Load 0x2,-0x2
0548 0227 | ' | Execute Access,All_Reference
0549 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
054a e017 | | Load 0x0,0x17
054b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
054d 7851 |xQ | Jump 0x59f
054e 4801 |H | Short_Literal 0x1
054f e5fe | | Load 0x2,-0x2
0550 0227 | ' | Execute Access,All_Reference
0551 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0552 e5fe | | Load 0x2,-0x2
0553 0229 | ) | Execute Access,All_Read
0554 e5fd | | Load 0x2,-0x3
0555 00d9 | | Load_Top At_Offset_1
0556 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0557 0120 | | Execute Any,Is_Value
0558 6803 |h | Jump_Zero 0x55c
0559 e003 | | Load 0x0,0x3
055a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
055b 7802 |x | Jump 0x55e
055c 00d9 | | Load_Top At_Offset_1
055d 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
055e e402 | | Load 0x2,0x2
055f 0120 | | Execute Any,Is_Value
0560 6803 |h | Jump_Zero 0x564
0561 e003 | | Load 0x0,0x3
0562 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0563 7801 |x | Jump 0x565
0564 e402 | | Load 0x2,0x2
0565 e5ff | | Load 0x2,-0x1
0566 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0567 e018 | | Load 0x0,0x18
0568 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0569 c402 | | Store 0x2,0x2
056a 00da | | Load_Top At_Offset_2
056b 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
056c c5fd | | Store 0x2,-0x3
056d 00d1 | | Pop_Control Pop_Count_1
056e e5fd | | Load 0x2,-0x3
056f 8298 | | Call 0x1,0x98
0570 c5fd | | Store 0x2,-0x3
0571 00cf | | Action Mark_Auxiliary
0572 7816 |x | Jump 0x589
0573 e5fd | | Load 0x2,-0x3
0574 e5fe | | Load 0x2,-0x2
0575 00d8 | | Load_Top At_Offset_0
0576 0227 | ' | Execute Access,All_Reference
0577 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0578 e017 | | Load 0x0,0x17
0579 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
057b 82b6 | | Call 0x1,0xb6
057c c5fe | | Store 0x2,-0x2
057d c5fd | | Store 0x2,-0x3
057e e5fe | | Load 0x2,-0x2
057f 0229 | ) | Execute Access,All_Read
0580 00d8 | | Load_Top At_Offset_0
0581 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0582 e017 | | Load 0x0,0x17
0583 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0584 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0585 00d9 | | Load_Top At_Offset_1
0586 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0587 00d1 | | Pop_Control Pop_Count_1
0588 00c9 | | Action Pop_Auxiliary_Loop
0589 e5fe | | Load 0x2,-0x2
058a 0227 | ' | Execute Access,All_Reference
058b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
058c e017 | | Load 0x0,0x17
058d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
058f 6fe3 |o | Jump_Zero 0x573
0590 00ce | | Action Pop_Auxiliary
0591 e5fe | | Load 0x2,-0x2
0592 0227 | ' | Execute Access,All_Reference
0593 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0594 e017 | | Load 0x0,0x17
0595 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0596 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0597 e5fd | | Load 0x2,-0x3
0598 e5fe | | Load 0x2,-0x2
0599 e5ff | | Load 0x2,-0x1
059a 82b9 | | Call 0x1,0xb9
059b c5fd | | Store 0x2,-0x3
059c e5fd | | Load 0x2,-0x3
059d 8298 | | Call 0x1,0x98
059e c5fd | | Store 0x2,-0x3
059f e5fe | | Load 0x2,-0x2
05a0 0227 | ' | Execute Access,All_Reference
05a1 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
05a2 e017 | | Load 0x0,0x17
05a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
05a5 e5fd | | Load 0x2,-0x3
05a6 e5fe | | Load 0x2,-0x2
05a7 82b7 | | Call 0x1,0xb7
05a8 c5fe | | Store 0x2,-0x2
05a9 c5fd | | Store 0x2,-0x3
05aa e5fd | | Load 0x2,-0x3
05ab 8298 | | Call 0x1,0x98
05ac c5fd | | Store 0x2,-0x3
05ad 4801 |H | Short_Literal 0x1
05ae e5fe | | Load 0x2,-0x2
05af 0227 | ' | Execute Access,All_Reference
05b0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
05b1 e28d | | Load 0x1,0x8d
05b2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05b3 0a01 | | Execute_Immediate Plus,0x1
05b4 00d8 | | Load_Top At_Offset_0
05b5 00e2 | | Load_Encached Integer_Cache
05b6 0260 | ` | Execute Discrete,In_Type
05b7 7001 |p | Jump_Nonzero 0x5b9
05b8 0801 | | Execute_Immediate Raise,0x1
05b9 e28f | | Load 0x1,0x8f
05ba 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
05bb 00d8 | | Load_Top At_Offset_0
05bc 0227 | ' | Execute Access,All_Reference
05bd 1c00 | | Execute_Immediate Run_Utility,0x0
05be e5fe | | Load 0x2,-0x2
05bf 0227 | ' | Execute Access,All_Reference
05c0 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
05c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05c2 TRAP_04e0:
05c2 e019 | | Load 0x0,0x19
05c3 010f | | Execute Exception,Equal
05c4 6801 |h | Jump_Zero 0x5c6
05c5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05c6 e002 | | Load 0x0,0x2
05c7 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
05c8 010f | | Execute Exception,Equal
05c9 6804 |h | Jump_Zero 0x5ce
05ca e002 | | Load 0x0,0x2
05cb 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
05cc c5fd | | Store 0x2,-0x3
05cd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05ce e5fd | | Load 0x2,-0x3
05cf 0092 1f51 | Q| Action Push_String_Extended,0x1f51 ; "Initialize"
05d1 829d | | Call 0x1,0x9d
05d2 c5fd | | Store 0x2,-0x3
05d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05d4 0000 0000 | | .BLANK 0000[0x4]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00da | | Load_Top At_Offset_2
05dc 7002 |p | Jump_Nonzero 0x5df
05dd e267 | g | Load 0x1,0x67
05de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05df 00da | | Load_Top At_Offset_2
05e0 0227 | ' | Execute Access,All_Reference
05e1 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
05e2 0320 | | Declare_Variable Record,Duplicate
05e3 00cd | | Action Spare6_Action
05e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e5 0000 0000 | | .XXX[0x3]
05e7 0000 | |
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb | | .CONST 0x05eb ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0001 | | .CONST 0x0001 ; Number of locals
05eb BODY_05e8:
05eb INIT_05e8:
05eb 00da | | Load_Top At_Offset_2
05ec 0227 | ' | Execute Access,All_Reference
05ed 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
05ee 00d8 | | Load_Top At_Offset_0
05ef 0120 | | Execute Any,Is_Value
05f0 7002 |p | Jump_Nonzero 0x5f3
05f1 00d8 | | Load_Top At_Offset_0
05f2 011e | | Execute Any,Convert
05f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f4 0000 0000 | | .BLANK 0000[0x4]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb 00da | | Load_Top At_Offset_2
05fc e219 | | Load 0x1,0x19
05fd 017f | | Execute Record,Equal
05fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ff 0000 | | .XXX[0x1]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603 | | .CONST 0x0603 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0001 | | .CONST 0x0001 ; Number of locals
0603 BODY_0600:
0603 INIT_0600:
0603 00d1 | | Pop_Control Pop_Count_1
0604 00da | | Load_Top At_Offset_2
0605 01d8 | | Execute Vector,Element_Type
0606 0322 | " | Declare_Variable Record
0607 00d8 | | Load_Top At_Offset_0
0608 1c00 | | Execute_Immediate Run_Utility,0x0
0609 00db | | Load_Top At_Offset_3
060a 01dc | | Execute Vector,Last
060b e5ff | | Load 0x2,-0x1
060c 01dd | | Execute Vector,First
060d 0263 | c | Execute Discrete,Above_Bound
060e 7006 |p | Jump_Nonzero 0x615
060f 00da | | Load_Top At_Offset_2
0610 00d9 | | Load_Top At_Offset_1
0611 e5ff | | Load 0x2,-0x1
0612 01d6 | | Execute Vector,Field_Write
0613 0a01 | | Execute_Immediate Plus,0x1
0614 7ff8 | | Jump 0x60d
0615 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0616 0000 0000 | | .XXX[0x2]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b | | .CONST 0x061b ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0001 | | .CONST 0x0001 ; Number of locals
061b BODY_0618:
061b INIT_0618:
061b 4801 |H | Short_Literal 0x1
061c 4800 |H | Short_Literal 0x0
061d e21c | | Load 0x1,0x1c
061e 035b | [ | Declare_Type Array,Constrained
061f 0337 | 7 | Declare_Variable Array
0620 e21c | | Load 0x1,0x1c
0621 01c6 | | Execute Vector,Convert_To_Formal
0622 00ca | | Action Exit_Nullary_Function
0623 0000 0000 | | .BLANK 0000[0x5]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b | + | .CONST 0x062b ; Address of begin
0629 0004 | | .CONST 0x0004 ; Address of exception handler
062a 0001 | | .CONST 0x0001 ; Number of locals
062b BODY_0628:
062b INIT_0628:
062b 00da | | Load_Top At_Offset_2
062c 01db | | Execute Vector,Length
062d 0f00 | | Execute_Immediate Equal,0x0
062e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
062f 0000 | | .XXX[0x1]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633 | 3 | .CONST 0x0633 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0001 | | .CONST 0x0001 ; Number of locals
0633 BODY_0630:
0633 INIT_0630:
0633 4800 |H | Short_Literal 0x0
0634 00ca | | Action Exit_Nullary_Function
0635 0000 0000 | | .XXX[0x3]
0637 0000 | |
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b | ; | .CONST 0x063b ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0001 | | .CONST 0x0001 ; Number of locals
063b BODY_0638:
063b INIT_0638:
063b 4801 |H | Short_Literal 0x1
063c 00ca | | Action Exit_Nullary_Function
063d 0000 0000 | | .XXX[0x3]
063f 0000 | |
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 4802 |H | Short_Literal 0x2
0644 00ca | | Action Exit_Nullary_Function
0645 0000 0000 | | .XXX[0x3]
0647 0000 | |
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b 4803 |H | Short_Literal 0x3
064c 00ca | | Action Exit_Nullary_Function
064d 0000 0000 | | .XXX[0x3]
064f 0000 | |
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0657 | W | .CONST 0x0657 ; Address of begin
0651 065c | \ | .CONST 0x065c ; Address of exception handler
0652 0003 | | .CONST 0x0003 ; Number of locals
0653 INIT_0650:
0653 e278 | x | Load 0x1,0x78
0654 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0655 029f 18c3 | | Declare_Subprogram INIT_18c0,For_Call
0657 BODY_0650:
0657 e5f9 | | Load 0x2,-0x7
0658 82a7 | | Call 0x1,0xa7
0659 e5fa | | Load 0x2,-0x6
065a 8403 | | Call 0x2,0x3
065b 4509 |E | Exit_Suprogram New_Top_Offset 0x9
065c TRAP_0650:
065c e01a | | Load 0x0,0x1a
065d 010f | | Execute Exception,Equal
065e 6801 |h | Jump_Zero 0x660
065f 4509 |E | Exit_Suprogram New_Top_Offset 0x9
0660 00d8 | | Load_Top At_Offset_0
0661 0101 | | Execute Exception,Reraise
0662 0000 0000 | | .BLANK 0000[0x6]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0673 | s | .CONST 0x0673 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b 4805 |H | Short_Literal 0x5
066c e5fe | | Load 0x2,-0x2
066d 825b | [ | Call 0x1,0x5b
066e 4804 |H | Short_Literal 0x4
066f e5fe | | Load 0x2,-0x2
0670 825b | [ | Call 0x1,0x5b
0671 01cc | | Execute Vector,Catenate
0672 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0673 TRAP_0668:
0673 e019 | | Load 0x0,0x19
0674 010f | | Execute Exception,Equal
0675 680f |h | Jump_Zero 0x685
0676 4800 |H | Short_Literal 0x0
0677 4800 |H | Short_Literal 0x0
0678 4806 |H | Short_Literal 0x6
0679 0092 1f52 | R| Action Push_String_Extended,0x1f52 ; "Unable to find CI Referencers in the \x22"
067b e5ff | | Load 0x2,-0x1
067c 8234 | 4 | Call 0x1,0x34
067d 01cc | | Execute Vector,Catenate
067e 0092 1f53 | S| Action Push_String_Extended,0x1f53 ; "\x22 CI."
0680 01cc | | Execute Vector,Catenate
0681 00ea | | Load_Encached Null_String_Cache
0682 8287 | | Call 0x1,0x87
0683 821d | | Call 0x1,0x1d
0684 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0685 0100 | | Execute Exception,Raise
0686 0000 0000 | | .XXX[0x2]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b 00db | | Load_Top At_Offset_3
068c 00db | | Load_Top At_Offset_3
068d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
068e 8270 | p | Call 0x1,0x70
068f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0693 | | .CONST 0x0693 ; Address of begin
0691 0004 | | .CONST 0x0004 ; Address of exception handler
0692 0001 | | .CONST 0x0001 ; Number of locals
0693 BODY_0690:
0693 INIT_0690:
0693 00da | | Load_Top At_Offset_2
0694 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0695 0320 | | Declare_Variable Record,Duplicate
0696 00cd | | Action Spare6_Action
0697 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b 00da | | Load_Top At_Offset_2
069c 00db | | Load_Top At_Offset_3
069d 0227 | ' | Execute Access,All_Reference
069e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
069f 822a | * | Call 0x1,0x2a
06a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06a1 0000 0000 | | .BLANK 0000[0x7]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06ab | | .CONST 0x06ab ; Address of begin
06a9 0004 | | .CONST 0x0004 ; Address of exception handler
06aa 0001 | | .CONST 0x0001 ; Number of locals
06ab BODY_06a8:
06ab INIT_06a8:
06ab 00da | | Load_Top At_Offset_2
06ac 00db | | Load_Top At_Offset_3
06ad 0227 | ' | Execute Access,All_Reference
06ae 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
06af 822a | * | Call 0x1,0x2a
06b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06b1 0000 0000 | | .BLANK 0000[0x7]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06c9 | | .CONST 0x06c9 ; Address of begin
06b9 06fc | | .CONST 0x06fc ; Address of exception handler
06ba 0004 | | .CONST 0x0004 ; Number of locals
06bb INIT_06b8:
06bb e003 | | Load 0x0,0x3
06bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06bd 02c7 | | Declare_Variable Any
06be 00d8 | | Load_Top At_Offset_0
06bf 1c00 | | Execute_Immediate Run_Utility,0x0
06c0 e003 | | Load 0x0,0x3
06c1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
06c2 02c7 | | Declare_Variable Any
06c3 00d8 | | Load_Top At_Offset_0
06c4 1c00 | | Execute_Immediate Run_Utility,0x0
06c5 e20d | | Load 0x1,0xd
06c6 02c7 | | Declare_Variable Any
06c7 00d8 | | Load_Top At_Offset_0
06c8 1c00 | | Execute_Immediate Run_Utility,0x0
06c9 BODY_06b8:
06c9 e5fd | | Load 0x2,-0x3
06ca 00da | | Load_Top At_Offset_2
06cb 0120 | | Execute Any,Is_Value
06cc 6803 |h | Jump_Zero 0x6d0
06cd e003 | | Load 0x0,0x3
06ce 1b12 | | Execute Package,Field_Read,Field_Number 0x12
06cf 7801 |x | Jump 0x6d1
06d0 00da | | Load_Top At_Offset_2
06d1 e402 | | Load 0x2,0x2
06d2 0120 | | Execute Any,Is_Value
06d3 6803 |h | Jump_Zero 0x6d7
06d4 e003 | | Load 0x0,0x3
06d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06d6 7801 |x | Jump 0x6d8
06d7 e402 | | Load 0x2,0x2
06d8 e5ff | | Load 0x2,-0x1
06d9 e018 | | Load 0x0,0x18
06da 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06db c402 | | Store 0x2,0x2
06dc c403 | | Store 0x2,0x3
06dd c5fd | | Store 0x2,-0x3
06de e5fd | | Load 0x2,-0x3
06df 8298 | | Call 0x1,0x98
06e0 c5fd | | Store 0x2,-0x3
06e1 e5fd | | Load 0x2,-0x3
06e2 00d9 | | Load_Top At_Offset_1
06e3 0120 | | Execute Any,Is_Value
06e4 6802 |h | Jump_Zero 0x6e7
06e5 e20d | | Load 0x1,0xd
06e6 7801 |x | Jump 0x6e8
06e7 00d9 | | Load_Top At_Offset_1
06e8 00db | | Load_Top At_Offset_3
06e9 82ac | | Call 0x1,0xac
06ea c404 | | Store 0x2,0x4
06eb c5fd | | Store 0x2,-0x3
06ec e5fd | | Load 0x2,-0x3
06ed 8298 | | Call 0x1,0x98
06ee c5fd | | Store 0x2,-0x3
06ef e5fe | | Load 0x2,-0x2
06f0 e215 | | Load 0x1,0x15
06f1 00da | | Load_Top At_Offset_2
06f2 8234 | 4 | Call 0x1,0x34
06f3 4805 |H | Short_Literal 0x5
06f4 e404 | | Load 0x2,0x4
06f5 82b5 | | Call 0x1,0xb5
06f6 00d1 | | Pop_Control Pop_Count_1
06f7 e5fd | | Load 0x2,-0x3
06f8 e008 | | Load 0x0,0x8
06f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06fa c5fd | | Store 0x2,-0x3
06fb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06fc TRAP_06b8:
06fc e019 | | Load 0x0,0x19
06fd 010f | | Execute Exception,Equal
06fe 6813 |h | Jump_Zero 0x712
06ff e5fd | | Load 0x2,-0x3
0700 0092 1f54 | T| Action Push_String_Extended,0x1f54 ; "Unable to obtain CSCI component in "
0702 e017 | | Load 0x0,0x17
0703 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0704 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0705 e5ff | | Load 0x2,-0x1
0706 e017 | | Load 0x0,0x17
0707 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0708 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0709 01cc | | Execute Vector,Catenate
070a e5fd | | Load 0x2,-0x3
070b e008 | | Load 0x0,0x8
070c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
070d 00ea | | Load_Encached Null_String_Cache
070e e008 | | Load 0x0,0x8
070f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0710 c5fd | | Store 0x2,-0x3
0711 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0712 e002 | | Load 0x0,0x2
0713 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0714 010f | | Execute Exception,Equal
0715 6804 |h | Jump_Zero 0x71a
0716 e002 | | Load 0x0,0x2
0717 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0718 c5fd | | Store 0x2,-0x3
0719 4502 |E | Exit_Suprogram New_Top_Offset 0x2
071a e5fd | | Load 0x2,-0x3
071b 0092 1f55 | U| Action Push_String_Extended,0x1f55 ; "Find_Csci"
071d 829d | | Call 0x1,0x9d
071e c5fd | | Store 0x2,-0x3
071f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0733 | 3 | .CONST 0x0733 ; Address of begin
0721 0776 | v | .CONST 0x0776 ; Address of exception handler
0722 0004 | | .CONST 0x0004 ; Number of locals
0723 INIT_0720:
0723 e003 | | Load 0x0,0x3
0724 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0725 02c7 | | Declare_Variable Any
0726 00db | | Load_Top At_Offset_3
0727 e003 | | Load 0x0,0x3
0728 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0729 a402 | | Store_Unchecked 0x2,0x2
072a e003 | | Load 0x0,0x3
072b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
072c 02c7 | | Declare_Variable Any
072d 00d9 | | Load_Top At_Offset_1
072e a403 | | Store_Unchecked 0x2,0x3
072f e266 | f | Load 0x1,0x66
0730 0322 | " | Declare_Variable Record
0731 00d8 | | Load_Top At_Offset_0
0732 1c00 | | Execute_Immediate Run_Utility,0x0
0733 BODY_0720:
0733 e5fd | | Load 0x2,-0x3
0734 e017 | | Load 0x0,0x17
0735 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0736 180e | | Execute Package,Field_Execute,Field_Number 0xe
0737 0092 1f56 | V| Action Push_String_Extended,0x1f56 ; "Unable to resolve context"
0739 e008 | | Load 0x0,0x8
073a 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
073b e402 | | Load 0x2,0x2
073c 829b | | Call 0x1,0x9b
073d c5fd | | Store 0x2,-0x3
073e 00cf | | Action Mark_Auxiliary
073f 7805 |x | Jump 0x745
0740 00da | | Load_Top At_Offset_2
0741 e003 | | Load 0x0,0x3
0742 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0743 c403 | | Store 0x2,0x3
0744 00c9 | | Action Pop_Auxiliary_Loop
0745 00da | | Load_Top At_Offset_2
0746 e017 | | Load 0x0,0x17
0747 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0748 180f | | Execute Package,Field_Execute,Field_Number 0xf
0749 7004 |p | Jump_Nonzero 0x74e
074a 00da | | Load_Top At_Offset_2
074b e018 | | Load 0x0,0x18
074c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
074d 77f2 |w | Jump_Nonzero 0x740
074e 00ce | | Action Pop_Auxiliary
074f 00d9 | | Load_Top At_Offset_1
0750 e017 | | Load 0x0,0x17
0751 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0752 180f | | Execute Package,Field_Execute,Field_Number 0xf
0753 6812 |h | Jump_Zero 0x766
0754 e5fd | | Load 0x2,-0x3
0755 0092 1f57 | W| Action Push_String_Extended,0x1f57 ; "Unable to locate SYSTEM component in static hierarchy. Verify that the hierarchical PARENT chain of "
0757 e402 | | Load 0x2,0x2
0758 e017 | | Load 0x0,0x17
0759 1b0e | | Execute Package,Field_Read,Field_Number 0xe
075a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
075b 01cc | | Execute Vector,Catenate
075c 0092 1f58 | X| Action Push_String_Extended,0x1f58 ; " leads to a Rational_2167a SYSTEM component"
075e 01cc | | Execute Vector,Catenate
075f 0092 1f59 | Y| Action Push_String_Extended,0x1f59 ; " (Use Design.Set_Parent if necessary)"
0761 01cc | | Execute Vector,Catenate
0762 e008 | | Load 0x0,0x8
0763 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0764 829a | | Call 0x1,0x9a
0765 c5fd | | Store 0x2,-0x3
0766 e5fd | | Load 0x2,-0x3
0767 00d9 | | Load_Top At_Offset_1
0768 00db | | Load_Top At_Offset_3
0769 e003 | | Load 0x0,0x3
076a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
076b 826a | j | Call 0x1,0x6a
076c 00d1 | | Pop_Control Pop_Count_1
076d c5fd | | Store 0x2,-0x3
076e e5fd | | Load 0x2,-0x3
076f 8298 | | Call 0x1,0x98
0770 c5fd | | Store 0x2,-0x3
0771 00d8 | | Load_Top At_Offset_0
0772 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0773 e5fe | | Load 0x2,-0x2
0774 017d | } | Execute Record,Structure_Write
0775 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0776 TRAP_0720:
0776 e019 | | Load 0x0,0x19
0777 010f | | Execute Exception,Equal
0778 6804 |h | Jump_Zero 0x77d
0779 e219 | | Load 0x1,0x19
077a e5fe | | Load 0x2,-0x2
077b 017d | } | Execute Record,Structure_Write
077c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
077d e5fd | | Load 0x2,-0x3
077e 0092 1f5a | Z| Action Push_String_Extended,0x1f5a ; "Find_System"
0780 829d | | Call 0x1,0x9d
0781 c5fd | | Store 0x2,-0x3
0782 e219 | | Load 0x1,0x19
0783 e5fe | | Load 0x2,-0x2
0784 017d | } | Execute Record,Structure_Write
0785 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0786 0000 0000 | | .XXX[0x2]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 0790 | | .CONST 0x0790 ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0003 | | .CONST 0x0003 ; Number of locals
078b INIT_0788:
078b 00e1 | | Load_Encached Boolean_Cache
078c e216 | | Load 0x1,0x16
078d 0322 | " | Declare_Variable Record
078e 00d8 | | Load_Top At_Offset_0
078f 1c00 | | Execute_Immediate Run_Utility,0x0
0790 BODY_0788:
0790 e5ff | | Load 0x2,-0x1
0791 e002 | | Load 0x0,0x2
0792 180f | | Execute Package,Field_Execute,Field_Number 0xf
0793 6802 |h | Jump_Zero 0x796
0794 e219 | | Load 0x1,0x19
0795 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0796 00e1 | | Load_Encached Boolean_Cache
0797 00d9 | | Load_Top At_Offset_1
0798 e5ff | | Load 0x2,-0x1
0799 e5fe | | Load 0x2,-0x2
079a 0227 | ' | Execute Access,All_Reference
079b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
079c e28e | | Load 0x1,0x8e
079d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
079e 00d1 | | Pop_Control Pop_Count_1
079f 005a | Z | Store_Top Discrete,At_Offset_2
07a0 00d9 | | Load_Top At_Offset_1
07a1 6802 |h | Jump_Zero 0x7a4
07a2 00d8 | | Load_Top At_Offset_0
07a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07a4 e219 | | Load 0x1,0x19
07a5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07a6 0000 0000 | | .XXX[0x2]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07b0 | | .CONST 0x07b0 ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0003 | | .CONST 0x0003 ; Number of locals
07ab INIT_07a8:
07ab e216 | | Load 0x1,0x16
07ac 0322 | " | Declare_Variable Record
07ad 00d8 | | Load_Top At_Offset_0
07ae 1c00 | | Execute_Immediate Run_Utility,0x0
07af 00e1 | | Load_Encached Boolean_Cache
07b0 BODY_07a8:
07b0 00e1 | | Load_Encached Boolean_Cache
07b1 00da | | Load_Top At_Offset_2
07b2 e5ff | | Load 0x2,-0x1
07b3 82a5 | | Call 0x1,0xa5
07b4 e5fe | | Load 0x2,-0x2
07b5 0227 | ' | Execute Access,All_Reference
07b6 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
07b7 e28d | | Load 0x1,0x8d
07b8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07b9 00d1 | | Pop_Control Pop_Count_1
07ba 0059 | Y | Store_Top Discrete,At_Offset_1
07bb 00d8 | | Load_Top At_Offset_0
07bc 6802 |h | Jump_Zero 0x7bf
07bd 00d9 | | Load_Top At_Offset_1
07be 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07bf e219 | | Load 0x1,0x19
07c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07c1 0000 0000 | | .BLANK 0000[0x7]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb | | .CONST 0x07cb ; Address of begin
07c9 0004 | | .CONST 0x0004 ; Address of exception handler
07ca 0001 | | .CONST 0x0001 ; Number of locals
07cb BODY_07c8:
07cb INIT_07c8:
07cb 4607 |F | Jump_Case 0x8
07cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
07cd 7806 |x | Jump 0x7d4 ; case 0x1
07ce 7809 |x | Jump 0x7d8 ; case 0x2
07cf 780d |x | Jump 0x7dd ; case 0x3
07d0 7810 |x | Jump 0x7e1 ; case 0x4
07d1 7811 |x | Jump 0x7e3 ; case 0x5
07d2 7812 |x | Jump 0x7e5 ; case 0x6
07d3 7815 |x | Jump 0x7e9 ; case 0x7
07d4 00da | | Load_Top At_Offset_2
07d5 0091 1f48 | H| Action Push_String_Extended_Indexed,0x1f48 ; "EXACTLY"
07d7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
07d8 00db | | Load_Top At_Offset_3
07d9 00db | | Load_Top At_Offset_3
07da 00e0 | | Load_Encached Standard_Cache
07db 181b | | Execute Package,Field_Execute,Field_Number 0x1b
07dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
07dd 00da | | Load_Top At_Offset_2
07de 00e0 | | Load_Encached Standard_Cache
07df 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07e0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
07e1 00db | | Load_Top At_Offset_3
07e2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
07e3 00db | | Load_Top At_Offset_3
07e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
07e5 e22c | , | Load 0x1,0x2c
07e6 00dc | | Load_Top At_Offset_4
07e7 0267 | g | Execute Discrete,Predecessor
07e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
07e9 e22c | , | Load 0x1,0x2c
07ea 00dc | | Load_Top At_Offset_4
07eb 0268 | h | Execute Discrete,Successor
07ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
07ed 0000 0000 | | .XXX[0x3]
07ef 0000 | |
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3 | | .CONST 0x07f3 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0001 | | .CONST 0x0001 ; Number of locals
07f3 BODY_07f0:
07f3 INIT_07f0:
07f3 4607 |F | Jump_Case 0x8
07f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
07f5 7806 |x | Jump 0x7fc ; case 0x1
07f6 7809 |x | Jump 0x800 ; case 0x2
07f7 780d |x | Jump 0x805 ; case 0x3
07f8 7810 |x | Jump 0x809 ; case 0x4
07f9 7811 |x | Jump 0x80b ; case 0x5
07fa 7812 |x | Jump 0x80d ; case 0x6
07fb 7815 |x | Jump 0x811 ; case 0x7
07fc 00da | | Load_Top At_Offset_2
07fd 0091 1f4a | J| Action Push_String_Extended_Indexed,0x1f4a ; "IMMEDIATE"
07ff 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0800 00db | | Load_Top At_Offset_3
0801 00db | | Load_Top At_Offset_3
0802 00e0 | | Load_Encached Standard_Cache
0803 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0804 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0805 00da | | Load_Top At_Offset_2
0806 00e0 | | Load_Encached Standard_Cache
0807 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0808 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0809 00db | | Load_Top At_Offset_3
080a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
080b 00db | | Load_Top At_Offset_3
080c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
080d e22d | - | Load 0x1,0x2d
080e 00dc | | Load_Top At_Offset_4
080f 0267 | g | Execute Discrete,Predecessor
0810 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0811 e22d | - | Load 0x1,0x2d
0812 00dc | | Load_Top At_Offset_4
0813 0268 | h | Execute Discrete,Successor
0814 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0815 0000 0000 | | .XXX[0x3]
0817 0000 | |
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 0827 | ' | .CONST 0x0827 ; Address of begin
0819 0004 | | .CONST 0x0004 ; Address of exception handler
081a 0003 | | .CONST 0x0003 ; Number of locals
081b INIT_0818:
081b e28f | | Load 0x1,0x8f
081c 00db | | Load_Top At_Offset_3
081d 0227 | ' | Execute Access,All_Reference
081e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
081f 0039 | 9 | Store_Top Access,At_Offset_1
0820 00db | | Load_Top At_Offset_3
0821 0227 | ' | Execute Access,All_Reference
0822 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0823 0227 | ' | Execute Access,All_Reference
0824 01dd | | Execute Vector,First
0825 e21b | | Load 0x1,0x1b
0826 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0827 BODY_0818:
0827 e5ff | | Load 0x2,-0x1
0828 82a7 | | Call 0x1,0xa7
0829 00d8 | | Load_Top At_Offset_0
082a 00da | | Load_Top At_Offset_2
082b e5fb | | Load 0x2,-0x5
082c e5fc | | Load 0x2,-0x4
082d e5fd | | Load 0x2,-0x3
082e e5fe | | Load 0x2,-0x2
082f e5ff | | Load 0x2,-0x1
0830 82b3 | | Call 0x1,0xb3
0831 003b | ; | Store_Top Access,At_Offset_3
0832 0059 | Y | Store_Top Discrete,At_Offset_1
0833 00d8 | | Load_Top At_Offset_0
0834 829e | | Call 0x1,0x9e
0835 6802 |h | Jump_Zero 0x838
0836 821d | | Call 0x1,0x1d
0837 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0838 00d9 | | Load_Top At_Offset_1
0839 0227 | ' | Execute Access,All_Reference
083a 01dd | | Execute Vector,First
083b 00d9 | | Load_Top At_Offset_1
083c 0aff | | Execute_Immediate Plus,-0x1
083d 00db | | Load_Top At_Offset_3
083e 0227 | ' | Execute Access,All_Reference
083f 01cf | | Execute Vector,Slice_Read
0840 0335 | 5 | Declare_Variable Array,Duplicate
0841 00cd | | Action Spare6_Action
0842 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0843 0000 0000 | | .BLANK 0000[0x5]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 0857 | W | .CONST 0x0857 ; Address of begin
0849 0004 | | .CONST 0x0004 ; Address of exception handler
084a 0003 | | .CONST 0x0003 ; Number of locals
084b INIT_0848:
084b e28f | | Load 0x1,0x8f
084c 00db | | Load_Top At_Offset_3
084d 0227 | ' | Execute Access,All_Reference
084e 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
084f 0039 | 9 | Store_Top Access,At_Offset_1
0850 00db | | Load_Top At_Offset_3
0851 0227 | ' | Execute Access,All_Reference
0852 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0853 0227 | ' | Execute Access,All_Reference
0854 01dd | | Execute Vector,First
0855 e21b | | Load 0x1,0x1b
0856 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0857 BODY_0848:
0857 e5fe | | Load 0x2,-0x2
0858 821a | | Call 0x1,0x1a
0859 7006 |p | Jump_Nonzero 0x860
085a e5fe | | Load 0x2,-0x2
085b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
085c 0e07 | | Execute_Immediate Not_Equal,0x7
085d 6802 |h | Jump_Zero 0x860
085e 821d | | Call 0x1,0x1d
085f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0860 e5ff | | Load 0x2,-0x1
0861 82a7 | | Call 0x1,0xa7
0862 00d8 | | Load_Top At_Offset_0
0863 00da | | Load_Top At_Offset_2
0864 e5fe | | Load 0x2,-0x2
0865 e5ff | | Load 0x2,-0x1
0866 82b4 | | Call 0x1,0xb4
0867 003b | ; | Store_Top Access,At_Offset_3
0868 0059 | Y | Store_Top Discrete,At_Offset_1
0869 00d8 | | Load_Top At_Offset_0
086a 829e | | Call 0x1,0x9e
086b 6802 |h | Jump_Zero 0x86e
086c 821d | | Call 0x1,0x1d
086d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
086e 00d9 | | Load_Top At_Offset_1
086f 0227 | ' | Execute Access,All_Reference
0870 01dd | | Execute Vector,First
0871 00d9 | | Load_Top At_Offset_1
0872 0aff | | Execute_Immediate Plus,-0x1
0873 00db | | Load_Top At_Offset_3
0874 0227 | ' | Execute Access,All_Reference
0875 01cf | | Execute Vector,Slice_Read
0876 0335 | 5 | Declare_Variable Array,Duplicate
0877 00cd | | Action Spare6_Action
0878 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0879 0000 0000 | | .BLANK 0000[0x7]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0889 | | .CONST 0x0889 ; Address of begin
0881 0004 | | .CONST 0x0004 ; Address of exception handler
0882 0002 | | .CONST 0x0002 ; Number of locals
0883 INIT_0880:
0883 e002 | | Load 0x0,0x2
0884 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0885 02c7 | | Declare_Variable Any
0886 e002 | | Load 0x0,0x2
0887 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0888 a402 | | Store_Unchecked 0x2,0x2
0889 BODY_0880:
0889 00db | | Load_Top At_Offset_3
088a 820f | | Call 0x1,0xf
088b 6803 |h | Jump_Zero 0x88f
088c e002 | | Load 0x0,0x2
088d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
088e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
088f 00d8 | | Load_Top At_Offset_0
0890 e5ff | | Load 0x2,-0x1
0891 82ba | | Call 0x1,0xba
0892 c402 | | Store 0x2,0x2
0893 00d8 | | Load_Top At_Offset_0
0894 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0895 0000 0000 | | .XXX[0x3]
0897 0000 | |
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 08b3 | | .CONST 0x08b3 ; Address of begin
0899 0004 | | .CONST 0x0004 ; Address of exception handler
089a 0005 | | .CONST 0x0005 ; Number of locals
089b INIT_0898:
089b 00da | | Load_Top At_Offset_2
089c 0227 | ' | Execute Access,All_Reference
089d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
089e 0007 | | Action Break_Optional
089f e20e | | Load 0x1,0xe
08a0 02c7 | | Declare_Variable Any
08a1 e5fe | | Load 0x2,-0x2
08a2 e5ff | | Load 0x2,-0x1
08a3 0227 | ' | Execute Access,All_Reference
08a4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08a5 01d7 | | Execute Vector,Field_Read
08a6 a403 | | Store_Unchecked 0x2,0x3
08a7 e28f | | Load 0x1,0x8f
08a8 e5ff | | Load 0x2,-0x1
08a9 0227 | ' | Execute Access,All_Reference
08aa 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
08ab 0039 | 9 | Store_Top Access,At_Offset_1
08ac e5ff | | Load 0x2,-0x1
08ad 0227 | ' | Execute Access,All_Reference
08ae 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
08af 0227 | ' | Execute Access,All_Reference
08b0 01dd | | Execute Vector,First
08b1 e21b | | Load 0x1,0x1b
08b2 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
08b3 BODY_0898:
08b3 00da | | Load_Top At_Offset_2
08b4 e002 | | Load 0x0,0x2
08b5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
08b6 c403 | | Store 0x2,0x3
08b7 00cf | | Action Mark_Auxiliary
08b8 7810 |x | Jump 0x8c9
08b9 00d9 | | Load_Top At_Offset_1
08ba 00db | | Load_Top At_Offset_3
08bb e403 | | Load 0x2,0x3
08bc e002 | | Load 0x0,0x2
08bd 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
08be e402 | | Load 0x2,0x2
08bf e28e | | Load 0x1,0x8e
08c0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08c1 82a0 | | Call 0x1,0xa0
08c2 c404 | | Store 0x2,0x4
08c3 005a | Z | Store_Top Discrete,At_Offset_2
08c4 00db | | Load_Top At_Offset_3
08c5 e002 | | Load 0x0,0x2
08c6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
08c7 c403 | | Store 0x2,0x3
08c8 00c9 | | Action Pop_Auxiliary_Loop
08c9 00db | | Load_Top At_Offset_3
08ca e002 | | Load 0x0,0x2
08cb 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
08cc 6fec |o | Jump_Zero 0x8b9
08cd 00ce | | Action Pop_Auxiliary
08ce 00d8 | | Load_Top At_Offset_0
08cf 829e | | Call 0x1,0x9e
08d0 6802 |h | Jump_Zero 0x8d3
08d1 821d | | Call 0x1,0x1d
08d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08d3 00d9 | | Load_Top At_Offset_1
08d4 0227 | ' | Execute Access,All_Reference
08d5 01dd | | Execute Vector,First
08d6 00d9 | | Load_Top At_Offset_1
08d7 0aff | | Execute_Immediate Plus,-0x1
08d8 00db | | Load_Top At_Offset_3
08d9 0227 | ' | Execute Access,All_Reference
08da 01cf | | Execute Vector,Slice_Read
08db 0335 | 5 | Declare_Variable Array,Duplicate
08dc 00cd | | Action Spare6_Action
08dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08de 0000 0000 | | .XXX[0x2]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e3 | | .CONST 0x08e3 ; Address of begin
08e1 0004 | | .CONST 0x0004 ; Address of exception handler
08e2 0001 | | .CONST 0x0001 ; Number of locals
08e3 BODY_08e0:
08e3 INIT_08e0:
08e3 00da | | Load_Top At_Offset_2
08e4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08e5 00d8 | | Load_Top At_Offset_0
08e6 0120 | | Execute Any,Is_Value
08e7 7002 |p | Jump_Nonzero 0x8ea
08e8 00d8 | | Load_Top At_Offset_0
08e9 011e | | Execute Any,Convert
08ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08eb 0000 0000 | | .BLANK 0000[0x5]
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 0910 | | .CONST 0x0910 ; Address of begin
08f1 0004 | | .CONST 0x0004 ; Address of exception handler
08f2 0007 | | .CONST 0x0007 ; Number of locals
08f3 INIT_08f0:
08f3 00e1 | | Load_Encached Boolean_Cache
08f4 e216 | | Load 0x1,0x16
08f5 0322 | " | Declare_Variable Record
08f6 00d8 | | Load_Top At_Offset_0
08f7 1c00 | | Execute_Immediate Run_Utility,0x0
08f8 e5fe | | Load 0x2,-0x2
08f9 0227 | ' | Execute Access,All_Reference
08fa 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
08fb 0007 | | Action Break_Optional
08fc e001 | | Load 0x0,0x1
08fd 1b20 | | Execute Package,Field_Read,Field_Number 0x20
08fe 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
08ff 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0900 02c7 | | Declare_Variable Any
0901 e5ff | | Load 0x2,-0x1
0902 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0903 a405 | | Store_Unchecked 0x2,0x5
0904 e28f | | Load 0x1,0x8f
0905 e5fe | | Load 0x2,-0x2
0906 0227 | ' | Execute Access,All_Reference
0907 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0908 0039 | 9 | Store_Top Access,At_Offset_1
0909 e5fe | | Load 0x2,-0x2
090a 0227 | ' | Execute Access,All_Reference
090b 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
090c 0227 | ' | Execute Access,All_Reference
090d 01dd | | Execute Vector,First
090e e21b | | Load 0x1,0x1b
090f 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0910 BODY_08f0:
0910 00da | | Load_Top At_Offset_2
0911 e001 | | Load 0x0,0x1
0912 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0913 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0914 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0915 c405 | | Store 0x2,0x5
0916 00cf | | Action Mark_Auxiliary
0917 781c |x | Jump 0x934
0918 00e1 | | Load_Encached Boolean_Cache
0919 e403 | | Load 0x2,0x3
091a e405 | | Load 0x2,0x5
091b e001 | | Load 0x0,0x1
091c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
091d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
091e 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
091f 82a5 | | Call 0x1,0xa5
0920 e404 | | Load 0x2,0x4
0921 e28d | | Load 0x1,0x8d
0922 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0923 00d1 | | Pop_Control Pop_Count_1
0924 c402 | | Store 0x2,0x2
0925 e402 | | Load 0x2,0x2
0926 6806 |h | Jump_Zero 0x92d
0927 00d9 | | Load_Top At_Offset_1
0928 00db | | Load_Top At_Offset_3
0929 e403 | | Load 0x2,0x3
092a 82a0 | | Call 0x1,0xa0
092b c406 | | Store 0x2,0x6
092c 005a | Z | Store_Top Discrete,At_Offset_2
092d 00db | | Load_Top At_Offset_3
092e e001 | | Load 0x0,0x1
092f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0930 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0931 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0932 c405 | | Store 0x2,0x5
0933 00c9 | | Action Pop_Auxiliary_Loop
0934 00db | | Load_Top At_Offset_3
0935 e001 | | Load 0x0,0x1
0936 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0937 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0938 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0939 6fde |o | Jump_Zero 0x918
093a 00ce | | Action Pop_Auxiliary
093b 00d8 | | Load_Top At_Offset_0
093c 829e | | Call 0x1,0x9e
093d 6802 |h | Jump_Zero 0x940
093e 821d | | Call 0x1,0x1d
093f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0940 00d9 | | Load_Top At_Offset_1
0941 0227 | ' | Execute Access,All_Reference
0942 01dd | | Execute Vector,First
0943 00d9 | | Load_Top At_Offset_1
0944 0aff | | Execute_Immediate Plus,-0x1
0945 00db | | Load_Top At_Offset_3
0946 0227 | ' | Execute Access,All_Reference
0947 01cf | | Execute Vector,Slice_Read
0948 0335 | 5 | Declare_Variable Array,Duplicate
0949 00cd | | Action Spare6_Action
094a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
094b 0000 0000 | | .BLANK 0000[0x5]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0970 | p | .CONST 0x0970 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0007 | | .CONST 0x0007 ; Number of locals
0953 INIT_0950:
0953 00e1 | | Load_Encached Boolean_Cache
0954 e216 | | Load 0x1,0x16
0955 0322 | " | Declare_Variable Record
0956 00d8 | | Load_Top At_Offset_0
0957 1c00 | | Execute_Immediate Run_Utility,0x0
0958 e5fe | | Load 0x2,-0x2
0959 0227 | ' | Execute Access,All_Reference
095a 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
095b 0007 | | Action Break_Optional
095c e001 | | Load 0x0,0x1
095d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
095e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
095f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0960 02c7 | | Declare_Variable Any
0961 e5ff | | Load 0x2,-0x1
0962 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0963 a405 | | Store_Unchecked 0x2,0x5
0964 e28f | | Load 0x1,0x8f
0965 e5fe | | Load 0x2,-0x2
0966 0227 | ' | Execute Access,All_Reference
0967 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0968 0039 | 9 | Store_Top Access,At_Offset_1
0969 e5fe | | Load 0x2,-0x2
096a 0227 | ' | Execute Access,All_Reference
096b 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
096c 0227 | ' | Execute Access,All_Reference
096d 01dd | | Execute Vector,First
096e e21b | | Load 0x1,0x1b
096f 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0970 BODY_0950:
0970 00da | | Load_Top At_Offset_2
0971 e001 | | Load 0x0,0x1
0972 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0973 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0974 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0975 c405 | | Store 0x2,0x5
0976 00cf | | Action Mark_Auxiliary
0977 7820 |x | Jump 0x998
0978 00e1 | | Load_Encached Boolean_Cache
0979 e403 | | Load 0x2,0x3
097a e405 | | Load 0x2,0x5
097b e001 | | Load 0x0,0x1
097c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
097d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
097e 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
097f 82a5 | | Call 0x1,0xa5
0980 e404 | | Load 0x2,0x4
0981 e28d | | Load 0x1,0x8d
0982 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0983 00d1 | | Pop_Control Pop_Count_1
0984 c402 | | Store 0x2,0x2
0985 e402 | | Load 0x2,0x2
0986 680a |h | Jump_Zero 0x991
0987 e403 | | Load 0x2,0x3
0988 8232 | 2 | Call 0x1,0x32
0989 0f08 | | Execute_Immediate Equal,0x8
098a 6806 |h | Jump_Zero 0x991
098b 00d9 | | Load_Top At_Offset_1
098c 00db | | Load_Top At_Offset_3
098d e403 | | Load 0x2,0x3
098e 82a0 | | Call 0x1,0xa0
098f c406 | | Store 0x2,0x6
0990 005a | Z | Store_Top Discrete,At_Offset_2
0991 00db | | Load_Top At_Offset_3
0992 e001 | | Load 0x0,0x1
0993 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0994 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0995 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0996 c405 | | Store 0x2,0x5
0997 00c9 | | Action Pop_Auxiliary_Loop
0998 00db | | Load_Top At_Offset_3
0999 e001 | | Load 0x0,0x1
099a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
099b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
099c 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
099d 6fda |o | Jump_Zero 0x978
099e 00ce | | Action Pop_Auxiliary
099f 00d8 | | Load_Top At_Offset_0
09a0 829e | | Call 0x1,0x9e
09a1 6802 |h | Jump_Zero 0x9a4
09a2 821d | | Call 0x1,0x1d
09a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
09a4 00d9 | | Load_Top At_Offset_1
09a5 0227 | ' | Execute Access,All_Reference
09a6 01dd | | Execute Vector,First
09a7 00d9 | | Load_Top At_Offset_1
09a8 0aff | | Execute_Immediate Plus,-0x1
09a9 00db | | Load_Top At_Offset_3
09aa 0227 | ' | Execute Access,All_Reference
09ab 01cf | | Execute Vector,Slice_Read
09ac 0335 | 5 | Declare_Variable Array,Duplicate
09ad 00cd | | Action Spare6_Action
09ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
09af 0000 | | .XXX[0x1]
09b0 ; --------------------------------------------------------------------------------------
09b0 ; SUBPROGRAM
09b0 ; --------------------------------------------------------------------------------------
09b0 09b3 | | .CONST 0x09b3 ; Address of begin
09b1 0004 | | .CONST 0x0004 ; Address of exception handler
09b2 0001 | | .CONST 0x0001 ; Number of locals
09b3 BODY_09b0:
09b3 INIT_09b0:
09b3 00da | | Load_Top At_Offset_2
09b4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09b6 0000 0000 | | .XXX[0x2]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09c1 | | .CONST 0x09c1 ; Address of begin
09b9 0004 | | .CONST 0x0004 ; Address of exception handler
09ba 0002 | | .CONST 0x0002 ; Number of locals
09bb INIT_09b8:
09bb e002 | | Load 0x0,0x2
09bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09bd 02c7 | | Declare_Variable Any
09be 00db | | Load_Top At_Offset_3
09bf 82a2 | | Call 0x1,0xa2
09c0 a402 | | Store_Unchecked 0x2,0x2
09c1 BODY_09b8:
09c1 00d8 | | Load_Top At_Offset_0
09c2 e002 | | Load 0x0,0x2
09c3 180f | | Execute Package,Field_Execute,Field_Number 0xf
09c4 6803 |h | Jump_Zero 0x9c8
09c5 0092 1f5b | [| Action Push_String_Extended,0x1f5b ; "<NIL_COMPONENT>"
09c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09c8 00d8 | | Load_Top At_Offset_0
09c9 e01b | | Load 0x0,0x1b
09ca 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
09cb 82a3 | | Call 0x1,0xa3
09cc e5ff | | Load 0x2,-0x1
09cd 82a4 | | Call 0x1,0xa4
09ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09cf 0000 | | .XXX[0x1]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3 | | .CONST 0x09d3 ; Address of begin
09d1 0004 | | .CONST 0x0004 ; Address of exception handler
09d2 0001 | | .CONST 0x0001 ; Number of locals
09d3 BODY_09d0:
09d3 INIT_09d0:
09d3 00da | | Load_Top At_Offset_2
09d4 821a | | Call 0x1,0x1a
09d5 6802 |h | Jump_Zero 0x9d8
09d6 00ea | | Load_Encached Null_String_Cache
09d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09d8 00da | | Load_Top At_Offset_2
09d9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
09da 0217 | | Execute Heap_Access,All_Reference
09db 0335 | 5 | Declare_Variable Array,Duplicate
09dc 00cd | | Action Spare6_Action
09dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09de 0000 0000 | | .XXX[0x2]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 00da | | Load_Top At_Offset_2
09e4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
09e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09e6 0000 0000 | | .XXX[0x2]
09e8 ; --------------------------------------------------------------------------------------
09e8 ; SUBPROGRAM
09e8 ; --------------------------------------------------------------------------------------
09e8 09eb | | .CONST 0x09eb ; Address of begin
09e9 0004 | | .CONST 0x0004 ; Address of exception handler
09ea 0001 | | .CONST 0x0001 ; Number of locals
09eb BODY_09e8:
09eb INIT_09e8:
09eb 00db | | Load_Top At_Offset_3
09ec 00db | | Load_Top At_Offset_3
09ed 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
09ee 82ab | | Call 0x1,0xab
09ef 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3 | | .CONST 0x09f3 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0001 | | .CONST 0x0001 ; Number of locals
09f3 BODY_09f0:
09f3 INIT_09f0:
09f3 00da | | Load_Top At_Offset_2
09f4 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
09f5 0320 | | Declare_Variable Record,Duplicate
09f6 00cd | | Action Spare6_Action
09f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 09fb | | .CONST 0x09fb ; Address of begin
09f9 0004 | | .CONST 0x0004 ; Address of exception handler
09fa 0001 | | .CONST 0x0001 ; Number of locals
09fb BODY_09f8:
09fb INIT_09f8:
09fb 00da | | Load_Top At_Offset_2
09fc 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
09fd 7002 |p | Jump_Nonzero 0xa00
09fe e26f | o | Load 0x1,0x6f
09ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a00 00da | | Load_Top At_Offset_2
0a01 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0a02 0217 | | Execute Heap_Access,All_Reference
0a03 0335 | 5 | Declare_Variable Array,Duplicate
0a04 00cd | | Action Spare6_Action
0a05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a06 0000 0000 | | .XXX[0x2]
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a0b | | .CONST 0x0a0b ; Address of begin
0a09 0004 | | .CONST 0x0004 ; Address of exception handler
0a0a 0001 | | .CONST 0x0001 ; Number of locals
0a0b BODY_0a08:
0a0b INIT_0a08:
0a0b 00da | | Load_Top At_Offset_2
0a0c 0f0b | | Execute_Immediate Equal,0xb
0a0d 7006 |p | Jump_Nonzero 0xa14
0a0e 00da | | Load_Top At_Offset_2
0a0f e001 | | Load 0x0,0x1
0a10 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0a11 011c | | Execute Any,Convert_Unchecked
0a12 1c01 | | Execute_Immediate Run_Utility,0x1
0a13 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a14 0092 1f5c | \| Action Push_String_Extended,0x1f5c ; "UNKNOWN"
0a16 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a17 0000 | | .XXX[0x1]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a24 | $ | .CONST 0x0a24 ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0003 | | .CONST 0x0003 ; Number of locals
0a1b INIT_0a18:
0a1b e20d | | Load 0x1,0xd
0a1c 02c7 | | Declare_Variable Any
0a1d 00db | | Load_Top At_Offset_3
0a1e 823d | = | Call 0x1,0x3d
0a1f a402 | | Store_Unchecked 0x2,0x2
0a20 e216 | | Load 0x1,0x16
0a21 0322 | " | Declare_Variable Record
0a22 00d8 | | Load_Top At_Offset_0
0a23 1c00 | | Execute_Immediate Run_Utility,0x0
0a24 BODY_0a18:
0a24 00d9 | | Load_Top At_Offset_1
0a25 820f | | Call 0x1,0xf
0a26 6802 |h | Jump_Zero 0xa29
0a27 e219 | | Load 0x1,0x19
0a28 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a29 00d8 | | Load_Top At_Offset_0
0a2a e215 | | Load 0x1,0x15
0a2b 00db | | Load_Top At_Offset_3
0a2c 8234 | 4 | Call 0x1,0x34
0a2d e001 | | Load 0x0,0x1
0a2e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0a2f 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0a30 e402 | | Load 0x2,0x2
0a31 8242 | B | Call 0x1,0x42
0a32 e402 | | Load 0x2,0x2
0a33 82b5 | | Call 0x1,0xb5
0a34 00d1 | | Pop_Control Pop_Count_1
0a35 00d8 | | Load_Top At_Offset_0
0a36 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a37 0000 | | .XXX[0x1]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a4a | J | .CONST 0x0a4a ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0005 | | .CONST 0x0005 ; Number of locals
0a3b INIT_0a38:
0a3b e20d | | Load 0x1,0xd
0a3c 02c7 | | Declare_Variable Any
0a3d 00db | | Load_Top At_Offset_3
0a3e e01b | | Load 0x0,0x1b
0a3f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0a40 a402 | | Store_Unchecked 0x2,0x2
0a41 e20d | | Load 0x1,0xd
0a42 02c7 | | Declare_Variable Any
0a43 00d8 | | Load_Top At_Offset_0
0a44 1c00 | | Execute_Immediate Run_Utility,0x0
0a45 00e1 | | Load_Encached Boolean_Cache
0a46 e216 | | Load 0x1,0x16
0a47 0322 | " | Declare_Variable Record
0a48 00d8 | | Load_Top At_Offset_0
0a49 1c00 | | Execute_Immediate Run_Utility,0x0
0a4a BODY_0a38:
0a4a 00cf | | Action Mark_Auxiliary
0a4b 785b |x[ | Jump 0xaa7
0a4c e402 | | Load 0x2,0x2
0a4d e01b | | Load 0x0,0x1b
0a4e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a4f 4626 |F& | Jump_Case 0x27
0a50 7826 |x& | Jump 0xa77 ; case 0x0
0a51 7825 |x% | Jump 0xa77 ; case 0x1
0a52 7824 |x$ | Jump 0xa77 ; case 0x2
0a53 7823 |x# | Jump 0xa77 ; case 0x3
0a54 7822 |x" | Jump 0xa77 ; case 0x4
0a55 7821 |x! | Jump 0xa77 ; case 0x5
0a56 7820 |x | Jump 0xa77 ; case 0x6
0a57 781f |x | Jump 0xa77 ; case 0x7
0a58 7821 |x! | Jump 0xa7a ; case 0x8
0a59 782b |x+ | Jump 0xa85 ; case 0x9
0a5a 781f |x | Jump 0xa7a ; case 0xa
0a5b 7829 |x) | Jump 0xa85 ; case 0xb
0a5c 781d |x | Jump 0xa7a ; case 0xc
0a5d 7827 |x' | Jump 0xa85 ; case 0xd
0a5e 7818 |x | Jump 0xa77 ; case 0xe
0a5f 7817 |x | Jump 0xa77 ; case 0xf
0a60 7816 |x | Jump 0xa77 ; case 0x10
0a61 7815 |x | Jump 0xa77 ; case 0x11
0a62 7814 |x | Jump 0xa77 ; case 0x12
0a63 7816 |x | Jump 0xa7a ; case 0x13
0a64 7815 |x | Jump 0xa7a ; case 0x14
0a65 7814 |x | Jump 0xa7a ; case 0x15
0a66 7810 |x | Jump 0xa77 ; case 0x16
0a67 780f |x | Jump 0xa77 ; case 0x17
0a68 780e |x | Jump 0xa77 ; case 0x18
0a69 7810 |x | Jump 0xa7a ; case 0x19
0a6a 781a |x | Jump 0xa85 ; case 0x1a
0a6b 780e |x | Jump 0xa7a ; case 0x1b
0a6c 780a |x | Jump 0xa77 ; case 0x1c
0a6d 7809 |x | Jump 0xa77 ; case 0x1d
0a6e 7808 |x | Jump 0xa77 ; case 0x1e
0a6f 7807 |x | Jump 0xa77 ; case 0x1f
0a70 7806 |x | Jump 0xa77 ; case 0x20
0a71 7805 |x | Jump 0xa77 ; case 0x21
0a72 7804 |x | Jump 0xa77 ; case 0x22
0a73 7803 |x | Jump 0xa77 ; case 0x23
0a74 7802 |x | Jump 0xa77 ; case 0x24
0a75 7801 |x | Jump 0xa77 ; case 0x25
0a76 7800 |x | Jump 0xa77 ; case 0x26
0a77 4800 |H | Short_Literal 0x0
0a78 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0a79 7822 |x" | Jump 0xa9c
0a7a 00e1 | | Load_Encached Boolean_Cache
0a7b 00da | | Load_Top At_Offset_2
0a7c e402 | | Load 0x2,0x2
0a7d e5fe | | Load 0x2,-0x2
0a7e 0227 | ' | Execute Access,All_Reference
0a7f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a80 e28e | | Load 0x1,0x8e
0a81 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a82 00d1 | | Pop_Control Pop_Count_1
0a83 005b | [ | Store_Top Discrete,At_Offset_3
0a84 7817 |x | Jump 0xa9c
0a85 e402 | | Load 0x2,0x2
0a86 e01b | | Load 0x0,0x1b
0a87 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0a88 c403 | | Store 0x2,0x3
0a89 00db | | Load_Top At_Offset_3
0a8a e002 | | Load 0x0,0x2
0a8b 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a8c 700d |p | Jump_Nonzero 0xa9a
0a8d 00db | | Load_Top At_Offset_3
0a8e c402 | | Store 0x2,0x2
0a8f 00e1 | | Load_Encached Boolean_Cache
0a90 00da | | Load_Top At_Offset_2
0a91 e402 | | Load 0x2,0x2
0a92 e5fe | | Load 0x2,-0x2
0a93 0227 | ' | Execute Access,All_Reference
0a94 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a95 e28e | | Load 0x1,0x8e
0a96 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a97 00d1 | | Pop_Control Pop_Count_1
0a98 005b | [ | Store_Top Discrete,At_Offset_3
0a99 7802 |x | Jump 0xa9c
0a9a 4800 |H | Short_Literal 0x0
0a9b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0a9c 00da | | Load_Top At_Offset_2
0a9d 6802 |h | Jump_Zero 0xaa0
0a9e 00d9 | | Load_Top At_Offset_1
0a9f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aa0 e402 | | Load 0x2,0x2
0aa1 e002 | | Load 0x0,0x2
0aa2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0aa3 e01b | | Load 0x0,0x1b
0aa4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0aa5 c402 | | Store 0x2,0x2
0aa6 00c9 | | Action Pop_Auxiliary_Loop
0aa7 e402 | | Load 0x2,0x2
0aa8 e002 | | Load 0x0,0x2
0aa9 180f | | Execute Package,Field_Execute,Field_Number 0xf
0aaa 6fa1 |o | Jump_Zero 0xa4c
0aab 00ce | | Action Pop_Auxiliary
0aac 00db | | Load_Top At_Offset_3
0aad e002 | | Load 0x0,0x2
0aae 180f | | Execute Package,Field_Execute,Field_Number 0xf
0aaf 7006 |p | Jump_Nonzero 0xab6
0ab0 4801 |H | Short_Literal 0x1
0ab1 e402 | | Load 0x2,0x2
0ab2 e002 | | Load 0x0,0x2
0ab3 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0ab4 8274 | t | Call 0x1,0x74
0ab5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ab6 e219 | | Load 0x1,0x19
0ab7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0ac7 | | .CONST 0x0ac7 ; Address of begin
0ab9 0004 | | .CONST 0x0004 ; Address of exception handler
0aba 0003 | | .CONST 0x0003 ; Number of locals
0abb INIT_0ab8:
0abb 4801 |H | Short_Literal 0x1
0abc 00db | | Load_Top At_Offset_3
0abd 82bb | | Call 0x1,0xbb
0abe e21c | | Load 0x1,0x1c
0abf 035b | [ | Declare_Type Array,Constrained
0ac0 0337 | 7 | Declare_Variable Array
0ac1 00d8 | | Load_Top At_Offset_0
0ac2 1c00 | | Execute_Immediate Run_Utility,0x0
0ac3 e20e | | Load 0x1,0xe
0ac4 02c7 | | Declare_Variable Any
0ac5 e5ff | | Load 0x2,-0x1
0ac6 a403 | | Store_Unchecked 0x2,0x3
0ac7 BODY_0ab8:
0ac7 00d8 | | Load_Top At_Offset_0
0ac8 e002 | | Load 0x0,0x2
0ac9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0aca c403 | | Store 0x2,0x3
0acb 00cf | | Action Mark_Auxiliary
0acc 00da | | Load_Top At_Offset_2
0acd 01d9 | | Execute Vector,Reverse_Bounds
0ace 0263 | c | Execute Discrete,Above_Bound
0acf 700e |p | Jump_Nonzero 0xade
0ad0 e5fe | | Load 0x2,-0x2
0ad1 e5ff | | Load 0x2,-0x1
0ad2 e002 | | Load 0x0,0x2
0ad3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0ad4 823b | ; | Call 0x1,0x3b
0ad5 00d9 | | Load_Top At_Offset_1
0ad6 e402 | | Load 0x2,0x2
0ad7 01d6 | | Execute Vector,Field_Write
0ad8 00db | | Load_Top At_Offset_3
0ad9 e002 | | Load 0x0,0x2
0ada 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0adb c403 | | Store 0x2,0x3
0adc 00c8 | | Action Pop_Auxiliary_Range
0add 3ff2 |? | Loop_Increasing 0xad0
0ade 00ce | | Action Pop_Auxiliary
0adf 00d9 | | Load_Top At_Offset_1
0ae0 e21c | | Load 0x1,0x1c
0ae1 01c6 | | Execute Vector,Convert_To_Formal
0ae2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ae3 0000 0000 | | .BLANK 0000[0x5]
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0af2 | | .CONST 0x0af2 ; Address of begin
0ae9 0004 | | .CONST 0x0004 ; Address of exception handler
0aea 0002 | | .CONST 0x0002 ; Number of locals
0aeb INIT_0ae8:
0aeb e216 | | Load 0x1,0x16
0aec 0322 | " | Declare_Variable Record
0aed e5fe | | Load 0x2,-0x2
0aee e5ff | | Load 0x2,-0x1
0aef 823b | ; | Call 0x1,0x3b
0af0 00d9 | | Load_Top At_Offset_1
0af1 017d | } | Execute Record,Structure_Write
0af2 BODY_0ae8:
0af2 00d8 | | Load_Top At_Offset_0
0af3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0af4 0e0b | | Execute_Immediate Not_Equal,0xb
0af5 6803 |h | Jump_Zero 0xaf9
0af6 00d8 | | Load_Top At_Offset_0
0af7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0af8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0af9 e210 | | Load 0x1,0x10
0afa 00d8 | | Load_Top At_Offset_0
0afb 0120 | | Execute Any,Is_Value
0afc 7002 |p | Jump_Nonzero 0xaff
0afd 00d8 | | Load_Top At_Offset_0
0afe 011e | | Execute Any,Convert
0aff 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b07 | | .CONST 0x0b07 ; Address of begin
0b01 0004 | | .CONST 0x0004 ; Address of exception handler
0b02 0002 | | .CONST 0x0002 ; Number of locals
0b03 INIT_0b00:
0b03 e20d | | Load 0x1,0xd
0b04 02c7 | | Declare_Variable Any
0b05 00db | | Load_Top At_Offset_3
0b06 a402 | | Store_Unchecked 0x2,0x2
0b07 BODY_0b00:
0b07 e001 | | Load 0x0,0x1
0b08 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0b09 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0b0a 00d9 | | Load_Top At_Offset_1
0b0b 8242 | B | Call 0x1,0x42
0b0c 0f0b | | Execute_Immediate Equal,0xb
0b0d 6813 |h | Jump_Zero 0xb21
0b0e 00cf | | Action Mark_Auxiliary
0b0f 7805 |x | Jump 0xb15
0b10 00d9 | | Load_Top At_Offset_1
0b11 e002 | | Load 0x0,0x2
0b12 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b13 c402 | | Store 0x2,0x2
0b14 00c9 | | Action Pop_Auxiliary_Loop
0b15 00d9 | | Load_Top At_Offset_1
0b16 e002 | | Load 0x0,0x2
0b17 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b18 7007 |p | Jump_Nonzero 0xb20
0b19 e001 | | Load 0x0,0x1
0b1a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0b1b 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0b1c 00da | | Load_Top At_Offset_2
0b1d 8242 | B | Call 0x1,0x42
0b1e 0f0b | | Execute_Immediate Equal,0xb
0b1f 77f0 |w | Jump_Nonzero 0xb10
0b20 00ce | | Action Pop_Auxiliary
0b21 00d8 | | Load_Top At_Offset_0
0b22 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b23 0000 0000 | | .BLANK 0000[0x5]
0b28 ; --------------------------------------------------------------------------------------
0b28 ; SUBPROGRAM
0b28 ; --------------------------------------------------------------------------------------
0b28 0b42 | B | .CONST 0x0b42 ; Address of begin
0b29 0004 | | .CONST 0x0004 ; Address of exception handler
0b2a 0008 | | .CONST 0x0008 ; Number of locals
0b2b INIT_0b28:
0b2b e002 | | Load 0x0,0x2
0b2c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b2d 02c7 | | Declare_Variable Any
0b2e 00d8 | | Load_Top At_Offset_0
0b2f 1c00 | | Execute_Immediate Run_Utility,0x0
0b30 e002 | | Load 0x0,0x2
0b31 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0b32 02c7 | | Declare_Variable Any
0b33 e002 | | Load 0x0,0x2
0b34 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0b35 a403 | | Store_Unchecked 0x2,0x3
0b36 029f 1933 | 3| Declare_Subprogram INIT_1930,For_Call
0b38 e002 | | Load 0x0,0x2
0b39 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0b3a 00c6 | | Action Check_Subprogram_Elaborated
0b3b 4804 |H | Short_Literal 0x4
0b3c 4802 |H | Short_Literal 0x2
0b3d 0099 | | Action Reference_Dynamic
0b3e e01c | | Load 0x0,0x1c
0b3f e01d | | Load 0x0,0x1d
0b40 4808 |H | Short_Literal 0x8
0b41 0007 | | Action Break_Optional
0b42 BODY_0b28:
0b42 e5ff | | Load 0x2,-0x1
0b43 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b44 820f | | Call 0x1,0xf
0b45 6807 |h | Jump_Zero 0xb4d
0b46 e211 | | Load 0x1,0x11
0b47 00d8 | | Load_Top At_Offset_0
0b48 0120 | | Execute Any,Is_Value
0b49 7002 |p | Jump_Nonzero 0xb4c
0b4a 00d8 | | Load_Top At_Offset_0
0b4b 011e | | Execute Any,Convert
0b4c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b4d e5ff | | Load 0x2,-0x1
0b4e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b4f 82a2 | | Call 0x1,0xa2
0b50 c402 | | Store 0x2,0x2
0b51 e402 | | Load 0x2,0x2
0b52 e01b | | Load 0x0,0x1b
0b53 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0b54 4626 |F& | Jump_Case 0x27
0b55 7872 |xr | Jump 0xbc8 ; case 0x0
0b56 7871 |xq | Jump 0xbc8 ; case 0x1
0b57 7870 |xp | Jump 0xbc8 ; case 0x2
0b58 786f |xo | Jump 0xbc8 ; case 0x3
0b59 786e |xn | Jump 0xbc8 ; case 0x4
0b5a 786d |xm | Jump 0xbc8 ; case 0x5
0b5b 786c |xl | Jump 0xbc8 ; case 0x6
0b5c 786b |xk | Jump 0xbc8 ; case 0x7
0b5d 7857 |xW | Jump 0xbb5 ; case 0x8
0b5e 7869 |xi | Jump 0xbc8 ; case 0x9
0b5f 7830 |x0 | Jump 0xb90 ; case 0xa
0b60 7867 |xg | Jump 0xbc8 ; case 0xb
0b61 783c |x< | Jump 0xb9e ; case 0xc
0b62 7865 |xe | Jump 0xbc8 ; case 0xd
0b63 7864 |xd | Jump 0xbc8 ; case 0xe
0b64 782b |x+ | Jump 0xb90 ; case 0xf
0b65 7838 |x8 | Jump 0xb9e ; case 0x10
0b66 7861 |xa | Jump 0xbc8 ; case 0x11
0b67 7860 |x` | Jump 0xbc8 ; case 0x12
0b68 784c |xL | Jump 0xbb5 ; case 0x13
0b69 7826 |x& | Jump 0xb90 ; case 0x14
0b6a 7833 |x3 | Jump 0xb9e ; case 0x15
0b6b 785c |x\ | Jump 0xbc8 ; case 0x16
0b6c 785b |x[ | Jump 0xbc8 ; case 0x17
0b6d 785a |xZ | Jump 0xbc8 ; case 0x18
0b6e 780d |x | Jump 0xb7c ; case 0x19
0b6f 7858 |xX | Jump 0xbc8 ; case 0x1a
0b70 780b |x | Jump 0xb7c ; case 0x1b
0b71 7856 |xV | Jump 0xbc8 ; case 0x1c
0b72 7855 |xU | Jump 0xbc8 ; case 0x1d
0b73 7854 |xT | Jump 0xbc8 ; case 0x1e
0b74 7853 |xS | Jump 0xbc8 ; case 0x1f
0b75 7852 |xR | Jump 0xbc8 ; case 0x20
0b76 7851 |xQ | Jump 0xbc8 ; case 0x21
0b77 7850 |xP | Jump 0xbc8 ; case 0x22
0b78 784f |xO | Jump 0xbc8 ; case 0x23
0b79 784e |xN | Jump 0xbc8 ; case 0x24
0b7a 784d |xM | Jump 0xbc8 ; case 0x25
0b7b 784c |xL | Jump 0xbc8 ; case 0x26
0b7c e403 | | Load 0x2,0x3
0b7d 0120 | | Execute Any,Is_Value
0b7e 6803 |h | Jump_Zero 0xb82
0b7f e002 | | Load 0x0,0x2
0b80 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0b81 7801 |x | Jump 0xb83
0b82 e403 | | Load 0x2,0x3
0b83 e402 | | Load 0x2,0x2
0b84 e01b | | Load 0x0,0x1b
0b85 1855 | U | Execute Package,Field_Execute,Field_Number 0x55
0b86 4805 |H | Short_Literal 0x5
0b87 4802 |H | Short_Literal 0x2
0b88 0099 | | Action Reference_Dynamic
0b89 4806 |H | Short_Literal 0x6
0b8a 4802 |H | Short_Literal 0x2
0b8b 0099 | | Action Reference_Dynamic
0b8c e002 | | Load 0x0,0x2
0b8d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0b8e c403 | | Store 0x2,0x3
0b8f 7838 |x8 | Jump 0xbc8
0b90 e403 | | Load 0x2,0x3
0b91 0120 | | Execute Any,Is_Value
0b92 6803 |h | Jump_Zero 0xb96
0b93 e002 | | Load 0x0,0x2
0b94 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0b95 7801 |x | Jump 0xb97
0b96 e403 | | Load 0x2,0x3
0b97 e402 | | Load 0x2,0x2
0b98 e01b | | Load 0x0,0x1b
0b99 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0b9a e002 | | Load 0x0,0x2
0b9b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b9c c403 | | Store 0x2,0x3
0b9d 782a |x* | Jump 0xbc8
0b9e e403 | | Load 0x2,0x3
0b9f 0120 | | Execute Any,Is_Value
0ba0 6803 |h | Jump_Zero 0xba4
0ba1 e002 | | Load 0x0,0x2
0ba2 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0ba3 7801 |x | Jump 0xba5
0ba4 e403 | | Load 0x2,0x3
0ba5 e402 | | Load 0x2,0x2
0ba6 e01b | | Load 0x0,0x1b
0ba7 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0ba8 e002 | | Load 0x0,0x2
0ba9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0baa c403 | | Store 0x2,0x3
0bab e403 | | Load 0x2,0x3
0bac e402 | | Load 0x2,0x2
0bad e01b | | Load 0x0,0x1b
0bae 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0baf e002 | | Load 0x0,0x2
0bb0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0bb1 e002 | | Load 0x0,0x2
0bb2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0bb3 c403 | | Store 0x2,0x3
0bb4 7813 |x | Jump 0xbc8
0bb5 e403 | | Load 0x2,0x3
0bb6 0120 | | Execute Any,Is_Value
0bb7 6803 |h | Jump_Zero 0xbbb
0bb8 e002 | | Load 0x0,0x2
0bb9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0bba 7801 |x | Jump 0xbbc
0bbb e403 | | Load 0x2,0x3
0bbc e402 | | Load 0x2,0x2
0bbd e01b | | Load 0x0,0x1b
0bbe 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0bbf 4805 |H | Short_Literal 0x5
0bc0 4802 |H | Short_Literal 0x2
0bc1 0099 | | Action Reference_Dynamic
0bc2 4806 |H | Short_Literal 0x6
0bc3 4802 |H | Short_Literal 0x2
0bc4 0099 | | Action Reference_Dynamic
0bc5 e002 | | Load 0x0,0x2
0bc6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0bc7 c403 | | Store 0x2,0x3
0bc8 e403 | | Load 0x2,0x3
0bc9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bca 0000 0000 | | .BLANK 0000[0x6]
0bd0 ; --------------------------------------------------------------------------------------
0bd0 ; SUBPROGRAM
0bd0 ; --------------------------------------------------------------------------------------
0bd0 0bf5 | | .CONST 0x0bf5 ; Address of begin
0bd1 0004 | | .CONST 0x0004 ; Address of exception handler
0bd2 000a | | .CONST 0x000a ; Number of locals
0bd3 INIT_0bd0:
0bd3 e002 | | Load 0x0,0x2
0bd4 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0bd5 02c7 | | Declare_Variable Any
0bd6 e002 | | Load 0x0,0x2
0bd7 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0bd8 a402 | | Store_Unchecked 0x2,0x2
0bd9 e002 | | Load 0x0,0x2
0bda 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0bdb 02c7 | | Declare_Variable Any
0bdc e002 | | Load 0x0,0x2
0bdd 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0bde a403 | | Store_Unchecked 0x2,0x3
0bdf e002 | | Load 0x0,0x2
0be0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0be1 02c7 | | Declare_Variable Any
0be2 00d8 | | Load_Top At_Offset_0
0be3 1c00 | | Execute_Immediate Run_Utility,0x0
0be4 e002 | | Load 0x0,0x2
0be5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0be6 02c7 | | Declare_Variable Any
0be7 00d8 | | Load_Top At_Offset_0
0be8 1c00 | | Execute_Immediate Run_Utility,0x0
0be9 029f 1943 | C| Declare_Subprogram INIT_1940,For_Call
0beb e002 | | Load 0x0,0x2
0bec 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0bed 00c6 | | Action Check_Subprogram_Elaborated
0bee 4806 |H | Short_Literal 0x6
0bef 4802 |H | Short_Literal 0x2
0bf0 0099 | | Action Reference_Dynamic
0bf1 e01e | | Load 0x0,0x1e
0bf2 e01f | | Load 0x0,0x1f
0bf3 480a |H | Short_Literal 0xa
0bf4 0007 | | Action Break_Optional
0bf5 BODY_0bd0:
0bf5 e5ff | | Load 0x2,-0x1
0bf6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bf7 820f | | Call 0x1,0xf
0bf8 6807 |h | Jump_Zero 0xc00
0bf9 e211 | | Load 0x1,0x11
0bfa 00d8 | | Load_Top At_Offset_0
0bfb 0120 | | Execute Any,Is_Value
0bfc 7002 |p | Jump_Nonzero 0xbff
0bfd 00d8 | | Load_Top At_Offset_0
0bfe 011e | | Execute Any,Convert
0bff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c00 e5ff | | Load 0x2,-0x1
0c01 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c02 82a2 | | Call 0x1,0xa2
0c03 c404 | | Store 0x2,0x4
0c04 e404 | | Load 0x2,0x4
0c05 e01b | | Load 0x0,0x1b
0c06 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0c07 c405 | | Store 0x2,0x5
0c08 e404 | | Load 0x2,0x4
0c09 e01b | | Load 0x0,0x1b
0c0a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c0b 4626 |F& | Jump_Case 0x27
0c0c 7826 |x& | Jump 0xc33 ; case 0x0
0c0d 7825 |x% | Jump 0xc33 ; case 0x1
0c0e 7824 |x$ | Jump 0xc33 ; case 0x2
0c0f 7823 |x# | Jump 0xc33 ; case 0x3
0c10 7822 |x" | Jump 0xc33 ; case 0x4
0c11 7821 |x! | Jump 0xc33 ; case 0x5
0c12 7820 |x | Jump 0xc33 ; case 0x6
0c13 781f |x | Jump 0xc33 ; case 0x7
0c14 7821 |x! | Jump 0xc36 ; case 0x8
0c15 781d |x | Jump 0xc33 ; case 0x9
0c16 786a |xj | Jump 0xc81 ; case 0xa
0c17 781b |x | Jump 0xc33 ; case 0xb
0c18 7868 |xh | Jump 0xc81 ; case 0xc
0c19 7819 |x | Jump 0xc33 ; case 0xd
0c1a 7818 |x | Jump 0xc33 ; case 0xe
0c1b 7817 |x | Jump 0xc33 ; case 0xf
0c1c 7816 |x | Jump 0xc33 ; case 0x10
0c1d 7815 |x | Jump 0xc33 ; case 0x11
0c1e 7814 |x | Jump 0xc33 ; case 0x12
0c1f 7816 |x | Jump 0xc36 ; case 0x13
0c20 7860 |x` | Jump 0xc81 ; case 0x14
0c21 785f |x_ | Jump 0xc81 ; case 0x15
0c22 7810 |x | Jump 0xc33 ; case 0x16
0c23 780f |x | Jump 0xc33 ; case 0x17
0c24 780e |x | Jump 0xc33 ; case 0x18
0c25 7843 |xC | Jump 0xc69 ; case 0x19
0c26 780c |x | Jump 0xc33 ; case 0x1a
0c27 7841 |xA | Jump 0xc69 ; case 0x1b
0c28 780a |x | Jump 0xc33 ; case 0x1c
0c29 7809 |x | Jump 0xc33 ; case 0x1d
0c2a 7808 |x | Jump 0xc33 ; case 0x1e
0c2b 7807 |x | Jump 0xc33 ; case 0x1f
0c2c 7806 |x | Jump 0xc33 ; case 0x20
0c2d 7805 |x | Jump 0xc33 ; case 0x21
0c2e 7804 |x | Jump 0xc33 ; case 0x22
0c2f 7803 |x | Jump 0xc33 ; case 0x23
0c30 7802 |x | Jump 0xc33 ; case 0x24
0c31 7801 |x | Jump 0xc33 ; case 0x25
0c32 7800 |x | Jump 0xc33 ; case 0x26
0c33 e002 | | Load 0x0,0x2
0c34 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0c35 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c36 e403 | | Load 0x2,0x3
0c37 0120 | | Execute Any,Is_Value
0c38 6803 |h | Jump_Zero 0xc3c
0c39 e002 | | Load 0x0,0x2
0c3a 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0c3b 7801 |x | Jump 0xc3d
0c3c e403 | | Load 0x2,0x3
0c3d e404 | | Load 0x2,0x4
0c3e e01b | | Load 0x0,0x1b
0c3f 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0c40 4807 |H | Short_Literal 0x7
0c41 4802 |H | Short_Literal 0x2
0c42 0099 | | Action Reference_Dynamic
0c43 4808 |H | Short_Literal 0x8
0c44 4802 |H | Short_Literal 0x2
0c45 0099 | | Action Reference_Dynamic
0c46 e002 | | Load 0x0,0x2
0c47 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c48 c403 | | Store 0x2,0x3
0c49 e405 | | Load 0x2,0x5
0c4a e002 | | Load 0x0,0x2
0c4b 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c4c 701a |p | Jump_Nonzero 0xc67
0c4d e402 | | Load 0x2,0x2
0c4e 0120 | | Execute Any,Is_Value
0c4f 6803 |h | Jump_Zero 0xc53
0c50 e002 | | Load 0x0,0x2
0c51 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0c52 7801 |x | Jump 0xc54
0c53 e402 | | Load 0x2,0x2
0c54 e405 | | Load 0x2,0x5
0c55 e01b | | Load 0x0,0x1b
0c56 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0c57 e020 | | Load 0x0,0x20
0c58 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0c59 4807 |H | Short_Literal 0x7
0c5a 4802 |H | Short_Literal 0x2
0c5b 0099 | | Action Reference_Dynamic
0c5c 4808 |H | Short_Literal 0x8
0c5d 4802 |H | Short_Literal 0x2
0c5e 0099 | | Action Reference_Dynamic
0c5f e002 | | Load 0x0,0x2
0c60 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c61 c402 | | Store 0x2,0x2
0c62 e403 | | Load 0x2,0x3
0c63 e402 | | Load 0x2,0x2
0c64 e002 | | Load 0x0,0x2
0c65 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c66 c403 | | Store 0x2,0x3
0c67 e403 | | Load 0x2,0x3
0c68 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c69 e405 | | Load 0x2,0x5
0c6a e002 | | Load 0x0,0x2
0c6b 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c6c 7011 |p | Jump_Nonzero 0xc7e
0c6d e402 | | Load 0x2,0x2
0c6e 0120 | | Execute Any,Is_Value
0c6f 6803 |h | Jump_Zero 0xc73
0c70 e002 | | Load 0x0,0x2
0c71 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0c72 7801 |x | Jump 0xc74
0c73 e402 | | Load 0x2,0x2
0c74 e405 | | Load 0x2,0x5
0c75 e01b | | Load 0x0,0x1b
0c76 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0c77 e020 | | Load 0x0,0x20
0c78 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0c79 e002 | | Load 0x0,0x2
0c7a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c7b c402 | | Store 0x2,0x2
0c7c e402 | | Load 0x2,0x2
0c7d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c7e e002 | | Load 0x0,0x2
0c7f 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0c80 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c81 e405 | | Load 0x2,0x5
0c82 e002 | | Load 0x0,0x2
0c83 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c84 7011 |p | Jump_Nonzero 0xc96
0c85 e402 | | Load 0x2,0x2
0c86 0120 | | Execute Any,Is_Value
0c87 6803 |h | Jump_Zero 0xc8b
0c88 e002 | | Load 0x0,0x2
0c89 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0c8a 7801 |x | Jump 0xc8c
0c8b e402 | | Load 0x2,0x2
0c8c e405 | | Load 0x2,0x5
0c8d e01b | | Load 0x0,0x1b
0c8e 1843 | C | Execute Package,Field_Execute,Field_Number 0x43
0c8f e020 | | Load 0x0,0x20
0c90 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0c91 e002 | | Load 0x0,0x2
0c92 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c93 c402 | | Store 0x2,0x2
0c94 e402 | | Load 0x2,0x2
0c95 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c96 e002 | | Load 0x0,0x2
0c97 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0c98 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c99 0000 0000 | | .BLANK 0000[0x7]
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0caa | | .CONST 0x0caa ; Address of begin
0ca1 0004 | | .CONST 0x0004 ; Address of exception handler
0ca2 0003 | | .CONST 0x0003 ; Number of locals
0ca3 INIT_0ca0:
0ca3 e001 | | Load 0x0,0x1
0ca4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0ca5 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0ca6 e001 | | Load 0x0,0x1
0ca7 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0ca8 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0ca9 0322 | " | Declare_Variable Record
0caa BODY_0ca0:
0caa e5ff | | Load 0x2,-0x1
0cab 820f | | Call 0x1,0xf
0cac 6802 |h | Jump_Zero 0xcaf
0cad 480b |H | Short_Literal 0xb
0cae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0caf e5ff | | Load 0x2,-0x1
0cb0 e01b | | Load 0x0,0x1b
0cb1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0cb2 7002 |p | Jump_Nonzero 0xcb5
0cb3 480b |H | Short_Literal 0xb
0cb4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cb5 e5fe | | Load 0x2,-0x2
0cb6 e001 | | Load 0x0,0x1
0cb7 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0cb8 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0cb9 017f | | Execute Record,Equal
0cba 6805 |h | Jump_Zero 0xcc0
0cbb e5ff | | Load 0x2,-0x1
0cbc 82ad | | Call 0x1,0xad
0cbd 00d9 | | Load_Top At_Offset_1
0cbe 017d | } | Execute Record,Structure_Write
0cbf 7803 |x | Jump 0xcc3
0cc0 e5fe | | Load 0x2,-0x2
0cc1 00d9 | | Load_Top At_Offset_1
0cc2 017d | } | Execute Record,Structure_Write
0cc3 00d9 | | Load_Top At_Offset_1
0cc4 00d9 | | Load_Top At_Offset_1
0cc5 4801 |H | Short_Literal 0x1
0cc6 e021 | ! | Load 0x0,0x21
0cc7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cc8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0cc9 00d9 | | Load_Top At_Offset_1
0cca e001 | | Load 0x0,0x1
0ccb 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0ccc 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0ccd 6802 |h | Jump_Zero 0xcd0
0cce 480b |H | Short_Literal 0xb
0ccf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cd0 00d9 | | Load_Top At_Offset_1
0cd1 e001 | | Load 0x0,0x1
0cd2 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0cd3 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0cd4 824b | K | Call 0x1,0x4b
0cd5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cd6 0000 0000 | | .XXX[0x2]
0cd8 ; --------------------------------------------------------------------------------------
0cd8 ; SUBPROGRAM
0cd8 ; --------------------------------------------------------------------------------------
0cd8 0ce0 | | .CONST 0x0ce0 ; Address of begin
0cd9 0d01 | | .CONST 0x0d01 ; Address of exception handler
0cda 0002 | | .CONST 0x0002 ; Number of locals
0cdb INIT_0cd8:
0cdb e289 | | Load 0x1,0x89
0cdc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0cdd 0322 | " | Declare_Variable Record
0cde 00d8 | | Load_Top At_Offset_0
0cdf 1c00 | | Execute_Immediate Run_Utility,0x0
0ce0 BODY_0cd8:
0ce0 00be | | Action Activate_Tasks
0ce1 e5fe | | Load 0x2,-0x2
0ce2 00d9 | | Load_Top At_Offset_1
0ce3 4801 |H | Short_Literal 0x1
0ce4 e5ff | | Load 0x2,-0x1
0ce5 e003 | | Load 0x0,0x3
0ce6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ce7 e289 | | Load 0x1,0x89
0ce8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ce9 00d1 | | Pop_Control Pop_Count_1
0cea c5fe | | Store 0x2,-0x2
0ceb e5fe | | Load 0x2,-0x2
0cec 8298 | | Call 0x1,0x98
0ced c5fe | | Store 0x2,-0x2
0cee 0092 1f5d | ]| Action Push_String_Extended,0x1f5d ; "Component Cache ..."
0cf0 e022 | " | Load 0x0,0x22
0cf1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0cf2 4801 |H | Short_Literal 0x1
0cf3 00ea | | Load_Encached Null_String_Cache
0cf4 602b |`+ | Indirect_Literal Discrete,0xd20,{0x00000000, 0x7fffffff}
0cf5 00db | | Load_Top At_Offset_3
0cf6 e289 | | Load 0x1,0x89
0cf7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0cf8 e022 | " | Load 0x0,0x22
0cf9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0cfa 00ea | | Load_Encached Null_String_Cache
0cfb e022 | " | Load 0x0,0x22
0cfc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0cfd 00d8 | | Load_Top At_Offset_0
0cfe e289 | | Load 0x1,0x89
0cff 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d00 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d01 TRAP_0cd8:
0d01 e019 | | Load 0x0,0x19
0d02 010f | | Execute Exception,Equal
0d03 6804 |h | Jump_Zero 0xd08
0d04 00d9 | | Load_Top At_Offset_1
0d05 e289 | | Load 0x1,0x89
0d06 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d07 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d08 e002 | | Load 0x0,0x2
0d09 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0d0a 010f | | Execute Exception,Equal
0d0b 6807 |h | Jump_Zero 0xd13
0d0c e002 | | Load 0x0,0x2
0d0d 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0d0e c5fe | | Store 0x2,-0x2
0d0f 00d9 | | Load_Top At_Offset_1
0d10 e289 | | Load 0x1,0x89
0d11 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d12 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d13 00d9 | | Load_Top At_Offset_1
0d14 e289 | | Load 0x1,0x89
0d15 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d16 00d1 | | Pop_Control Pop_Count_1
0d17 e5fe | | Load 0x2,-0x2
0d18 0092 1f5e | ^| Action Push_String_Extended,0x1f5e ; "Dump_Cache"
0d1a 829d | | Call 0x1,0x9d
0d1b c5fe | | Store 0x2,-0x2
0d1c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0d1d 0000 0000 | | .XXX[0x3]
0d1f 0000 | |
0d20 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0d24 0000 0000 | | .BLANK 0000[0x4]
0d28 ; --------------------------------------------------------------------------------------
0d28 ; SUBPROGRAM
0d28 ; --------------------------------------------------------------------------------------
0d28 0d2b | + | .CONST 0x0d2b ; Address of begin
0d29 0004 | | .CONST 0x0004 ; Address of exception handler
0d2a 0001 | | .CONST 0x0001 ; Number of locals
0d2b BODY_0d28:
0d2b INIT_0d28:
0d2b 00d1 | | Pop_Control Pop_Count_1
0d2c 00da | | Load_Top At_Offset_2
0d2d 01dc | | Execute Vector,Last
0d2e 00db | | Load_Top At_Offset_3
0d2f 01dd | | Execute Vector,First
0d30 0263 | c | Execute Discrete,Above_Bound
0d31 700a |p | Jump_Nonzero 0xd3c
0d32 00d8 | | Load_Top At_Offset_0
0d33 e5ff | | Load 0x2,-0x1
0d34 01d5 | | Execute Vector,Field_Reference
0d35 0125 | % | Execute Any,Set_Constraint
0d36 00d8 | | Load_Top At_Offset_0
0d37 e5ff | | Load 0x2,-0x1
0d38 01d5 | | Execute Vector,Field_Reference
0d39 1c00 | | Execute_Immediate Run_Utility,0x0
0d3a 0a01 | | Execute_Immediate Plus,0x1
0d3b 7ff4 | | Jump 0xd30
0d3c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0d3d 0000 0000 | | .XXX[0x3]
0d3f 0000 | |
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d43 | C | .CONST 0x0d43 ; Address of begin
0d41 0004 | | .CONST 0x0004 ; Address of exception handler
0d42 0001 | | .CONST 0x0001 ; Number of locals
0d43 BODY_0d40:
0d43 INIT_0d40:
0d43 e5fc | | Load 0x2,-0x4
0d44 e5fd | | Load 0x2,-0x3
0d45 e5fe | | Load 0x2,-0x2
0d46 e5ff | | Load 0x2,-0x1
0d47 e289 | | Load 0x1,0x89
0d48 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0d49 c5fc | | Store 0x2,-0x4
0d4a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0d4b 0000 0000 | | .BLANK 0000[0x5]
0d50 ; --------------------------------------------------------------------------------------
0d50 ; SUBPROGRAM
0d50 ; --------------------------------------------------------------------------------------
0d50 0d60 | ` | .CONST 0x0d60 ; Address of begin
0d51 0da8 | | .CONST 0x0da8 ; Address of exception handler
0d52 0004 | | .CONST 0x0004 ; Number of locals
0d53 INIT_0d50:
0d53 e20d | | Load 0x1,0xd
0d54 02c7 | | Declare_Variable Any
0d55 00d8 | | Load_Top At_Offset_0
0d56 1c00 | | Execute_Immediate Run_Utility,0x0
0d57 e20e | | Load 0x1,0xe
0d58 02c7 | | Declare_Variable Any
0d59 00d8 | | Load_Top At_Offset_0
0d5a 1c00 | | Execute_Immediate Run_Utility,0x0
0d5b e289 | | Load 0x1,0x89
0d5c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0d5d 0322 | " | Declare_Variable Record
0d5e 00d8 | | Load_Top At_Offset_0
0d5f 1c00 | | Execute_Immediate Run_Utility,0x0
0d60 BODY_0d50:
0d60 00be | | Action Activate_Tasks
0d61 e5ff | | Load 0x2,-0x1
0d62 e283 | | Load 0x1,0x83
0d63 01de | | Execute Vector,Not_Equal
0d64 6842 |hB | Jump_Zero 0xda7
0d65 e5fd | | Load 0x2,-0x3
0d66 00d9 | | Load_Top At_Offset_1
0d67 4802 |H | Short_Literal 0x2
0d68 e5fe | | Load 0x2,-0x2
0d69 e289 | | Load 0x1,0x89
0d6a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d6b 00d1 | | Pop_Control Pop_Count_1
0d6c c5fd | | Store 0x2,-0x3
0d6d e5fd | | Load 0x2,-0x3
0d6e 8298 | | Call 0x1,0x98
0d6f c5fd | | Store 0x2,-0x3
0d70 00cf | | Action Mark_Auxiliary
0d71 e5ff | | Load 0x2,-0x1
0d72 01d9 | | Execute Vector,Reverse_Bounds
0d73 0007 | | Action Break_Optional
0d74 00d8 | | Load_Top At_Offset_0
0d75 e5ff | | Load 0x2,-0x1
0d76 01d7 | | Execute Vector,Field_Read
0d77 e211 | | Load 0x1,0x11
0d78 012f | / | Execute Any,Equal
0d79 7026 |p& | Jump_Nonzero 0xda0
0d7a 00d8 | | Load_Top At_Offset_0
0d7b e5ff | | Load 0x2,-0x1
0d7c 01d7 | | Execute Vector,Field_Read
0d7d c403 | | Store 0x2,0x3
0d7e e403 | | Load 0x2,0x3
0d7f e002 | | Load 0x0,0x2
0d80 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0d81 c403 | | Store 0x2,0x3
0d82 00cf | | Action Mark_Auxiliary
0d83 7817 |x | Jump 0xd9b
0d84 e403 | | Load 0x2,0x3
0d85 e002 | | Load 0x0,0x2
0d86 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0d87 c402 | | Store 0x2,0x2
0d88 e5fd | | Load 0x2,-0x3
0d89 e404 | | Load 0x2,0x4
0d8a e402 | | Load 0x2,0x2
0d8b 8234 | 4 | Call 0x1,0x34
0d8c e407 | | Load 0x2,0x7
0d8d 828a | | Call 0x1,0x8a
0d8e e402 | | Load 0x2,0x2
0d8f e289 | | Load 0x1,0x89
0d90 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0d91 00d1 | | Pop_Control Pop_Count_1
0d92 c5fd | | Store 0x2,-0x3
0d93 e5fd | | Load 0x2,-0x3
0d94 8298 | | Call 0x1,0x98
0d95 c5fd | | Store 0x2,-0x3
0d96 e403 | | Load 0x2,0x3
0d97 e002 | | Load 0x0,0x2
0d98 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0d99 c403 | | Store 0x2,0x3
0d9a 00c9 | | Action Pop_Auxiliary_Loop
0d9b e403 | | Load 0x2,0x3
0d9c e002 | | Load 0x0,0x2
0d9d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0d9e 6fe5 |o | Jump_Zero 0xd84
0d9f 00ce | | Action Pop_Auxiliary
0da0 00c8 | | Action Pop_Auxiliary_Range
0da1 3fd2 |? | Loop_Increasing 0xd74
0da2 00ce | | Action Pop_Auxiliary
0da3 00d8 | | Load_Top At_Offset_0
0da4 e289 | | Load 0x1,0x89
0da5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0da6 00d1 | | Pop_Control Pop_Count_1
0da7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0da8 TRAP_0d50:
0da8 e019 | | Load 0x0,0x19
0da9 010f | | Execute Exception,Equal
0daa 6804 |h | Jump_Zero 0xdaf
0dab 00d9 | | Load_Top At_Offset_1
0dac e289 | | Load 0x1,0x89
0dad 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0dae 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0daf e023 | # | Load 0x0,0x23
0db0 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0db1 010f | | Execute Exception,Equal
0db2 6807 |h | Jump_Zero 0xdba
0db3 e289 | | Load 0x1,0x89
0db4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0db5 c5fd | | Store 0x2,-0x3
0db6 00d9 | | Load_Top At_Offset_1
0db7 e289 | | Load 0x1,0x89
0db8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0db9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dba e002 | | Load 0x0,0x2
0dbb 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0dbc 010f | | Execute Exception,Equal
0dbd 6807 |h | Jump_Zero 0xdc5
0dbe e002 | | Load 0x0,0x2
0dbf 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0dc0 c5fd | | Store 0x2,-0x3
0dc1 00d9 | | Load_Top At_Offset_1
0dc2 e289 | | Load 0x1,0x89
0dc3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0dc4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dc5 e5fd | | Load 0x2,-0x3
0dc6 0092 1f5f | _| Action Push_String_Extended,0x1f5f ; "Install"
0dc8 829d | | Call 0x1,0x9d
0dc9 c5fd | | Store 0x2,-0x3
0dca 00d9 | | Load_Top At_Offset_1
0dcb e289 | | Load 0x1,0x89
0dcc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0dcd 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0dce 0000 0000 | | .XXX[0x2]
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; SUBPROGRAM
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0de0 | | .CONST 0x0de0 ; Address of begin
0dd1 0e28 | ( | .CONST 0x0e28 ; Address of exception handler
0dd2 0004 | | .CONST 0x0004 ; Number of locals
0dd3 INIT_0dd0:
0dd3 e20d | | Load 0x1,0xd
0dd4 02c7 | | Declare_Variable Any
0dd5 00d8 | | Load_Top At_Offset_0
0dd6 1c00 | | Execute_Immediate Run_Utility,0x0
0dd7 e20e | | Load 0x1,0xe
0dd8 02c7 | | Declare_Variable Any
0dd9 00d8 | | Load_Top At_Offset_0
0dda 1c00 | | Execute_Immediate Run_Utility,0x0
0ddb e289 | | Load 0x1,0x89
0ddc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0ddd 0322 | " | Declare_Variable Record
0dde 00d8 | | Load_Top At_Offset_0
0ddf 1c00 | | Execute_Immediate Run_Utility,0x0
0de0 BODY_0dd0:
0de0 00be | | Action Activate_Tasks
0de1 e5ff | | Load 0x2,-0x1
0de2 e283 | | Load 0x1,0x83
0de3 01de | | Execute Vector,Not_Equal
0de4 6842 |hB | Jump_Zero 0xe27
0de5 e5fd | | Load 0x2,-0x3
0de6 00d9 | | Load_Top At_Offset_1
0de7 4802 |H | Short_Literal 0x2
0de8 e5fe | | Load 0x2,-0x2
0de9 e289 | | Load 0x1,0x89
0dea 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0deb 00d1 | | Pop_Control Pop_Count_1
0dec c5fd | | Store 0x2,-0x3
0ded e5fd | | Load 0x2,-0x3
0dee 8298 | | Call 0x1,0x98
0def c5fd | | Store 0x2,-0x3
0df0 00cf | | Action Mark_Auxiliary
0df1 e5ff | | Load 0x2,-0x1
0df2 01d9 | | Execute Vector,Reverse_Bounds
0df3 0007 | | Action Break_Optional
0df4 00d8 | | Load_Top At_Offset_0
0df5 e5ff | | Load 0x2,-0x1
0df6 01d7 | | Execute Vector,Field_Read
0df7 e211 | | Load 0x1,0x11
0df8 012f | / | Execute Any,Equal
0df9 7026 |p& | Jump_Nonzero 0xe20
0dfa 00d8 | | Load_Top At_Offset_0
0dfb e5ff | | Load 0x2,-0x1
0dfc 01d7 | | Execute Vector,Field_Read
0dfd c403 | | Store 0x2,0x3
0dfe e403 | | Load 0x2,0x3
0dff e002 | | Load 0x0,0x2
0e00 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0e01 c403 | | Store 0x2,0x3
0e02 00cf | | Action Mark_Auxiliary
0e03 7817 |x | Jump 0xe1b
0e04 e403 | | Load 0x2,0x3
0e05 e002 | | Load 0x0,0x2
0e06 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0e07 c402 | | Store 0x2,0x2
0e08 e5fd | | Load 0x2,-0x3
0e09 e404 | | Load 0x2,0x4
0e0a e402 | | Load 0x2,0x2
0e0b 8234 | 4 | Call 0x1,0x34
0e0c e407 | | Load 0x2,0x7
0e0d 828a | | Call 0x1,0x8a
0e0e e402 | | Load 0x2,0x2
0e0f e289 | | Load 0x1,0x89
0e10 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e11 00d1 | | Pop_Control Pop_Count_1
0e12 c5fd | | Store 0x2,-0x3
0e13 e5fd | | Load 0x2,-0x3
0e14 8298 | | Call 0x1,0x98
0e15 c5fd | | Store 0x2,-0x3
0e16 e403 | | Load 0x2,0x3
0e17 e002 | | Load 0x0,0x2
0e18 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e19 c403 | | Store 0x2,0x3
0e1a 00c9 | | Action Pop_Auxiliary_Loop
0e1b e403 | | Load 0x2,0x3
0e1c e002 | | Load 0x0,0x2
0e1d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0e1e 6fe5 |o | Jump_Zero 0xe04
0e1f 00ce | | Action Pop_Auxiliary
0e20 00c8 | | Action Pop_Auxiliary_Range
0e21 3fd2 |? | Loop_Increasing 0xdf4
0e22 00ce | | Action Pop_Auxiliary
0e23 00d8 | | Load_Top At_Offset_0
0e24 e289 | | Load 0x1,0x89
0e25 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e26 00d1 | | Pop_Control Pop_Count_1
0e27 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e28 TRAP_0dd0:
0e28 e019 | | Load 0x0,0x19
0e29 010f | | Execute Exception,Equal
0e2a 6804 |h | Jump_Zero 0xe2f
0e2b 00d9 | | Load_Top At_Offset_1
0e2c e289 | | Load 0x1,0x89
0e2d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e2e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e2f e023 | # | Load 0x0,0x23
0e30 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0e31 010f | | Execute Exception,Equal
0e32 6807 |h | Jump_Zero 0xe3a
0e33 e289 | | Load 0x1,0x89
0e34 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0e35 c5fd | | Store 0x2,-0x3
0e36 00d9 | | Load_Top At_Offset_1
0e37 e289 | | Load 0x1,0x89
0e38 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e39 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e3a e002 | | Load 0x0,0x2
0e3b 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
0e3c 010f | | Execute Exception,Equal
0e3d 6807 |h | Jump_Zero 0xe45
0e3e e002 | | Load 0x0,0x2
0e3f 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0e40 c5fd | | Store 0x2,-0x3
0e41 00d9 | | Load_Top At_Offset_1
0e42 e289 | | Load 0x1,0x89
0e43 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e44 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e45 e5fd | | Load 0x2,-0x3
0e46 0092 1f60 | `| Action Push_String_Extended,0x1f60 ; "Withdraw"
0e48 829d | | Call 0x1,0x9d
0e49 c5fd | | Store 0x2,-0x3
0e4a 00d9 | | Load_Top At_Offset_1
0e4b e289 | | Load 0x1,0x89
0e4c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e4d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e4e 0000 0000 | | .XXX[0x2]
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e5f | _ | .CONST 0x0e5f ; Address of begin
0e51 0e96 | | .CONST 0x0e96 ; Address of exception handler
0e52 0005 | | .CONST 0x0005 ; Number of locals
0e53 INIT_0e50:
0e53 e266 | f | Load 0x1,0x66
0e54 0322 | " | Declare_Variable Record
0e55 00d8 | | Load_Top At_Offset_0
0e56 1c00 | | Execute_Immediate Run_Utility,0x0
0e57 e215 | | Load 0x1,0x15
0e58 0007 | | Action Break_Optional
0e59 e216 | | Load 0x1,0x16
0e5a 0322 | " | Declare_Variable Record
0e5b 00d8 | | Load_Top At_Offset_0
0e5c 1c00 | | Execute_Immediate Run_Utility,0x0
0e5d 029f 1983 | | Declare_Subprogram INIT_1980,For_Call
0e5f BODY_0e50:
0e5f e5fd | | Load 0x2,-0x3
0e60 e402 | | Load 0x2,0x2
0e61 e5ff | | Load 0x2,-0x1
0e62 e003 | | Load 0x0,0x3
0e63 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0e64 826a | j | Call 0x1,0x6a
0e65 00d1 | | Pop_Control Pop_Count_1
0e66 c5fd | | Store 0x2,-0x3
0e67 e5fd | | Load 0x2,-0x3
0e68 8298 | | Call 0x1,0x98
0e69 c5fd | | Store 0x2,-0x3
0e6a e5fd | | Load 0x2,-0x3
0e6b 00db | | Load_Top At_Offset_3
0e6c e402 | | Load 0x2,0x2
0e6d 826c | l | Call 0x1,0x6c
0e6e c403 | | Store 0x2,0x3
0e6f c5fd | | Store 0x2,-0x3
0e70 e5fd | | Load 0x2,-0x3
0e71 8298 | | Call 0x1,0x98
0e72 c5fd | | Store 0x2,-0x3
0e73 00da | | Load_Top At_Offset_2
0e74 e5ff | | Load 0x2,-0x1
0e75 823b | ; | Call 0x1,0x3b
0e76 00da | | Load_Top At_Offset_2
0e77 017d | } | Execute Record,Structure_Write
0e78 00d9 | | Load_Top At_Offset_1
0e79 821a | | Call 0x1,0x1a
0e7a 6807 |h | Jump_Zero 0xe82
0e7b e5fd | | Load 0x2,-0x3
0e7c 0092 1f61 | a| Action Push_String_Extended,0x1f61 ; "Unable to resolve initial context. Verify that this unit is installed."
0e7e e008 | | Load 0x0,0x8
0e7f 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0e80 829a | | Call 0x1,0x9a
0e81 c5fd | | Store 0x2,-0x3
0e82 00d9 | | Load_Top At_Offset_1
0e83 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0e84 0f01 | | Execute_Immediate Equal,0x1
0e85 680a |h | Jump_Zero 0xe90
0e86 e211 | | Load 0x1,0x11
0e87 c5fe | | Store 0x2,-0x2
0e88 e5fd | | Load 0x2,-0x3
0e89 0092 1f62 | b| Action Push_String_Extended,0x1f62 ; "This is the root of the 2167A static hierarchy."
0e8b e008 | | Load 0x0,0x8
0e8c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0e8d 829a | | Call 0x1,0x9a
0e8e c5fd | | Store 0x2,-0x3
0e8f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e90 00da | | Load_Top At_Offset_2
0e91 00da | | Load_Top At_Offset_2
0e92 825c | \ | Call 0x1,0x5c
0e93 8405 | | Call 0x2,0x5
0e94 c5fe | | Store 0x2,-0x2
0e95 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e96 TRAP_0e50:
0e96 e019 | | Load 0x0,0x19
0e97 010f | | Execute Exception,Equal
0e98 6801 |h | Jump_Zero 0xe9a
0e99 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e9a e5fd | | Load 0x2,-0x3
0e9b 0092 1f63 | c| Action Push_String_Extended,0x1f63 ; "PDL Enclosing"
0e9d 829d | | Call 0x1,0x9d
0e9e c5fd | | Store 0x2,-0x3
0e9f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ebc | | .CONST 0x0ebc ; Address of begin
0ea1 0f17 | | .CONST 0x0f17 ; Address of exception handler
0ea2 0006 | | .CONST 0x0006 ; Number of locals
0ea3 INIT_0ea0:
0ea3 00da | | Load_Top At_Offset_2
0ea4 e001 | | Load 0x0,0x1
0ea5 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0ea6 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0ea7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ea8 82a3 | | Call 0x1,0xa3
0ea9 e003 | | Load 0x0,0x3
0eaa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0eab 02c7 | | Declare_Variable Any
0eac 00d8 | | Load_Top At_Offset_0
0ead 1c00 | | Execute_Immediate Run_Utility,0x0
0eae e001 | | Load 0x0,0x1
0eaf 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0eb0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0eb1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0eb2 02c7 | | Declare_Variable Any
0eb3 00d8 | | Load_Top At_Offset_0
0eb4 1c00 | | Execute_Immediate Run_Utility,0x0
0eb5 e003 | | Load 0x0,0x3
0eb6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0eb7 02c7 | | Declare_Variable Any
0eb8 00d8 | | Load_Top At_Offset_0
0eb9 1c00 | | Execute_Immediate Run_Utility,0x0
0eba 029f 19a3 | | Declare_Subprogram INIT_19a0,For_Call
0ebc BODY_0ea0:
0ebc e210 | | Load 0x1,0x10
0ebd c5fe | | Store 0x2,-0x2
0ebe e5ff | | Load 0x2,-0x1
0ebf e001 | | Load 0x0,0x1
0ec0 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0ec1 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0ec2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0ec3 4608 |F | Jump_Case 0x9
0ec4 7810 |x | Jump 0xed5 ; case 0x0
0ec5 7816 |x | Jump 0xedc ; case 0x1
0ec6 7815 |x | Jump 0xedc ; case 0x2
0ec7 7814 |x | Jump 0xedc ; case 0x3
0ec8 7813 |x | Jump 0xedc ; case 0x4
0ec9 7812 |x | Jump 0xedc ; case 0x5
0eca 7811 |x | Jump 0xedc ; case 0x6
0ecb 7809 |x | Jump 0xed5 ; case 0x7
0ecc 7800 |x | Jump 0xecd ; case 0x8
0ecd e5fd | | Load 0x2,-0x3
0ece 0092 1f64 | d| Action Push_String_Extended,0x1f64 ; "The use of 'None' in this context does not denote a component."
0ed0 e008 | | Load 0x0,0x8
0ed1 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0ed2 829a | | Call 0x1,0x9a
0ed3 c5fd | | Store 0x2,-0x3
0ed4 7807 |x | Jump 0xedc
0ed5 e5fd | | Load 0x2,-0x3
0ed6 0092 1f65 | e| Action Push_String_Extended,0x1f65 ; "Cursor must be positioned on one of the component names."
0ed8 e008 | | Load 0x0,0x8
0ed9 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0eda 829a | | Call 0x1,0x9a
0edb c5fd | | Store 0x2,-0x3
0edc e5fd | | Load 0x2,-0x3
0edd 00da | | Load_Top At_Offset_2
0ede 0120 | | Execute Any,Is_Value
0edf 6803 |h | Jump_Zero 0xee3
0ee0 e003 | | Load 0x0,0x3
0ee1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0ee2 7801 |x | Jump 0xee4
0ee3 00da | | Load_Top At_Offset_2
0ee4 e403 | | Load 0x2,0x3
0ee5 0120 | | Execute Any,Is_Value
0ee6 6803 |h | Jump_Zero 0xeea
0ee7 e003 | | Load 0x0,0x3
0ee8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ee9 7801 |x | Jump 0xeeb
0eea e403 | | Load 0x2,0x3
0eeb e5ff | | Load 0x2,-0x1
0eec e001 | | Load 0x0,0x1
0eed 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0eee 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0eef 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0ef0 e003 | | Load 0x0,0x3
0ef1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0ef2 e018 | | Load 0x0,0x18
0ef3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0ef4 c403 | | Store 0x2,0x3
0ef5 c405 | | Store 0x2,0x5
0ef6 c5fd | | Store 0x2,-0x3
0ef7 e5fd | | Load 0x2,-0x3
0ef8 8298 | | Call 0x1,0x98
0ef9 c5fd | | Store 0x2,-0x3
0efa 00cf | | Action Mark_Auxiliary
0efb 7807 |x | Jump 0xf03
0efc 8406 | | Call 0x2,0x6
0efd 00da | | Load_Top At_Offset_2
0efe e017 | | Load 0x0,0x17
0eff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f00 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0f01 c405 | | Store 0x2,0x5
0f02 00c9 | | Action Pop_Auxiliary_Loop
0f03 00da | | Load_Top At_Offset_2
0f04 e017 | | Load 0x0,0x17
0f05 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f06 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0f07 6ff4 |o | Jump_Zero 0xefc
0f08 00ce | | Action Pop_Auxiliary
0f09 e5fd | | Load 0x2,-0x3
0f0a 0092 1f66 | f| Action Push_String_Extended,0x1f66 ; "Unable to find component. Make sure that \x22"
0f0c e402 | | Load 0x2,0x2
0f0d 01cc | | Execute Vector,Catenate
0f0e 0092 1f67 | g| Action Push_String_Extended,0x1f67 ; "\x22 is installed."
0f10 01cc | | Execute Vector,Catenate
0f11 e008 | | Load 0x0,0x8
0f12 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0f13 e008 | | Load 0x0,0x8
0f14 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f15 c5fd | | Store 0x2,-0x3
0f16 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0f17 TRAP_0ea0:
0f17 e019 | | Load 0x0,0x19
0f18 010f | | Execute Exception,Equal
0f19 6801 |h | Jump_Zero 0xf1b
0f1a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0f1b e5fd | | Load 0x2,-0x3
0f1c 0092 1f68 | h| Action Push_String_Extended,0x1f68 ; "Resolve_Component"
0f1e 829d | | Call 0x1,0x9d
0f1f c5fd | | Store 0x2,-0x3
0f20 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0f21 0000 0000 | | .BLANK 0000[0x7]
0f28 ; --------------------------------------------------------------------------------------
0f28 ; SUBPROGRAM
0f28 ; --------------------------------------------------------------------------------------
0f28 0f2b | + | .CONST 0x0f2b ; Address of begin
0f29 0004 | | .CONST 0x0004 ; Address of exception handler
0f2a 0001 | | .CONST 0x0001 ; Number of locals
0f2b BODY_0f28:
0f2b INIT_0f28:
0f2b 00da | | Load_Top At_Offset_2
0f2c e001 | | Load 0x0,0x1
0f2d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0f2e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0f2f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0f30 6802 |h | Jump_Zero 0xf33
0f31 480b |H | Short_Literal 0xb
0f32 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f33 00da | | Load_Top At_Offset_2
0f34 e001 | | Load 0x0,0x1
0f35 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0f36 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0f37 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0f38 82b2 | | Call 0x1,0xb2
0f39 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f3a 0000 0000 | | .BLANK 0000[0x6]
0f40 ; --------------------------------------------------------------------------------------
0f40 ; SUBPROGRAM
0f40 ; --------------------------------------------------------------------------------------
0f40 0f43 | C | .CONST 0x0f43 ; Address of begin
0f41 0004 | | .CONST 0x0004 ; Address of exception handler
0f42 0001 | | .CONST 0x0001 ; Number of locals
0f43 BODY_0f40:
0f43 INIT_0f40:
0f43 00da | | Load_Top At_Offset_2
0f44 e002 | | Load 0x0,0x2
0f45 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0f46 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0f47 4bfd |K | Short_Literal 0x3fd
0f48 026e | n | Execute Discrete,Modulo
0f49 00d8 | | Load_Top At_Offset_0
0f4a 00e2 | | Load_Encached Integer_Cache
0f4b 0260 | ` | Execute Discrete,In_Type
0f4c 7001 |p | Jump_Nonzero 0xf4e
0f4d 0801 | | Execute_Immediate Raise,0x1
0f4e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f4f 0000 | | .XXX[0x1]
0f50 ; --------------------------------------------------------------------------------------
0f50 ; SUBPROGRAM
0f50 ; --------------------------------------------------------------------------------------
0f50 0f53 | S | .CONST 0x0f53 ; Address of begin
0f51 0004 | | .CONST 0x0004 ; Address of exception handler
0f52 0001 | | .CONST 0x0001 ; Number of locals
0f53 BODY_0f50:
0f53 INIT_0f50:
0f53 4608 |F | Jump_Case 0x9
0f54 7808 |x | Jump 0xf5d ; case 0x0
0f55 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0f56 7822 |x" | Jump 0xf79 ; case 0x2
0f57 7821 |x! | Jump 0xf79 ; case 0x3
0f58 7820 |x | Jump 0xf79 ; case 0x4
0f59 781f |x | Jump 0xf79 ; case 0x5
0f5a 781e |x | Jump 0xf79 ; case 0x6
0f5b 781d |x | Jump 0xf79 ; case 0x7
0f5c 781c |x | Jump 0xf79 ; case 0x8
0f5d 00da | | Load_Top At_Offset_2
0f5e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0f5f 1c00 | | Execute_Immediate Run_Utility,0x0
0f60 601b |` | Indirect_Literal Discrete,0xf7c,{0x80000000, 0x00000001}
0f61 00db | | Load_Top At_Offset_3
0f62 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0f63 00da | | Load_Top At_Offset_2
0f64 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0f65 1c00 | | Execute_Immediate Run_Utility,0x0
0f66 00da | | Load_Top At_Offset_2
0f67 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0f68 0125 | % | Execute Any,Set_Constraint
0f69 00da | | Load_Top At_Offset_2
0f6a 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0f6b 1c00 | | Execute_Immediate Run_Utility,0x0
0f6c 00da | | Load_Top At_Offset_2
0f6d 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0f6e 0125 | % | Execute Any,Set_Constraint
0f6f 00da | | Load_Top At_Offset_2
0f70 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0f71 1c00 | | Execute_Immediate Run_Utility,0x0
0f72 00da | | Load_Top At_Offset_2
0f73 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
0f74 0125 | % | Execute Any,Set_Constraint
0f75 00da | | Load_Top At_Offset_2
0f76 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
0f77 1c00 | | Execute_Immediate Run_Utility,0x0
0f78 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0f79 0869 | i | Execute_Immediate Raise,0x69
0f7a 0000 0000 | | .XXX[0x2]
0f7c 8000 0000 | | .LITERAL {0x80000000, 0x00000001}
0f80 ; --------------------------------------------------------------------------------------
0f80 ; SUBPROGRAM
0f80 ; --------------------------------------------------------------------------------------
0f80 0f83 | | .CONST 0x0f83 ; Address of begin
0f81 0004 | | .CONST 0x0004 ; Address of exception handler
0f82 0001 | | .CONST 0x0001 ; Number of locals
0f83 BODY_0f80:
0f83 INIT_0f80:
0f83 4822 |H" | Short_Literal 0x22
0f84 00db | | Load_Top At_Offset_3
0f85 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0f86 823a | : | Call 0x1,0x3a
0f87 0092 1f69 | i| Action Push_String_Extended,0x1f69 ; " component \x22"
0f89 01cc | | Execute Vector,Catenate
0f8a e5ff | | Load 0x2,-0x1
0f8b 8235 | 5 | Call 0x1,0x35
0f8c 01cc | | Execute Vector,Catenate
0f8d 01cb | | Execute Vector,Append
0f8e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f8f 0000 | | .XXX[0x1]
0f90 ; --------------------------------------------------------------------------------------
0f90 ; SUBPROGRAM
0f90 ; --------------------------------------------------------------------------------------
0f90 0f95 | | .CONST 0x0f95 ; Address of begin
0f91 0004 | | .CONST 0x0004 ; Address of exception handler
0f92 0002 | | .CONST 0x0002 ; Number of locals
0f93 INIT_0f90:
0f93 029f 1a0b | | Declare_Subprogram INIT_1a08,For_Call
0f95 BODY_0f90:
0f95 00db | | Load_Top At_Offset_3
0f96 e291 | | Load 0x1,0x91
0f97 01df | | Execute Vector,Equal
0f98 6803 |h | Jump_Zero 0xf9c
0f99 0092 1f6a | j| Action Push_String_Extended,0x1f6a ; "This component cannot be further decomposed"
0f9b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0f9c 0092 1f6b | k| Action Push_String_Extended,0x1f6b ; "Children of this component must be "
0f9e 00ea | | Load_Encached Null_String_Cache
0f9f 4801 |H | Short_Literal 0x1
0fa0 8402 | | Call 0x2,0x2
0fa1 01cc | | Execute Vector,Catenate
0fa2 0092 1f6c | l| Action Push_String_Extended,0x1f6c ; " components"
0fa4 01cc | | Execute Vector,Catenate
0fa5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fa6 0000 0000 | | .XXX[0x2]
0fa8 ; --------------------------------------------------------------------------------------
0fa8 ; SUBPROGRAM
0fa8 ; --------------------------------------------------------------------------------------
0fa8 0fb0 | | .CONST 0x0fb0 ; Address of begin
0fa9 0004 | | .CONST 0x0004 ; Address of exception handler
0faa 0003 | | .CONST 0x0003 ; Number of locals
0fab INIT_0fa8:
0fab e216 | | Load 0x1,0x16
0fac 0322 | " | Declare_Variable Record
0fad 00d8 | | Load_Top At_Offset_0
0fae 1c00 | | Execute_Immediate Run_Utility,0x0
0faf 00e1 | | Load_Encached Boolean_Cache
0fb0 BODY_0fa8:
0fb0 00e1 | | Load_Encached Boolean_Cache
0fb1 00da | | Load_Top At_Offset_2
0fb2 e5ff | | Load 0x2,-0x1
0fb3 e5fe | | Load 0x2,-0x2
0fb4 0227 | ' | Execute Access,All_Reference
0fb5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0fb6 e28e | | Load 0x1,0x8e
0fb7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0fb8 00d1 | | Pop_Control Pop_Count_1
0fb9 0059 | Y | Store_Top Discrete,At_Offset_1
0fba 00d8 | | Load_Top At_Offset_0
0fbb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fbc 0000 0000 | | .BLANK 0000[0x4]
0fc0 ; --------------------------------------------------------------------------------------
0fc0 ; SUBPROGRAM
0fc0 ; --------------------------------------------------------------------------------------
0fc0 0fc8 | | .CONST 0x0fc8 ; Address of begin
0fc1 0004 | | .CONST 0x0004 ; Address of exception handler
0fc2 0003 | | .CONST 0x0003 ; Number of locals
0fc3 INIT_0fc0:
0fc3 00da | | Load_Top At_Offset_2
0fc4 0007 | | Action Break_Optional
0fc5 00d8 | | Load_Top At_Offset_0
0fc6 e281 | | Load 0x1,0x81
0fc7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0fc8 BODY_0fc0:
0fc8 00d9 | | Load_Top At_Offset_1
0fc9 e281 | | Load 0x1,0x81
0fca 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fcb 003a | : | Store_Top Access,At_Offset_2
0fcc 00d8 | | Load_Top At_Offset_0
0fcd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fce 0000 0000 | | .XXX[0x2]
0fd0 ; --------------------------------------------------------------------------------------
0fd0 ; SUBPROGRAM
0fd0 ; --------------------------------------------------------------------------------------
0fd0 0fd3 | | .CONST 0x0fd3 ; Address of begin
0fd1 0004 | | .CONST 0x0004 ; Address of exception handler
0fd2 0001 | | .CONST 0x0001 ; Number of locals
0fd3 BODY_0fd0:
0fd3 INIT_0fd0:
0fd3 4801 |H | Short_Literal 0x1
0fd4 00db | | Load_Top At_Offset_3
0fd5 e008 | | Load 0x0,0x8
0fd6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0fd7 6802 |h | Jump_Zero 0xfda
0fd8 e019 | | Load 0x0,0x19
0fd9 0257 | W | Execute Discrete,Raise
0fda 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0fdb 0000 0000 | | .BLANK 0000[0x5]
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; SUBPROGRAM
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0fe3 | | .CONST 0x0fe3 ; Address of begin
0fe1 0004 | | .CONST 0x0004 ; Address of exception handler
0fe2 0001 | | .CONST 0x0001 ; Number of locals
0fe3 BODY_0fe0:
0fe3 INIT_0fe0:
0fe3 4801 |H | Short_Literal 0x1
0fe4 00db | | Load_Top At_Offset_3
0fe5 e008 | | Load 0x0,0x8
0fe6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0fe7 680a |h | Jump_Zero 0xff2
0fe8 e008 | | Load 0x0,0x8
0fe9 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0fea 00db | | Load_Top At_Offset_3
0feb e008 | | Load 0x0,0x8
0fec 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0fed 6802 |h | Jump_Zero 0xff0
0fee e024 | $ | Load 0x0,0x24
0fef 0257 | W | Execute Discrete,Raise
0ff0 e019 | | Load 0x0,0x19
0ff1 0257 | W | Execute Discrete,Raise
0ff2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ff3 0000 0000 | | .BLANK 0000[0x5]
0ff8 ; --------------------------------------------------------------------------------------
0ff8 ; SUBPROGRAM
0ff8 ; --------------------------------------------------------------------------------------
0ff8 0ffb | | .CONST 0x0ffb ; Address of begin
0ff9 0004 | | .CONST 0x0004 ; Address of exception handler
0ffa 0001 | | .CONST 0x0001 ; Number of locals
0ffb BODY_0ff8:
0ffb INIT_0ff8:
0ffb e5fd | | Load 0x2,-0x3
0ffc e5fe | | Load 0x2,-0x2
0ffd e5ff | | Load 0x2,-0x1
0ffe 00ea | | Load_Encached Null_String_Cache
0fff e008 | | Load 0x0,0x8
1000 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1001 c5fd | | Store 0x2,-0x3
1002 e019 | | Load 0x0,0x19
1003 0257 | W | Execute Discrete,Raise
1004 0000 0000 | | .BLANK 0000[0x4]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 100b | | .CONST 0x100b ; Address of begin
1009 0004 | | .CONST 0x0004 ; Address of exception handler
100a 0001 | | .CONST 0x0001 ; Number of locals
100b BODY_1008:
100b INIT_1008:
100b 00da | | Load_Top At_Offset_2
100c e017 | | Load 0x0,0x17
100d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
100e 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
100f 682f |h/ | Jump_Zero 0x103f
1010 e5fc | | Load 0x2,-0x4
1011 e017 | | Load 0x0,0x17
1012 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1013 180f | | Execute Package,Field_Execute,Field_Number 0xf
1014 6811 |h | Jump_Zero 0x1026
1015 e5fb | | Load 0x2,-0x5
1016 4829 |H) | Short_Literal 0x29
1017 e5fd | | Load 0x2,-0x3
1018 0092 1f6d | m| Action Push_String_Extended,0x1f6d ; " ("
101a 01cc | | Execute Vector,Catenate
101b e5ff | | Load 0x2,-0x1
101c e017 | | Load 0x0,0x17
101d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
101e 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
101f 01cc | | Execute Vector,Catenate
1020 01cb | | Execute Vector,Append
1021 e5fe | | Load 0x2,-0x2
1022 e008 | | Load 0x0,0x8
1023 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1024 c5fb | | Store 0x2,-0x5
1025 7817 |x | Jump 0x103d
1026 e5fb | | Load 0x2,-0x5
1027 4829 |H) | Short_Literal 0x29
1028 4822 |H" | Short_Literal 0x22
1029 e5fd | | Load 0x2,-0x3
102a 01cb | | Execute Vector,Append
102b e5fc | | Load 0x2,-0x4
102c e017 | | Load 0x0,0x17
102d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
102e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
102f 01cc | | Execute Vector,Catenate
1030 0092 1f6e | n| Action Push_String_Extended,0x1f6e ; "\x22 ("
1032 01cc | | Execute Vector,Catenate
1033 e5ff | | Load 0x2,-0x1
1034 e017 | | Load 0x0,0x17
1035 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1036 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
1037 01cc | | Execute Vector,Catenate
1038 01cb | | Execute Vector,Append
1039 e5fe | | Load 0x2,-0x2
103a e008 | | Load 0x0,0x8
103b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
103c c5fb | | Store 0x2,-0x5
103d e019 | | Load 0x0,0x19
103e 0257 | W | Execute Discrete,Raise
103f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1040 ; --------------------------------------------------------------------------------------
1040 ; SUBPROGRAM
1040 ; --------------------------------------------------------------------------------------
1040 1043 | C | .CONST 0x1043 ; Address of begin
1041 0004 | | .CONST 0x0004 ; Address of exception handler
1042 0001 | | .CONST 0x0001 ; Number of locals
1043 BODY_1040:
1043 INIT_1040:
1043 00da | | Load_Top At_Offset_2
1044 e017 | | Load 0x0,0x17
1045 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1046 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1047 682f |h/ | Jump_Zero 0x1077
1048 e5fc | | Load 0x2,-0x4
1049 e017 | | Load 0x0,0x17
104a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
104b 180f | | Execute Package,Field_Execute,Field_Number 0xf
104c 6811 |h | Jump_Zero 0x105e
104d e5fb | | Load 0x2,-0x5
104e 4829 |H) | Short_Literal 0x29
104f e5fd | | Load 0x2,-0x3
1050 0092 1f6d | m| Action Push_String_Extended,0x1f6d ; " ("
1052 01cc | | Execute Vector,Catenate
1053 e5ff | | Load 0x2,-0x1
1054 e017 | | Load 0x0,0x17
1055 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1056 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
1057 01cc | | Execute Vector,Catenate
1058 01cb | | Execute Vector,Append
1059 e5fe | | Load 0x2,-0x2
105a e008 | | Load 0x0,0x8
105b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
105c c5fb | | Store 0x2,-0x5
105d 7817 |x | Jump 0x1075
105e e5fb | | Load 0x2,-0x5
105f 4829 |H) | Short_Literal 0x29
1060 4822 |H" | Short_Literal 0x22
1061 e5fd | | Load 0x2,-0x3
1062 01cb | | Execute Vector,Append
1063 e5fc | | Load 0x2,-0x4
1064 e017 | | Load 0x0,0x17
1065 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1067 01cc | | Execute Vector,Catenate
1068 0092 1f6e | n| Action Push_String_Extended,0x1f6e ; "\x22 ("
106a 01cc | | Execute Vector,Catenate
106b e5ff | | Load 0x2,-0x1
106c e017 | | Load 0x0,0x17
106d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
106e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
106f 01cc | | Execute Vector,Catenate
1070 01cb | | Execute Vector,Append
1071 e5fe | | Load 0x2,-0x2
1072 e008 | | Load 0x0,0x8
1073 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1074 c5fb | | Store 0x2,-0x5
1075 e019 | | Load 0x0,0x19
1076 0257 | W | Execute Discrete,Raise
1077 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1078 ; --------------------------------------------------------------------------------------
1078 ; SUBPROGRAM
1078 ; --------------------------------------------------------------------------------------
1078 107b | { | .CONST 0x107b ; Address of begin
1079 0004 | | .CONST 0x0004 ; Address of exception handler
107a 0001 | | .CONST 0x0001 ; Number of locals
107b BODY_1078:
107b INIT_1078:
107b 00db | | Load_Top At_Offset_3
107c 4829 |H) | Short_Literal 0x29
107d 0092 1f6f | o| Action Push_String_Extended,0x1f6f ; "Unexpected exception in Components."
107f e5ff | | Load 0x2,-0x1
1080 01cc | | Execute Vector,Catenate
1081 0092 1f6d | m| Action Push_String_Extended,0x1f6d ; " ("
1083 01cc | | Execute Vector,Catenate
1084 e008 | | Load 0x0,0x8
1085 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1086 01cc | | Execute Vector,Catenate
1087 01cb | | Execute Vector,Append
1088 e008 | | Load 0x0,0x8
1089 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
108a e008 | | Load 0x0,0x8
108b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
108c c5fe | | Store 0x2,-0x2
108d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
108e 0000 0000 | | .XXX[0x2]
1090 ; --------------------------------------------------------------------------------------
1090 ; SUBPROGRAM
1090 ; --------------------------------------------------------------------------------------
1090 1093 | | .CONST 0x1093 ; Address of begin
1091 0004 | | .CONST 0x0004 ; Address of exception handler
1092 0001 | | .CONST 0x0001 ; Number of locals
1093 BODY_1090:
1093 INIT_1090:
1093 00da | | Load_Top At_Offset_2
1094 6003 |` | Indirect_Literal Discrete,0x1098,{0x00000000, 0x7fffffff}
1095 027f | | Execute Discrete,Equal
1096 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1097 0000 | | .XXX[0x1]
1098 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
109c 0000 0000 | | .BLANK 0000[0x4]
10a0 ; --------------------------------------------------------------------------------------
10a0 ; SUBPROGRAM
10a0 ; --------------------------------------------------------------------------------------
10a0 10a3 | | .CONST 0x10a3 ; Address of begin
10a1 0004 | | .CONST 0x0004 ; Address of exception handler
10a2 0001 | | .CONST 0x0001 ; Number of locals
10a3 BODY_10a0:
10a3 INIT_10a0:
10a3 67f4 |g | Indirect_Literal Discrete,0x1098,{0x00000000, 0x7fffffff}
10a4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
10a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
10a6 0000 0000 | | .XXX[0x2]
10a8 ; --------------------------------------------------------------------------------------
10a8 ; SUBPROGRAM
10a8 ; --------------------------------------------------------------------------------------
10a8 10ab | | .CONST 0x10ab ; Address of begin
10a9 0004 | | .CONST 0x0004 ; Address of exception handler
10aa 0001 | | .CONST 0x0001 ; Number of locals
10ab BODY_10a8:
10ab INIT_10a8:
10ab e5fd | | Load 0x2,-0x3
10ac e5fe | | Load 0x2,-0x2
10ad 0227 | ' | Execute Access,All_Reference
10ae 01da | | Execute Vector,Bounds
10af 0262 | b | Execute Discrete,In_Range
10b0 680a |h | Jump_Zero 0x10bb
10b1 00da | | Load_Top At_Offset_2
10b2 e5fd | | Load 0x2,-0x3
10b3 e5fe | | Load 0x2,-0x2
10b4 0227 | ' | Execute Access,All_Reference
10b5 01d6 | | Execute Vector,Field_Write
10b6 00e2 | | Load_Encached Integer_Cache
10b7 e5fd | | Load 0x2,-0x3
10b8 0268 | h | Execute Discrete,Successor
10b9 c5fd | | Store 0x2,-0x3
10ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2
10bb e5fd | | Load 0x2,-0x3
10bc 829e | | Call 0x1,0x9e
10bd 7013 |p | Jump_Nonzero 0x10d1
10be 4800 |H | Short_Literal 0x0
10bf 4800 |H | Short_Literal 0x0
10c0 4807 |H | Short_Literal 0x7
10c1 0092 1f70 | p| Action Push_String_Extended,0x1f70 ; "Iterator of components cannot be completed because of previous errors in the static hierarchy"
10c3 00ea | | Load_Encached Null_String_Cache
10c4 e008 | | Load 0x0,0x8
10c5 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10c6 4800 |H | Short_Literal 0x0
10c7 4800 |H | Short_Literal 0x0
10c8 4805 |H | Short_Literal 0x5
10c9 0092 1f71 | q| Action Push_String_Extended,0x1f71 ; "The previous errors must be corrected in order to produce meaningful results"
10cb 00ea | | Load_Encached Null_String_Cache
10cc e008 | | Load 0x0,0x8
10cd 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10ce e21b | | Load 0x1,0x1b
10cf 829f | | Call 0x1,0x9f
10d0 c5fd | | Store 0x2,-0x3
10d1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
10d2 0000 0000 | | .BLANK 0000[0x6]
10d8 ; --------------------------------------------------------------------------------------
10d8 ; SUBPROGRAM
10d8 ; --------------------------------------------------------------------------------------
10d8 10db | | .CONST 0x10db ; Address of begin
10d9 0004 | | .CONST 0x0004 ; Address of exception handler
10da 0001 | | .CONST 0x0001 ; Number of locals
10db BODY_10d8:
10db INIT_10d8:
10db 00da | | Load_Top At_Offset_2
10dc e002 | | Load 0x0,0x2
10dd 180f | | Execute Package,Field_Execute,Field_Number 0xf
10de 6803 |h | Jump_Zero 0x10e2
10df 0092 1f72 | r| Action Push_String_Extended,0x1f72 ; "<UNDEFINED>"
10e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10e2 00da | | Load_Top At_Offset_2
10e3 e002 | | Load 0x0,0x2
10e4 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
10e5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
10e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10e7 0000 | | .XXX[0x1]
10e8 ; --------------------------------------------------------------------------------------
10e8 ; SUBPROGRAM
10e8 ; --------------------------------------------------------------------------------------
10e8 10eb | | .CONST 0x10eb ; Address of begin
10e9 0004 | | .CONST 0x0004 ; Address of exception handler
10ea 0001 | | .CONST 0x0001 ; Number of locals
10eb BODY_10e8:
10eb INIT_10e8:
10eb 00da | | Load_Top At_Offset_2
10ec e002 | | Load 0x0,0x2
10ed 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
10ee 4606 |F | Jump_Case 0x7
10ef 7809 |x | Jump 0x10f9 ; case 0x0
10f0 7805 |x | Jump 0x10f6 ; case 0x1
10f1 780b |x | Jump 0x10fd ; case 0x2
10f2 7803 |x | Jump 0x10f6 ; case 0x3
10f3 7802 |x | Jump 0x10f6 ; case 0x4
10f4 7801 |x | Jump 0x10f6 ; case 0x5
10f5 7800 |x | Jump 0x10f6 ; case 0x6
10f6 e002 | | Load 0x0,0x2
10f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10f9 00da | | Load_Top At_Offset_2
10fa e025 | % | Load 0x0,0x25
10fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
10fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10fd 00da | | Load_Top At_Offset_2
10fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10ff 0000 | | .XXX[0x1]
1100 ; --------------------------------------------------------------------------------------
1100 ; SUBPROGRAM
1100 ; --------------------------------------------------------------------------------------
1100 1113 | | .CONST 0x1113 ; Address of begin
1101 0004 | | .CONST 0x0004 ; Address of exception handler
1102 0006 | | .CONST 0x0006 ; Number of locals
1103 INIT_1100:
1103 00da | | Load_Top At_Offset_2
1104 01da | | Execute Vector,Bounds
1105 00e9 | | Load_Encached String_Cache
1106 035b | [ | Declare_Type Array,Constrained
1107 0337 | 7 | Declare_Variable Array
1108 00d8 | | Load_Top At_Offset_0
1109 01dd | | Execute Vector,First
110a 00e3 | | Load_Encached Natural_Cache
110b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
110c 00d8 | | Load_Top At_Offset_0
110d 00e3 | | Load_Encached Natural_Cache
110e 03f1 | | Declare_Variable Discrete,With_Value
110f 00e1 | | Load_Encached Boolean_Cache
1110 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1111 029f 1a63 | c| Declare_Subprogram INIT_1a60,For_Call
1113 BODY_1100:
1113 00cf | | Action Mark_Auxiliary
1114 e5ff | | Load 0x2,-0x1
1115 01d9 | | Execute Vector,Reverse_Bounds
1116 0263 | c | Execute Discrete,Above_Bound
1117 7021 |p! | Jump_Nonzero 0x1139
1118 00d8 | | Load_Top At_Offset_0
1119 e5ff | | Load 0x2,-0x1
111a 01d7 | | Execute Vector,Field_Read
111b 00d8 | | Load_Top At_Offset_0
111c 0d20 | | Execute_Immediate Less,0x20
111d 700e |p | Jump_Nonzero 0x112c
111e 00d8 | | Load_Top At_Offset_0
111f 0c21 | ! | Execute_Immediate Greater_Equal,0x21
1120 7008 |p | Jump_Nonzero 0x1129
1121 00d1 | | Pop_Control Pop_Count_1
1122 e405 | | Load 0x2,0x5
1123 6813 |h | Jump_Zero 0x1137
1124 4820 |H | Short_Literal 0x20
1125 8406 | | Call 0x2,0x6
1126 4800 |H | Short_Literal 0x0
1127 a405 | | Store_Unchecked 0x2,0x5
1128 780e |x | Jump 0x1137
1129 0f5f | _ | Execute_Immediate Equal,0x5f
112a 77f7 |w | Jump_Nonzero 0x1122
112b 7805 |x | Jump 0x1131
112c 4809 |H | Short_Literal 0x9
112d 480d |H | Short_Literal 0xd
112e 0262 | b | Execute Discrete,In_Range
112f 77f2 |w | Jump_Nonzero 0x1122
1130 7800 |x | Jump 0x1131
1131 00d8 | | Load_Top At_Offset_0
1132 e5ff | | Load 0x2,-0x1
1133 01d7 | | Execute Vector,Field_Read
1134 8406 | | Call 0x2,0x6
1135 4801 |H | Short_Literal 0x1
1136 a405 | | Store_Unchecked 0x2,0x5
1137 00c8 | | Action Pop_Auxiliary_Range
1138 3fdf |? | Loop_Increasing 0x1118
1139 00ce | | Action Pop_Auxiliary
113a 00db | | Load_Top At_Offset_3
113b 00e2 | | Load_Encached Integer_Cache
113c e404 | | Load 0x2,0x4
113d 0267 | g | Execute Discrete,Predecessor
113e e402 | | Load 0x2,0x2
113f 01cf | | Execute Vector,Slice_Read
1140 e026 | & | Load 0x0,0x26
1141 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1142 00e9 | | Load_Encached String_Cache
1143 01c6 | | Execute Vector,Convert_To_Formal
1144 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1145 0000 0000 | | .XXX[0x3]
1147 0000 | |
1148 ; --------------------------------------------------------------------------------------
1148 ; SUBPROGRAM
1148 ; --------------------------------------------------------------------------------------
1148 1151 | Q | .CONST 0x1151 ; Address of begin
1149 0004 | | .CONST 0x0004 ; Address of exception handler
114a 0003 | | .CONST 0x0003 ; Number of locals
114b INIT_1148:
114b 00da | | Load_Top At_Offset_2
114c 4801 |H | Short_Literal 0x1
114d e021 | ! | Load 0x0,0x21
114e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
114f 029f 1a73 | s| Declare_Subprogram INIT_1a70,For_Call
1151 BODY_1148:
1151 00d9 | | Load_Top At_Offset_1
1152 e001 | | Load 0x0,0x1
1153 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1154 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1155 6802 |h | Jump_Zero 0x1158
1156 e5fe | | Load 0x2,-0x2
1157 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1158 8403 | | Call 0x2,0x3
1159 0831 | 1 | Execute_Immediate Raise,0x31
115a 0000 0000 | | .BLANK 0000[0x6]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 1163 | c | .CONST 0x1163 ; Address of begin
1161 0004 | | .CONST 0x0004 ; Address of exception handler
1162 0001 | | .CONST 0x0001 ; Number of locals
1163 BODY_1160:
1163 INIT_1160:
1163 00da | | Load_Top At_Offset_2
1164 82a3 | | Call 0x1,0xa3
1165 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1166 0000 0000 | | .XXX[0x2]
1168 ; --------------------------------------------------------------------------------------
1168 ; SUBPROGRAM
1168 ; --------------------------------------------------------------------------------------
1168 116e | n | .CONST 0x116e ; Address of begin
1169 0004 | | .CONST 0x0004 ; Address of exception handler
116a 0002 | | .CONST 0x0002 ; Number of locals
116b INIT_1168:
116b 00da | | Load_Top At_Offset_2
116c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
116d 0007 | | Action Break_Optional
116e BODY_1168:
116e e5fe | | Load 0x2,-0x2
116f 0229 | ) | Execute Access,All_Read
1170 00d8 | | Load_Top At_Offset_0
1171 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1172 4800 |H | Short_Literal 0x0
1173 e5ff | | Load 0x2,-0x1
1174 00d8 | | Load_Top At_Offset_0
1175 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1176 0217 | | Execute Heap_Access,All_Reference
1177 e28d | | Load 0x1,0x8d
1178 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1179 00d9 | | Load_Top At_Offset_1
117a 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
117b 00d1 | | Pop_Control Pop_Count_1
117c 00d8 | | Load_Top At_Offset_0
117d 820f | | Call 0x1,0xf
117e 700c |p | Jump_Nonzero 0x118b
117f e5fe | | Load 0x2,-0x2
1180 0229 | ) | Execute Access,All_Read
1181 00d8 | | Load_Top At_Offset_0
1182 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1183 4800 |H | Short_Literal 0x0
1184 e5ff | | Load 0x2,-0x1
1185 e402 | | Load 0x2,0x2
1186 e28e | | Load 0x1,0x8e
1187 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1188 00d9 | | Load_Top At_Offset_1
1189 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
118a 00d1 | | Pop_Control Pop_Count_1
118b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
118c 0000 0000 | | .BLANK 0000[0x4]
1190 ; --------------------------------------------------------------------------------------
1190 ; SUBPROGRAM
1190 ; --------------------------------------------------------------------------------------
1190 1193 | | .CONST 0x1193 ; Address of begin
1191 0004 | | .CONST 0x0004 ; Address of exception handler
1192 0001 | | .CONST 0x0001 ; Number of locals
1193 BODY_1190:
1193 INIT_1190:
1193 00e5 | | Load_Encached Long_Integer_Cache
1194 00db | | Load_Top At_Offset_3
1195 0227 | ' | Execute Access,All_Reference
1196 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1197 0268 | h | Execute Discrete,Successor
1198 00db | | Load_Top At_Offset_3
1199 0227 | ' | Execute Access,All_Reference
119a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
119b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
119c 0000 0000 | | .BLANK 0000[0x4]
11a0 ; --------------------------------------------------------------------------------------
11a0 ; SUBPROGRAM
11a0 ; --------------------------------------------------------------------------------------
11a0 11a3 | | .CONST 0x11a3 ; Address of begin
11a1 0004 | | .CONST 0x0004 ; Address of exception handler
11a2 0001 | | .CONST 0x0001 ; Number of locals
11a3 BODY_11a0:
11a3 INIT_11a0:
11a3 00da | | Load_Top At_Offset_2
11a4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
11a5 e5fe | | Load 0x2,-0x2
11a6 0227 | ' | Execute Access,All_Reference
11a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
11a8 027f | | Execute Discrete,Equal
11a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11aa 0000 0000 | | .BLANK 0000[0x6]
11b0 ; --------------------------------------------------------------------------------------
11b0 ; SUBPROGRAM
11b0 ; --------------------------------------------------------------------------------------
11b0 11b3 | | .CONST 0x11b3 ; Address of begin
11b1 0004 | | .CONST 0x0004 ; Address of exception handler
11b2 0001 | | .CONST 0x0001 ; Number of locals
11b3 BODY_11b0:
11b3 INIT_11b0:
11b3 00da | | Load_Top At_Offset_2
11b4 0227 | ' | Execute Access,All_Reference
11b5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
11b6 e5fe | | Load 0x2,-0x2
11b7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
11b8 4801 |H | Short_Literal 0x1
11b9 e5fe | | Load 0x2,-0x2
11ba 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
11bb 00da | | Load_Top At_Offset_2
11bc e5fe | | Load 0x2,-0x2
11bd 82a6 | | Call 0x1,0xa6
11be 4502 |E | Exit_Suprogram New_Top_Offset 0x2
11bf 0000 | | .XXX[0x1]
11c0 ; --------------------------------------------------------------------------------------
11c0 ; SUBPROGRAM
11c0 ; --------------------------------------------------------------------------------------
11c0 11c3 | | .CONST 0x11c3 ; Address of begin
11c1 0004 | | .CONST 0x0004 ; Address of exception handler
11c2 0001 | | .CONST 0x0001 ; Number of locals
11c3 BODY_11c0:
11c3 INIT_11c0:
11c3 4800 |H | Short_Literal 0x0
11c4 e5fe | | Load 0x2,-0x2
11c5 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
11c6 00da | | Load_Top At_Offset_2
11c7 e5fe | | Load 0x2,-0x2
11c8 82a6 | | Call 0x1,0xa6
11c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
11ca 0000 0000 | | .BLANK 0000[0x6]
11d0 ; --------------------------------------------------------------------------------------
11d0 ; SUBPROGRAM
11d0 ; --------------------------------------------------------------------------------------
11d0 11e5 | | .CONST 0x11e5 ; Address of begin
11d1 0004 | | .CONST 0x0004 ; Address of exception handler
11d2 0003 | | .CONST 0x0003 ; Number of locals
11d3 INIT_11d0:
11d3 e001 | | Load 0x0,0x1
11d4 1b20 | | Execute Package,Field_Read,Field_Number 0x20
11d5 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
11d6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11d7 02c7 | | Declare_Variable Any
11d8 00db | | Load_Top At_Offset_3
11d9 a402 | | Store_Unchecked 0x2,0x2
11da 4801 |H | Short_Literal 0x1
11db 00d9 | | Load_Top At_Offset_1
11dc e001 | | Load 0x0,0x1
11dd 1b20 | | Execute Package,Field_Read,Field_Number 0x20
11de 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
11df 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
11e0 e21c | | Load 0x1,0x1c
11e1 035b | [ | Declare_Type Array,Constrained
11e2 0337 | 7 | Declare_Variable Array
11e3 00d8 | | Load_Top At_Offset_0
11e4 1c00 | | Execute_Immediate Run_Utility,0x0
11e5 BODY_11d0:
11e5 00cf | | Action Mark_Auxiliary
11e6 00d9 | | Load_Top At_Offset_1
11e7 01d9 | | Execute Vector,Reverse_Bounds
11e8 0263 | c | Execute Discrete,Above_Bound
11e9 7012 |p | Jump_Nonzero 0x11fc
11ea e5fe | | Load 0x2,-0x2
11eb e402 | | Load 0x2,0x2
11ec e001 | | Load 0x0,0x1
11ed 1b20 | | Execute Package,Field_Read,Field_Number 0x20
11ee 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
11ef 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
11f0 822b | + | Call 0x1,0x2b
11f1 00d9 | | Load_Top At_Offset_1
11f2 e403 | | Load 0x2,0x3
11f3 01d6 | | Execute Vector,Field_Write
11f4 e402 | | Load 0x2,0x2
11f5 e001 | | Load 0x0,0x1
11f6 1b20 | | Execute Package,Field_Read,Field_Number 0x20
11f7 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
11f8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
11f9 c402 | | Store 0x2,0x2
11fa 00c8 | | Action Pop_Auxiliary_Range
11fb 3fee |? | Loop_Increasing 0x11ea
11fc 00ce | | Action Pop_Auxiliary
11fd 00d8 | | Load_Top At_Offset_0
11fe e21c | | Load 0x1,0x1c
11ff 01c6 | | Execute Vector,Convert_To_Formal
1200 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1201 0000 0000 | | .BLANK 0000[0x7]
1208 ; --------------------------------------------------------------------------------------
1208 ; SUBPROGRAM
1208 ; --------------------------------------------------------------------------------------
1208 121b | | .CONST 0x121b ; Address of begin
1209 1270 | p | .CONST 0x1270 ; Address of exception handler
120a 0005 | | .CONST 0x0005 ; Number of locals
120b INIT_1208:
120b e20e | | Load 0x1,0xe
120c 02c7 | | Declare_Variable Any
120d e211 | | Load 0x1,0x11
120e a402 | | Store_Unchecked 0x2,0x2
120f e289 | | Load 0x1,0x89
1210 1b11 | | Execute Package,Field_Read,Field_Number 0x11
1211 0322 | " | Declare_Variable Record
1212 00d8 | | Load_Top At_Offset_0
1213 1c00 | | Execute_Immediate Run_Utility,0x0
1214 e003 | | Load 0x0,0x3
1215 1b12 | | Execute Package,Field_Read,Field_Number 0x12
1216 02c7 | | Declare_Variable Any
1217 e5ff | | Load 0x2,-0x1
1218 a404 | | Store_Unchecked 0x2,0x4
1219 029f 1ac3 | | Declare_Subprogram INIT_1ac0,For_Call
121b BODY_1208:
121b 00be | | Action Activate_Tasks
121c 00d9 | | Load_Top At_Offset_1
121d e017 | | Load 0x0,0x17
121e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
121f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1220 00cf | | Action Mark_Auxiliary
1221 7807 |x | Jump 0x1229
1222 8405 | | Call 0x2,0x5
1223 00da | | Load_Top At_Offset_2
1224 e017 | | Load 0x0,0x17
1225 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1226 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1227 c404 | | Store 0x2,0x4
1228 00c9 | | Action Pop_Auxiliary_Loop
1229 00da | | Load_Top At_Offset_2
122a e017 | | Load 0x0,0x17
122b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
122c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
122d 6ff4 |o | Jump_Zero 0x1222
122e 00ce | | Action Pop_Auxiliary
122f 00db | | Load_Top At_Offset_3
1230 e002 | | Load 0x0,0x2
1231 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1232 c402 | | Store 0x2,0x2
1233 00db | | Load_Top At_Offset_3
1234 e002 | | Load 0x0,0x2
1235 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1236 6808 |h | Jump_Zero 0x123f
1237 e5fd | | Load 0x2,-0x3
1238 0092 1f73 | s| Action Push_String_Extended,0x1f73 ; "Unable to locate CSCI component. Is the CSCI installed?"
123a e008 | | Load 0x0,0x8
123b 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
123c 829a | | Call 0x1,0x9a
123d c5fd | | Store 0x2,-0x3
123e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
123f 00db | | Load_Top At_Offset_3
1240 e002 | | Load 0x0,0x2
1241 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1242 c5fe | | Store 0x2,-0x2
1243 00db | | Load_Top At_Offset_3
1244 e002 | | Load 0x0,0x2
1245 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1246 c402 | | Store 0x2,0x2
1247 00db | | Load_Top At_Offset_3
1248 e002 | | Load 0x0,0x2
1249 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
124a 6805 |h | Jump_Zero 0x1250
124b e5fd | | Load 0x2,-0x3
124c e008 | | Load 0x0,0x8
124d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
124e c5fd | | Store 0x2,-0x3
124f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1250 00cf | | Action Mark_Auxiliary
1251 4800 |H | Short_Literal 0x0
1252 4800 |H | Short_Literal 0x0
1253 4807 |H | Short_Literal 0x7
1254 0092 1f74 | t| Action Push_String_Extended,0x1f74 ; "Ignoring duplicate CSCI component "
1256 e402 | | Load 0x2,0x2
1257 e002 | | Load 0x0,0x2
1258 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1259 82a1 | | Call 0x1,0xa1
125a 01cc | | Execute Vector,Catenate
125b 00ea | | Load_Encached Null_String_Cache
125c 8285 | | Call 0x1,0x85
125d e402 | | Load 0x2,0x2
125e e002 | | Load 0x0,0x2
125f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1260 c402 | | Store 0x2,0x2
1261 e402 | | Load 0x2,0x2
1262 e002 | | Load 0x0,0x2
1263 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1264 7002 |p | Jump_Nonzero 0x1267
1265 00c9 | | Action Pop_Auxiliary_Loop
1266 7fea | | Jump 0x1251
1267 00ce | | Action Pop_Auxiliary
1268 e5fd | | Load 0x2,-0x3
1269 0092 1f75 | u| Action Push_String_Extended,0x1f75 ; "Multiple CSCI components in view detected"
126b e008 | | Load 0x0,0x8
126c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
126d 829a | | Call 0x1,0x9a
126e c5fd | | Store 0x2,-0x3
126f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1270 TRAP_1208:
1270 e019 | | Load 0x0,0x19
1271 010f | | Execute Exception,Equal
1272 6801 |h | Jump_Zero 0x1274
1273 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1274 e002 | | Load 0x0,0x2
1275 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a
1276 010f | | Execute Exception,Equal
1277 6804 |h | Jump_Zero 0x127c
1278 e002 | | Load 0x0,0x2
1279 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
127a c5fd | | Store 0x2,-0x3
127b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
127c e5fd | | Load 0x2,-0x3
127d 0092 1f76 | v| Action Push_String_Extended,0x1f76 ; "Get_Csci"
127f 829d | | Call 0x1,0x9d
1280 c5fd | | Store 0x2,-0x3
1281 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1282 0000 0000 | | .BLANK 0000[0x6]
1288 ; --------------------------------------------------------------------------------------
1288 ; SUBPROGRAM
1288 ; --------------------------------------------------------------------------------------
1288 1295 | | .CONST 0x1295 ; Address of begin
1289 0004 | | .CONST 0x0004 ; Address of exception handler
128a 0003 | | .CONST 0x0003 ; Number of locals
128b INIT_1288:
128b e001 | | Load 0x0,0x1
128c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
128d 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
128e 0322 | " | Declare_Variable Record
128f e001 | | Load 0x0,0x1
1290 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1291 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
1292 00d9 | | Load_Top At_Offset_1
1293 017d | } | Execute Record,Structure_Write
1294 00e1 | | Load_Encached Boolean_Cache
1295 BODY_1288:
1295 00e1 | | Load_Encached Boolean_Cache
1296 00da | | Load_Top At_Offset_2
1297 4803 |H | Short_Literal 0x3
1298 e5ff | | Load 0x2,-0x1
1299 e001 | | Load 0x0,0x1
129a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
129b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
129c 00d1 | | Pop_Control Pop_Count_1
129d 0059 | Y | Store_Top Discrete,At_Offset_1
129e 00d9 | | Load_Top At_Offset_1
129f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
12a0 ; --------------------------------------------------------------------------------------
12a0 ; SUBPROGRAM
12a0 ; --------------------------------------------------------------------------------------
12a0 12b6 | | .CONST 0x12b6 ; Address of begin
12a1 0004 | | .CONST 0x0004 ; Address of exception handler
12a2 0005 | | .CONST 0x0005 ; Number of locals
12a3 INIT_12a0:
12a3 e282 | | Load 0x1,0x82
12a4 0007 | | Action Break_Optional
12a5 e001 | | Load 0x0,0x1
12a6 1b20 | | Execute Package,Field_Read,Field_Number 0x20
12a7 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
12a8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
12a9 02c7 | | Declare_Variable Any
12aa 00d8 | | Load_Top At_Offset_0
12ab 1c00 | | Execute_Immediate Run_Utility,0x0
12ac e003 | | Load 0x0,0x3
12ad 1b11 | | Execute Package,Field_Read,Field_Number 0x11
12ae 02c7 | | Declare_Variable Any
12af 4800 |H | Short_Literal 0x0
12b0 e5ff | | Load 0x2,-0x1
12b1 e003 | | Load 0x0,0x3
12b2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
12b3 a404 | | Store_Unchecked 0x2,0x4
12b4 029f 1b03 | | Declare_Subprogram INIT_1b00,For_Call
12b6 BODY_12a0:
12b6 00d9 | | Load_Top At_Offset_1
12b7 e017 | | Load 0x0,0x17
12b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12b9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
12ba 7005 |p | Jump_Nonzero 0x12c0
12bb 00d9 | | Load_Top At_Offset_1
12bc e017 | | Load 0x0,0x17
12bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12be 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
12bf 6805 |h | Jump_Zero 0x12c5
12c0 e001 | | Load 0x0,0x1
12c1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
12c2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
12c3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
12c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
12c5 00d9 | | Load_Top At_Offset_1
12c6 e017 | | Load 0x0,0x17
12c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12c8 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
12c9 6806 |h | Jump_Zero 0x12d0
12ca 8405 | | Call 0x2,0x5
12cb e001 | | Load 0x0,0x1
12cc 1b20 | | Execute Package,Field_Read,Field_Number 0x20
12cd 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
12ce 1b17 | | Execute Package,Field_Read,Field_Number 0x17
12cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
12d0 00d9 | | Load_Top At_Offset_1
12d1 e017 | | Load 0x0,0x17
12d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12d3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
12d4 e017 | | Load 0x0,0x17
12d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12d6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
12d7 e281 | | Load 0x1,0x81
12d8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
12d9 a402 | | Store_Unchecked 0x2,0x2
12da 00cf | | Action Mark_Auxiliary
12db 00da | | Load_Top At_Offset_2
12dc e017 | | Load 0x0,0x17
12dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12de 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
12df c404 | | Store 0x2,0x4
12e0 00da | | Load_Top At_Offset_2
12e1 e017 | | Load 0x0,0x17
12e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12e3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
12e4 700f |p | Jump_Nonzero 0x12f4
12e5 e402 | | Load 0x2,0x2
12e6 482c |H, | Short_Literal 0x2c
12e7 e404 | | Load 0x2,0x4
12e8 e017 | | Load 0x0,0x17
12e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12ea 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
12eb e017 | | Load 0x0,0x17
12ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12ed 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
12ee 01ca | | Execute Vector,Prepend
12ef e281 | | Load 0x1,0x81
12f0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
12f1 c402 | | Store 0x2,0x2
12f2 00c9 | | Action Pop_Auxiliary_Loop
12f3 7fe7 | | Jump 0x12db
12f4 00ce | | Action Pop_Auxiliary
12f5 00da | | Load_Top At_Offset_2
12f6 0120 | | Execute Any,Is_Value
12f7 6805 |h | Jump_Zero 0x12fd
12f8 e001 | | Load 0x0,0x1
12f9 1b20 | | Execute Package,Field_Read,Field_Number 0x20
12fa 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
12fb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
12fc 7801 |x | Jump 0x12fe
12fd 00da | | Load_Top At_Offset_2
12fe 4829 |H) | Short_Literal 0x29
12ff 4828 |H( | Short_Literal 0x28
1300 e402 | | Load 0x2,0x2
1301 8297 | | Call 0x1,0x97
1302 01ca | | Execute Vector,Prepend
1303 01cb | | Execute Vector,Append
1304 e001 | | Load 0x0,0x1
1305 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1306 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1307 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
1308 c403 | | Store 0x2,0x3
1309 00da | | Load_Top At_Offset_2
130a e001 | | Load 0x0,0x1
130b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
130c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
130d 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
130e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
130f 0000 | | .XXX[0x1]
1310 ; --------------------------------------------------------------------------------------
1310 ; SUBPROGRAM
1310 ; --------------------------------------------------------------------------------------
1310 1321 | ! | .CONST 0x1321 ; Address of begin
1311 0004 | | .CONST 0x0004 ; Address of exception handler
1312 0003 | | .CONST 0x0003 ; Number of locals
1313 INIT_1310:
1313 e001 | | Load 0x0,0x1
1314 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1315 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1316 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1317 02c7 | | Declare_Variable Any
1318 00d8 | | Load_Top At_Offset_0
1319 1c00 | | Execute_Immediate Run_Utility,0x0
131a e001 | | Load 0x0,0x1
131b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
131c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
131d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
131e 02c7 | | Declare_Variable Any
131f 00d8 | | Load_Top At_Offset_0
1320 1c00 | | Execute_Immediate Run_Utility,0x0
1321 BODY_1310:
1321 e5ff | | Load 0x2,-0x1
1322 e001 | | Load 0x0,0x1
1323 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1324 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1325 6805 |h | Jump_Zero 0x132b
1326 e001 | | Load 0x0,0x1
1327 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1328 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1329 1b17 | | Execute Package,Field_Read,Field_Number 0x17
132a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
132b e5ff | | Load 0x2,-0x1
132c e001 | | Load 0x0,0x1
132d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
132e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
132f c402 | | Store 0x2,0x2
1330 00d9 | | Load_Top At_Offset_1
1331 e001 | | Load 0x0,0x1
1332 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1333 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1334 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1335 4608 |F | Jump_Case 0x9
1336 781b |x | Jump 0x1352 ; case 0x0
1337 781a |x | Jump 0x1352 ; case 0x1
1338 7819 |x | Jump 0x1352 ; case 0x2
1339 7818 |x | Jump 0x1352 ; case 0x3
133a 7817 |x | Jump 0x1352 ; case 0x4
133b 7816 |x | Jump 0x1352 ; case 0x5
133c 7815 |x | Jump 0x1352 ; case 0x6
133d 7806 |x | Jump 0x1344 ; case 0x7
133e 7800 |x | Jump 0x133f ; case 0x8
133f e001 | | Load 0x0,0x1
1340 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1341 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1342 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1343 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1344 00d9 | | Load_Top At_Offset_1
1345 e001 | | Load 0x0,0x1
1346 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1347 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1348 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1349 c403 | | Store 0x2,0x3
134a 00d8 | | Load_Top At_Offset_0
134b e001 | | Load 0x0,0x1
134c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
134d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
134e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
134f c403 | | Store 0x2,0x3
1350 00d8 | | Load_Top At_Offset_0
1351 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1352 4800 |H | Short_Literal 0x0
1353 4800 |H | Short_Literal 0x0
1354 4806 |H | Short_Literal 0x6
1355 0092 1f77 | w| Action Push_String_Extended,0x1f77 ; "Invalid @DECOMPOSITION argument (\x22"
1357 e402 | | Load 0x2,0x2
1358 e001 | | Load 0x0,0x1
1359 1b20 | | Execute Package,Field_Read,Field_Number 0x20
135a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
135b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
135c 01cc | | Execute Vector,Catenate
135d 0092 1f78 | x| Action Push_String_Extended,0x1f78 ; "\x22 must be a list of component names or 'None')"
135f 01cc | | Execute Vector,Catenate
1360 00ea | | Load_Encached Null_String_Cache
1361 e008 | | Load 0x0,0x8
1362 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1363 e001 | | Load 0x0,0x1
1364 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1365 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1366 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1367 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1368 ; --------------------------------------------------------------------------------------
1368 ; SUBPROGRAM
1368 ; --------------------------------------------------------------------------------------
1368 1372 | r | .CONST 0x1372 ; Address of begin
1369 0004 | | .CONST 0x0004 ; Address of exception handler
136a 0002 | | .CONST 0x0002 ; Number of locals
136b INIT_1368:
136b e001 | | Load 0x0,0x1
136c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
136d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
136e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
136f 02c7 | | Declare_Variable Any
1370 00d8 | | Load_Top At_Offset_0
1371 1c00 | | Execute_Immediate Run_Utility,0x0
1372 BODY_1368:
1372 00db | | Load_Top At_Offset_3
1373 e001 | | Load 0x0,0x1
1374 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1375 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1376 6802 |h | Jump_Zero 0x1379
1377 e26f | o | Load 0x1,0x6f
1378 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1379 00db | | Load_Top At_Offset_3
137a e001 | | Load 0x0,0x1
137b 1b20 | | Execute Package,Field_Read,Field_Number 0x20
137c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
137d c402 | | Store 0x2,0x2
137e 00d8 | | Load_Top At_Offset_0
137f e001 | | Load 0x0,0x1
1380 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1381 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1382 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1383 6802 |h | Jump_Zero 0x1386
1384 e26f | o | Load 0x1,0x6f
1385 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1386 00d8 | | Load_Top At_Offset_0
1387 e001 | | Load 0x0,0x1
1388 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1389 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
138a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
138b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
138c 0000 0000 | | .BLANK 0000[0x4]
1390 ; --------------------------------------------------------------------------------------
1390 ; SUBPROGRAM
1390 ; --------------------------------------------------------------------------------------
1390 1397 | | .CONST 0x1397 ; Address of begin
1391 0004 | | .CONST 0x0004 ; Address of exception handler
1392 0002 | | .CONST 0x0002 ; Number of locals
1393 INIT_1390:
1393 00da | | Load_Top At_Offset_2
1394 01dd | | Execute Vector,First
1395 00e3 | | Load_Encached Natural_Cache
1396 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1397 BODY_1390:
1397 00cf | | Action Mark_Auxiliary
1398 7804 |x | Jump 0x139d
1399 00d9 | | Load_Top At_Offset_1
139a 0a01 | | Execute_Immediate Plus,0x1
139b 005a | Z | Store_Top Discrete,At_Offset_2
139c 00c9 | | Action Pop_Auxiliary_Loop
139d 00d9 | | Load_Top At_Offset_1
139e e5ff | | Load 0x2,-0x1
139f 01dc | | Execute Vector,Last
13a0 027a | z | Execute Discrete,Less_Equal
13a1 6805 |h | Jump_Zero 0x13a7
13a2 00d9 | | Load_Top At_Offset_1
13a3 e5ff | | Load 0x2,-0x1
13a4 01d7 | | Execute Vector,Field_Read
13a5 0e20 | | Execute_Immediate Not_Equal,0x20
13a6 77f2 |w | Jump_Nonzero 0x1399
13a7 00ce | | Action Pop_Auxiliary
13a8 00db | | Load_Top At_Offset_3
13a9 01dd | | Execute Vector,First
13aa 00d9 | | Load_Top At_Offset_1
13ab 0aff | | Execute_Immediate Plus,-0x1
13ac e5ff | | Load 0x2,-0x1
13ad 01cf | | Execute Vector,Slice_Read
13ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
13af 0000 | | .XXX[0x1]
13b0 ; --------------------------------------------------------------------------------------
13b0 ; SUBPROGRAM
13b0 ; --------------------------------------------------------------------------------------
13b0 13b3 | | .CONST 0x13b3 ; Address of begin
13b1 13c1 | | .CONST 0x13c1 ; Address of exception handler
13b2 0001 | | .CONST 0x0001 ; Number of locals
13b3 BODY_13b0:
13b3 INIT_13b0:
13b3 4820 |H | Short_Literal 0x20
13b4 00db | | Load_Top At_Offset_3
13b5 e026 | & | Load 0x0,0x26
13b6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
13b7 82b1 | | Call 0x1,0xb1
13b8 e001 | | Load 0x0,0x1
13b9 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
13ba 1c02 | | Execute_Immediate Run_Utility,0x2
13bb 00d8 | | Load_Top At_Offset_0
13bc e212 | | Load 0x1,0x12
13bd 0260 | ` | Execute Discrete,In_Type
13be 7001 |p | Jump_Nonzero 0x13c0
13bf 0801 | | Execute_Immediate Raise,0x1
13c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
13c1 TRAP_13b0:
13c1 010e | | Execute Exception,Is_Constraint_Error
13c2 6802 |h | Jump_Zero 0x13c5
13c3 480b |H | Short_Literal 0xb
13c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
13c5 0100 | | Execute Exception,Raise
13c6 0000 0000 | | .XXX[0x2]
13c8 ; --------------------------------------------------------------------------------------
13c8 ; SUBPROGRAM
13c8 ; --------------------------------------------------------------------------------------
13c8 13de | | .CONST 0x13de ; Address of begin
13c9 0004 | | .CONST 0x0004 ; Address of exception handler
13ca 0005 | | .CONST 0x0005 ; Number of locals
13cb INIT_13c8:
13cb 4801 |H | Short_Literal 0x1
13cc e5fe | | Load 0x2,-0x2
13cd e212 | | Load 0x1,0x12
13ce 03f8 | | Declare_Type Discrete,Constrained
13cf e216 | | Load 0x1,0x16
13d0 0322 | " | Declare_Variable Record
13d1 00d8 | | Load_Top At_Offset_0
13d2 1c00 | | Execute_Immediate Run_Utility,0x0
13d3 e216 | | Load 0x1,0x16
13d4 0322 | " | Declare_Variable Record
13d5 00d8 | | Load_Top At_Offset_0
13d6 1c00 | | Execute_Immediate Run_Utility,0x0
13d7 e001 | | Load 0x0,0x1
13d8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
13d9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
13da 1b16 | | Execute Package,Field_Read,Field_Number 0x16
13db 02c7 | | Declare_Variable Any
13dc 00d8 | | Load_Top At_Offset_0
13dd 1c00 | | Execute_Immediate Run_Utility,0x0
13de BODY_13c8:
13de e5fc | | Load 0x2,-0x4
13df 821a | | Call 0x1,0x1a
13e0 6808 |h | Jump_Zero 0x13e9
13e1 e5ff | | Load 0x2,-0x1
13e2 00d8 | | Load_Top At_Offset_0
13e3 0227 | ' | Execute Access,All_Reference
13e4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
13e5 822a | * | Call 0x1,0x2a
13e6 00da | | Load_Top At_Offset_2
13e7 017d | } | Execute Record,Structure_Write
13e8 7803 |x | Jump 0x13ec
13e9 e5fc | | Load 0x2,-0x4
13ea 00da | | Load_Top At_Offset_2
13eb 017d | } | Execute Record,Structure_Write
13ec e5ff | | Load 0x2,-0x1
13ed 00da | | Load_Top At_Offset_2
13ee 82a8 | | Call 0x1,0xa8
13ef 6801 |h | Jump_Zero 0x13f1
13f0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
13f1 00d9 | | Load_Top At_Offset_1
13f2 e5ff | | Load 0x2,-0x1
13f3 82a9 | | Call 0x1,0xa9
13f4 00d1 | | Pop_Control Pop_Count_1
13f5 00d9 | | Load_Top At_Offset_1
13f6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
13f7 e5fe | | Load 0x2,-0x2
13f8 027f | | Execute Discrete,Equal
13f9 7008 |p | Jump_Nonzero 0x1402
13fa e5fd | | Load 0x2,-0x3
13fb 0f01 | | Execute_Immediate Equal,0x1
13fc 680b |h | Jump_Zero 0x1408
13fd 00d9 | | Load_Top At_Offset_1
13fe 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
13ff e402 | | Load 0x2,0x2
1400 0260 | ` | Execute Discrete,In_Type
1401 6806 |h | Jump_Zero 0x1408
1402 e5f9 | | Load 0x2,-0x7
1403 e5fa | | Load 0x2,-0x6
1404 00db | | Load_Top At_Offset_3
1405 82a0 | | Call 0x1,0xa0
1406 c5fa | | Store 0x2,-0x6
1407 c5f9 | | Store 0x2,-0x7
1408 00d9 | | Load_Top At_Offset_1
1409 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
140a c405 | | Store 0x2,0x5
140b 00d8 | | Load_Top At_Offset_0
140c e001 | | Load 0x0,0x1
140d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
140e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
140f 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
1410 c405 | | Store 0x2,0x5
1411 e5fb | | Load 0x2,-0x5
1412 0f01 | | Execute_Immediate Equal,0x1
1413 7031 |p1 | Jump_Nonzero 0x1445
1414 00cf | | Action Mark_Auxiliary
1415 7827 |x' | Jump 0x143d
1416 e5ff | | Load 0x2,-0x1
1417 00da | | Load_Top At_Offset_2
1418 e001 | | Load 0x0,0x1
1419 1b20 | | Execute Package,Field_Read,Field_Number 0x20
141a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
141b 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
141c 822b | + | Call 0x1,0x2b
141d e403 | | Load 0x2,0x3
141e 017d | } | Execute Record,Structure_Write
141f 00db | | Load_Top At_Offset_3
1420 e219 | | Load 0x1,0x19
1421 017e | ~ | Execute Record,Not_Equal
1422 6813 |h | Jump_Zero 0x1436
1423 00db | | Load_Top At_Offset_3
1424 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1425 e5fe | | Load 0x2,-0x2
1426 027f | | Execute Discrete,Equal
1427 7008 |p | Jump_Nonzero 0x1430
1428 e5fd | | Load 0x2,-0x3
1429 0f01 | | Execute_Immediate Equal,0x1
142a 680b |h | Jump_Zero 0x1436
142b 00db | | Load_Top At_Offset_3
142c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
142d e402 | | Load 0x2,0x2
142e 0260 | ` | Execute Discrete,In_Type
142f 6806 |h | Jump_Zero 0x1436
1430 e5f9 | | Load 0x2,-0x7
1431 e5fa | | Load 0x2,-0x6
1432 e403 | | Load 0x2,0x3
1433 82a0 | | Call 0x1,0xa0
1434 c5fa | | Store 0x2,-0x6
1435 c5f9 | | Store 0x2,-0x7
1436 00d9 | | Load_Top At_Offset_1
1437 e001 | | Load 0x0,0x1
1438 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1439 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
143a 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
143b c405 | | Store 0x2,0x5
143c 00c9 | | Action Pop_Auxiliary_Loop
143d 00d9 | | Load_Top At_Offset_1
143e e001 | | Load 0x0,0x1
143f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1440 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1441 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
1442 6fd3 |o | Jump_Zero 0x1416
1443 00ce | | Action Pop_Auxiliary
1444 4506 |E | Exit_Suprogram New_Top_Offset 0x6
1445 00cf | | Action Mark_Auxiliary
1446 781e |x | Jump 0x1465
1447 e5ff | | Load 0x2,-0x1
1448 00da | | Load_Top At_Offset_2
1449 e001 | | Load 0x0,0x1
144a 1b20 | | Execute Package,Field_Read,Field_Number 0x20
144b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
144c 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
144d 822b | + | Call 0x1,0x2b
144e e403 | | Load 0x2,0x3
144f 017d | } | Execute Record,Structure_Write
1450 00db | | Load_Top At_Offset_3
1451 e219 | | Load 0x1,0x19
1452 017e | ~ | Execute Record,Not_Equal
1453 680a |h | Jump_Zero 0x145e
1454 e5f9 | | Load 0x2,-0x7
1455 e5fa | | Load 0x2,-0x6
1456 4801 |H | Short_Literal 0x1
1457 e403 | | Load 0x2,0x3
1458 e5fd | | Load 0x2,-0x3
1459 e5fe | | Load 0x2,-0x2
145a e5ff | | Load 0x2,-0x1
145b 82b3 | | Call 0x1,0xb3
145c c5fa | | Store 0x2,-0x6
145d c5f9 | | Store 0x2,-0x7
145e 00d9 | | Load_Top At_Offset_1
145f e001 | | Load 0x0,0x1
1460 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1461 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1462 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1463 c405 | | Store 0x2,0x5
1464 00c9 | | Action Pop_Auxiliary_Loop
1465 00d9 | | Load_Top At_Offset_1
1466 e001 | | Load 0x0,0x1
1467 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1468 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1469 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
146a 6fdc |o | Jump_Zero 0x1447
146b 00ce | | Action Pop_Auxiliary
146c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
146d 0000 0000 | | .XXX[0x3]
146f 0000 | |
1470 ; --------------------------------------------------------------------------------------
1470 ; SUBPROGRAM
1470 ; --------------------------------------------------------------------------------------
1470 1482 | | .CONST 0x1482 ; Address of begin
1471 0004 | | .CONST 0x0004 ; Address of exception handler
1472 0004 | | .CONST 0x0004 ; Number of locals
1473 INIT_1470:
1473 e216 | | Load 0x1,0x16
1474 0322 | " | Declare_Variable Record
1475 00d8 | | Load_Top At_Offset_0
1476 1c00 | | Execute_Immediate Run_Utility,0x0
1477 e216 | | Load 0x1,0x16
1478 0322 | " | Declare_Variable Record
1479 00d8 | | Load_Top At_Offset_0
147a 1c00 | | Execute_Immediate Run_Utility,0x0
147b e001 | | Load 0x0,0x1
147c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
147d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
147e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
147f 02c7 | | Declare_Variable Any
1480 00d8 | | Load_Top At_Offset_0
1481 1c00 | | Execute_Immediate Run_Utility,0x0
1482 BODY_1470:
1482 e5fe | | Load 0x2,-0x2
1483 821a | | Call 0x1,0x1a
1484 6808 |h | Jump_Zero 0x148d
1485 e5ff | | Load 0x2,-0x1
1486 00d8 | | Load_Top At_Offset_0
1487 0227 | ' | Execute Access,All_Reference
1488 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1489 822a | * | Call 0x1,0x2a
148a 00da | | Load_Top At_Offset_2
148b 017d | } | Execute Record,Structure_Write
148c 7803 |x | Jump 0x1490
148d e5fe | | Load 0x2,-0x2
148e 00da | | Load_Top At_Offset_2
148f 017d | } | Execute Record,Structure_Write
1490 e5ff | | Load 0x2,-0x1
1491 00da | | Load_Top At_Offset_2
1492 82a8 | | Call 0x1,0xa8
1493 6801 |h | Jump_Zero 0x1495
1494 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1495 00d9 | | Load_Top At_Offset_1
1496 e5ff | | Load 0x2,-0x1
1497 82a9 | | Call 0x1,0xa9
1498 00d1 | | Pop_Control Pop_Count_1
1499 00d9 | | Load_Top At_Offset_1
149a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
149b 0f08 | | Execute_Immediate Equal,0x8
149c 6806 |h | Jump_Zero 0x14a3
149d e5fc | | Load 0x2,-0x4
149e e5fd | | Load 0x2,-0x3
149f 00db | | Load_Top At_Offset_3
14a0 82a0 | | Call 0x1,0xa0
14a1 c5fd | | Store 0x2,-0x3
14a2 c5fc | | Store 0x2,-0x4
14a3 00d9 | | Load_Top At_Offset_1
14a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
14a5 c404 | | Store 0x2,0x4
14a6 00d8 | | Load_Top At_Offset_0
14a7 e001 | | Load 0x0,0x1
14a8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14a9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
14aa 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
14ab c404 | | Store 0x2,0x4
14ac 00cf | | Action Mark_Auxiliary
14ad 781f |x | Jump 0x14cd
14ae e5ff | | Load 0x2,-0x1
14af 00da | | Load_Top At_Offset_2
14b0 e001 | | Load 0x0,0x1
14b1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14b2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
14b3 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
14b4 822b | + | Call 0x1,0x2b
14b5 e402 | | Load 0x2,0x2
14b6 017d | } | Execute Record,Structure_Write
14b7 00db | | Load_Top At_Offset_3
14b8 e219 | | Load 0x1,0x19
14b9 017e | ~ | Execute Record,Not_Equal
14ba 680b |h | Jump_Zero 0x14c6
14bb 00db | | Load_Top At_Offset_3
14bc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
14bd 0e07 | | Execute_Immediate Not_Equal,0x7
14be 6807 |h | Jump_Zero 0x14c6
14bf e5fc | | Load 0x2,-0x4
14c0 e5fd | | Load 0x2,-0x3
14c1 e402 | | Load 0x2,0x2
14c2 e5ff | | Load 0x2,-0x1
14c3 82b4 | | Call 0x1,0xb4
14c4 c5fd | | Store 0x2,-0x3
14c5 c5fc | | Store 0x2,-0x4
14c6 00d9 | | Load_Top At_Offset_1
14c7 e001 | | Load 0x0,0x1
14c8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14c9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
14ca 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
14cb c404 | | Store 0x2,0x4
14cc 00c9 | | Action Pop_Auxiliary_Loop
14cd 00d9 | | Load_Top At_Offset_1
14ce e001 | | Load 0x0,0x1
14cf 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14d0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
14d1 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
14d2 6fdb |o | Jump_Zero 0x14ae
14d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
14d4 0000 0000 | | .BLANK 0000[0x4]
14d8 ; --------------------------------------------------------------------------------------
14d8 ; SUBPROGRAM
14d8 ; --------------------------------------------------------------------------------------
14d8 14e7 | | .CONST 0x14e7 ; Address of begin
14d9 0004 | | .CONST 0x0004 ; Address of exception handler
14da 0005 | | .CONST 0x0005 ; Number of locals
14db INIT_14d8:
14db e001 | | Load 0x0,0x1
14dc 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14dd 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
14de e001 | | Load 0x0,0x1
14df 1b20 | | Execute Package,Field_Read,Field_Number 0x20
14e0 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
14e1 e216 | | Load 0x1,0x16
14e2 0322 | " | Declare_Variable Record
14e3 00d8 | | Load_Top At_Offset_0
14e4 1c00 | | Execute_Immediate Run_Utility,0x0
14e5 029f 1b2b | +| Declare_Subprogram INIT_1b28,For_Call
14e7 BODY_14d8:
14e7 e5ff | | Load 0x2,-0x1
14e8 00da | | Load_Top At_Offset_2
14e9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
14ea 6051 |`Q | Indirect_Literal Discrete,0x153c,{0x80000000, 0x00000000}
14eb 00da | | Load_Top At_Offset_2
14ec 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
14ed e5fe | | Load 0x2,-0x2
14ee 00da | | Load_Top At_Offset_2
14ef 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
14f0 e5ff | | Load 0x2,-0x1
14f1 82ad | | Call 0x1,0xad
14f2 00da | | Load_Top At_Offset_2
14f3 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
14f4 00da | | Load_Top At_Offset_2
14f5 00da | | Load_Top At_Offset_2
14f6 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
14f7 4809 |H | Short_Literal 0x9
14f8 e021 | ! | Load 0x0,0x21
14f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
14fa 0033 | 3 | Store_Top Heap_Access,At_Offset_3
14fb 00da | | Load_Top At_Offset_2
14fc 82b0 | | Call 0x1,0xb0
14fd e004 | | Load 0x0,0x4
14fe 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14ff 00da | | Load_Top At_Offset_2
1500 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
1501 e5ff | | Load 0x2,-0x1
1502 820f | | Call 0x1,0xf
1503 6807 |h | Jump_Zero 0x150b
1504 e001 | | Load 0x0,0x1
1505 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1506 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1507 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1508 00da | | Load_Top At_Offset_2
1509 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
150a 7821 |x! | Jump 0x152c
150b 00d9 | | Load_Top At_Offset_1
150c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
150d 0aff | | Execute_Immediate Plus,-0x1
150e 460a |F | Jump_Case 0xb
150f 7816 |x | Jump 0x1526 ; case 0x0
1510 781b |x | Jump 0x152c ; case 0x1
1511 7814 |x | Jump 0x1526 ; case 0x2
1512 7819 |x | Jump 0x152c ; case 0x3
1513 7806 |x | Jump 0x151a ; case 0x4
1514 7817 |x | Jump 0x152c ; case 0x5
1515 7804 |x | Jump 0x151a ; case 0x6
1516 7803 |x | Jump 0x151a ; case 0x7
1517 7802 |x | Jump 0x151a ; case 0x8
1518 7801 |x | Jump 0x151a ; case 0x9
1519 7812 |x | Jump 0x152c ; case 0xa
151a 00db | | Load_Top At_Offset_3
151b 00da | | Load_Top At_Offset_2
151c 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
151d 482c |H, | Short_Literal 0x2c
151e e021 | ! | Load 0x0,0x21
151f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1520 c402 | | Store 0x2,0x2
1521 00db | | Load_Top At_Offset_3
1522 82af | | Call 0x1,0xaf
1523 00da | | Load_Top At_Offset_2
1524 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1525 7806 |x | Jump 0x152c
1526 e5ff | | Load 0x2,-0x1
1527 e003 | | Load 0x0,0x3
1528 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1529 82ae | | Call 0x1,0xae
152a 00da | | Load_Top At_Offset_2
152b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
152c 00d9 | | Load_Top At_Offset_1
152d 8405 | | Call 0x2,0x5
152e e004 | | Load 0x0,0x4
152f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1530 00da | | Load_Top At_Offset_2
1531 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1532 e5fc | | Load 0x2,-0x4
1533 6803 |h | Jump_Zero 0x1537
1534 e5fc | | Load 0x2,-0x4
1535 00da | | Load_Top At_Offset_2
1536 82a6 | | Call 0x1,0xa6
1537 00d9 | | Load_Top At_Offset_1
1538 e5fb | | Load 0x2,-0x5
1539 017d | } | Execute Record,Structure_Write
153a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
153b 0000 | | .XXX[0x1]
153c 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
1540 ; --------------------------------------------------------------------------------------
1540 ; SUBPROGRAM
1540 ; --------------------------------------------------------------------------------------
1540 1556 | V | .CONST 0x1556 ; Address of begin
1541 157e | ~ | .CONST 0x157e ; Address of exception handler
1542 0006 | | .CONST 0x0006 ; Number of locals
1543 INIT_1540:
1543 e216 | | Load 0x1,0x16
1544 0322 | " | Declare_Variable Record
1545 00d8 | | Load_Top At_Offset_0
1546 1c00 | | Execute_Immediate Run_Utility,0x0
1547 e289 | | Load 0x1,0x89
1548 1b11 | | Execute Package,Field_Read,Field_Number 0x11
1549 0322 | " | Declare_Variable Record
154a 00d8 | | Load_Top At_Offset_0
154b 1c00 | | Execute_Immediate Run_Utility,0x0
154c e289 | | Load 0x1,0x89
154d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
154e 02c7 | | Declare_Variable Any
154f 00d8 | | Load_Top At_Offset_0
1550 1c00 | | Execute_Immediate Run_Utility,0x0
1551 e5fe | | Load 0x2,-0x2
1552 0227 | ' | Execute Access,All_Reference
1553 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1554 029f 1b4b | K| Declare_Subprogram INIT_1b48,For_Call
1556 BODY_1540:
1556 00be | | Action Activate_Tasks
1557 e5fd | | Load 0x2,-0x3
1558 e403 | | Load 0x2,0x3
1559 4801 |H | Short_Literal 0x1
155a e5ff | | Load 0x2,-0x1
155b e289 | | Load 0x1,0x89
155c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
155d 00d1 | | Pop_Control Pop_Count_1
155e c5fd | | Store 0x2,-0x3
155f e5fd | | Load 0x2,-0x3
1560 8299 | | Call 0x1,0x99
1561 c5fd | | Store 0x2,-0x3
1562 e5fd | | Load 0x2,-0x3
1563 e403 | | Load 0x2,0x3
1564 e404 | | Load 0x2,0x4
1565 e289 | | Load 0x1,0x89
1566 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1567 c404 | | Store 0x2,0x4
1568 00d1 | | Pop_Control Pop_Count_1
1569 c5fd | | Store 0x2,-0x3
156a e5fd | | Load 0x2,-0x3
156b 8298 | | Call 0x1,0x98
156c c5fd | | Store 0x2,-0x3
156d 00cf | | Action Mark_Auxiliary
156e 7806 |x | Jump 0x1575
156f 8406 | | Call 0x2,0x6
1570 00db | | Load_Top At_Offset_3
1571 e289 | | Load 0x1,0x89
1572 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1573 c404 | | Store 0x2,0x4
1574 00c9 | | Action Pop_Auxiliary_Loop
1575 00db | | Load_Top At_Offset_3
1576 e289 | | Load 0x1,0x89
1577 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1578 6ff6 |o | Jump_Zero 0x156f
1579 00ce | | Action Pop_Auxiliary
157a 00db | | Load_Top At_Offset_3
157b e289 | | Load 0x1,0x89
157c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
157d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
157e TRAP_1540:
157e e024 | $ | Load 0x0,0x24
157f 010f | | Execute Exception,Equal
1580 6805 |h | Jump_Zero 0x1586
1581 e5fd | | Load 0x2,-0x3
1582 e008 | | Load 0x0,0x8
1583 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1584 c5fd | | Store 0x2,-0x3
1585 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1586 e019 | | Load 0x0,0x19
1587 010f | | Execute Exception,Equal
1588 6804 |h | Jump_Zero 0x158d
1589 e403 | | Load 0x2,0x3
158a e289 | | Load 0x1,0x89
158b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
158c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
158d 0100 | | Execute Exception,Raise
158e 0000 0000 | | .XXX[0x2]
1590 ; --------------------------------------------------------------------------------------
1590 ; SUBPROGRAM
1590 ; --------------------------------------------------------------------------------------
1590 15a5 | | .CONST 0x15a5 ; Address of begin
1591 0004 | | .CONST 0x0004 ; Address of exception handler
1592 0007 | | .CONST 0x0007 ; Number of locals
1593 INIT_1590:
1593 00da | | Load_Top At_Offset_2
1594 0227 | ' | Execute Access,All_Reference
1595 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
1596 0007 | | Action Break_Optional
1597 00db | | Load_Top At_Offset_3
1598 0227 | ' | Execute Access,All_Reference
1599 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
159a 0007 | | Action Break_Optional
159b e216 | | Load 0x1,0x16
159c 0322 | " | Declare_Variable Record
159d 00d8 | | Load_Top At_Offset_0
159e 1c00 | | Execute_Immediate Run_Utility,0x0
159f 029f 1bbb | | Declare_Subprogram INIT_1bb8,For_Call
15a1 029f 1c1b | | Declare_Subprogram INIT_1c18,For_Call
15a3 029f 1d13 | | Declare_Subprogram INIT_1d10,For_Call
15a5 BODY_1590:
15a5 e5fe | | Load 0x2,-0x2
15a6 e008 | | Load 0x0,0x8
15a7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
15a8 c5fe | | Store 0x2,-0x2
15a9 e5ff | | Load 0x2,-0x1
15aa 82a7 | | Call 0x1,0xa7
15ab e5ff | | Load 0x2,-0x1
15ac 0227 | ' | Execute Access,All_Reference
15ad 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
15ae e402 | | Load 0x2,0x2
15af e28e | | Load 0x1,0x8e
15b0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
15b1 8406 | | Call 0x2,0x6
15b2 8407 | | Call 0x2,0x7
15b3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
15b4 0000 0000 | | .BLANK 0000[0x4]
15b8 ; --------------------------------------------------------------------------------------
15b8 ; SUBPROGRAM
15b8 ; --------------------------------------------------------------------------------------
15b8 15c0 | | .CONST 0x15c0 ; Address of begin
15b9 1600 | | .CONST 0x1600 ; Address of exception handler
15ba 0003 | | .CONST 0x0003 ; Number of locals
15bb INIT_15b8:
15bb e266 | f | Load 0x1,0x66
15bc 0322 | " | Declare_Variable Record
15bd 00d8 | | Load_Top At_Offset_0
15be 1c00 | | Execute_Immediate Run_Utility,0x0
15bf 00e1 | | Load_Encached Boolean_Cache
15c0 BODY_15b8:
15c0 e5fd | | Load 0x2,-0x3
15c1 00da | | Load_Top At_Offset_2
15c2 e5ff | | Load 0x2,-0x1
15c3 e003 | | Load 0x0,0x3
15c4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
15c5 826a | j | Call 0x1,0x6a
15c6 00d1 | | Pop_Control Pop_Count_1
15c7 c5fd | | Store 0x2,-0x3
15c8 4801 |H | Short_Literal 0x1
15c9 e5fd | | Load 0x2,-0x3
15ca e008 | | Load 0x0,0x8
15cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
15cc 680c |h | Jump_Zero 0x15d9
15cd e5fd | | Load 0x2,-0x3
15ce 0092 1f79 | y| Action Push_String_Extended,0x1f79 ; "Unable to determine context of SYSTEM component "
15d0 e5ff | | Load 0x2,-0x1
15d1 e017 | | Load 0x0,0x17
15d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
15d3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
15d4 01cc | | Execute Vector,Catenate
15d5 e008 | | Load 0x0,0x8
15d6 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
15d7 829a | | Call 0x1,0x9a
15d8 c5fd | | Store 0x2,-0x3
15d9 00d9 | | Load_Top At_Offset_1
15da 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
15db 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15dc e5fe | | Load 0x2,-0x2
15dd 0227 | ' | Execute Access,All_Reference
15de 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
15df e5fe | | Load 0x2,-0x2
15e0 0229 | ) | Execute Access,All_Read
15e1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
15e2 4801 |H | Short_Literal 0x1
15e3 00d9 | | Load_Top At_Offset_1
15e4 01d7 | | Execute Vector,Field_Read
15e5 e5fe | | Load 0x2,-0x2
15e6 0227 | ' | Execute Access,All_Reference
15e7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
15e8 e002 | | Load 0x0,0x2
15e9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
15ea 4801 |H | Short_Literal 0x1
15eb 00da | | Load_Top At_Offset_2
15ec 01d6 | | Execute Vector,Field_Write
15ed 00d1 | | Pop_Control Pop_Count_1
15ee 00e1 | | Load_Encached Boolean_Cache
15ef e017 | | Load 0x0,0x17
15f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
15f1 180e | | Execute Package,Field_Execute,Field_Number 0xe
15f2 00db | | Load_Top At_Offset_3
15f3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15f4 e5fe | | Load 0x2,-0x2
15f5 0227 | ' | Execute Access,All_Reference
15f6 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
15f7 e017 | | Load 0x0,0x17
15f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
15f9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
15fa 0059 | Y | Store_Top Discrete,At_Offset_1
15fb e5fe | | Load 0x2,-0x2
15fc 00da | | Load_Top At_Offset_2
15fd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
15fe 82a6 | | Call 0x1,0xa6
15ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1600 TRAP_15b8:
1600 e019 | | Load 0x0,0x19
1601 010f | | Execute Exception,Equal
1602 6801 |h | Jump_Zero 0x1604
1603 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1604 e5fd | | Load 0x2,-0x3
1605 0092 1f7a | z| Action Push_String_Extended,0x1f7a ; "Save_System_Component"
1607 829d | | Call 0x1,0x9d
1608 c5fd | | Store 0x2,-0x3
1609 4503 |E | Exit_Suprogram New_Top_Offset 0x3
160a 0000 0000 | | .BLANK 0000[0x6]
1610 ; --------------------------------------------------------------------------------------
1610 ; SUBPROGRAM
1610 ; --------------------------------------------------------------------------------------
1610 161c | | .CONST 0x161c ; Address of begin
1611 167f | | .CONST 0x167f ; Address of exception handler
1612 0004 | | .CONST 0x0004 ; Number of locals
1613 INIT_1610:
1613 00e1 | | Load_Encached Boolean_Cache
1614 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1615 e003 | | Load 0x0,0x3
1616 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1617 02c7 | | Declare_Variable Any
1618 00d8 | | Load_Top At_Offset_0
1619 1c00 | | Execute_Immediate Run_Utility,0x0
161a 029f 1d5b | [| Declare_Subprogram INIT_1d58,For_Call
161c BODY_1610:
161c e5ff | | Load 0x2,-0x1
161d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
161e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
161f 0f01 | | Execute_Immediate Equal,0x1
1620 6806 |h | Jump_Zero 0x1627
1621 e5ff | | Load 0x2,-0x1
1622 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1623 e003 | | Load 0x0,0x3
1624 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1625 c403 | | Store 0x2,0x3
1626 7818 |x | Jump 0x163f
1627 e5ff | | Load 0x2,-0x1
1628 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1629 e003 | | Load 0x0,0x3
162a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
162b e003 | | Load 0x0,0x3
162c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
162d c403 | | Store 0x2,0x3
162e 00cf | | Action Mark_Auxiliary
162f 7805 |x | Jump 0x1635
1630 00da | | Load_Top At_Offset_2
1631 e003 | | Load 0x0,0x3
1632 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1633 c403 | | Store 0x2,0x3
1634 00c9 | | Action Pop_Auxiliary_Loop
1635 00da | | Load_Top At_Offset_2
1636 e017 | | Load 0x0,0x17
1637 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1638 180f | | Execute Package,Field_Execute,Field_Number 0xf
1639 7004 |p | Jump_Nonzero 0x163e
163a 00da | | Load_Top At_Offset_2
163b e018 | | Load 0x0,0x18
163c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
163d 77f2 |w | Jump_Nonzero 0x1630
163e 00ce | | Action Pop_Auxiliary
163f 00d9 | | Load_Top At_Offset_1
1640 e017 | | Load 0x0,0x17
1641 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1642 180f | | Execute Package,Field_Execute,Field_Number 0xf
1643 6813 |h | Jump_Zero 0x1657
1644 e5fd | | Load 0x2,-0x3
1645 0092 1f57 | W| Action Push_String_Extended,0x1f57 ; "Unable to locate SYSTEM component in static hierarchy. Verify that the hierarchical PARENT chain of "
1647 e5ff | | Load 0x2,-0x1
1648 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1649 e017 | | Load 0x0,0x17
164a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
164b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
164c 01cc | | Execute Vector,Catenate
164d 0092 1f58 | X| Action Push_String_Extended,0x1f58 ; " leads to a Rational_2167a SYSTEM component"
164f 01cc | | Execute Vector,Catenate
1650 0092 1f59 | Y| Action Push_String_Extended,0x1f59 ; " (Use Design.Set_Parent if necessary)"
1652 01cc | | Execute Vector,Catenate
1653 e008 | | Load 0x0,0x8
1654 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
1655 829a | | Call 0x1,0x9a
1656 c5fd | | Store 0x2,-0x3
1657 e5fe | | Load 0x2,-0x2
1658 0227 | ' | Execute Access,All_Reference
1659 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
165a e017 | | Load 0x0,0x17
165b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
165c 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
165d 6806 |h | Jump_Zero 0x1664
165e e017 | | Load 0x0,0x17
165f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1660 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1661 e5fe | | Load 0x2,-0x2
1662 0227 | ' | Execute Access,All_Reference
1663 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
1664 e5fd | | Load 0x2,-0x3
1665 e5fe | | Load 0x2,-0x2
1666 00db | | Load_Top At_Offset_3
1667 82b8 | | Call 0x1,0xb8
1668 c5fd | | Store 0x2,-0x3
1669 e5fd | | Load 0x2,-0x3
166a 8298 | | Call 0x1,0x98
166b c5fd | | Store 0x2,-0x3
166c e5fe | | Load 0x2,-0x2
166d 00da | | Load_Top At_Offset_2
166e 8404 | | Call 0x2,0x4
166f e5fe | | Load 0x2,-0x2
1670 0227 | ' | Execute Access,All_Reference
1671 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
1672 e017 | | Load 0x0,0x17
1673 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1674 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1675 00da | | Load_Top At_Offset_2
1676 6807 |h | Jump_Zero 0x167e
1677 4800 |H | Short_Literal 0x0
1678 4800 |H | Short_Literal 0x0
1679 4805 |H | Short_Literal 0x5
167a 0092 1f7b | {| Action Push_String_Extended,0x1f7b ; "Although the previous errors are not fatal, some loss of information has occurred, and incomplete results may be produced"
167c 00ea | | Load_Encached Null_String_Cache
167d 8286 | | Call 0x1,0x86
167e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
167f TRAP_1610:
167f e019 | | Load 0x0,0x19
1680 010f | | Execute Exception,Equal
1681 6801 |h | Jump_Zero 0x1683
1682 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1683 e5fd | | Load 0x2,-0x3
1684 0092 1f7c | || Action Push_String_Extended,0x1f7c ; "Resolve_High_Level_Components"
1686 829d | | Call 0x1,0x9d
1687 c5fd | | Store 0x2,-0x3
1688 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1689 0000 0000 | | .BLANK 0000[0x7]
1690 ; --------------------------------------------------------------------------------------
1690 ; SUBPROGRAM
1690 ; --------------------------------------------------------------------------------------
1690 16ab | | .CONST 0x16ab ; Address of begin
1691 0004 | | .CONST 0x0004 ; Address of exception handler
1692 000a | | .CONST 0x000a ; Number of locals
1693 INIT_1690:
1693 00e1 | | Load_Encached Boolean_Cache
1694 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1695 029f 1e23 | #| Declare_Subprogram INIT_1e20,For_Call
1697 029e 1e2b | +| Declare_Subprogram INIT_1e28,For_Call,Unelaborated
1699 e002 | | Load 0x0,0x2
169a 1928 | ( | Execute Package,Field_Reference,Field_Number 0x28
169b 00c6 | | Action Check_Subprogram_Elaborated
169c 00e1 | | Load_Encached Boolean_Cache
169d 4804 |H | Short_Literal 0x4
169e 4802 |H | Short_Literal 0x2
169f 0099 | | Action Reference_Dynamic
16a0 4803 |H | Short_Literal 0x3
16a1 4802 |H | Short_Literal 0x2
16a2 0099 | | Action Reference_Dynamic
16a3 e027 | ' | Load 0x0,0x27
16a4 e028 | ( | Load 0x0,0x28
16a5 480a |H | Short_Literal 0xa
16a6 0007 | | Action Break_Optional
16a7 4804 |H | Short_Literal 0x4
16a8 4802 |H | Short_Literal 0x2
16a9 0099 | | Action Reference_Dynamic
16aa 00c7 | | Action Elaborate_Subprogram
16ab BODY_1690:
16ab e402 | | Load 0x2,0x2
16ac 4801 |H | Short_Literal 0x1
16ad e5ff | | Load 0x2,-0x1
16ae e405 | | Load 0x2,0x5
16af 4806 |H | Short_Literal 0x6
16b0 4802 |H | Short_Literal 0x2
16b1 0099 | | Action Reference_Dynamic
16b2 4807 |H | Short_Literal 0x7
16b3 4802 |H | Short_Literal 0x2
16b4 0099 | | Action Reference_Dynamic
16b5 4808 |H | Short_Literal 0x8
16b6 4802 |H | Short_Literal 0x2
16b7 0099 | | Action Reference_Dynamic
16b8 e002 | | Load 0x0,0x2
16b9 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
16ba c402 | | Store 0x2,0x2
16bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
16bc 0000 0000 | | .BLANK 0000[0x4]
16c0 ; --------------------------------------------------------------------------------------
16c0 ; SUBPROGRAM
16c0 ; --------------------------------------------------------------------------------------
16c0 16c9 | | .CONST 0x16c9 ; Address of begin
16c1 0004 | | .CONST 0x0004 ; Address of exception handler
16c2 0003 | | .CONST 0x0003 ; Number of locals
16c3 INIT_16c0:
16c3 00e3 | | Load_Encached Natural_Cache
16c4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
16c5 e20e | | Load 0x1,0xe
16c6 02c7 | | Declare_Variable Any
16c7 e5ff | | Load 0x2,-0x1
16c8 a403 | | Store_Unchecked 0x2,0x3
16c9 BODY_16c0:
16c9 00d8 | | Load_Top At_Offset_0
16ca e002 | | Load 0x0,0x2
16cb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
16cc c403 | | Store 0x2,0x3
16cd 00cf | | Action Mark_Auxiliary
16ce 7809 |x | Jump 0x16d8
16cf 00e2 | | Load_Encached Integer_Cache
16d0 00db | | Load_Top At_Offset_3
16d1 0268 | h | Execute Discrete,Successor
16d2 005b | [ | Store_Top Discrete,At_Offset_3
16d3 00d9 | | Load_Top At_Offset_1
16d4 e002 | | Load 0x0,0x2
16d5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
16d6 c403 | | Store 0x2,0x3
16d7 00c9 | | Action Pop_Auxiliary_Loop
16d8 00d9 | | Load_Top At_Offset_1
16d9 e002 | | Load 0x0,0x2
16da 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
16db 6ff3 |o | Jump_Zero 0x16cf
16dc 00ce | | Action Pop_Auxiliary
16dd 00d9 | | Load_Top At_Offset_1
16de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
16df 0000 | | .XXX[0x1]
16e0 ; --------------------------------------------------------------------------------------
16e0 ; SUBPROGRAM
16e0 ; --------------------------------------------------------------------------------------
16e0 16e8 | | .CONST 0x16e8 ; Address of begin
16e1 0004 | | .CONST 0x0004 ; Address of exception handler
16e2 0003 | | .CONST 0x0003 ; Number of locals
16e3 INIT_16e0:
16e3 e28d | | Load 0x1,0x8d
16e4 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
16e5 0322 | " | Declare_Variable Record
16e6 e281 | | Load 0x1,0x81
16e7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
16e8 BODY_16e0:
16e8 00d9 | | Load_Top At_Offset_1
16e9 e5ff | | Load 0x2,-0x1
16ea e28d | | Load 0x1,0x8d
16eb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
16ec 00d1 | | Pop_Control Pop_Count_1
16ed 00cf | | Action Mark_Auxiliary
16ee 7813 |x | Jump 0x1702
16ef 00d9 | | Load_Top At_Offset_1
16f0 480a |H | Short_Literal 0xa
16f1 e402 | | Load 0x2,0x2
16f2 e28d | | Load 0x1,0x8d
16f3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
16f4 0092 1f7d | }| Action Push_String_Extended,0x1f7d ; ","
16f6 01cc | | Execute Vector,Catenate
16f7 01cb | | Execute Vector,Append
16f8 e5fd | | Load 0x2,-0x3
16f9 01cc | | Execute Vector,Catenate
16fa e281 | | Load 0x1,0x81
16fb 181d | | Execute Package,Field_Execute,Field_Number 0x1d
16fc 003a | : | Store_Top Access,At_Offset_2
16fd 00da | | Load_Top At_Offset_2
16fe e28d | | Load 0x1,0x8d
16ff 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1700 00d1 | | Pop_Control Pop_Count_1
1701 00c9 | | Action Pop_Auxiliary_Loop
1702 00da | | Load_Top At_Offset_2
1703 e28d | | Load 0x1,0x8d
1704 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1705 6fe9 |o | Jump_Zero 0x16ef
1706 00ce | | Action Pop_Auxiliary
1707 e5fd | | Load 0x2,-0x3
1708 00d9 | | Load_Top At_Offset_1
1709 e281 | | Load 0x1,0x81
170a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
170b 01cc | | Execute Vector,Catenate
170c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
170d 0000 0000 | | .XXX[0x3]
170f 0000 | |
1710 ; --------------------------------------------------------------------------------------
1710 ; SUBPROGRAM
1710 ; --------------------------------------------------------------------------------------
1710 1718 | | .CONST 0x1718 ; Address of begin
1711 0004 | | .CONST 0x0004 ; Address of exception handler
1712 0003 | | .CONST 0x0003 ; Number of locals
1713 INIT_1710:
1713 e28e | | Load 0x1,0x8e
1714 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
1715 0322 | " | Declare_Variable Record
1716 e281 | | Load 0x1,0x81
1717 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1718 BODY_1710:
1718 00d9 | | Load_Top At_Offset_1
1719 e5ff | | Load 0x2,-0x1
171a e28e | | Load 0x1,0x8e
171b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
171c 00d1 | | Pop_Control Pop_Count_1
171d 00cf | | Action Mark_Auxiliary
171e 7821 |x! | Jump 0x1740
171f 00d9 | | Load_Top At_Offset_1
1720 480a |H | Short_Literal 0xa
1721 e402 | | Load 0x2,0x2
1722 e28e | | Load 0x1,0x8e
1723 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1724 e002 | | Load 0x0,0x2
1725 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
1726 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1727 0092 1f7e | ~| Action Push_String_Extended,0x1f7e ; " => "
1729 01cc | | Execute Vector,Catenate
172a e402 | | Load 0x2,0x2
172b e28e | | Load 0x1,0x8e
172c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
172d e5ff | | Load 0x2,-0x1
172e e28e | | Load 0x1,0x8e
172f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1730 8235 | 5 | Call 0x1,0x35
1731 01cc | | Execute Vector,Catenate
1732 0092 1f7d | }| Action Push_String_Extended,0x1f7d ; ","
1734 01cc | | Execute Vector,Catenate
1735 01cb | | Execute Vector,Append
1736 e5fd | | Load 0x2,-0x3
1737 01cc | | Execute Vector,Catenate
1738 e281 | | Load 0x1,0x81
1739 181d | | Execute Package,Field_Execute,Field_Number 0x1d
173a 003a | : | Store_Top Access,At_Offset_2
173b 00da | | Load_Top At_Offset_2
173c e28e | | Load 0x1,0x8e
173d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
173e 00d1 | | Pop_Control Pop_Count_1
173f 00c9 | | Action Pop_Auxiliary_Loop
1740 00da | | Load_Top At_Offset_2
1741 e28e | | Load 0x1,0x8e
1742 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1743 6fdb |o | Jump_Zero 0x171f
1744 00ce | | Action Pop_Auxiliary
1745 e5fd | | Load 0x2,-0x3
1746 00d9 | | Load_Top At_Offset_1
1747 e281 | | Load 0x1,0x81
1748 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1749 01cc | | Execute Vector,Catenate
174a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
174b 0000 0000 | | .BLANK 0000[0x5]
1750 ; --------------------------------------------------------------------------------------
1750 ; SUBPROGRAM
1750 ; --------------------------------------------------------------------------------------
1750 175b | [ | .CONST 0x175b ; Address of begin
1751 17c0 | | .CONST 0x17c0 ; Address of exception handler
1752 0003 | | .CONST 0x0003 ; Number of locals
1753 INIT_1750:
1753 e405 | | Load 0x2,0x5
1754 e017 | | Load 0x0,0x17
1755 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1756 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1757 82a3 | | Call 0x1,0xa3
1758 00db | | Load_Top At_Offset_3
1759 00d9 | | Load_Top At_Offset_1
175a 828b | | Call 0x1,0x8b
175b BODY_1750:
175b e5fd | | Load 0x2,-0x3
175c e017 | | Load 0x0,0x17
175d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
175e 180e | | Execute Package,Field_Execute,Field_Number 0xe
175f 0092 1f7f | | Action Push_String_Extended,0x1f7f ; "Unable to determine enclosing subsystem of view "
1761 e5ff | | Load 0x2,-0x1
1762 e017 | | Load 0x0,0x17
1763 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1764 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1765 01cc | | Execute Vector,Catenate
1766 e008 | | Load 0x0,0x8
1767 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
1768 e405 | | Load 0x2,0x5
1769 829b | | Call 0x1,0x9b
176a c5fd | | Store 0x2,-0x3
176b e5ff | | Load 0x2,-0x1
176c e5fe | | Load 0x2,-0x2
176d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
176e e5fd | | Load 0x2,-0x3
176f e402 | | Load 0x2,0x2
1770 4801 |H | Short_Literal 0x1
1771 e5ff | | Load 0x2,-0x1
1772 e289 | | Load 0x1,0x89
1773 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1774 00d1 | | Pop_Control Pop_Count_1
1775 c5fd | | Store 0x2,-0x3
1776 e5fd | | Load 0x2,-0x3
1777 8299 | | Call 0x1,0x99
1778 c5fd | | Store 0x2,-0x3
1779 00d8 | | Load_Top At_Offset_0
177a e402 | | Load 0x2,0x2
177b e289 | | Load 0x1,0x89
177c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
177d c404 | | Store 0x2,0x4
177e e402 | | Load 0x2,0x2
177f e289 | | Load 0x1,0x89
1780 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1781 00d1 | | Pop_Control Pop_Count_1
1782 e404 | | Load 0x2,0x4
1783 e002 | | Load 0x0,0x2
1784 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1785 682f |h/ | Jump_Zero 0x17b5
1786 e5fe | | Load 0x2,-0x2
1787 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1788 e215 | | Load 0x1,0x15
1789 00db | | Load_Top At_Offset_3
178a e7ff | | Load 0x3,-0x1
178b e210 | | Load 0x1,0x10
178c 82b5 | | Call 0x1,0xb5
178d 00d1 | | Pop_Control Pop_Count_1
178e e5fd | | Load 0x2,-0x3
178f 0092 1f80 | | Action Push_String_Extended,0x1f80 ; "Unable to find "
1791 e7ff | | Load 0x3,-0x1
1792 e001 | | Load 0x0,0x1
1793 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
1794 011c | | Execute Any,Convert_Unchecked
1795 1c01 | | Execute_Immediate Run_Utility,0x1
1796 01cc | | Execute Vector,Catenate
1797 0092 1f69 | i| Action Push_String_Extended,0x1f69 ; " component \x22"
1799 01cc | | Execute Vector,Catenate
179a 00db | | Load_Top At_Offset_3
179b 01cc | | Execute Vector,Catenate
179c 0092 1f81 | | Action Push_String_Extended,0x1f81 ; "\x22 in view "
179e 01cc | | Execute Vector,Catenate
179f e5ff | | Load 0x2,-0x1
17a0 e017 | | Load 0x0,0x17
17a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
17a2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
17a3 01cc | | Execute Vector,Catenate
17a4 0092 1f82 | | Action Push_String_Extended,0x1f82 ; " (Verify that the "
17a6 01cc | | Execute Vector,Catenate
17a7 e7ff | | Load 0x3,-0x1
17a8 e001 | | Load 0x0,0x1
17a9 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
17aa 011c | | Execute Any,Convert_Unchecked
17ab 1c01 | | Execute_Immediate Run_Utility,0x1
17ac 01cc | | Execute Vector,Catenate
17ad 0092 1f83 | | Action Push_String_Extended,0x1f83 ; " component is installed)"
17af 01cc | | Execute Vector,Catenate
17b0 e008 | | Load 0x0,0x8
17b1 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
17b2 829a | | Call 0x1,0x9a
17b3 c5fd | | Store 0x2,-0x3
17b4 4502 |E | Exit_Suprogram New_Top_Offset 0x2
17b5 e5fe | | Load 0x2,-0x2
17b6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
17b7 e215 | | Load 0x1,0x15
17b8 00db | | Load_Top At_Offset_3
17b9 e7ff | | Load 0x3,-0x1
17ba e404 | | Load 0x2,0x4
17bb e002 | | Load 0x0,0x2
17bc 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
17bd 82b5 | | Call 0x1,0xb5
17be 00d1 | | Pop_Control Pop_Count_1
17bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
17c0 TRAP_1750:
17c0 e024 | $ | Load 0x0,0x24
17c1 010f | | Execute Exception,Equal
17c2 682b |h+ | Jump_Zero 0x17ee
17c3 e5fd | | Load 0x2,-0x3
17c4 e008 | | Load 0x0,0x8
17c5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
17c6 c5fd | | Store 0x2,-0x3
17c7 e5fd | | Load 0x2,-0x3
17c8 0092 1f80 | | Action Push_String_Extended,0x1f80 ; "Unable to find "
17ca e7ff | | Load 0x3,-0x1
17cb e001 | | Load 0x0,0x1
17cc 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
17cd 011c | | Execute Any,Convert_Unchecked
17ce 1c01 | | Execute_Immediate Run_Utility,0x1
17cf 01cc | | Execute Vector,Catenate
17d0 0092 1f69 | i| Action Push_String_Extended,0x1f69 ; " component \x22"
17d2 01cc | | Execute Vector,Catenate
17d3 e602 | | Load 0x3,0x2
17d4 01cc | | Execute Vector,Catenate
17d5 0092 1f81 | | Action Push_String_Extended,0x1f81 ; "\x22 in view "
17d7 01cc | | Execute Vector,Catenate
17d8 e5ff | | Load 0x2,-0x1
17d9 e017 | | Load 0x0,0x17
17da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
17db 1820 | | Execute Package,Field_Execute,Field_Number 0x20
17dc 01cc | | Execute Vector,Catenate
17dd 0092 1f82 | | Action Push_String_Extended,0x1f82 ; " (Verify that the "
17df 01cc | | Execute Vector,Catenate
17e0 e7ff | | Load 0x3,-0x1
17e1 e001 | | Load 0x0,0x1
17e2 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
17e3 011c | | Execute Any,Convert_Unchecked
17e4 1c01 | | Execute_Immediate Run_Utility,0x1
17e5 01cc | | Execute Vector,Catenate
17e6 0092 1f83 | | Action Push_String_Extended,0x1f83 ; " component is installed)"
17e8 01cc | | Execute Vector,Catenate
17e9 e008 | | Load 0x0,0x8
17ea 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
17eb 829a | | Call 0x1,0x9a
17ec c5fd | | Store 0x2,-0x3
17ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2
17ee 0100 | | Execute Exception,Raise
17ef 0000 | | .XXX[0x1]
17f0 ; --------------------------------------------------------------------------------------
17f0 ; SUBPROGRAM
17f0 ; --------------------------------------------------------------------------------------
17f0 17fd | | .CONST 0x17fd ; Address of begin
17f1 1872 | r | .CONST 0x1872 ; Address of exception handler
17f2 0004 | | .CONST 0x0004 ; Number of locals
17f3 INIT_17f0:
17f3 e405 | | Load 0x2,0x5
17f4 e017 | | Load 0x0,0x17
17f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
17f6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
17f7 82a3 | | Call 0x1,0xa3
17f8 4805 |H | Short_Literal 0x5
17f9 00d9 | | Load_Top At_Offset_1
17fa 828b | | Call 0x1,0x8b
17fb 029f 1e6b | k| Declare_Subprogram INIT_1e68,For_Call
17fd BODY_17f0:
17fd e405 | | Load 0x2,0x5
17fe e003 | | Load 0x0,0x3
17ff 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1800 e5fe | | Load 0x2,-0x2
1801 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1802 e403 | | Load 0x2,0x3
1803 e017 | | Load 0x0,0x17
1804 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1805 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1806 681e |h | Jump_Zero 0x1825
1807 e5fe | | Load 0x2,-0x2
1808 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1809 e215 | | Load 0x1,0x15
180a e602 | | Load 0x3,0x2
180b 4805 |H | Short_Literal 0x5
180c e210 | | Load 0x1,0x10
180d 82b5 | | Call 0x1,0xb5
180e 00d1 | | Pop_Control Pop_Count_1
180f e5fd | | Load 0x2,-0x3
1810 4822 |H" | Short_Literal 0x22
1811 0092 1f84 | | Action Push_String_Extended,0x1f84 ; "Subsystem "
1813 e405 | | Load 0x2,0x5
1814 e017 | | Load 0x0,0x17
1815 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1816 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1817 01cc | | Execute Vector,Catenate
1818 0092 1f85 | | Action Push_String_Extended,0x1f85 ; " has no child subsystems in which to"
181a 01cc | | Execute Vector,Catenate
181b 0092 1f86 | | Action Push_String_Extended,0x1f86 ; " locate CSCI component \x22"
181d 01cc | | Execute Vector,Catenate
181e e602 | | Load 0x3,0x2
181f 01cc | | Execute Vector,Catenate
1820 01cb | | Execute Vector,Append
1821 e008 | | Load 0x0,0x8
1822 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
1823 829a | | Call 0x1,0x9a
1824 c5fd | | Store 0x2,-0x3
1825 00cf | | Action Mark_Auxiliary
1826 7807 |x | Jump 0x182e
1827 8604 | | Call 0x3,0x4
1828 e403 | | Load 0x2,0x3
1829 e017 | | Load 0x0,0x17
182a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
182b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
182c c403 | | Store 0x2,0x3
182d 00c9 | | Action Pop_Auxiliary_Loop
182e e403 | | Load 0x2,0x3
182f e017 | | Load 0x0,0x17
1830 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1831 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1832 6ff4 |o | Jump_Zero 0x1827
1833 00ce | | Action Pop_Auxiliary
1834 e404 | | Load 0x2,0x4
1835 e002 | | Load 0x0,0x2
1836 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1837 6803 |h | Jump_Zero 0x183b
1838 4805 |H | Short_Literal 0x5
1839 8406 | | Call 0x2,0x6
183a 780e |x | Jump 0x1849
183b e5fe | | Load 0x2,-0x2
183c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
183d e215 | | Load 0x1,0x15
183e e602 | | Load 0x3,0x2
183f 4805 |H | Short_Literal 0x5
1840 e404 | | Load 0x2,0x4
1841 e002 | | Load 0x0,0x2
1842 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1843 82b5 | | Call 0x1,0xb5
1844 00d1 | | Pop_Control Pop_Count_1
1845 e404 | | Load 0x2,0x4
1846 e002 | | Load 0x0,0x2
1847 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1848 c404 | | Store 0x2,0x4
1849 e404 | | Load 0x2,0x4
184a e002 | | Load 0x0,0x2
184b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
184c 7024 |p$ | Jump_Nonzero 0x1871
184d 00cf | | Action Mark_Auxiliary
184e 7811 |x | Jump 0x1860
184f 4800 |H | Short_Literal 0x0
1850 4800 |H | Short_Literal 0x0
1851 4805 |H | Short_Literal 0x5
1852 0092 1f87 | | Action Push_String_Extended,0x1f87 ; "Ignoring duplicate CSCI component in \x22"
1854 e404 | | Load 0x2,0x4
1855 e002 | | Load 0x0,0x2
1856 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1857 82a1 | | Call 0x1,0xa1
1858 01cc | | Execute Vector,Catenate
1859 00ea | | Load_Encached Null_String_Cache
185a 8286 | | Call 0x1,0x86
185b e404 | | Load 0x2,0x4
185c e002 | | Load 0x0,0x2
185d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
185e c404 | | Store 0x2,0x4
185f 00c9 | | Action Pop_Auxiliary_Loop
1860 e404 | | Load 0x2,0x4
1861 e002 | | Load 0x0,0x2
1862 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1863 6feb |o | Jump_Zero 0x184f
1864 00ce | | Action Pop_Auxiliary
1865 e5fd | | Load 0x2,-0x3
1866 0092 1f88 | | Action Push_String_Extended,0x1f88 ; "Multiple CSCI components are not permitted in the child subsystems of "
1868 e405 | | Load 0x2,0x5
1869 e017 | | Load 0x0,0x17
186a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
186b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
186c 01cc | | Execute Vector,Catenate
186d e008 | | Load 0x0,0x8
186e 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
186f 829a | | Call 0x1,0x9a
1870 c5fd | | Store 0x2,-0x3
1871 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1872 TRAP_17f0:
1872 e024 | $ | Load 0x0,0x24
1873 010f | | Execute Exception,Equal
1874 6806 |h | Jump_Zero 0x187b
1875 e5fd | | Load 0x2,-0x3
1876 e008 | | Load 0x0,0x8
1877 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1878 c5fd | | Store 0x2,-0x3
1879 e019 | | Load 0x0,0x19
187a 0257 | W | Execute Discrete,Raise
187b 0100 | | Execute Exception,Raise
187c 0000 0000 | | .BLANK 0000[0x4]
1880 ; --------------------------------------------------------------------------------------
1880 ; SUBPROGRAM
1880 ; --------------------------------------------------------------------------------------
1880 1888 | | .CONST 0x1888 ; Address of begin
1881 0004 | | .CONST 0x0004 ; Address of exception handler
1882 0002 | | .CONST 0x0002 ; Number of locals
1883 INIT_1880:
1883 e003 | | Load 0x0,0x3
1884 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1885 02c7 | | Declare_Variable Any
1886 00d8 | | Load_Top At_Offset_0
1887 1c00 | | Execute_Immediate Run_Utility,0x0
1888 BODY_1880:
1888 00cf | | Action Mark_Auxiliary
1889 7827 |x' | Jump 0x18b1
188a e5fe | | Load 0x2,-0x2
188b 0227 | ' | Execute Access,All_Reference
188c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
188d e017 | | Load 0x0,0x17
188e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
188f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1890 e003 | | Load 0x0,0x3
1891 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1892 c602 | | Store 0x3,0x2
1893 00d9 | | Load_Top At_Offset_1
1894 e018 | | Load 0x0,0x18
1895 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1896 4802 |H | Short_Literal 0x2
1897 4804 |H | Short_Literal 0x4
1898 0262 | b | Execute Discrete,In_Range
1899 7001 |p | Jump_Nonzero 0x189b
189a 780b |x | Jump 0x18a6
189b e5fd | | Load 0x2,-0x3
189c e5fe | | Load 0x2,-0x2
189d 00d8 | | Load_Top At_Offset_0
189e 0227 | ' | Execute Access,All_Reference
189f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
18a0 e017 | | Load 0x0,0x17
18a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
18a2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
18a3 82b6 | | Call 0x1,0xb6
18a4 c5fe | | Store 0x2,-0x2
18a5 c5fd | | Store 0x2,-0x3
18a6 e5fe | | Load 0x2,-0x2
18a7 0229 | ) | Execute Access,All_Read
18a8 00d8 | | Load_Top At_Offset_0
18a9 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
18aa e017 | | Load 0x0,0x17
18ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
18ac 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
18ad 00d9 | | Load_Top At_Offset_1
18ae 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
18af 00d1 | | Pop_Control Pop_Count_1
18b0 00c9 | | Action Pop_Auxiliary_Loop
18b1 e5fe | | Load 0x2,-0x2
18b2 0227 | ' | Execute Access,All_Reference
18b3 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
18b4 e017 | | Load 0x0,0x17
18b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
18b6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
18b7 6fd2 |o | Jump_Zero 0x188a
18b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
18b9 0000 0000 | | .BLANK 0000[0x7]
18c0 ; --------------------------------------------------------------------------------------
18c0 ; SUBPROGRAM
18c0 ; --------------------------------------------------------------------------------------
18c0 18cd | | .CONST 0x18cd ; Address of begin
18c1 0004 | | .CONST 0x0004 ; Address of exception handler
18c2 0004 | | .CONST 0x0004 ; Number of locals
18c3 INIT_18c0:
18c3 e5f9 | | Load 0x2,-0x7
18c4 00db | | Load_Top At_Offset_3
18c5 8231 | 1 | Call 0x1,0x31
18c6 e216 | | Load 0x1,0x16
18c7 0322 | " | Declare_Variable Record
18c8 e7ff | | Load 0x3,-0x1
18c9 00d9 | | Load_Top At_Offset_1
18ca 017d | } | Execute Record,Structure_Write
18cb 00e1 | | Load_Encached Boolean_Cache
18cc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
18cd BODY_18c0:
18cd e5f9 | | Load 0x2,-0x7
18ce 00da | | Load_Top At_Offset_2
18cf 82a8 | | Call 0x1,0xa8
18d0 681b |h | Jump_Zero 0x18ec
18d1 e5f8 | | Load 0x2,-0x8
18d2 6811 |h | Jump_Zero 0x18e4
18d3 00d8 | | Load_Top At_Offset_0
18d4 e5f7 | | Load 0x2,-0x9
18d5 00d8 | | Load_Top At_Offset_0
18d6 0120 | | Execute Any,Is_Value
18d7 6803 |h | Jump_Zero 0x18db
18d8 e5fb | | Load 0x2,-0x5
18d9 011e | | Execute Any,Convert
18da 7802 |x | Jump 0x18dd
18db e5fb | | Load 0x2,-0x5
18dc 0119 | | Execute Any,Check_In_Formal_Type
18dd 00db | | Load_Top At_Offset_3
18de 85fe | | Call 0x2,-0x2
18df c5f7 | | Store 0x2,-0x9
18e0 0059 | Y | Store_Top Discrete,At_Offset_1
18e1 00d8 | | Load_Top At_Offset_0
18e2 700d |p | Jump_Nonzero 0x18f0
18e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
18e4 00d9 | | Load_Top At_Offset_1
18e5 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
18e6 6804 |h | Jump_Zero 0x18eb
18e7 00d9 | | Load_Top At_Offset_1
18e8 e5f9 | | Load 0x2,-0x7
18e9 82aa | | Call 0x1,0xaa
18ea 00d1 | | Pop_Control Pop_Count_1
18eb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
18ec 00d9 | | Load_Top At_Offset_1
18ed e5f9 | | Load 0x2,-0x7
18ee 82a9 | | Call 0x1,0xa9
18ef 00d1 | | Pop_Control Pop_Count_1
18f0 e402 | | Load 0x2,0x2
18f1 e5f7 | | Load 0x2,-0x9
18f2 00d8 | | Load_Top At_Offset_0
18f3 0120 | | Execute Any,Is_Value
18f4 6803 |h | Jump_Zero 0x18f8
18f5 e5fb | | Load 0x2,-0x5
18f6 011e | | Execute Any,Convert
18f7 7802 |x | Jump 0x18fa
18f8 e5fb | | Load 0x2,-0x5
18f9 0119 | | Execute Any,Check_In_Formal_Type
18fa 00db | | Load_Top At_Offset_3
18fb 85fc | | Call 0x2,-0x4
18fc c5f7 | | Store 0x2,-0x9
18fd c402 | | Store 0x2,0x2
18fe e402 | | Load 0x2,0x2
18ff 4603 |F | Jump_Case 0x4
1900 7805 |x | Jump 0x1906 ; case 0x0
1901 7815 |x | Jump 0x1917 ; case 0x1
1902 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x2
1903 7800 |x | Jump 0x1904 ; case 0x3
1904 e01a | | Load 0x0,0x1a
1905 0257 | W | Execute Discrete,Raise
1906 00cf | | Action Mark_Auxiliary
1907 00db | | Load_Top At_Offset_3
1908 01d9 | | Execute Vector,Reverse_Bounds
1909 0263 | c | Execute Discrete,Above_Bound
190a 700a |p | Jump_Nonzero 0x1915
190b 00d8 | | Load_Top At_Offset_0
190c e602 | | Load 0x3,0x2
190d 01d5 | | Execute Vector,Field_Reference
190e 8403 | | Call 0x2,0x3
190f e402 | | Load 0x2,0x2
1910 0f02 | | Execute_Immediate Equal,0x2
1911 6801 |h | Jump_Zero 0x1913
1912 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1913 00c8 | | Action Pop_Auxiliary_Range
1914 3ff6 |? | Loop_Increasing 0x190b
1915 00ce | | Action Pop_Auxiliary
1916 7800 |x | Jump 0x1917
1917 e402 | | Load 0x2,0x2
1918 e5f7 | | Load 0x2,-0x9
1919 00d8 | | Load_Top At_Offset_0
191a 0120 | | Execute Any,Is_Value
191b 6803 |h | Jump_Zero 0x191f
191c e5fb | | Load 0x2,-0x5
191d 011e | | Execute Any,Convert
191e 7802 |x | Jump 0x1921
191f e5fb | | Load 0x2,-0x5
1920 0119 | | Execute Any,Check_In_Formal_Type
1921 00db | | Load_Top At_Offset_3
1922 85fd | | Call 0x2,-0x3
1923 c5f7 | | Store 0x2,-0x9
1924 c402 | | Store 0x2,0x2
1925 e402 | | Load 0x2,0x2
1926 0f03 | | Execute_Immediate Equal,0x3
1927 6802 |h | Jump_Zero 0x192a
1928 e01a | | Load 0x0,0x1a
1929 0257 | W | Execute Discrete,Raise
192a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
192b 0000 0000 | | .BLANK 0000[0x5]
1930 ; --------------------------------------------------------------------------------------
1930 ; SUBPROGRAM
1930 ; --------------------------------------------------------------------------------------
1930 1933 | 3 | .CONST 0x1933 ; Address of begin
1931 0004 | | .CONST 0x0004 ; Address of exception handler
1932 0001 | | .CONST 0x0001 ; Number of locals
1933 BODY_1930:
1933 INIT_1930:
1933 e001 | | Load 0x0,0x1
1934 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1935 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
1936 00db | | Load_Top At_Offset_3
1937 8242 | B | Call 0x1,0x42
1938 0e0b | | Execute_Immediate Not_Equal,0xb
1939 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
193a 0000 0000 | | .BLANK 0000[0x6]
1940 ; --------------------------------------------------------------------------------------
1940 ; SUBPROGRAM
1940 ; --------------------------------------------------------------------------------------
1940 1943 | C | .CONST 0x1943 ; Address of begin
1941 0004 | | .CONST 0x0004 ; Address of exception handler
1942 0001 | | .CONST 0x0001 ; Number of locals
1943 BODY_1940:
1943 INIT_1940:
1943 00da | | Load_Top At_Offset_2
1944 e01b | | Load 0x0,0x1b
1945 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1946 4626 |F& | Jump_Case 0x27
1947 7826 |x& | Jump 0x196e ; case 0x0
1948 7825 |x% | Jump 0x196e ; case 0x1
1949 7824 |x$ | Jump 0x196e ; case 0x2
194a 7823 |x# | Jump 0x196e ; case 0x3
194b 7822 |x" | Jump 0x196e ; case 0x4
194c 7821 |x! | Jump 0x196e ; case 0x5
194d 7820 |x | Jump 0x196e ; case 0x6
194e 781f |x | Jump 0x196e ; case 0x7
194f 781e |x | Jump 0x196e ; case 0x8
1950 781f |x | Jump 0x1970 ; case 0x9
1951 781c |x | Jump 0x196e ; case 0xa
1952 781d |x | Jump 0x1970 ; case 0xb
1953 781a |x | Jump 0x196e ; case 0xc
1954 781b |x | Jump 0x1970 ; case 0xd
1955 7818 |x | Jump 0x196e ; case 0xe
1956 7817 |x | Jump 0x196e ; case 0xf
1957 7816 |x | Jump 0x196e ; case 0x10
1958 7815 |x | Jump 0x196e ; case 0x11
1959 7814 |x | Jump 0x196e ; case 0x12
195a 7813 |x | Jump 0x196e ; case 0x13
195b 7812 |x | Jump 0x196e ; case 0x14
195c 7811 |x | Jump 0x196e ; case 0x15
195d 7810 |x | Jump 0x196e ; case 0x16
195e 780f |x | Jump 0x196e ; case 0x17
195f 780e |x | Jump 0x196e ; case 0x18
1960 780d |x | Jump 0x196e ; case 0x19
1961 780e |x | Jump 0x1970 ; case 0x1a
1962 780b |x | Jump 0x196e ; case 0x1b
1963 780a |x | Jump 0x196e ; case 0x1c
1964 7809 |x | Jump 0x196e ; case 0x1d
1965 7808 |x | Jump 0x196e ; case 0x1e
1966 7807 |x | Jump 0x196e ; case 0x1f
1967 7806 |x | Jump 0x196e ; case 0x20
1968 7805 |x | Jump 0x196e ; case 0x21
1969 7804 |x | Jump 0x196e ; case 0x22
196a 7803 |x | Jump 0x196e ; case 0x23
196b 7802 |x | Jump 0x196e ; case 0x24
196c 7801 |x | Jump 0x196e ; case 0x25
196d 7800 |x | Jump 0x196e ; case 0x26
196e 4800 |H | Short_Literal 0x0
196f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1970 e001 | | Load 0x0,0x1
1971 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1972 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
1973 00db | | Load_Top At_Offset_3
1974 e01b | | Load 0x0,0x1b
1975 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
1976 8242 | B | Call 0x1,0x42
1977 0e0b | | Execute_Immediate Not_Equal,0xb
1978 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1979 0000 0000 | | .BLANK 0000[0x7]
1980 ; --------------------------------------------------------------------------------------
1980 ; SUBPROGRAM
1980 ; --------------------------------------------------------------------------------------
1980 1987 | | .CONST 0x1987 ; Address of begin
1981 0004 | | .CONST 0x0004 ; Address of exception handler
1982 0002 | | .CONST 0x0002 ; Number of locals
1983 INIT_1980:
1983 e20e | | Load 0x1,0xe
1984 02c7 | | Declare_Variable Any
1985 e211 | | Load 0x1,0x11
1986 a602 | | Store_Unchecked 0x3,0x2
1987 BODY_1980:
1987 00cf | | Action Mark_Auxiliary
1988 e7ff | | Load 0x3,-0x1
1989 01d9 | | Execute Vector,Reverse_Bounds
198a 0263 | c | Execute Discrete,Above_Bound
198b 700a |p | Jump_Nonzero 0x1996
198c 00db | | Load_Top At_Offset_3
198d 00d9 | | Load_Top At_Offset_1
198e e7ff | | Load 0x3,-0x1
198f 01d5 | | Execute Vector,Field_Reference
1990 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1991 e002 | | Load 0x0,0x2
1992 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1993 c602 | | Store 0x3,0x2
1994 00c8 | | Action Pop_Auxiliary_Range
1995 3ff6 |? | Loop_Increasing 0x198c
1996 00ce | | Action Pop_Auxiliary
1997 00d8 | | Load_Top At_Offset_0
1998 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1999 0000 0000 | | .BLANK 0000[0x7]
19a0 ; --------------------------------------------------------------------------------------
19a0 ; SUBPROGRAM
19a0 ; --------------------------------------------------------------------------------------
19a0 19b1 | | .CONST 0x19b1 ; Address of begin
19a1 19f4 | | .CONST 0x19f4 ; Address of exception handler
19a2 0004 | | .CONST 0x0004 ; Number of locals
19a3 INIT_19a0:
19a3 e20e | | Load 0x1,0xe
19a4 02c7 | | Declare_Variable Any
19a5 00d8 | | Load_Top At_Offset_0
19a6 1c00 | | Execute_Immediate Run_Utility,0x0
19a7 e289 | | Load 0x1,0x89
19a8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
19a9 0322 | " | Declare_Variable Record
19aa 00d8 | | Load_Top At_Offset_0
19ab 1c00 | | Execute_Immediate Run_Utility,0x0
19ac e289 | | Load 0x1,0x89
19ad 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19ae 02c7 | | Declare_Variable Any
19af 00d8 | | Load_Top At_Offset_0
19b0 1c00 | | Execute_Immediate Run_Utility,0x0
19b1 BODY_19a0:
19b1 00be | | Action Activate_Tasks
19b2 e5fd | | Load 0x2,-0x3
19b3 00da | | Load_Top At_Offset_2
19b4 4801 |H | Short_Literal 0x1
19b5 e405 | | Load 0x2,0x5
19b6 e017 | | Load 0x0,0x17
19b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
19b8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
19b9 e289 | | Load 0x1,0x89
19ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19
19bb 00d1 | | Pop_Control Pop_Count_1
19bc c5fd | | Store 0x2,-0x3
19bd e5fd | | Load 0x2,-0x3
19be 8299 | | Call 0x1,0x99
19bf c5fd | | Store 0x2,-0x3
19c0 e5fd | | Load 0x2,-0x3
19c1 00da | | Load_Top At_Offset_2
19c2 00da | | Load_Top At_Offset_2
19c3 e289 | | Load 0x1,0x89
19c4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
19c5 c604 | | Store 0x3,0x4
19c6 00d1 | | Pop_Control Pop_Count_1
19c7 c5fd | | Store 0x2,-0x3
19c8 e5fd | | Load 0x2,-0x3
19c9 8298 | | Call 0x1,0x98
19ca c5fd | | Store 0x2,-0x3
19cb 00cf | | Action Mark_Auxiliary
19cc 781e |x | Jump 0x19eb
19cd 00d9 | | Load_Top At_Offset_1
19ce e289 | | Load 0x1,0x89
19cf 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
19d0 e402 | | Load 0x2,0x2
19d1 e289 | | Load 0x1,0x89
19d2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
19d3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
19d4 6811 |h | Jump_Zero 0x19e6
19d5 00d9 | | Load_Top At_Offset_1
19d6 e289 | | Load 0x1,0x89
19d7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
19d8 00db | | Load_Top At_Offset_3
19d9 e289 | | Load 0x1,0x89
19da 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
19db c602 | | Store 0x3,0x2
19dc 00db | | Load_Top At_Offset_3
19dd e211 | | Load 0x1,0x11
19de 012f | / | Execute Any,Equal
19df 7006 |p | Jump_Nonzero 0x19e6
19e0 00db | | Load_Top At_Offset_3
19e1 e002 | | Load 0x0,0x2
19e2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
19e3 c5fe | | Store 0x2,-0x2
19e4 00cc | | Action Pop_Block
19e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
19e6 00d9 | | Load_Top At_Offset_1
19e7 e289 | | Load 0x1,0x89
19e8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
19e9 c604 | | Store 0x3,0x4
19ea 00c9 | | Action Pop_Auxiliary_Loop
19eb 00d9 | | Load_Top At_Offset_1
19ec e289 | | Load 0x1,0x89
19ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
19ee 6fde |o | Jump_Zero 0x19cd
19ef 00ce | | Action Pop_Auxiliary
19f0 00d9 | | Load_Top At_Offset_1
19f1 e289 | | Load 0x1,0x89
19f2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
19f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19f4 TRAP_19a0:
19f4 e024 | $ | Load 0x0,0x24
19f5 010f | | Execute Exception,Equal
19f6 6805 |h | Jump_Zero 0x19fc
19f7 e5fd | | Load 0x2,-0x3
19f8 e008 | | Load 0x0,0x8
19f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
19fa c5fd | | Store 0x2,-0x3
19fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19fc e019 | | Load 0x0,0x19
19fd 010f | | Execute Exception,Equal
19fe 6804 |h | Jump_Zero 0x1a03
19ff 00da | | Load_Top At_Offset_2
1a00 e289 | | Load 0x1,0x89
1a01 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1a02 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a03 0100 | | Execute Exception,Raise
1a04 0000 0000 | | .BLANK 0000[0x4]
1a08 ; --------------------------------------------------------------------------------------
1a08 ; SUBPROGRAM
1a08 ; --------------------------------------------------------------------------------------
1a08 1a0f | | .CONST 0x1a0f ; Address of begin
1a09 0004 | | .CONST 0x0004 ; Address of exception handler
1a0a 0003 | | .CONST 0x0003 ; Number of locals
1a0b INIT_1a08:
1a0b e212 | | Load 0x1,0x12
1a0c 0007 | | Action Break_Optional
1a0d 00e3 | | Load_Encached Natural_Cache
1a0e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1a0f BODY_1a08:
1a0f 00cf | | Action Mark_Auxiliary
1a10 480b |H | Short_Literal 0xb
1a11 e7ff | | Load 0x3,-0x1
1a12 0263 | c | Execute Discrete,Above_Bound
1a13 700e |p | Jump_Nonzero 0x1a22
1a14 00d8 | | Load_Top At_Offset_0
1a15 e5ff | | Load 0x2,-0x1
1a16 01d7 | | Execute Vector,Field_Read
1a17 6808 |h | Jump_Zero 0x1a20
1a18 00db | | Load_Top At_Offset_3
1a19 7002 |p | Jump_Nonzero 0x1a1c
1a1a 00d8 | | Load_Top At_Offset_0
1a1b a602 | | Store_Unchecked 0x3,0x2
1a1c 00e2 | | Load_Encached Integer_Cache
1a1d e603 | | Load 0x3,0x3
1a1e 0268 | h | Execute Discrete,Successor
1a1f c603 | | Store 0x3,0x3
1a20 00c8 | | Action Pop_Auxiliary_Range
1a21 3ff2 |? | Loop_Increasing 0x1a14
1a22 00ce | | Action Pop_Auxiliary
1a23 00d8 | | Load_Top At_Offset_0
1a24 0b00 | | Execute_Immediate Case_Compare,0x0
1a25 7024 |p$ | Jump_Nonzero 0x1a4a
1a26 0f01 | | Execute_Immediate Equal,0x1
1a27 7025 |p% | Jump_Nonzero 0x1a4d
1a28 e7fe | | Load 0x3,-0x2
1a29 01db | | Execute Vector,Length
1a2a 700d |p | Jump_Nonzero 0x1a38
1a2b 00d9 | | Load_Top At_Offset_1
1a2c 823a | : | Call 0x1,0x3a
1a2d e001 | | Load 0x0,0x1
1a2e 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
1a2f 00db | | Load_Top At_Offset_3
1a30 0268 | h | Execute Discrete,Successor
1a31 00d8 | | Load_Top At_Offset_0
1a32 e212 | | Load 0x1,0x12
1a33 0260 | ` | Execute Discrete,In_Type
1a34 7001 |p | Jump_Nonzero 0x1a36
1a35 0801 | | Execute_Immediate Raise,0x1
1a36 8402 | | Call 0x2,0x2
1a37 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a38 e7fe | | Load 0x3,-0x2
1a39 0092 1f89 | | Action Push_String_Extended,0x1f89 ; ", "
1a3b 01cc | | Execute Vector,Catenate
1a3c 00da | | Load_Top At_Offset_2
1a3d 823a | : | Call 0x1,0x3a
1a3e 01cc | | Execute Vector,Catenate
1a3f e001 | | Load 0x0,0x1
1a40 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
1a41 00db | | Load_Top At_Offset_3
1a42 0268 | h | Execute Discrete,Successor
1a43 00d8 | | Load_Top At_Offset_0
1a44 e212 | | Load 0x1,0x12
1a45 0260 | ` | Execute Discrete,In_Type
1a46 7001 |p | Jump_Nonzero 0x1a48
1a47 0801 | | Execute_Immediate Raise,0x1
1a48 8402 | | Call 0x2,0x2
1a49 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a4a 00d1 | | Pop_Control Pop_Count_1
1a4b e7fe | | Load 0x3,-0x2
1a4c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a4d e7fe | | Load 0x3,-0x2
1a4e 01db | | Execute Vector,Length
1a4f 7003 |p | Jump_Nonzero 0x1a53
1a50 00d9 | | Load_Top At_Offset_1
1a51 823a | : | Call 0x1,0x3a
1a52 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a53 e7fe | | Load 0x3,-0x2
1a54 0092 1f8a | | Action Push_String_Extended,0x1f8a ; " or "
1a56 01cc | | Execute Vector,Catenate
1a57 00da | | Load_Top At_Offset_2
1a58 823a | : | Call 0x1,0x3a
1a59 01cc | | Execute Vector,Catenate
1a5a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a5b 0000 0000 | | .BLANK 0000[0x5]
1a60 ; --------------------------------------------------------------------------------------
1a60 ; SUBPROGRAM
1a60 ; --------------------------------------------------------------------------------------
1a60 1a63 | c | .CONST 0x1a63 ; Address of begin
1a61 0004 | | .CONST 0x0004 ; Address of exception handler
1a62 0001 | | .CONST 0x0001 ; Number of locals
1a63 BODY_1a60:
1a63 INIT_1a60:
1a63 00da | | Load_Top At_Offset_2
1a64 e404 | | Load 0x2,0x4
1a65 e402 | | Load 0x2,0x2
1a66 01d6 | | Execute Vector,Field_Write
1a67 00e2 | | Load_Encached Integer_Cache
1a68 e404 | | Load 0x2,0x4
1a69 0268 | h | Execute Discrete,Successor
1a6a c404 | | Store 0x2,0x4
1a6b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1a6c 0000 0000 | | .BLANK 0000[0x4]
1a70 ; --------------------------------------------------------------------------------------
1a70 ; SUBPROGRAM
1a70 ; --------------------------------------------------------------------------------------
1a70 1a7c | | | .CONST 0x1a7c ; Address of begin
1a71 0004 | | .CONST 0x0004 ; Address of exception handler
1a72 0003 | | .CONST 0x0003 ; Number of locals
1a73 INIT_1a70:
1a73 e402 | | Load 0x2,0x2
1a74 e001 | | Load 0x0,0x1
1a75 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1a76 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1a77 00d8 | | Load_Top At_Offset_0
1a78 01dd | | Execute Vector,First
1a79 0a10 | | Execute_Immediate Plus,0x10
1a7a 00e2 | | Load_Encached Integer_Cache
1a7b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1a7c BODY_1a70:
1a7c 00cf | | Action Mark_Auxiliary
1a7d 7804 |x | Jump 0x1a82
1a7e 00d9 | | Load_Top At_Offset_1
1a7f 0a01 | | Execute_Immediate Plus,0x1
1a80 005a | Z | Store_Top Discrete,At_Offset_2
1a81 00c9 | | Action Pop_Auxiliary_Loop
1a82 00d9 | | Load_Top At_Offset_1
1a83 00db | | Load_Top At_Offset_3
1a84 01dc | | Execute Vector,Last
1a85 027a | z | Execute Discrete,Less_Equal
1a86 6805 |h | Jump_Zero 0x1a8c
1a87 00d9 | | Load_Top At_Offset_1
1a88 00db | | Load_Top At_Offset_3
1a89 01d7 | | Execute Vector,Field_Read
1a8a 0f20 | | Execute_Immediate Equal,0x20
1a8b 77f2 |w | Jump_Nonzero 0x1a7e
1a8c 00c9 | | Action Pop_Auxiliary_Loop
1a8d 7804 |x | Jump 0x1a92
1a8e 00d9 | | Load_Top At_Offset_1
1a8f 0a01 | | Execute_Immediate Plus,0x1
1a90 005a | Z | Store_Top Discrete,At_Offset_2
1a91 00c9 | | Action Pop_Auxiliary_Loop
1a92 00d9 | | Load_Top At_Offset_1
1a93 00db | | Load_Top At_Offset_3
1a94 01dc | | Execute Vector,Last
1a95 027a | z | Execute Discrete,Less_Equal
1a96 6805 |h | Jump_Zero 0x1a9c
1a97 00d9 | | Load_Top At_Offset_1
1a98 00db | | Load_Top At_Offset_3
1a99 01d7 | | Execute Vector,Field_Read
1a9a 0e20 | | Execute_Immediate Not_Equal,0x20
1a9b 77f2 |w | Jump_Nonzero 0x1a8e
1a9c 00c9 | | Action Pop_Auxiliary_Loop
1a9d 7804 |x | Jump 0x1aa2
1a9e 00d9 | | Load_Top At_Offset_1
1a9f 0a01 | | Execute_Immediate Plus,0x1
1aa0 005a | Z | Store_Top Discrete,At_Offset_2
1aa1 00c9 | | Action Pop_Auxiliary_Loop
1aa2 00d9 | | Load_Top At_Offset_1
1aa3 00db | | Load_Top At_Offset_3
1aa4 01dc | | Execute Vector,Last
1aa5 027a | z | Execute Discrete,Less_Equal
1aa6 6805 |h | Jump_Zero 0x1aac
1aa7 00d9 | | Load_Top At_Offset_1
1aa8 00db | | Load_Top At_Offset_3
1aa9 01d7 | | Execute Vector,Field_Read
1aaa 0f20 | | Execute_Immediate Equal,0x20
1aab 77f2 |w | Jump_Nonzero 0x1a9e
1aac 00ce | | Action Pop_Auxiliary
1aad 00d8 | | Load_Top At_Offset_0
1aae 00da | | Load_Top At_Offset_2
1aaf 01dc | | Execute Vector,Last
1ab0 027d | } | Execute Discrete,Greater
1ab1 6803 |h | Jump_Zero 0x1ab5
1ab2 e5fe | | Load 0x2,-0x2
1ab3 00cb | | Action Pop_Block_With_Result
1ab4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1ab5 00d8 | | Load_Top At_Offset_0
1ab6 00da | | Load_Top At_Offset_2
1ab7 01dc | | Execute Vector,Last
1ab8 00db | | Load_Top At_Offset_3
1ab9 01cf | | Execute Vector,Slice_Read
1aba 82a3 | | Call 0x1,0xa3
1abb 00cb | | Action Pop_Block_With_Result
1abc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1abd 0000 0000 | | .XXX[0x3]
1abf 0000 | |
1ac0 ; --------------------------------------------------------------------------------------
1ac0 ; SUBPROGRAM
1ac0 ; --------------------------------------------------------------------------------------
1ac0 1ad0 | | .CONST 0x1ad0 ; Address of begin
1ac1 1af3 | | .CONST 0x1af3 ; Address of exception handler
1ac2 0003 | | .CONST 0x0003 ; Number of locals
1ac3 INIT_1ac0:
1ac3 e017 | | Load 0x0,0x17
1ac4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1ac5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1ac6 02c7 | | Declare_Variable Any
1ac7 e404 | | Load 0x2,0x4
1ac8 e017 | | Load 0x0,0x17
1ac9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1aca 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1acb a602 | | Store_Unchecked 0x3,0x2
1acc 00d8 | | Load_Top At_Offset_0
1acd e017 | | Load 0x0,0x17
1ace 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1acf 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1ad0 BODY_1ac0:
1ad0 00d8 | | Load_Top At_Offset_0
1ad1 e018 | | Load 0x0,0x18
1ad2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1ad3 4606 |F | Jump_Case 0x7
1ad4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x0
1ad5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x1
1ad6 7804 |x | Jump 0x1adb ; case 0x2
1ad7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x3
1ad8 7802 |x | Jump 0x1adb ; case 0x4
1ad9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x5
1ada 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x6
1adb e5fd | | Load 0x2,-0x3
1adc e403 | | Load 0x2,0x3
1add 4801 |H | Short_Literal 0x1
1ade e602 | | Load 0x3,0x2
1adf e289 | | Load 0x1,0x89
1ae0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1ae1 00d1 | | Pop_Control Pop_Count_1
1ae2 c5fd | | Store 0x2,-0x3
1ae3 e5fd | | Load 0x2,-0x3
1ae4 8299 | | Call 0x1,0x99
1ae5 c5fd | | Store 0x2,-0x3
1ae6 e402 | | Load 0x2,0x2
1ae7 4805 |H | Short_Literal 0x5
1ae8 e403 | | Load 0x2,0x3
1ae9 e289 | | Load 0x1,0x89
1aea 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1aeb e002 | | Load 0x0,0x2
1aec 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1aed c402 | | Store 0x2,0x2
1aee e403 | | Load 0x2,0x3
1aef e289 | | Load 0x1,0x89
1af0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1af1 00d1 | | Pop_Control Pop_Count_1
1af2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1af3 TRAP_1ac0:
1af3 e024 | $ | Load 0x0,0x24
1af4 010f | | Execute Exception,Equal
1af5 6809 |h | Jump_Zero 0x1aff
1af6 e008 | | Load 0x0,0x8
1af7 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
1af8 e5fd | | Load 0x2,-0x3
1af9 e008 | | Load 0x0,0x8
1afa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1afb 7002 |p | Jump_Nonzero 0x1afe
1afc e019 | | Load 0x0,0x19
1afd 0257 | W | Execute Discrete,Raise
1afe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1aff 0100 | | Execute Exception,Raise
1b00 ; --------------------------------------------------------------------------------------
1b00 ; SUBPROGRAM
1b00 ; --------------------------------------------------------------------------------------
1b00 1b07 | | .CONST 0x1b07 ; Address of begin
1b01 0004 | | .CONST 0x0004 ; Address of exception handler
1b02 0002 | | .CONST 0x0002 ; Number of locals
1b03 INIT_1b00:
1b03 e5ff | | Load 0x2,-0x1
1b04 e017 | | Load 0x0,0x17
1b05 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b06 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1b07 BODY_1b00:
1b07 4800 |H | Short_Literal 0x0
1b08 4800 |H | Short_Literal 0x0
1b09 4807 |H | Short_Literal 0x7
1b0a 4829 |H) | Short_Literal 0x29
1b0b 4820 |H | Short_Literal 0x20
1b0c 0092 1f8b | | Action Push_String_Extended,0x1f8b ; "Unable to obtain children of "
1b0e e602 | | Load 0x3,0x2
1b0f e018 | | Load 0x0,0x18
1b10 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1b11 e018 | | Load 0x0,0x18
1b12 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1b13 011c | | Execute Any,Convert_Unchecked
1b14 1c01 | | Execute_Immediate Run_Utility,0x1
1b15 01cc | | Execute Vector,Catenate
1b16 01cb | | Execute Vector,Append
1b17 e602 | | Load 0x3,0x2
1b18 01cc | | Execute Vector,Catenate
1b19 0092 1f6d | m| Action Push_String_Extended,0x1f6d ; " ("
1b1b 01cc | | Execute Vector,Catenate
1b1c e404 | | Load 0x2,0x4
1b1d e017 | | Load 0x0,0x17
1b1e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1b1f 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
1b20 01cc | | Execute Vector,Catenate
1b21 01cb | | Execute Vector,Append
1b22 00ea | | Load_Encached Null_String_Cache
1b23 8285 | | Call 0x1,0x85
1b24 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1b25 0000 0000 | | .XXX[0x3]
1b27 0000 | |
1b28 ; --------------------------------------------------------------------------------------
1b28 ; SUBPROGRAM
1b28 ; --------------------------------------------------------------------------------------
1b28 1b30 | 0 | .CONST 0x1b30 ; Address of begin
1b29 0004 | | .CONST 0x0004 ; Address of exception handler
1b2a 0003 | | .CONST 0x0003 ; Number of locals
1b2b INIT_1b28:
1b2b e001 | | Load 0x0,0x1
1b2c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1b2d 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
1b2e 029f 1e93 | | Declare_Subprogram INIT_1e90,For_Call
1b30 BODY_1b28:
1b30 00d9 | | Load_Top At_Offset_1
1b31 e7ff | | Load 0x3,-0x1
1b32 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
1b33 4801 |H | Short_Literal 0x1
1b34 e021 | ! | Load 0x0,0x21
1b35 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1b36 0032 | 2 | Store_Top Heap_Access,At_Offset_2
1b37 00d9 | | Load_Top At_Offset_1
1b38 e001 | | Load 0x0,0x1
1b39 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1b3a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1b3b 6804 |h | Jump_Zero 0x1b40
1b3c e5fd | | Load 0x2,-0x3
1b3d 0335 | 5 | Declare_Variable Array,Duplicate
1b3e 00cd | | Action Spare6_Action
1b3f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b40 8603 | | Call 0x3,0x3
1b41 0831 | 1 | Execute_Immediate Raise,0x31
1b42 0000 0000 | | .BLANK 0000[0x6]
1b48 ; --------------------------------------------------------------------------------------
1b48 ; SUBPROGRAM
1b48 ; --------------------------------------------------------------------------------------
1b48 1b5d | ] | .CONST 0x1b5d ; Address of begin
1b49 0004 | | .CONST 0x0004 ; Address of exception handler
1b4a 0005 | | .CONST 0x0005 ; Number of locals
1b4b INIT_1b48:
1b4b e404 | | Load 0x2,0x4
1b4c e289 | | Load 0x1,0x89
1b4d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1b4e 00d8 | | Load_Top At_Offset_0
1b4f e289 | | Load 0x1,0x89
1b50 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1b51 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1b52 e20e | | Load 0x1,0xe
1b53 02c7 | | Declare_Variable Any
1b54 00da | | Load_Top At_Offset_2
1b55 e403 | | Load 0x2,0x3
1b56 e289 | | Load 0x1,0x89
1b57 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1b58 a604 | | Store_Unchecked 0x3,0x4
1b59 00da | | Load_Top At_Offset_2
1b5a e289 | | Load 0x1,0x89
1b5b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1b5c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1b5d BODY_1b48:
1b5d 00d9 | | Load_Top At_Offset_1
1b5e e002 | | Load 0x0,0x2
1b5f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1b60 7051 |pQ | Jump_Nonzero 0x1bb2
1b61 e405 | | Load 0x2,0x5
1b62 00db | | Load_Top At_Offset_3
1b63 00d8 | | Load_Top At_Offset_0
1b64 00da | | Load_Top At_Offset_2
1b65 01d7 | | Execute Vector,Field_Read
1b66 e604 | | Load 0x3,0x4
1b67 e002 | | Load 0x0,0x2
1b68 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1b69 00d9 | | Load_Top At_Offset_1
1b6a 00db | | Load_Top At_Offset_3
1b6b 01d6 | | Execute Vector,Field_Write
1b6c 00d2 | | Pop_Control Pop_Count_2
1b6d e402 | | Load 0x2,0x2
1b6e e5fe | | Load 0x2,-0x2
1b6f 00da | | Load_Top At_Offset_2
1b70 e603 | | Load 0x3,0x3
1b71 e604 | | Load 0x3,0x4
1b72 e002 | | Load 0x0,0x2
1b73 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1b74 82b5 | | Call 0x1,0xb5
1b75 00d1 | | Pop_Control Pop_Count_1
1b76 00d9 | | Load_Top At_Offset_1
1b77 e002 | | Load 0x0,0x2
1b78 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1b79 c604 | | Store 0x3,0x4
1b7a 00d9 | | Load_Top At_Offset_1
1b7b e002 | | Load 0x0,0x2
1b7c 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1b7d 7034 |p4 | Jump_Nonzero 0x1bb2
1b7e 4800 |H | Short_Literal 0x0
1b7f 4800 |H | Short_Literal 0x0
1b80 4807 |H | Short_Literal 0x7
1b81 4822 |H" | Short_Literal 0x22
1b82 0092 1f8c | | Action Push_String_Extended,0x1f8c ; "Multiple "
1b84 e603 | | Load 0x3,0x3
1b85 e001 | | Load 0x0,0x1
1b86 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
1b87 011c | | Execute Any,Convert_Unchecked
1b88 1c01 | | Execute_Immediate Run_Utility,0x1
1b89 01cc | | Execute Vector,Catenate
1b8a 0092 1f8d | | Action Push_String_Extended,0x1f8d ; " components named \x22"
1b8c 01cc | | Execute Vector,Catenate
1b8d e605 | | Load 0x3,0x5
1b8e 01cc | | Execute Vector,Catenate
1b8f 0092 1f8e | | Action Push_String_Extended,0x1f8e ; "\x22 have been detected in view \x22"
1b91 01cc | | Execute Vector,Catenate
1b92 e5ff | | Load 0x2,-0x1
1b93 e017 | | Load 0x0,0x17
1b94 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b95 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1b96 01cc | | Execute Vector,Catenate
1b97 01cb | | Execute Vector,Append
1b98 00ea | | Load_Encached Null_String_Cache
1b99 8285 | | Call 0x1,0x85
1b9a 00cf | | Action Mark_Auxiliary
1b9b 7811 |x | Jump 0x1bad
1b9c 4800 |H | Short_Literal 0x0
1b9d 4800 |H | Short_Literal 0x0
1b9e 4805 |H | Short_Literal 0x5
1b9f 0092 1f8f | | Action Push_String_Extended,0x1f8f ; "Ignoring duplicate component "
1ba1 e604 | | Load 0x3,0x4
1ba2 e002 | | Load 0x0,0x2
1ba3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1ba4 82a1 | | Call 0x1,0xa1
1ba5 01cc | | Execute Vector,Catenate
1ba6 00ea | | Load_Encached Null_String_Cache
1ba7 8286 | | Call 0x1,0x86
1ba8 00da | | Load_Top At_Offset_2
1ba9 e002 | | Load 0x0,0x2
1baa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1bab c604 | | Store 0x3,0x4
1bac 00c9 | | Action Pop_Auxiliary_Loop
1bad 00da | | Load_Top At_Offset_2
1bae e002 | | Load 0x0,0x2
1baf 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1bb0 6feb |o | Jump_Zero 0x1b9c
1bb1 00ce | | Action Pop_Auxiliary
1bb2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1bb3 0000 0000 | | .BLANK 0000[0x5]
1bb8 ; --------------------------------------------------------------------------------------
1bb8 ; SUBPROGRAM
1bb8 ; --------------------------------------------------------------------------------------
1bb8 1bc1 | | .CONST 0x1bc1 ; Address of begin
1bb9 1bc6 | | .CONST 0x1bc6 ; Address of exception handler
1bba 0002 | | .CONST 0x0002 ; Number of locals
1bbb INIT_1bb8:
1bbb 00db | | Load_Top At_Offset_3
1bbc e001 | | Load 0x0,0x1
1bbd 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1bbe 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1bbf 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
1bc0 82a3 | | Call 0x1,0xa3
1bc1 BODY_1bb8:
1bc1 00d8 | | Load_Top At_Offset_0
1bc2 e403 | | Load 0x2,0x3
1bc3 e28d | | Load 0x1,0x8d
1bc4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1bc5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1bc6 TRAP_1bb8:
1bc6 e28d | | Load 0x1,0x8d
1bc7 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1bc8 010f | | Execute Exception,Equal
1bc9 684a |hJ | Jump_Zero 0x1c14
1bca e7ff | | Load 0x3,-0x1
1bcb 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1bcc 0aff | | Execute_Immediate Plus,-0x1
1bcd 460a |F | Jump_Case 0xb
1bce 7822 |x" | Jump 0x1bf1 ; case 0x0
1bcf 7809 |x | Jump 0x1bd9 ; case 0x1
1bd0 7820 |x | Jump 0x1bf1 ; case 0x2
1bd1 7807 |x | Jump 0x1bd9 ; case 0x3
1bd2 7806 |x | Jump 0x1bd9 ; case 0x4
1bd3 7805 |x | Jump 0x1bd9 ; case 0x5
1bd4 7804 |x | Jump 0x1bd9 ; case 0x6
1bd5 7803 |x | Jump 0x1bd9 ; case 0x7
1bd6 7802 |x | Jump 0x1bd9 ; case 0x8
1bd7 7801 |x | Jump 0x1bd9 ; case 0x9
1bd8 7800 |x | Jump 0x1bd9 ; case 0xa
1bd9 4800 |H | Short_Literal 0x0
1bda 4800 |H | Short_Literal 0x0
1bdb 4807 |H | Short_Literal 0x7
1bdc 4822 |H" | Short_Literal 0x22
1bdd 0092 1f90 | | Action Push_String_Extended,0x1f90 ; "Unable to find component \x22"
1bdf e602 | | Load 0x3,0x2
1be0 01cc | | Execute Vector,Catenate
1be1 0092 1f91 | | Action Push_String_Extended,0x1f91 ; "\x22 which is declared in the"
1be3 01cc | | Execute Vector,Catenate
1be4 0092 1f92 | | Action Push_String_Extended,0x1f92 ; " @DECOMPOSITION annotation"
1be6 01cc | | Execute Vector,Catenate
1be7 0092 1f93 | | Action Push_String_Extended,0x1f93 ; " of component \x22"
1be9 01cc | | Execute Vector,Catenate
1bea e7ff | | Load 0x3,-0x1
1beb 8235 | 5 | Call 0x1,0x35
1bec 01cc | | Execute Vector,Catenate
1bed 01cb | | Execute Vector,Append
1bee 00ea | | Load_Encached Null_String_Cache
1bef 8285 | | Call 0x1,0x85
1bf0 7817 |x | Jump 0x1c08
1bf1 4800 |H | Short_Literal 0x0
1bf2 4800 |H | Short_Literal 0x0
1bf3 4807 |H | Short_Literal 0x7
1bf4 4822 |H" | Short_Literal 0x22
1bf5 0092 1f90 | | Action Push_String_Extended,0x1f90 ; "Unable to find component \x22"
1bf7 e602 | | Load 0x3,0x2
1bf8 01cc | | Execute Vector,Catenate
1bf9 0092 1f94 | | Action Push_String_Extended,0x1f94 ; "\x22 which is defined as"
1bfb 01cc | | Execute Vector,Catenate
1bfc 0092 1f95 | | Action Push_String_Extended,0x1f95 ; " a hierarchical child"
1bfe 01cc | | Execute Vector,Catenate
1bff 0092 1f93 | | Action Push_String_Extended,0x1f93 ; " of component \x22"
1c01 01cc | | Execute Vector,Catenate
1c02 e7ff | | Load 0x3,-0x1
1c03 8235 | 5 | Call 0x1,0x35
1c04 01cc | | Execute Vector,Catenate
1c05 01cb | | Execute Vector,Append
1c06 00ea | | Load_Encached Null_String_Cache
1c07 8285 | | Call 0x1,0x85
1c08 e219 | | Load 0x1,0x19
1c09 e404 | | Load 0x2,0x4
1c0a 017d | } | Execute Record,Structure_Write
1c0b 00d9 | | Load_Top At_Offset_1
1c0c e004 | | Load 0x0,0x4
1c0d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1c0e e404 | | Load 0x2,0x4
1c0f 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1c10 e404 | | Load 0x2,0x4
1c11 0320 | | Declare_Variable Record,Duplicate
1c12 00cd | | Action Spare6_Action
1c13 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1c14 0100 | | Execute Exception,Raise
1c15 0000 0000 | | .XXX[0x3]
1c17 0000 | |
1c18 ; --------------------------------------------------------------------------------------
1c18 ; SUBPROGRAM
1c18 ; --------------------------------------------------------------------------------------
1c18 1c35 | 5 | .CONST 0x1c35 ; Address of begin
1c19 0004 | | .CONST 0x0004 ; Address of exception handler
1c1a 0007 | | .CONST 0x0007 ; Number of locals
1c1b INIT_1c18:
1c1b e216 | | Load 0x1,0x16
1c1c 0322 | " | Declare_Variable Record
1c1d 00d8 | | Load_Top At_Offset_0
1c1e 1c00 | | Execute_Immediate Run_Utility,0x0
1c1f e220 | | Load 0x1,0x20
1c20 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1c21 e216 | | Load 0x1,0x16
1c22 0322 | " | Declare_Variable Record
1c23 e7ff | | Load 0x3,-0x1
1c24 00d9 | | Load_Top At_Offset_1
1c25 017d | } | Execute Record,Structure_Write
1c26 00d8 | | Load_Top At_Offset_0
1c27 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1c28 e293 | | Load 0x1,0x93
1c29 01d5 | | Execute Vector,Field_Reference
1c2a 0007 | | Action Break_Optional
1c2b e001 | | Load 0x0,0x1
1c2c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1c2d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1c2e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1c2f 02c7 | | Declare_Variable Any
1c30 00d8 | | Load_Top At_Offset_0
1c31 1c00 | | Execute_Immediate Run_Utility,0x0
1c32 00da | | Load_Top At_Offset_2
1c33 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1c34 0007 | | Action Break_Optional
1c35 BODY_1c18:
1c35 e5ff | | Load 0x2,-0x1
1c36 e604 | | Load 0x3,0x4
1c37 82a8 | | Call 0x1,0xa8
1c38 6826 |h& | Jump_Zero 0x1c5f
1c39 00db | | Load_Top At_Offset_3
1c3a 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
1c3b 6822 |h" | Jump_Zero 0x1c5e
1c3c 4800 |H | Short_Literal 0x0
1c3d 4800 |H | Short_Literal 0x0
1c3e 4806 |H | Short_Literal 0x6
1c3f e604 | | Load 0x3,0x4
1c40 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1c41 823a | : | Call 0x1,0x3a
1c42 0092 1f69 | i| Action Push_String_Extended,0x1f69 ; " component \x22"
1c44 01cc | | Execute Vector,Catenate
1c45 e604 | | Load 0x3,0x4
1c46 8235 | 5 | Call 0x1,0x35
1c47 01cc | | Execute Vector,Catenate
1c48 0092 1f96 | | Action Push_String_Extended,0x1f96 ; "\x22 declared in \x22"
1c4a 01cc | | Execute Vector,Catenate
1c4b e604 | | Load 0x3,0x4
1c4c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1c4d 82a1 | | Call 0x1,0xa1
1c4e 01cc | | Execute Vector,Catenate
1c4f 0092 1f97 | | Action Push_String_Extended,0x1f97 ; "\x22 either introduces a cycle"
1c51 01cc | | Execute Vector,Catenate
1c52 0092 1f98 | | Action Push_String_Extended,0x1f98 ; " or exists in multiple positions"
1c54 01cc | | Execute Vector,Catenate
1c55 0092 1f99 | | Action Push_String_Extended,0x1f99 ; " within the static hierarchy."
1c57 01cc | | Execute Vector,Catenate
1c58 00ea | | Load_Encached Null_String_Cache
1c59 8287 | | Call 0x1,0x87
1c5a 00db | | Load_Top At_Offset_3
1c5b e5ff | | Load 0x2,-0x1
1c5c 82aa | | Call 0x1,0xaa
1c5d 00d1 | | Pop_Control Pop_Count_1
1c5e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1c5f 00db | | Load_Top At_Offset_3
1c60 e5ff | | Load 0x2,-0x1
1c61 82a9 | | Call 0x1,0xa9
1c62 00d1 | | Pop_Control Pop_Count_1
1c63 00db | | Load_Top At_Offset_3
1c64 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1c65 0f05 | | Execute_Immediate Equal,0x5
1c66 680c |h | Jump_Zero 0x1c73
1c67 00db | | Load_Top At_Offset_3
1c68 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1c69 e5ff | | Load 0x2,-0x1
1c6a 0227 | ' | Execute Access,All_Reference
1c6b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1c6c 012f | / | Execute Any,Equal
1c6d 7005 |p | Jump_Nonzero 0x1c73
1c6e e5ff | | Load 0x2,-0x1
1c6f 0227 | ' | Execute Access,All_Reference
1c70 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1c71 6801 |h | Jump_Zero 0x1c73
1c72 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1c73 00d9 | | Load_Top At_Offset_1
1c74 0120 | | Execute Any,Is_Value
1c75 6805 |h | Jump_Zero 0x1c7b
1c76 e001 | | Load 0x0,0x1
1c77 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1c78 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1c79 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1c7a 7801 |x | Jump 0x1c7c
1c7b 00d9 | | Load_Top At_Offset_1
1c7c e604 | | Load 0x3,0x4
1c7d 8235 | 5 | Call 0x1,0x35
1c7e e001 | | Load 0x0,0x1
1c7f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1c80 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1c81 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
1c82 c606 | | Store 0x3,0x6
1c83 00d8 | | Load_Top At_Offset_0
1c84 e001 | | Load 0x0,0x1
1c85 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1c86 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1c87 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
1c88 c607 | | Store 0x3,0x7
1c89 00cf | | Action Mark_Auxiliary
1c8a 7878 |xx | Jump 0x1d03
1c8b 00d9 | | Load_Top At_Offset_1
1c8c e604 | | Load 0x3,0x4
1c8d 8405 | | Call 0x2,0x5
1c8e e602 | | Load 0x3,0x2
1c8f 017d | } | Execute Record,Structure_Write
1c90 e602 | | Load 0x3,0x2
1c91 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1c92 0e0b | | Execute_Immediate Not_Equal,0xb
1c93 6853 |hS | Jump_Zero 0x1ce7
1c94 e602 | | Load 0x3,0x2
1c95 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1c96 e605 | | Load 0x3,0x5
1c97 01d7 | | Execute Vector,Field_Read
1c98 704e |pN | Jump_Nonzero 0x1ce7
1c99 4800 |H | Short_Literal 0x0
1c9a 4800 |H | Short_Literal 0x0
1c9b 4806 |H | Short_Literal 0x6
1c9c 0092 1f9a | | Action Push_String_Extended,0x1f9a ; "The parent-child relationship between "
1c9e e604 | | Load 0x3,0x4
1c9f 8294 | | Call 0x1,0x94
1ca0 01cc | | Execute Vector,Catenate
1ca1 0092 1f9b | | Action Push_String_Extended,0x1f9b ; " and "
1ca3 01cc | | Execute Vector,Catenate
1ca4 e602 | | Load 0x3,0x2
1ca5 8294 | | Call 0x1,0x94
1ca6 01cc | | Execute Vector,Catenate
1ca7 0092 1f9c | | Action Push_String_Extended,0x1f9c ; " is invalid. "
1ca9 01cc | | Execute Vector,Catenate
1caa e605 | | Load 0x3,0x5
1cab 8295 | | Call 0x1,0x95
1cac 01cc | | Execute Vector,Catenate
1cad 00ea | | Load_Encached Null_String_Cache
1cae 8287 | | Call 0x1,0x87
1caf e604 | | Load 0x3,0x4
1cb0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1cb1 0aff | | Execute_Immediate Plus,-0x1
1cb2 460a |F | Jump_Case 0xb
1cb3 7825 |x% | Jump 0x1cd9 ; case 0x0
1cb4 7809 |x | Jump 0x1cbe ; case 0x1
1cb5 7823 |x# | Jump 0x1cd9 ; case 0x2
1cb6 7807 |x | Jump 0x1cbe ; case 0x3
1cb7 7806 |x | Jump 0x1cbe ; case 0x4
1cb8 7805 |x | Jump 0x1cbe ; case 0x5
1cb9 7804 |x | Jump 0x1cbe ; case 0x6
1cba 7803 |x | Jump 0x1cbe ; case 0x7
1cbb 7802 |x | Jump 0x1cbe ; case 0x8
1cbc 7801 |x | Jump 0x1cbe ; case 0x9
1cbd 7800 |x | Jump 0x1cbe ; case 0xa
1cbe 4800 |H | Short_Literal 0x0
1cbf 4800 |H | Short_Literal 0x0
1cc0 4805 |H | Short_Literal 0x5
1cc1 0092 1f9d | | Action Push_String_Extended,0x1f9d ; "Child name \x22"
1cc3 e602 | | Load 0x3,0x2
1cc4 8235 | 5 | Call 0x1,0x35
1cc5 01cc | | Execute Vector,Catenate
1cc6 0092 1f9e | | Action Push_String_Extended,0x1f9e ; "\x22 must be removed from the"
1cc8 01cc | | Execute Vector,Catenate
1cc9 0092 1f9f | | Action Push_String_Extended,0x1f9f ; " @DECOMPOSITION annotation of "
1ccb 01cc | | Execute Vector,Catenate
1ccc e604 | | Load 0x3,0x4
1ccd 8294 | | Call 0x1,0x94
1cce 01cc | | Execute Vector,Catenate
1ccf 0092 1fa0 | | Action Push_String_Extended,0x1fa0 ; " in "
1cd1 01cc | | Execute Vector,Catenate
1cd2 e604 | | Load 0x3,0x4
1cd3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1cd4 82a1 | | Call 0x1,0xa1
1cd5 01cc | | Execute Vector,Catenate
1cd6 00ea | | Load_Encached Null_String_Cache
1cd7 8286 | | Call 0x1,0x86
1cd8 780e |x | Jump 0x1ce7
1cd9 4800 |H | Short_Literal 0x0
1cda 4800 |H | Short_Literal 0x0
1cdb 4805 |H | Short_Literal 0x5
1cdc 0092 1fa1 | | Action Push_String_Extended,0x1fa1 ; "Use Set_Parent on "
1cde e602 | | Load 0x3,0x2
1cdf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1ce0 82a1 | | Call 0x1,0xa1
1ce1 01cc | | Execute Vector,Catenate
1ce2 0092 1fa2 | | Action Push_String_Extended,0x1fa2 ; " to correct the problem"
1ce4 01cc | | Execute Vector,Catenate
1ce5 00ea | | Load_Encached Null_String_Cache
1ce6 8286 | | Call 0x1,0x86
1ce7 e603 | | Load 0x3,0x3
1ce8 e602 | | Load 0x3,0x2
1ce9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1cea e602 | | Load 0x3,0x2
1ceb 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1cec 00db | | Load_Top At_Offset_3
1ced e001 | | Load 0x0,0x1
1cee 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1cef 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1cf0 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
1cf1 e602 | | Load 0x3,0x2
1cf2 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1cf3 e5ff | | Load 0x2,-0x1
1cf4 e602 | | Load 0x3,0x2
1cf5 82a6 | | Call 0x1,0xa6
1cf6 e602 | | Load 0x3,0x2
1cf7 8406 | | Call 0x2,0x6
1cf8 00d9 | | Load_Top At_Offset_1
1cf9 e001 | | Load 0x0,0x1
1cfa 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1cfb 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1cfc 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1cfd c607 | | Store 0x3,0x7
1cfe 00e2 | | Load_Encached Integer_Cache
1cff e603 | | Load 0x3,0x3
1d00 0268 | h | Execute Discrete,Successor
1d01 c603 | | Store 0x3,0x3
1d02 00c9 | | Action Pop_Auxiliary_Loop
1d03 00d9 | | Load_Top At_Offset_1
1d04 e001 | | Load 0x0,0x1
1d05 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1d06 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1d07 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
1d08 6f82 |o | Jump_Zero 0x1c8b
1d09 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1d0a 0000 0000 | | .BLANK 0000[0x6]
1d10 ; --------------------------------------------------------------------------------------
1d10 ; SUBPROGRAM
1d10 ; --------------------------------------------------------------------------------------
1d10 1d1e | | .CONST 0x1d1e ; Address of begin
1d11 0004 | | .CONST 0x0004 ; Address of exception handler
1d12 0004 | | .CONST 0x0004 ; Number of locals
1d13 INIT_1d10:
1d13 e216 | | Load 0x1,0x16
1d14 0322 | " | Declare_Variable Record
1d15 00d8 | | Load_Top At_Offset_0
1d16 1c00 | | Execute_Immediate Run_Utility,0x0
1d17 e5ff | | Load 0x2,-0x1
1d18 0227 | ' | Execute Access,All_Reference
1d19 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
1d1a 0007 | | Action Break_Optional
1d1b e28e | | Load 0x1,0x8e
1d1c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
1d1d 0322 | " | Declare_Variable Record
1d1e BODY_1d10:
1d1e 00d8 | | Load_Top At_Offset_0
1d1f 00da | | Load_Top At_Offset_2
1d20 e28e | | Load 0x1,0x8e
1d21 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1d22 00d1 | | Pop_Control Pop_Count_1
1d23 00cf | | Action Mark_Auxiliary
1d24 782e |x. | Jump 0x1d53
1d25 00d9 | | Load_Top At_Offset_1
1d26 e28e | | Load 0x1,0x8e
1d27 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1d28 00db | | Load_Top At_Offset_3
1d29 e28e | | Load 0x1,0x8e
1d2a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1d2b e602 | | Load 0x3,0x2
1d2c 017d | } | Execute Record,Structure_Write
1d2d 00db | | Load_Top At_Offset_3
1d2e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1d2f e001 | | Load 0x0,0x1
1d30 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1d31 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1d32 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1d33 012f | / | Execute Any,Equal
1d34 6819 |h | Jump_Zero 0x1d4e
1d35 00db | | Load_Top At_Offset_3
1d36 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1d37 0e01 | | Execute_Immediate Not_Equal,0x1
1d38 e602 | | Load 0x3,0x2
1d39 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1d3a 0e02 | | Execute_Immediate Not_Equal,0x2
1d3b 0279 | y | Execute Discrete,And
1d3c e602 | | Load 0x3,0x2
1d3d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1d3e 0e06 | | Execute_Immediate Not_Equal,0x6
1d3f 0279 | y | Execute Discrete,And
1d40 680d |h | Jump_Zero 0x1d4e
1d41 4800 |H | Short_Literal 0x0
1d42 4800 |H | Short_Literal 0x0
1d43 4807 |H | Short_Literal 0x7
1d44 e602 | | Load 0x3,0x2
1d45 8294 | | Call 0x1,0x94
1d46 0092 1fa3 | | Action Push_String_Extended,0x1fa3 ; " is UNROOTED"
1d48 01cc | | Execute Vector,Catenate
1d49 0092 1fa4 | | Action Push_String_Extended,0x1fa4 ; " in the decomposition hierarchy"
1d4b 01cc | | Execute Vector,Catenate
1d4c 00ea | | Load_Encached Null_String_Cache
1d4d 8285 | | Call 0x1,0x85
1d4e 00d9 | | Load_Top At_Offset_1
1d4f e28e | | Load 0x1,0x8e
1d50 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1d51 00d1 | | Pop_Control Pop_Count_1
1d52 00c9 | | Action Pop_Auxiliary_Loop
1d53 00d9 | | Load_Top At_Offset_1
1d54 e28e | | Load 0x1,0x8e
1d55 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1d56 6fce |o | Jump_Zero 0x1d25
1d57 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d58 ; --------------------------------------------------------------------------------------
1d58 ; SUBPROGRAM
1d58 ; --------------------------------------------------------------------------------------
1d58 1d7b | { | .CONST 0x1d7b ; Address of begin
1d59 0004 | | .CONST 0x0004 ; Address of exception handler
1d5a 0008 | | .CONST 0x0008 ; Number of locals
1d5b INIT_1d58:
1d5b e266 | f | Load 0x1,0x66
1d5c 0322 | " | Declare_Variable Record
1d5d 00d8 | | Load_Top At_Offset_0
1d5e 1c00 | | Execute_Immediate Run_Utility,0x0
1d5f e003 | | Load 0x0,0x3
1d60 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1d61 02c7 | | Declare_Variable Any
1d62 00d8 | | Load_Top At_Offset_0
1d63 1c00 | | Execute_Immediate Run_Utility,0x0
1d64 e003 | | Load 0x0,0x3
1d65 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1d66 02c7 | | Declare_Variable Any
1d67 00d8 | | Load_Top At_Offset_0
1d68 1c00 | | Execute_Immediate Run_Utility,0x0
1d69 e003 | | Load 0x0,0x3
1d6a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
1d6b 02c7 | | Declare_Variable Any
1d6c 4800 |H | Short_Literal 0x0
1d6d e7ff | | Load 0x3,-0x1
1d6e e003 | | Load 0x0,0x3
1d6f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1d70 a605 | | Store_Unchecked 0x3,0x5
1d71 e008 | | Load 0x0,0x8
1d72 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1d73 02c7 | | Declare_Variable Any
1d74 00d8 | | Load_Top At_Offset_0
1d75 1c00 | | Execute_Immediate Run_Utility,0x0
1d76 e7fe | | Load 0x3,-0x2
1d77 0227 | ' | Execute Access,All_Reference
1d78 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
1d79 0007 | | Action Break_Optional
1d7a 00e1 | | Load_Encached Boolean_Cache
1d7b BODY_1d58:
1d7b 00db | | Load_Top At_Offset_3
1d7c e017 | | Load 0x0,0x17
1d7d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1d7e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1d7f 6801 |h | Jump_Zero 0x1d81
1d80 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1d81 e5fd | | Load 0x2,-0x3
1d82 e017 | | Load 0x0,0x17
1d83 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1d84 180e | | Execute Package,Field_Execute,Field_Number 0xe
1d85 0092 1fa5 | | Action Push_String_Extended,0x1fa5 ; "Unable to obtain immediate children of subsystem "
1d87 e7ff | | Load 0x3,-0x1
1d88 e017 | | Load 0x0,0x17
1d89 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1d8a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1d8b 01cc | | Execute Vector,Catenate
1d8c e008 | | Load 0x0,0x8
1d8d 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
1d8e e605 | | Load 0x3,0x5
1d8f 829c | | Call 0x1,0x9c
1d90 c5fd | | Store 0x2,-0x3
1d91 00cf | | Action Mark_Auxiliary
1d92 7884 |x | Jump 0x1e17
1d93 e605 | | Load 0x3,0x5
1d94 e017 | | Load 0x0,0x17
1d95 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1d96 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1d97 c603 | | Store 0x3,0x3
1d98 e603 | | Load 0x3,0x3
1d99 e018 | | Load 0x0,0x18
1d9a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1d9b 4606 |F | Jump_Case 0x7
1d9c 781b |x | Jump 0x1db8 ; case 0x0
1d9d 781a |x | Jump 0x1db8 ; case 0x1
1d9e 7819 |x | Jump 0x1db8 ; case 0x2
1d9f 7818 |x | Jump 0x1db8 ; case 0x3
1da0 7802 |x | Jump 0x1da3 ; case 0x4
1da1 7816 |x | Jump 0x1db8 ; case 0x5
1da2 786e |xn | Jump 0x1e11 ; case 0x6
1da3 e603 | | Load 0x3,0x3
1da4 e003 | | Load 0x0,0x3
1da5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1da6 c604 | | Store 0x3,0x4
1da7 e604 | | Load 0x3,0x4
1da8 00db | | Load_Top At_Offset_3
1da9 e017 | | Load 0x0,0x17
1daa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1dab 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1dac 7064 |pd | Jump_Nonzero 0x1e11
1dad 00e1 | | Load_Encached Boolean_Cache
1dae e017 | | Load 0x0,0x17
1daf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1db0 180e | | Execute Package,Field_Execute,Field_Number 0xe
1db1 e604 | | Load 0x3,0x4
1db2 e607 | | Load 0x3,0x7
1db3 e017 | | Load 0x0,0x17
1db4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1db5 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1db6 005a | Z | Store_Top Discrete,At_Offset_2
1db7 7859 |xY | Jump 0x1e11
1db8 e603 | | Load 0x3,0x3
1db9 e003 | | Load 0x0,0x3
1dba 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1dbb c604 | | Store 0x3,0x4
1dbc e604 | | Load 0x3,0x4
1dbd 00db | | Load_Top At_Offset_3
1dbe e017 | | Load 0x0,0x17
1dbf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1dc0 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1dc1 704f |pO | Jump_Nonzero 0x1e11
1dc2 00db | | Load_Top At_Offset_3
1dc3 e602 | | Load 0x3,0x2
1dc4 e604 | | Load 0x3,0x4
1dc5 826a | j | Call 0x1,0x6a
1dc6 00d1 | | Pop_Control Pop_Count_1
1dc7 c606 | | Store 0x3,0x6
1dc8 4801 |H | Short_Literal 0x1
1dc9 e606 | | Load 0x3,0x6
1dca e008 | | Load 0x0,0x8
1dcb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1dcc 6810 |h | Jump_Zero 0x1ddd
1dcd 4801 |H | Short_Literal 0x1
1dce a402 | | Store_Unchecked 0x2,0x2
1dcf 4800 |H | Short_Literal 0x0
1dd0 4800 |H | Short_Literal 0x0
1dd1 4807 |H | Short_Literal 0x7
1dd2 e606 | | Load 0x3,0x6
1dd3 0092 1fa6 | | Action Push_String_Extended,0x1fa6 ; "Errors detected resolving context of "
1dd5 e603 | | Load 0x3,0x3
1dd6 e017 | | Load 0x0,0x17
1dd7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1dd8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1dd9 01cc | | Execute Vector,Catenate
1dda 00ea | | Load_Encached Null_String_Cache
1ddb 8284 | | Call 0x1,0x84
1ddc 7834 |x4 | Jump 0x1e11
1ddd 00e1 | | Load_Encached Boolean_Cache
1dde e017 | | Load 0x0,0x17
1ddf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1de0 180e | | Execute Package,Field_Execute,Field_Number 0xe
1de1 e604 | | Load 0x3,0x4
1de2 e607 | | Load 0x3,0x7
1de3 e017 | | Load 0x0,0x17
1de4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1de5 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1de6 005a | Z | Store_Top Discrete,At_Offset_2
1de7 e7fe | | Load 0x3,-0x2
1de8 e602 | | Load 0x3,0x2
1de9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1dea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1deb 8296 | | Call 0x1,0x96
1dec 7021 |p! | Jump_Nonzero 0x1e0e
1ded e5ff | | Load 0x2,-0x1
1dee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1def 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1df0 0f01 | | Execute_Immediate Equal,0x1
1df1 6806 |h | Jump_Zero 0x1df8
1df2 e602 | | Load 0x3,0x2
1df3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1df4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1df5 0f05 | | Execute_Immediate Equal,0x5
1df6 6801 |h | Jump_Zero 0x1df8
1df7 7816 |x | Jump 0x1e0e
1df8 e7fe | | Load 0x3,-0x2
1df9 0229 | ) | Execute Access,All_Read
1dfa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1dfb e602 | | Load 0x3,0x2
1dfc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1dfd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1dfe 00d8 | | Load_Top At_Offset_0
1dff 00da | | Load_Top At_Offset_2
1e00 01d7 | | Execute Vector,Field_Read
1e01 e602 | | Load 0x3,0x2
1e02 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1e03 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1e04 e002 | | Load 0x0,0x2
1e05 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1e06 00d9 | | Load_Top At_Offset_1
1e07 00db | | Load_Top At_Offset_3
1e08 01d6 | | Execute Vector,Field_Write
1e09 00d2 | | Pop_Control Pop_Count_2
1e0a e7fe | | Load 0x3,-0x2
1e0b e602 | | Load 0x3,0x2
1e0c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1e0d 82a6 | | Call 0x1,0xa6
1e0e e7fe | | Load 0x3,-0x2
1e0f e603 | | Load 0x3,0x3
1e10 8404 | | Call 0x2,0x4
1e11 e605 | | Load 0x3,0x5
1e12 e017 | | Load 0x0,0x17
1e13 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1e14 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1e15 c605 | | Store 0x3,0x5
1e16 00c9 | | Action Pop_Auxiliary_Loop
1e17 e605 | | Load 0x3,0x5
1e18 e017 | | Load 0x0,0x17
1e19 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1e1a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1e1b 6f77 |ow | Jump_Zero 0x1d93
1e1c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1e1d 0000 0000 | | .XXX[0x3]
1e1f 0000 | |
1e20 ; --------------------------------------------------------------------------------------
1e20 ; SUBPROGRAM
1e20 ; --------------------------------------------------------------------------------------
1e20 1e23 | # | .CONST 0x1e23 ; Address of begin
1e21 0004 | | .CONST 0x0004 ; Address of exception handler
1e22 0001 | | .CONST 0x0001 ; Number of locals
1e23 BODY_1e20:
1e23 INIT_1e20:
1e23 4800 |H | Short_Literal 0x0
1e24 a7fd | | Store_Unchecked 0x3,-0x3
1e25 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1e26 0000 0000 | | .XXX[0x2]
1e28 ; --------------------------------------------------------------------------------------
1e28 ; SUBPROGRAM
1e28 ; --------------------------------------------------------------------------------------
1e28 1e31 | 1 | .CONST 0x1e31 ; Address of begin
1e29 0004 | | .CONST 0x0004 ; Address of exception handler
1e2a 0002 | | .CONST 0x0002 ; Number of locals
1e2b INIT_1e28:
1e2b 00da | | Load_Top At_Offset_2
1e2c e01b | | Load 0x0,0x1b
1e2d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1e2e e01b | | Load 0x0,0x1b
1e2f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
1e30 03f1 | | Declare_Variable Discrete,With_Value
1e31 BODY_1e28:
1e31 4800 |H | Short_Literal 0x0
1e32 a7fd | | Store_Unchecked 0x3,-0x3
1e33 00d8 | | Load_Top At_Offset_0
1e34 4626 |F& | Jump_Case 0x27
1e35 782c |x, | Jump 0x1e62 ; case 0x0
1e36 782b |x+ | Jump 0x1e62 ; case 0x1
1e37 782a |x* | Jump 0x1e62 ; case 0x2
1e38 7829 |x) | Jump 0x1e62 ; case 0x3
1e39 7828 |x( | Jump 0x1e62 ; case 0x4
1e3a 7827 |x' | Jump 0x1e62 ; case 0x5
1e3b 7826 |x& | Jump 0x1e62 ; case 0x6
1e3c 7825 |x% | Jump 0x1e62 ; case 0x7
1e3d 781e |x | Jump 0x1e5c ; case 0x8
1e3e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x9
1e3f 781c |x | Jump 0x1e5c ; case 0xa
1e40 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0xb
1e41 781a |x | Jump 0x1e5c ; case 0xc
1e42 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0xd
1e43 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0xe
1e44 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0xf
1e45 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x10
1e46 781b |x | Jump 0x1e62 ; case 0x11
1e47 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x12
1e48 7813 |x | Jump 0x1e5c ; case 0x13
1e49 7812 |x | Jump 0x1e5c ; case 0x14
1e4a 7811 |x | Jump 0x1e5c ; case 0x15
1e4b 7810 |x | Jump 0x1e5c ; case 0x16
1e4c 780f |x | Jump 0x1e5c ; case 0x17
1e4d 780e |x | Jump 0x1e5c ; case 0x18
1e4e 780d |x | Jump 0x1e5c ; case 0x19
1e4f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x1a
1e50 7811 |x | Jump 0x1e62 ; case 0x1b
1e51 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x1c
1e52 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x1d
1e53 7808 |x | Jump 0x1e5c ; case 0x1e
1e54 7807 |x | Jump 0x1e5c ; case 0x1f
1e55 7806 |x | Jump 0x1e5c ; case 0x20
1e56 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x21
1e57 780a |x | Jump 0x1e62 ; case 0x22
1e58 7809 |x | Jump 0x1e62 ; case 0x23
1e59 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x24
1e5a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x25
1e5b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x26
1e5c e5fe | | Load 0x2,-0x2
1e5d e7ff | | Load 0x3,-0x1
1e5e e002 | | Load 0x0,0x2
1e5f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1e60 c5fe | | Store 0x2,-0x2
1e61 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1e62 e5fe | | Load 0x2,-0x2
1e63 e7ff | | Load 0x3,-0x1
1e64 e002 | | Load 0x0,0x2
1e65 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1e66 c5fe | | Store 0x2,-0x2
1e67 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1e68 ; --------------------------------------------------------------------------------------
1e68 ; SUBPROGRAM
1e68 ; --------------------------------------------------------------------------------------
1e68 1e6b | k | .CONST 0x1e6b ; Address of begin
1e69 1e85 | | .CONST 0x1e85 ; Address of exception handler
1e6a 0001 | | .CONST 0x0001 ; Number of locals
1e6b BODY_1e68:
1e6b INIT_1e68:
1e6b e5fd | | Load 0x2,-0x3
1e6c e402 | | Load 0x2,0x2
1e6d 4801 |H | Short_Literal 0x1
1e6e e403 | | Load 0x2,0x3
1e6f e017 | | Load 0x0,0x17
1e70 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1e71 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1e72 e289 | | Load 0x1,0x89
1e73 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1e74 00d1 | | Pop_Control Pop_Count_1
1e75 c5fd | | Store 0x2,-0x3
1e76 e5fd | | Load 0x2,-0x3
1e77 8299 | | Call 0x1,0x99
1e78 c5fd | | Store 0x2,-0x3
1e79 e404 | | Load 0x2,0x4
1e7a e603 | | Load 0x3,0x3
1e7b e402 | | Load 0x2,0x2
1e7c e289 | | Load 0x1,0x89
1e7d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1e7e e002 | | Load 0x0,0x2
1e7f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1e80 c404 | | Store 0x2,0x4
1e81 e402 | | Load 0x2,0x2
1e82 e289 | | Load 0x1,0x89
1e83 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1e84 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e85 TRAP_1e68:
1e85 e024 | $ | Load 0x0,0x24
1e86 010f | | Execute Exception,Equal
1e87 6805 |h | Jump_Zero 0x1e8d
1e88 e5fd | | Load 0x2,-0x3
1e89 e008 | | Load 0x0,0x8
1e8a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1e8b c5fd | | Store 0x2,-0x3
1e8c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e8d 0100 | | Execute Exception,Raise
1e8e 0000 0000 | | .XXX[0x2]
1e90 ; --------------------------------------------------------------------------------------
1e90 ; SUBPROGRAM
1e90 ; --------------------------------------------------------------------------------------
1e90 1e9c | | .CONST 0x1e9c ; Address of begin
1e91 0004 | | .CONST 0x0004 ; Address of exception handler
1e92 0003 | | .CONST 0x0003 ; Number of locals
1e93 INIT_1e90:
1e93 e602 | | Load 0x3,0x2
1e94 e001 | | Load 0x0,0x1
1e95 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1e96 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1e97 00d8 | | Load_Top At_Offset_0
1e98 01dd | | Execute Vector,First
1e99 0a10 | | Execute_Immediate Plus,0x10
1e9a 00e2 | | Load_Encached Integer_Cache
1e9b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1e9c BODY_1e90:
1e9c 00cf | | Action Mark_Auxiliary
1e9d 7804 |x | Jump 0x1ea2
1e9e 00d9 | | Load_Top At_Offset_1
1e9f 0a01 | | Execute_Immediate Plus,0x1
1ea0 005a | Z | Store_Top Discrete,At_Offset_2
1ea1 00c9 | | Action Pop_Auxiliary_Loop
1ea2 00d9 | | Load_Top At_Offset_1
1ea3 00db | | Load_Top At_Offset_3
1ea4 01dc | | Execute Vector,Last
1ea5 027a | z | Execute Discrete,Less_Equal
1ea6 6805 |h | Jump_Zero 0x1eac
1ea7 00d9 | | Load_Top At_Offset_1
1ea8 00db | | Load_Top At_Offset_3
1ea9 01d7 | | Execute Vector,Field_Read
1eaa 0f20 | | Execute_Immediate Equal,0x20
1eab 77f2 |w | Jump_Nonzero 0x1e9e
1eac 00c9 | | Action Pop_Auxiliary_Loop
1ead 7804 |x | Jump 0x1eb2
1eae 00d9 | | Load_Top At_Offset_1
1eaf 0a01 | | Execute_Immediate Plus,0x1
1eb0 005a | Z | Store_Top Discrete,At_Offset_2
1eb1 00c9 | | Action Pop_Auxiliary_Loop
1eb2 00d9 | | Load_Top At_Offset_1
1eb3 00db | | Load_Top At_Offset_3
1eb4 01dc | | Execute Vector,Last
1eb5 027a | z | Execute Discrete,Less_Equal
1eb6 6805 |h | Jump_Zero 0x1ebc
1eb7 00d9 | | Load_Top At_Offset_1
1eb8 00db | | Load_Top At_Offset_3
1eb9 01d7 | | Execute Vector,Field_Read
1eba 0e20 | | Execute_Immediate Not_Equal,0x20
1ebb 77f2 |w | Jump_Nonzero 0x1eae
1ebc 00c9 | | Action Pop_Auxiliary_Loop
1ebd 7804 |x | Jump 0x1ec2
1ebe 00d9 | | Load_Top At_Offset_1
1ebf 0a01 | | Execute_Immediate Plus,0x1
1ec0 005a | Z | Store_Top Discrete,At_Offset_2
1ec1 00c9 | | Action Pop_Auxiliary_Loop
1ec2 00d9 | | Load_Top At_Offset_1
1ec3 00db | | Load_Top At_Offset_3
1ec4 01dc | | Execute Vector,Last
1ec5 027a | z | Execute Discrete,Less_Equal
1ec6 6805 |h | Jump_Zero 0x1ecc
1ec7 00d9 | | Load_Top At_Offset_1
1ec8 00db | | Load_Top At_Offset_3
1ec9 01d7 | | Execute Vector,Field_Read
1eca 0f20 | | Execute_Immediate Equal,0x20
1ecb 77f2 |w | Jump_Nonzero 0x1ebe
1ecc 00ce | | Action Pop_Auxiliary
1ecd 00d8 | | Load_Top At_Offset_0
1ece 00da | | Load_Top At_Offset_2
1ecf 01dc | | Execute Vector,Last
1ed0 027d | } | Execute Discrete,Greater
1ed1 6805 |h | Jump_Zero 0x1ed7
1ed2 e5fd | | Load 0x2,-0x3
1ed3 0335 | 5 | Declare_Variable Array,Duplicate
1ed4 00cd | | Action Spare6_Action
1ed5 00cb | | Action Pop_Block_With_Result
1ed6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1ed7 00d8 | | Load_Top At_Offset_0
1ed8 00da | | Load_Top At_Offset_2
1ed9 01dc | | Execute Vector,Last
1eda 00db | | Load_Top At_Offset_3
1edb 01cf | | Execute Vector,Slice_Read
1edc 82a3 | | Call 0x1,0xa3
1edd 00cb | | Action Pop_Block_With_Result
1ede 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1edf 0000 | | .XXX[0x1]
1ee0 ; --------------------------------------------------------------------------------------
1ee0 ; SUBPROGRAM
1ee0 ; --------------------------------------------------------------------------------------
1ee0 1ee3 | | .CONST 0x1ee3 ; Address of begin
1ee1 0004 | | .CONST 0x0004 ; Address of exception handler
1ee2 0001 | | .CONST 0x0001 ; Number of locals
1ee3 BODY_1ee0:
1ee3 INIT_1ee0:
1ee3 4608 |F | Jump_Case 0x9
1ee4 7808 |x | Jump 0x1eed ; case 0x0
1ee5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
1ee6 783f |x? | Jump 0x1f26 ; case 0x2
1ee7 783e |x> | Jump 0x1f26 ; case 0x3
1ee8 783d |x= | Jump 0x1f26 ; case 0x4
1ee9 783c |x< | Jump 0x1f26 ; case 0x5
1eea 783b |x; | Jump 0x1f26 ; case 0x6
1eeb 783a |x: | Jump 0x1f26 ; case 0x7
1eec 7839 |x9 | Jump 0x1f26 ; case 0x8
1eed 00da | | Load_Top At_Offset_2
1eee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1eef 0125 | % | Execute Any,Set_Constraint
1ef0 e001 | | Load 0x0,0x1
1ef1 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1ef2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1ef3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1ef4 00db | | Load_Top At_Offset_3
1ef5 00d9 | | Load_Top At_Offset_1
1ef6 00d9 | | Load_Top At_Offset_1
1ef7 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
1ef8 0119 | | Execute Any,Check_In_Formal_Type
1ef9 00d1 | | Pop_Control Pop_Count_1
1efa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1efb 00da | | Load_Top At_Offset_2
1efc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1efd 0125 | % | Execute Any,Set_Constraint
1efe e210 | | Load 0x1,0x10
1eff 00db | | Load_Top At_Offset_3
1f00 00d9 | | Load_Top At_Offset_1
1f01 00d9 | | Load_Top At_Offset_1
1f02 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
1f03 0119 | | Execute Any,Check_In_Formal_Type
1f04 00d1 | | Pop_Control Pop_Count_1
1f05 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1f06 6021 |`! | Indirect_Literal Discrete,0x1f28,{0x80000000, 0x00000000}
1f07 00db | | Load_Top At_Offset_3
1f08 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
1f09 480b |H | Short_Literal 0xb
1f0a 00db | | Load_Top At_Offset_3
1f0b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
1f0c 4800 |H | Short_Literal 0x0
1f0d 00db | | Load_Top At_Offset_3
1f0e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1f0f 00da | | Load_Top At_Offset_2
1f10 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
1f11 0125 | % | Execute Any,Set_Constraint
1f12 e001 | | Load 0x0,0x1
1f13 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1f14 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
1f15 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1f16 00db | | Load_Top At_Offset_3
1f17 00d9 | | Load_Top At_Offset_1
1f18 00d9 | | Load_Top At_Offset_1
1f19 3006 |0 | Execute Record,Field_Type,Field_Number 0x6
1f1a 0119 | | Execute Any,Check_In_Formal_Type
1f1b 00d1 | | Pop_Control Pop_Count_1
1f1c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1f1d e001 | | Load 0x0,0x1
1f1e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1f1f 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
1f20 00db | | Load_Top At_Offset_3
1f21 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
1f22 4801 |H | Short_Literal 0x1
1f23 00db | | Load_Top At_Offset_3
1f24 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
1f25 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1f26 0869 | i | Execute_Immediate Raise,0x69
1f27 0000 | | .XXX[0x1]
1f28 8000 0000 | | .LITERAL {0x80000000, 0x00000000}
1f2c 0000 0000 | | .BLANK 0000[0x4]
1f30 ; --------------------------------------------------------------------------------------
1f30 ; SUBPROGRAM
1f30 ; --------------------------------------------------------------------------------------
1f30 1f33 | 3 | .CONST 0x1f33 ; Address of begin
1f31 0004 | | .CONST 0x0004 ; Address of exception handler
1f32 0001 | | .CONST 0x0001 ; Number of locals
1f33 BODY_1f30:
1f33 INIT_1f30:
1f33 4608 |F | Jump_Case 0x9
1f34 7808 |x | Jump 0x1f3d ; case 0x0
1f35 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
1f36 7810 |x | Jump 0x1f47 ; case 0x2
1f37 780f |x | Jump 0x1f47 ; case 0x3
1f38 780e |x | Jump 0x1f47 ; case 0x4
1f39 780d |x | Jump 0x1f47 ; case 0x5
1f3a 780c |x | Jump 0x1f47 ; case 0x6
1f3b 780b |x | Jump 0x1f47 ; case 0x7
1f3c 780a |x | Jump 0x1f47 ; case 0x8
1f3d 00da | | Load_Top At_Offset_2
1f3e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1f3f 1c00 | | Execute_Immediate Run_Utility,0x0
1f40 00da | | Load_Top At_Offset_2
1f41 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1f42 0125 | % | Execute Any,Set_Constraint
1f43 00da | | Load_Top At_Offset_2
1f44 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1f45 1c00 | | Execute_Immediate Run_Utility,0x0
1f46 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1f47 0869 | i | Execute_Immediate Raise,0x69
1f48 ; --------------------------------------------------------------------------------------
1f48 ; STRING TABLE
1f48 ; --------------------------------------------------------------------------------------
1f48 00c0 | | .STRTAB 0x00c0->0x1fa8 ; "EXACTLY"
1f49 00c5 | | .STRTAB 0x00c5->0x1fab ; "WITHIN_RANGE"
1f4a 00cf | | .STRTAB 0x00cf->0x1fb1 ; "IMMEDIATE"
1f4b 00d6 | | .STRTAB 0x00d6->0x1fb6 ; "TRANSITIVE"
1f4c 00de | | .STRTAB 0x00de->0x1fbb ; "<UNDEFINED_ID>"
1f4d 00ea | | .STRTAB 0x00ea->0x1fc2 ; "COMPONENTS"
1f4e 00f2 | | .STRTAB 0x00f2->0x1fc7 ; "Invalid view reference"
1f4f 0106 | | .STRTAB 0x0106->0x1fd2 ; " is not a Rational_2167a view"
1f50 0121 | ! | .STRTAB 0x0121->0x1fe0 ; "Resolve_Context"
1f51 012e | . | .STRTAB 0x012e->0x1fe8 ; "Initialize"
1f52 0136 | 6 | .STRTAB 0x0136->0x1fed ; "Unable to find CI Referencers in the \x22"
1f53 015a | Z | .STRTAB 0x015a->0x2000 ; "\x22 CI."
1f54 015d | ] | .STRTAB 0x015d->0x2002 ; "Unable to obtain CSCI component in "
1f55 017e | ~ | .STRTAB 0x017e->0x2014 ; "Find_Csci"
1f56 0185 | | .STRTAB 0x0185->0x2018 ; "Unable to resolve context"
1f57 019c | | .STRTAB 0x019c->0x2025 ; "Unable to locate SYSTEM component in static hierarchy. Verify that the hierarchical PARENT chain of "
1f58 01ff | | .STRTAB 0x01ff->0x2057 ; " leads to a Rational_2167a SYSTEM component"
1f59 0228 | ( | .STRTAB 0x0228->0x206d ; " (Use Design.Set_Parent if necessary)"
1f5a 024b | K | .STRTAB 0x024b->0x207f ; "Find_System"
1f5b 0254 | T | .STRTAB 0x0254->0x2085 ; "<NIL_COMPONENT>"
1f5c 0261 | a | .STRTAB 0x0261->0x208c ; "UNKNOWN"
1f5d 0266 | f | .STRTAB 0x0266->0x2090 ; "Component Cache ..."
1f5e 0277 | w | .STRTAB 0x0277->0x2099 ; "Dump_Cache"
1f5f 027f | | .STRTAB 0x027f->0x209e ; "Install"
1f60 0284 | | .STRTAB 0x0284->0x20a2 ; "Withdraw"
1f61 028a | | .STRTAB 0x028a->0x20a6 ; "Unable to resolve initial context. Verify that this unit is installed."
1f62 02cf | | .STRTAB 0x02cf->0x20c9 ; "This is the root of the 2167A static hierarchy."
1f63 02fc | | .STRTAB 0x02fc->0x20e1 ; "PDL Enclosing"
1f64 0307 | | .STRTAB 0x0307->0x20e7 ; "The use of 'None' in this context does not denote a component."
1f65 0343 | C | .STRTAB 0x0343->0x2106 ; "Cursor must be positioned on one of the component names."
1f66 0379 | y | .STRTAB 0x0379->0x2122 ; "Unable to find component. Make sure that \x22"
1f67 03a2 | | .STRTAB 0x03a2->0x2138 ; "\x22 is installed."
1f68 03af | | .STRTAB 0x03af->0x213f ; "Resolve_Component"
1f69 03be | | .STRTAB 0x03be->0x2148 ; " component \x22"
1f6a 03c8 | | .STRTAB 0x03c8->0x214e ; "This component cannot be further decomposed"
1f6b 03f1 | | .STRTAB 0x03f1->0x2163 ; "Children of this component must be "
1f6c 0412 | | .STRTAB 0x0412->0x2175 ; " components"
1f6d 041b | | .STRTAB 0x041b->0x217a ; " ("
1f6e 041b | | .STRTAB 0x041b->0x217b ; "\x22 ("
1f6f 041c | | .STRTAB 0x041c->0x217d ; "Unexpected exception in Components."
1f70 043d | = | .STRTAB 0x043d->0x218e ; "Iterator of components cannot be completed because of previous errors in the static hierarchy"
1f71 0498 | | .STRTAB 0x0498->0x21bd ; "The previous errors must be corrected in order to produce meaningful results"
1f72 04e2 | | .STRTAB 0x04e2->0x21e3 ; "<UNDEFINED>"
1f73 04eb | | .STRTAB 0x04eb->0x21e8 ; "Unable to locate CSCI component. Is the CSCI installed?"
1f74 0521 | ! | .STRTAB 0x0521->0x2204 ; "Ignoring duplicate CSCI component "
1f75 0541 | A | .STRTAB 0x0541->0x2215 ; "Multiple CSCI components in view detected"
1f76 0568 | h | .STRTAB 0x0568->0x222a ; "Get_Csci"
1f77 056e | n | .STRTAB 0x056e->0x222e ; "Invalid @DECOMPOSITION argument (\x22"
1f78 058e | | .STRTAB 0x058e->0x223f ; "\x22 must be a list of component names or 'None')"
1f79 05ba | | .STRTAB 0x05ba->0x2256 ; "Unable to determine context of SYSTEM component "
1f7a 05e8 | | .STRTAB 0x05e8->0x226e ; "Save_System_Component"
1f7b 05fb | | .STRTAB 0x05fb->0x2278 ; "Although the previous errors are not fatal, some loss of information has occurred, and incomplete results may be produced"
1f7c 0672 | r | .STRTAB 0x0672->0x22b5 ; "Resolve_High_Level_Components"
1f7d 068d | | .STRTAB 0x068d->0x22c3 ; ","
1f7e 068c | | .STRTAB 0x068c->0x22c4 ; " => "
1f7f 068e | | .STRTAB 0x068e->0x22c6 ; "Unable to determine enclosing subsystem of view "
1f80 06bc | | .STRTAB 0x06bc->0x22de ; "Unable to find "
1f81 06c9 | | .STRTAB 0x06c9->0x22e5 ; "\x22 in view "
1f82 06d1 | | .STRTAB 0x06d1->0x22ea ; " (Verify that the "
1f83 06e1 | | .STRTAB 0x06e1->0x22f3 ; " component is installed)"
1f84 06f7 | | .STRTAB 0x06f7->0x22ff ; "Subsystem "
1f85 06ff | | .STRTAB 0x06ff->0x2304 ; " has no child subsystems in which to"
1f86 0721 | ! | .STRTAB 0x0721->0x2316 ; " locate CSCI component \x22"
1f87 0737 | 7 | .STRTAB 0x0737->0x2322 ; "Ignoring duplicate CSCI component in \x22"
1f88 075b | [ | .STRTAB 0x075b->0x2335 ; "Multiple CSCI components are not permitted in the child subsystems of "
1f89 079f | | .STRTAB 0x079f->0x2358 ; ", "
1f8a 079f | | .STRTAB 0x079f->0x2359 ; " or "
1f8b 07a1 | | .STRTAB 0x07a1->0x235b ; "Unable to obtain children of "
1f8c 07bc | | .STRTAB 0x07bc->0x236a ; "Multiple "
1f8d 07c3 | | .STRTAB 0x07c3->0x236e ; " components named \x22"
1f8e 07d4 | | .STRTAB 0x07d4->0x2378 ; "\x22 have been detected in view \x22"
1f8f 07f0 | | .STRTAB 0x07f0->0x2387 ; "Ignoring duplicate component "
1f90 080b | | .STRTAB 0x080b->0x2395 ; "Unable to find component \x22"
1f91 0823 | # | .STRTAB 0x0823->0x23a2 ; "\x22 which is declared in the"
1f92 083b | ; | .STRTAB 0x083b->0x23af ; " @DECOMPOSITION annotation"
1f93 0853 | S | .STRTAB 0x0853->0x23bc ; " of component \x22"
1f94 0860 | ` | .STRTAB 0x0860->0x23c4 ; "\x22 which is defined as"
1f95 0873 | s | .STRTAB 0x0873->0x23ce ; " a hierarchical child"
1f96 0886 | | .STRTAB 0x0886->0x23d9 ; "\x22 declared in \x22"
1f97 0893 | | .STRTAB 0x0893->0x23e0 ; "\x22 either introduces a cycle"
1f98 08ac | | .STRTAB 0x08ac->0x23ee ; " or exists in multiple positions"
1f99 08ca | | .STRTAB 0x08ca->0x23fe ; " within the static hierarchy."
1f9a 08e5 | | .STRTAB 0x08e5->0x240c ; "The parent-child relationship between "
1f9b 0909 | | .STRTAB 0x0909->0x241f ; " and "
1f9c 090c | | .STRTAB 0x090c->0x2422 ; " is invalid. "
1f9d 0918 | | .STRTAB 0x0918->0x2429 ; "Child name \x22"
1f9e 0922 | " | .STRTAB 0x0922->0x242f ; "\x22 must be removed from the"
1f9f 093a | : | .STRTAB 0x093a->0x243c ; " @DECOMPOSITION annotation of "
1fa0 0956 | V | .STRTAB 0x0956->0x244b ; " in "
1fa1 0958 | X | .STRTAB 0x0958->0x244d ; "Use Set_Parent on "
1fa2 0968 | h | .STRTAB 0x0968->0x2456 ; " to correct the problem"
1fa3 097d | } | .STRTAB 0x097d->0x2461 ; " is UNROOTED"
1fa4 0987 | | .STRTAB 0x0987->0x2467 ; " in the decomposition hierarchy"
1fa5 09a4 | | .STRTAB 0x09a4->0x2477 ; "Unable to obtain immediate children of subsystem "
1fa6 09d3 | | .STRTAB 0x09d3->0x248f ; "Errors detected resolving context of "
1fa7 09f6 | | .STREND 0x09f6->0x24a2
1fa8 4558 4143 |EXAC| .STRTAB_STRINGS
24a2 0000 0000 | | .BLANK 0000[0x6]
24a8 ; --------------------------------------------------------------------------------------
24a8 ; Debug Table
24a8 ; --------------------------------------------------------------------------------------
24a8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc57c,0x0000,0x0001,0x0000
24ae 0000 0000 | | .BLANK 0000[0xa]
24b8 0040 004c | @ L| .XXX[0x1f]
24ba cf90 b841 | A|
24bc 3ac0 0002 |: |
24be f0d6 c970 | p|
24c0 1001 0000 | |
24c2 9d00 0000 | |
24c4 84a9 4000 | @ |
24c6 0200 0000 | |
24c8 0300 2800 | ( |
24ca 0000 0800 | |
24cc 0002 0000 | |
24ce 0011 0000 | |
24d0 0000 0800 | |
24d2 0000 5200 | R |
24d4 0010 032c | ,|
24d6 b000 | |
24d7 0000 0000 | | .BLANK 0000[0x1a]
24f1 0008 0009 | | .XXX[0x3]
24f3 99f0 | |
24f4 0000 0000 | | .BLANK 0000[0xd]
2501 0020 0500 | | .XXX[0xc]
2503 0000 0000 | |
2505 0000 4000 | @ |
2507 0002 2000 | |
2509 0000 0100 | |
250b 0000 0a00 | |
250d 0000 0000 | | .BLANK 0000[0x2d]
253a 0004 00a0 | | .XXX[0xc]
253c 0000 0000 | |
253e 0000 0800 | |
2540 0000 4400 | D |
2542 0000 0020 | |
2544 0000 0140 | @|
2546 0000 0000 | | .BLANK 0000[0x2e]
2574 8014 0000 | | .XXX[0xb]
2576 0000 0000 | |
2578 0100 0000 | |
257a 0880 0000 | |
257c 0004 0000 | |
257e 0028 | ( |
257f 0000 0000 | | .BLANK 0000[0x2e]
25ad 1002 8000 | | .XXX[0xb]
25af 0000 0000 | |
25b1 0020 0000 | |
25b3 0110 0000 | |
25b5 0000 8000 | |
25b7 0005 | |
25b8 0000 0000 | | .BLANK 0000[0x48]