|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 14336 (0x3800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1ba8 | | .CONST 0x1ba8 ; 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 8011 | | .CONST 0x8011 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01c4 | | .CONST 0x01c4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 00aa | | .CONST 0x00aa ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache
000c e001 | | Load 0x0,0x1
000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000e 00e9 | | Load_Encached String_Cache
000f 029f 195b | [| Declare_Subprogram For_Call,INIT_1958
0011 4800 |H | Short_Literal 0x0
0012 4801 |H | Short_Literal 0x1
0013 4801 |H | Short_Literal 0x1
0014 4800 |H | Short_Literal 0x0
0015 4801 |H | Short_Literal 0x1
0016 4801 |H | Short_Literal 0x1
0017 031e | | Declare_Type Variant_Record,Defined,Visible
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 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 00c4 | | Action Make_Default
008c 00c4 | | Action Make_Default
008d 00c4 | | Action Make_Default
008e 00c4 | | Action Make_Default
008f 00c4 | | Action Make_Default
0090 00c4 | | Action Make_Default
0091 00c4 | | Action Make_Default
0092 00c4 | | Action Make_Default
0093 00c4 | | Action Make_Default
0094 00c4 | | Action Make_Default
0095 00c4 | | Action Make_Default
0096 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
0098 c27e | ~ | Store 0x1,0x7e
0099 029a 024b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0248
009b c27f | | Store 0x1,0x7f
009c 029a 02c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02c0
009e c280 | | Store 0x1,0x80
009f 029a 0343 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0340
00a1 c281 | | Store 0x1,0x81
00a2 029a 03bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03b8
00a4 c227 | ' | Store 0x1,0x27
00a5 029a 0433 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0430
00a7 c228 | ( | Store 0x1,0x28
00a8 029a 04ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04a8
00aa c229 | ) | Store 0x1,0x29
00ab 029a 04eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04e8
00ad c22a | * | Store 0x1,0x2a
00ae 029a 057b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0578
00b0 c22b | + | Store 0x1,0x2b
00b1 029a 05eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05e8
00b3 c22c | , | Store 0x1,0x2c
00b4 029a 0683 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0680
00b6 c278 | x | Store 0x1,0x78
00b7 029a 06ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_06a8
00b9 c277 | w | Store 0x1,0x77
00ba 029a 0703 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0700
00bc c288 | | Store 0x1,0x88
00bd 029a 089b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0898
00bf c289 | | Store 0x1,0x89
00c0 029a 0933 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0930
00c2 c28a | | Store 0x1,0x8a
00c3 029a 09cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_09c8
00c5 c28b | | Store 0x1,0x8b
00c6 029a 0a53 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0a50
00c8 c231 | 1 | Store 0x1,0x31
00c9 029a 0abb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0ab8
00cb c232 | 2 | Store 0x1,0x32
00cc 029a 0b3b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0b38
00ce c286 | | Store 0x1,0x86
00cf 029a 0c03 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0c00
00d1 c279 | y | Store 0x1,0x79
00d2 029a 0c43 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0c40
00d4 c265 | e | Store 0x1,0x65
00d5 029a 0c93 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0c90
00d7 c25a | Z | Store 0x1,0x5a
00d8 029a 0d7b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0d78
00da c245 | E | Store 0x1,0x45
00db 029a 0dab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0da8
00dd c266 | f | Store 0x1,0x66
00de 029a 0dcb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0dc8
00e0 c267 | g | Store 0x1,0x67
00e1 029a 0e0b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0e08
00e3 c26a | j | Store 0x1,0x6a
00e4 029a 0e23 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0e20
00e6 c25d | ] | Store 0x1,0x5d
00e7 029a 0e8b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0e88
00e9 c25e | ^ | Store 0x1,0x5e
00ea 029a 0ea3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0ea0
00ec c25f | _ | Store 0x1,0x5f
00ed 029a 0ebb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0eb8
00ef c270 | p | Store 0x1,0x70
00f0 029a 0edb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0ed8
00f2 c271 | q | Store 0x1,0x71
00f3 029a 0f03 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0f00
00f5 c273 | s | Store 0x1,0x73
00f6 029a 0f1b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0f18
00f8 c260 | ` | Store 0x1,0x60
00f9 029a 0f53 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0f50
00fb c261 | a | Store 0x1,0x61
00fc e001 | | Load 0x0,0x1
00fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fe 4801 |H | Short_Literal 0x1
00ff 4880 |H | Short_Literal 0x80
0100 00e9 | | Load_Encached String_Cache
0101 035c | \ | Declare_Type Array,Constrained,Visible
0102 00e3 | | Load_Encached Natural_Cache
0103 4801 |H | Short_Literal 0x1
0104 4880 |H | Short_Literal 0x80
0105 00e9 | | Load_Encached String_Cache
0106 035c | \ | Declare_Type Array,Constrained,Visible
0107 00e3 | | Load_Encached Natural_Cache
0108 4801 |H | Short_Literal 0x1
0109 4880 |H | Short_Literal 0x80
010a 00e9 | | Load_Encached String_Cache
010b 035c | \ | Declare_Type Array,Constrained,Visible
010c 00e3 | | Load_Encached Natural_Cache
010d 4801 |H | Short_Literal 0x1
010e 4880 |H | Short_Literal 0x80
010f 00e9 | | Load_Encached String_Cache
0110 035c | \ | Declare_Type Array,Constrained,Visible
0111 00e3 | | Load_Encached Natural_Cache
0112 029f 1983 | | Declare_Subprogram For_Call,INIT_1980
0114 4809 |H | Short_Literal 0x9
0115 032e | . | Declare_Type Record,Defined,Visible
0116 c26f | o | Store 0x1,0x6f
0117 029a 0f83 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0f80
0119 c250 | P | Store 0x1,0x50
011a 029a 0f9b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0f98
011c c27d | } | Store 0x1,0x7d
011d 029a 0feb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0fe8
011f c26d | m | Store 0x1,0x6d
0120 029a 1043 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_1040
0122 c26e | n | Store 0x1,0x6e
0123 029a 109b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_1098
0125 c282 | | Store 0x1,0x82
0126 029a 1163 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_1160
0128 c283 | | Store 0x1,0x83
0129 029a 11fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_11f8
012b c284 | | Store 0x1,0x84
012c 029a 122b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_1228
012e c287 | | Store 0x1,0x87
012f 00bf | | Action Accept_Activation
0130 00e1 | | Load_Encached Boolean_Cache
0131 02a0 | | Declare_Subprogram Null_Subprogram
0132 4801 |H | Short_Literal 0x1
0133 032d | - | Declare_Type Record,Defined
0134 0092 19d9 | | Action Push_String_Extended,0x19d9 ; "secondary_"
0136 0092 19da | | Action Push_String_Extended,0x19da ; "<secondary_[@,~state]>"
0138 029d 124b | K| Declare_Subprogram For_Outer_Call,INIT_1248
013a 029d 1283 | | Declare_Subprogram For_Outer_Call,INIT_1280
013c 029d 1293 | | Declare_Subprogram For_Outer_Call,INIT_1290
013e 029d 12a3 | | Declare_Subprogram For_Outer_Call,INIT_12a0
0140 029d 12c3 | | Declare_Subprogram For_Outer_Call,INIT_12c0
0142 029d 12db | | Declare_Subprogram For_Outer_Call,INIT_12d8
0144 029d 130b | | Declare_Subprogram For_Outer_Call,INIT_1308
0146 029d 134b | K| Declare_Subprogram For_Outer_Call,INIT_1348
0148 029d 1383 | | Declare_Subprogram For_Outer_Call,INIT_1380
014a 029d 1393 | | Declare_Subprogram For_Outer_Call,INIT_1390
014c 029d 13bb | | Declare_Subprogram For_Outer_Call,INIT_13b8
014e 029d 13c3 | | Declare_Subprogram For_Outer_Call,INIT_13c0
0150 029d 13d3 | | Declare_Subprogram For_Outer_Call,INIT_13d0
0152 029d 13e3 | | Declare_Subprogram For_Outer_Call,INIT_13e0
0154 029d 13eb | | Declare_Subprogram For_Outer_Call,INIT_13e8
0156 029d 13f3 | | Declare_Subprogram For_Outer_Call,INIT_13f0
0158 029d 1423 | #| Declare_Subprogram For_Outer_Call,INIT_1420
015a 029d 1433 | 3| Declare_Subprogram For_Outer_Call,INIT_1430
015c 029d 147b | {| Declare_Subprogram For_Outer_Call,INIT_1478
015e 029d 14cb | | Declare_Subprogram For_Outer_Call,INIT_14c8
0160 029d 150b | | Declare_Subprogram For_Outer_Call,INIT_1508
0162 029d 1543 | C| Declare_Subprogram For_Outer_Call,INIT_1540
0164 029d 1573 | s| Declare_Subprogram For_Outer_Call,INIT_1570
0166 029d 15ab | | Declare_Subprogram For_Outer_Call,INIT_15a8
0168 029d 162b | +| Declare_Subprogram For_Outer_Call,INIT_1628
016a 1d7e | ~ | Execute_Immediate Reference_Lex_1,0x7e
016b 00c7 | | Action Elaborate_Subprogram
016c 1d7f | | Execute_Immediate Reference_Lex_1,0x7f
016d 00c7 | | Action Elaborate_Subprogram
016e 1d80 | | Execute_Immediate Reference_Lex_1,0x80
016f 00c7 | | Action Elaborate_Subprogram
0170 1d81 | | Execute_Immediate Reference_Lex_1,0x81
0171 00c7 | | Action Elaborate_Subprogram
0172 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0173 00c7 | | Action Elaborate_Subprogram
0174 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0175 00c7 | | Action Elaborate_Subprogram
0176 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0177 00c7 | | Action Elaborate_Subprogram
0178 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
0179 00c7 | | Action Elaborate_Subprogram
017a 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
017b 00c7 | | Action Elaborate_Subprogram
017c 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
017d 00c7 | | Action Elaborate_Subprogram
017e 1d78 | x | Execute_Immediate Reference_Lex_1,0x78
017f 00c7 | | Action Elaborate_Subprogram
0180 1d77 | w | Execute_Immediate Reference_Lex_1,0x77
0181 00c7 | | Action Elaborate_Subprogram
0182 029d 1693 | | Declare_Subprogram For_Outer_Call,INIT_1690
0184 029d 16bb | | Declare_Subprogram For_Outer_Call,INIT_16b8
0186 1d88 | | Execute_Immediate Reference_Lex_1,0x88
0187 00c7 | | Action Elaborate_Subprogram
0188 1d89 | | Execute_Immediate Reference_Lex_1,0x89
0189 00c7 | | Action Elaborate_Subprogram
018a 1d8a | | Execute_Immediate Reference_Lex_1,0x8a
018b 00c7 | | Action Elaborate_Subprogram
018c 1d8b | | Execute_Immediate Reference_Lex_1,0x8b
018d 00c7 | | Action Elaborate_Subprogram
018e 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
018f 00c7 | | Action Elaborate_Subprogram
0190 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
0191 00c7 | | Action Elaborate_Subprogram
0192 1d86 | | Execute_Immediate Reference_Lex_1,0x86
0193 00c7 | | Action Elaborate_Subprogram
0194 1d79 | y | Execute_Immediate Reference_Lex_1,0x79
0195 00c7 | | Action Elaborate_Subprogram
0196 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
0197 00c7 | | Action Elaborate_Subprogram
0198 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0199 00c7 | | Action Elaborate_Subprogram
019a 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
019b 00c7 | | Action Elaborate_Subprogram
019c 029d 16d3 | | Declare_Subprogram For_Outer_Call,INIT_16d0
019e 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
019f 00c7 | | Action Elaborate_Subprogram
01a0 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
01a1 00c7 | | Action Elaborate_Subprogram
01a2 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
01a3 00c7 | | Action Elaborate_Subprogram
01a4 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
01a5 00c7 | | Action Elaborate_Subprogram
01a6 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e
01a7 00c7 | | Action Elaborate_Subprogram
01a8 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f
01a9 00c7 | | Action Elaborate_Subprogram
01aa 1d70 | p | Execute_Immediate Reference_Lex_1,0x70
01ab 00c7 | | Action Elaborate_Subprogram
01ac 1d71 | q | Execute_Immediate Reference_Lex_1,0x71
01ad 00c7 | | Action Elaborate_Subprogram
01ae 1d73 | s | Execute_Immediate Reference_Lex_1,0x73
01af 00c7 | | Action Elaborate_Subprogram
01b0 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
01b1 00c7 | | Action Elaborate_Subprogram
01b2 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
01b3 00c7 | | Action Elaborate_Subprogram
01b4 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
01b5 00c7 | | Action Elaborate_Subprogram
01b6 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d
01b7 00c7 | | Action Elaborate_Subprogram
01b8 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d
01b9 00c7 | | Action Elaborate_Subprogram
01ba 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e
01bb 00c7 | | Action Elaborate_Subprogram
01bc 1d82 | | Execute_Immediate Reference_Lex_1,0x82
01bd 00c7 | | Action Elaborate_Subprogram
01be 1d83 | | Execute_Immediate Reference_Lex_1,0x83
01bf 00c7 | | Action Elaborate_Subprogram
01c0 1d84 | | Execute_Immediate Reference_Lex_1,0x84
01c1 00c7 | | Action Elaborate_Subprogram
01c2 1d87 | | Execute_Immediate Reference_Lex_1,0x87
01c3 00c7 | | Action Elaborate_Subprogram
01c4 BODY_0008:
01c4 00bc | | Action Signal_Activated
01c5 00bb | | Action Signal_Completion
01c6 0000 0000 | | .XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01db | | .CONST 0x01db ; Address of begin
01c9 0212 | | .CONST 0x0212 ; Address of exception handler
01ca 0004 | | .CONST 0x0004 ; Number of locals
01cb INIT_01c8:
01cb e002 | | Load 0x0,0x2
01cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cd e001 | | Load 0x0,0x1
01ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01d0 e003 | | Load 0x0,0x3
01d1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
01d2 0322 | " | Declare_Variable Record
01d3 e5fd | | Load 0x2,-0x3
01d4 e5fe | | Load 0x2,-0x2
01d5 e004 | | Load 0x0,0x4
01d6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01d7 e003 | | Load 0x0,0x3
01d8 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
01d9 00d9 | | Load_Top At_Offset_1
01da 017d | } | Execute Record,Structure_Write
01db BODY_01c8:
01db e5fd | | Load 0x2,-0x3
01dc 0092 19db | | Action Push_String_Extended,0x19db ; "Rcf_Unit.Display_Unit_Options"
01de e005 | | Load 0x0,0x5
01df 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e0 e001 | | Load 0x0,0x1
01e1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e2 e002 | | Load 0x0,0x2
01e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e4 e5fd | | Load 0x2,-0x3
01e5 4800 |H | Short_Literal 0x0
01e6 4801 |H | Short_Literal 0x1
01e7 4800 |H | Short_Literal 0x0
01e8 e404 | | Load 0x2,0x4
01e9 e5ff | | Load 0x2,-0x1
01ea e002 | | Load 0x0,0x2
01eb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01ec c402 | | Store 0x2,0x2
01ed 005a | Z | Store_Top Discrete,At_Offset_2
01ee 00d9 | | Load_Top At_Offset_1
01ef 6803 |h | Jump_Zero 0x1f3
01f0 00d9 | | Load_Top At_Offset_1
01f1 a5fc | | Store_Unchecked 0x2,-0x4
01f2 4504 |E | Exit_Subprogram 0x4
01f3 00da | | Load_Top At_Offset_2
01f4 e002 | | Load 0x0,0x2
01f5 180f | | Execute Package,Field_Execute,Field_Number 0xf
01f6 680d |h | Jump_Zero 0x204
01f7 e5fd | | Load 0x2,-0x3
01f8 e006 | | Load 0x0,0x6
01f9 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01fa 6045 |`E | Indirect_Literal Discrete,0x240,{0x00000000, 0x00008147}
01fb e001 | | Load 0x0,0x1
01fc 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01fd e006 | | Load 0x0,0x6
01fe 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01ff 6040 |`@ | Indirect_Literal Discrete,0x240,{0x00000000, 0x00008147}
0200 e001 | | Load 0x0,0x1
0201 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0202 a5fc | | Store_Unchecked 0x2,-0x4
0203 4504 |E | Exit_Subprogram 0x4
0204 00da | | Load_Top At_Offset_2
0205 e5fd | | Load 0x2,-0x3
0206 e5fe | | Load 0x2,-0x2
0207 e007 | | Load 0x0,0x7
0208 180d | | Execute Package,Field_Execute,Field_Number 0xd
0209 e001 | | Load 0x0,0x1
020a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020b 00db | | Load_Top At_Offset_3
020c e5fd | | Load 0x2,-0x3
020d e002 | | Load 0x0,0x2
020e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
020f c402 | | Store 0x2,0x2
0210 c5fc | | Store 0x2,-0x4
0211 4504 |E | Exit_Subprogram 0x4
0212 TRAP_01c8:
0212 e001 | | Load 0x0,0x1
0213 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0214 010f | | Execute Exception,Equal
0215 6810 |h | Jump_Zero 0x226
0216 e001 | | Load 0x0,0x1
0217 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0218 a5fc | | Store_Unchecked 0x2,-0x4
0219 00db | | Load_Top At_Offset_3
021a e002 | | Load 0x0,0x2
021b 180f | | Execute Package,Field_Execute,Field_Number 0xf
021c 7008 |p | Jump_Nonzero 0x225
021d e001 | | Load 0x0,0x1
021e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021f e402 | | Load 0x2,0x2
0220 e5fd | | Load 0x2,-0x3
0221 e002 | | Load 0x0,0x2
0222 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0223 c402 | | Store 0x2,0x2
0224 005b | [ | Store_Top Discrete,At_Offset_3
0225 4504 |E | Exit_Subprogram 0x4
0226 e5fd | | Load 0x2,-0x3
0227 0092 19db | | Action Push_String_Extended,0x19db ; "Rcf_Unit.Display_Unit_Options"
0229 e005 | | Load 0x0,0x5
022a 180f | | Execute Package,Field_Execute,Field_Number 0xf
022b 0092 19db | | Action Push_String_Extended,0x19db ; "Rcf_Unit.Display_Unit_Options"
022d e005 | | Load 0x0,0x5
022e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022f a5fc | | Store_Unchecked 0x2,-0x4
0230 00db | | Load_Top At_Offset_3
0231 e002 | | Load 0x0,0x2
0232 180f | | Execute Package,Field_Execute,Field_Number 0xf
0233 7008 |p | Jump_Nonzero 0x23c
0234 e001 | | Load 0x0,0x1
0235 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0236 e402 | | Load 0x2,0x2
0237 e5fd | | Load 0x2,-0x3
0238 e002 | | Load 0x0,0x2
0239 1817 | | Execute Package,Field_Execute,Field_Number 0x17
023a c402 | | Store 0x2,0x2
023b 005b | [ | Store_Top Discrete,At_Offset_3
023c 4504 |E | Exit_Subprogram 0x4
023d 0000 0000 | | .XXX[0x3]
023f 0000 | |
0240 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
0244 0000 0000 | | .BLANK 0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 025b | [ | .CONST 0x025b ; Address of begin
0249 0294 | | .CONST 0x0294 ; Address of exception handler
024a 0004 | | .CONST 0x0004 ; Number of locals
024b INIT_0248:
024b e002 | | Load 0x0,0x2
024c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024d e001 | | Load 0x0,0x1
024e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0250 e003 | | Load 0x0,0x3
0251 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
0252 0322 | " | Declare_Variable Record
0253 e5fb | | Load 0x2,-0x5
0254 e5fe | | Load 0x2,-0x2
0255 e004 | | Load 0x0,0x4
0256 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0257 e003 | | Load 0x0,0x3
0258 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0259 00d9 | | Load_Top At_Offset_1
025a 017d | } | Execute Record,Structure_Write
025b BODY_0248:
025b e5fb | | Load 0x2,-0x5
025c 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
025e e005 | | Load 0x0,0x5
025f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0260 e001 | | Load 0x0,0x1
0261 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0262 e002 | | Load 0x0,0x2
0263 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0264 e5fb | | Load 0x2,-0x5
0265 4800 |H | Short_Literal 0x0
0266 4801 |H | Short_Literal 0x1
0267 4801 |H | Short_Literal 0x1
0268 e404 | | Load 0x2,0x4
0269 e5ff | | Load 0x2,-0x1
026a e002 | | Load 0x0,0x2
026b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
026c c402 | | Store 0x2,0x2
026d 005a | Z | Store_Top Discrete,At_Offset_2
026e 00d9 | | Load_Top At_Offset_1
026f 6803 |h | Jump_Zero 0x273
0270 00d9 | | Load_Top At_Offset_1
0271 a5fa | | Store_Unchecked 0x2,-0x6
0272 4506 |E | Exit_Subprogram 0x6
0273 00da | | Load_Top At_Offset_2
0274 e002 | | Load 0x0,0x2
0275 180f | | Execute Package,Field_Execute,Field_Number 0xf
0276 680d |h | Jump_Zero 0x284
0277 e5fb | | Load 0x2,-0x5
0278 e006 | | Load 0x0,0x6
0279 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
027a 67c5 |g | Indirect_Literal Discrete,0x240,{0x00000000, 0x00008147}
027b e001 | | Load 0x0,0x1
027c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
027d e006 | | Load 0x0,0x6
027e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
027f 67c0 |g | Indirect_Literal Discrete,0x240,{0x00000000, 0x00008147}
0280 e001 | | Load 0x0,0x1
0281 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0282 a5fa | | Store_Unchecked 0x2,-0x6
0283 4506 |E | Exit_Subprogram 0x6
0284 00da | | Load_Top At_Offset_2
0285 e5fb | | Load 0x2,-0x5
0286 e5fc | | Load 0x2,-0x4
0287 e5fd | | Load 0x2,-0x3
0288 e5fe | | Load 0x2,-0x2
0289 e007 | | Load 0x0,0x7
028a 180e | | Execute Package,Field_Execute,Field_Number 0xe
028b e001 | | Load 0x0,0x1
028c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028d 00db | | Load_Top At_Offset_3
028e e5fb | | Load 0x2,-0x5
028f e002 | | Load 0x0,0x2
0290 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0291 c402 | | Store 0x2,0x2
0292 c5fa | | Store 0x2,-0x6
0293 4506 |E | Exit_Subprogram 0x6
0294 TRAP_0248:
0294 e001 | | Load 0x0,0x1
0295 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0296 010f | | Execute Exception,Equal
0297 6810 |h | Jump_Zero 0x2a8
0298 e001 | | Load 0x0,0x1
0299 181b | | Execute Package,Field_Execute,Field_Number 0x1b
029a a5fa | | Store_Unchecked 0x2,-0x6
029b 00db | | Load_Top At_Offset_3
029c e002 | | Load 0x0,0x2
029d 180f | | Execute Package,Field_Execute,Field_Number 0xf
029e 7008 |p | Jump_Nonzero 0x2a7
029f e001 | | Load 0x0,0x1
02a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a1 e402 | | Load 0x2,0x2
02a2 e5fb | | Load 0x2,-0x5
02a3 e002 | | Load 0x0,0x2
02a4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02a5 c402 | | Store 0x2,0x2
02a6 005b | [ | Store_Top Discrete,At_Offset_3
02a7 4506 |E | Exit_Subprogram 0x6
02a8 e5fb | | Load 0x2,-0x5
02a9 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
02ab e005 | | Load 0x0,0x5
02ac 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ad 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
02af e005 | | Load 0x0,0x5
02b0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b1 a5fa | | Store_Unchecked 0x2,-0x6
02b2 00db | | Load_Top At_Offset_3
02b3 e002 | | Load 0x0,0x2
02b4 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b5 7008 |p | Jump_Nonzero 0x2be
02b6 e001 | | Load 0x0,0x1
02b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b8 e402 | | Load 0x2,0x2
02b9 e5fb | | Load 0x2,-0x5
02ba e002 | | Load 0x0,0x2
02bb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02bc c402 | | Store 0x2,0x2
02bd 005b | [ | Store_Top Discrete,At_Offset_3
02be 4506 |E | Exit_Subprogram 0x6
02bf 0000 | | .XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02d3 | | .CONST 0x02d3 ; Address of begin
02c1 030c | | .CONST 0x030c ; Address of exception handler
02c2 0004 | | .CONST 0x0004 ; Number of locals
02c3 INIT_02c0:
02c3 e002 | | Load 0x0,0x2
02c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c5 e001 | | Load 0x0,0x1
02c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02c8 e003 | | Load 0x0,0x3
02c9 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
02ca 0322 | " | Declare_Variable Record
02cb e5fb | | Load 0x2,-0x5
02cc e5fe | | Load 0x2,-0x2
02cd e004 | | Load 0x0,0x4
02ce 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02cf e003 | | Load 0x0,0x3
02d0 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
02d1 00d9 | | Load_Top At_Offset_1
02d2 017d | } | Execute Record,Structure_Write
02d3 BODY_02c0:
02d3 e5fb | | Load 0x2,-0x5
02d4 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
02d6 e005 | | Load 0x0,0x5
02d7 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d8 e001 | | Load 0x0,0x1
02d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02da e002 | | Load 0x0,0x2
02db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02dc e5fb | | Load 0x2,-0x5
02dd 4800 |H | Short_Literal 0x0
02de 4801 |H | Short_Literal 0x1
02df 4801 |H | Short_Literal 0x1
02e0 e404 | | Load 0x2,0x4
02e1 e5ff | | Load 0x2,-0x1
02e2 e002 | | Load 0x0,0x2
02e3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02e4 c402 | | Store 0x2,0x2
02e5 005a | Z | Store_Top Discrete,At_Offset_2
02e6 00d9 | | Load_Top At_Offset_1
02e7 6803 |h | Jump_Zero 0x2eb
02e8 00d9 | | Load_Top At_Offset_1
02e9 a5fa | | Store_Unchecked 0x2,-0x6
02ea 4506 |E | Exit_Subprogram 0x6
02eb 00da | | Load_Top At_Offset_2
02ec e002 | | Load 0x0,0x2
02ed 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ee 680d |h | Jump_Zero 0x2fc
02ef e5fb | | Load 0x2,-0x5
02f0 e006 | | Load 0x0,0x6
02f1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02f2 6045 |`E | Indirect_Literal Discrete,0x338,{0x00000000, 0x00008147}
02f3 e001 | | Load 0x0,0x1
02f4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02f5 e006 | | Load 0x0,0x6
02f6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02f7 6040 |`@ | Indirect_Literal Discrete,0x338,{0x00000000, 0x00008147}
02f8 e001 | | Load 0x0,0x1
02f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02fa a5fa | | Store_Unchecked 0x2,-0x6
02fb 4506 |E | Exit_Subprogram 0x6
02fc 00da | | Load_Top At_Offset_2
02fd e5fb | | Load 0x2,-0x5
02fe e5fc | | Load 0x2,-0x4
02ff e5fd | | Load 0x2,-0x3
0300 e5fe | | Load 0x2,-0x2
0301 e007 | | Load 0x0,0x7
0302 180f | | Execute Package,Field_Execute,Field_Number 0xf
0303 e001 | | Load 0x0,0x1
0304 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0305 00db | | Load_Top At_Offset_3
0306 e5fb | | Load 0x2,-0x5
0307 e002 | | Load 0x0,0x2
0308 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0309 c402 | | Store 0x2,0x2
030a c5fa | | Store 0x2,-0x6
030b 4506 |E | Exit_Subprogram 0x6
030c TRAP_02c0:
030c e001 | | Load 0x0,0x1
030d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
030e 010f | | Execute Exception,Equal
030f 6810 |h | Jump_Zero 0x320
0310 e001 | | Load 0x0,0x1
0311 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0312 a5fa | | Store_Unchecked 0x2,-0x6
0313 00db | | Load_Top At_Offset_3
0314 e002 | | Load 0x0,0x2
0315 180f | | Execute Package,Field_Execute,Field_Number 0xf
0316 7008 |p | Jump_Nonzero 0x31f
0317 e001 | | Load 0x0,0x1
0318 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0319 e402 | | Load 0x2,0x2
031a e5fb | | Load 0x2,-0x5
031b e002 | | Load 0x0,0x2
031c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
031d c402 | | Store 0x2,0x2
031e 005b | [ | Store_Top Discrete,At_Offset_3
031f 4506 |E | Exit_Subprogram 0x6
0320 e5fb | | Load 0x2,-0x5
0321 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
0323 e005 | | Load 0x0,0x5
0324 180f | | Execute Package,Field_Execute,Field_Number 0xf
0325 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
0327 e005 | | Load 0x0,0x5
0328 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0329 a5fa | | Store_Unchecked 0x2,-0x6
032a 00db | | Load_Top At_Offset_3
032b e002 | | Load 0x0,0x2
032c 180f | | Execute Package,Field_Execute,Field_Number 0xf
032d 7008 |p | Jump_Nonzero 0x336
032e e001 | | Load 0x0,0x1
032f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0330 e402 | | Load 0x2,0x2
0331 e5fb | | Load 0x2,-0x5
0332 e002 | | Load 0x0,0x2
0333 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0334 c402 | | Store 0x2,0x2
0335 005b | [ | Store_Top Discrete,At_Offset_3
0336 4506 |E | Exit_Subprogram 0x6
0337 0000 | | .XXX[0x1]
0338 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
033c 0000 0000 | | .BLANK 0000[0x4]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0353 | S | .CONST 0x0353 ; Address of begin
0341 038b | | .CONST 0x038b ; Address of exception handler
0342 0004 | | .CONST 0x0004 ; Number of locals
0343 INIT_0340:
0343 e002 | | Load 0x0,0x2
0344 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0345 e001 | | Load 0x0,0x1
0346 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0347 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0348 e003 | | Load 0x0,0x3
0349 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
034a 0322 | " | Declare_Variable Record
034b e5fc | | Load 0x2,-0x4
034c e5fe | | Load 0x2,-0x2
034d e004 | | Load 0x0,0x4
034e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
034f e003 | | Load 0x0,0x3
0350 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0351 00d9 | | Load_Top At_Offset_1
0352 017d | } | Execute Record,Structure_Write
0353 BODY_0340:
0353 e5fc | | Load 0x2,-0x4
0354 0092 19dd | | Action Push_String_Extended,0x19dd ; "Rcf_Unit.Remove_Unit_Options"
0356 e005 | | Load 0x0,0x5
0357 180e | | Execute Package,Field_Execute,Field_Number 0xe
0358 e001 | | Load 0x0,0x1
0359 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035a e002 | | Load 0x0,0x2
035b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035c e5fc | | Load 0x2,-0x4
035d 4800 |H | Short_Literal 0x0
035e 4801 |H | Short_Literal 0x1
035f 4801 |H | Short_Literal 0x1
0360 e404 | | Load 0x2,0x4
0361 e5ff | | Load 0x2,-0x1
0362 e002 | | Load 0x0,0x2
0363 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0364 c402 | | Store 0x2,0x2
0365 005a | Z | Store_Top Discrete,At_Offset_2
0366 00d9 | | Load_Top At_Offset_1
0367 6803 |h | Jump_Zero 0x36b
0368 00d9 | | Load_Top At_Offset_1
0369 a5fb | | Store_Unchecked 0x2,-0x5
036a 4505 |E | Exit_Subprogram 0x5
036b 00da | | Load_Top At_Offset_2
036c e002 | | Load 0x0,0x2
036d 180f | | Execute Package,Field_Execute,Field_Number 0xf
036e 680d |h | Jump_Zero 0x37c
036f e5fc | | Load 0x2,-0x4
0370 e006 | | Load 0x0,0x6
0371 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0372 67c5 |g | Indirect_Literal Discrete,0x338,{0x00000000, 0x00008147}
0373 e001 | | Load 0x0,0x1
0374 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0375 e006 | | Load 0x0,0x6
0376 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0377 67c0 |g | Indirect_Literal Discrete,0x338,{0x00000000, 0x00008147}
0378 e001 | | Load 0x0,0x1
0379 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037a a5fb | | Store_Unchecked 0x2,-0x5
037b 4505 |E | Exit_Subprogram 0x5
037c 00da | | Load_Top At_Offset_2
037d e5fc | | Load 0x2,-0x4
037e e5fd | | Load 0x2,-0x3
037f e5fe | | Load 0x2,-0x2
0380 e007 | | Load 0x0,0x7
0381 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0382 e001 | | Load 0x0,0x1
0383 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0384 00db | | Load_Top At_Offset_3
0385 e5fc | | Load 0x2,-0x4
0386 e002 | | Load 0x0,0x2
0387 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0388 c402 | | Store 0x2,0x2
0389 c5fb | | Store 0x2,-0x5
038a 4505 |E | Exit_Subprogram 0x5
038b TRAP_0340:
038b e001 | | Load 0x0,0x1
038c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
038d 010f | | Execute Exception,Equal
038e 6810 |h | Jump_Zero 0x39f
038f e001 | | Load 0x0,0x1
0390 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0391 a5fb | | Store_Unchecked 0x2,-0x5
0392 00db | | Load_Top At_Offset_3
0393 e002 | | Load 0x0,0x2
0394 180f | | Execute Package,Field_Execute,Field_Number 0xf
0395 7008 |p | Jump_Nonzero 0x39e
0396 e001 | | Load 0x0,0x1
0397 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0398 e402 | | Load 0x2,0x2
0399 e5fc | | Load 0x2,-0x4
039a e002 | | Load 0x0,0x2
039b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
039c c402 | | Store 0x2,0x2
039d 005b | [ | Store_Top Discrete,At_Offset_3
039e 4505 |E | Exit_Subprogram 0x5
039f e5fc | | Load 0x2,-0x4
03a0 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
03a2 e005 | | Load 0x0,0x5
03a3 180f | | Execute Package,Field_Execute,Field_Number 0xf
03a4 0092 19dc | | Action Push_String_Extended,0x19dc ; "Rcf_Unit.Set_Unit_Options"
03a6 e005 | | Load 0x0,0x5
03a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a8 a5fb | | Store_Unchecked 0x2,-0x5
03a9 00db | | Load_Top At_Offset_3
03aa e002 | | Load 0x0,0x2
03ab 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ac 7008 |p | Jump_Nonzero 0x3b5
03ad e001 | | Load 0x0,0x1
03ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03af e402 | | Load 0x2,0x2
03b0 e5fc | | Load 0x2,-0x4
03b1 e002 | | Load 0x0,0x2
03b2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03b3 c402 | | Store 0x2,0x2
03b4 005b | [ | Store_Top Discrete,At_Offset_3
03b5 4505 |E | Exit_Subprogram 0x5
03b6 0000 0000 | | .XXX[0x2]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03cd | | .CONST 0x03cd ; Address of begin
03b9 03fc | | .CONST 0x03fc ; Address of exception handler
03ba 0006 | | .CONST 0x0006 ; Number of locals
03bb INIT_03b8:
03bb e002 | | Load 0x0,0x2
03bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03bd e001 | | Load 0x0,0x1
03be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03bf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03c0 4800 |H | Short_Literal 0x0
03c1 e20d | | Load 0x1,0xd
03c2 1c08 | | Execute_Immediate Run_Utility,0x8
03c3 e003 | | Load 0x0,0x3
03c4 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
03c5 0322 | " | Declare_Variable Record
03c6 e5fd | | Load 0x2,-0x3
03c7 e003 | | Load 0x0,0x3
03c8 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
03c9 00d9 | | Load_Top At_Offset_1
03ca 017d | } | Execute Record,Structure_Write
03cb 029f 172b | +| Declare_Subprogram For_Call,INIT_1728
03cd BODY_03b8:
03cd e5fc | | Load 0x2,-0x4
03ce 0092 19de | | Action Push_String_Extended,0x19de ; "Rcf_Unit.Remote_Unit_Name"
03d0 e005 | | Load 0x0,0x5
03d1 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d2 e001 | | Load 0x0,0x1
03d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d4 e002 | | Load 0x0,0x2
03d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d6 e5fc | | Load 0x2,-0x4
03d7 4801 |H | Short_Literal 0x1
03d8 4801 |H | Short_Literal 0x1
03d9 4800 |H | Short_Literal 0x0
03da e405 | | Load 0x2,0x5
03db e5ff | | Load 0x2,-0x1
03dc e002 | | Load 0x0,0x2
03dd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03de c402 | | Store 0x2,0x2
03df c403 | | Store 0x2,0x3
03e0 00db | | Load_Top At_Offset_3
03e1 6805 |h | Jump_Zero 0x3e7
03e2 00db | | Load_Top At_Offset_3
03e3 00db | | Load_Top At_Offset_3
03e4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03e5 00da | | Load_Top At_Offset_2
03e6 4404 |D | Exit_Subprogram With_Result,0x4
03e7 e402 | | Load 0x2,0x2
03e8 e002 | | Load 0x0,0x2
03e9 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ea 680f |h | Jump_Zero 0x3fa
03eb e5fc | | Load 0x2,-0x4
03ec e006 | | Load 0x0,0x6
03ed 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
03ee 603d |`= | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008147}
03ef e001 | | Load 0x0,0x1
03f0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03f1 e006 | | Load 0x0,0x6
03f2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
03f3 6038 |`8 | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008147}
03f4 e001 | | Load 0x0,0x1
03f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03f6 00db | | Load_Top At_Offset_3
03f7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03f8 00da | | Load_Top At_Offset_2
03f9 4404 |D | Exit_Subprogram With_Result,0x4
03fa 8406 | | Call 0x2,0x6
03fb 0831 | 1 | Execute_Immediate Raise,0x31
03fc TRAP_03b8:
03fc e001 | | Load 0x0,0x1
03fd 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03fe 010f | | Execute Exception,Equal
03ff 6812 |h | Jump_Zero 0x412
0400 e001 | | Load 0x0,0x1
0401 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0402 e404 | | Load 0x2,0x4
0403 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0404 e402 | | Load 0x2,0x2
0405 e002 | | Load 0x0,0x2
0406 180f | | Execute Package,Field_Execute,Field_Number 0xf
0407 7008 |p | Jump_Nonzero 0x410
0408 e001 | | Load 0x0,0x1
0409 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040a e402 | | Load 0x2,0x2
040b e5fc | | Load 0x2,-0x4
040c e002 | | Load 0x0,0x2
040d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
040e c402 | | Store 0x2,0x2
040f c403 | | Store 0x2,0x3
0410 00db | | Load_Top At_Offset_3
0411 4404 |D | Exit_Subprogram With_Result,0x4
0412 e5fc | | Load 0x2,-0x4
0413 0092 19de | | Action Push_String_Extended,0x19de ; "Rcf_Unit.Remote_Unit_Name"
0415 e005 | | Load 0x0,0x5
0416 180f | | Execute Package,Field_Execute,Field_Number 0xf
0417 0092 19de | | Action Push_String_Extended,0x19de ; "Rcf_Unit.Remote_Unit_Name"
0419 e005 | | Load 0x0,0x5
041a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
041b e404 | | Load 0x2,0x4
041c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
041d e402 | | Load 0x2,0x2
041e e002 | | Load 0x0,0x2
041f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0420 7008 |p | Jump_Nonzero 0x429
0421 e001 | | Load 0x0,0x1
0422 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0423 e402 | | Load 0x2,0x2
0424 e5fc | | Load 0x2,-0x4
0425 e002 | | Load 0x0,0x2
0426 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0427 c402 | | Store 0x2,0x2
0428 c403 | | Store 0x2,0x3
0429 00db | | Load_Top At_Offset_3
042a 4404 |D | Exit_Subprogram With_Result,0x4
042b 0000 | | .XXX[0x1]
042c 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0444 | D | .CONST 0x0444 ; Address of begin
0431 0473 | s | .CONST 0x0473 ; Address of exception handler
0432 0006 | | .CONST 0x0006 ; Number of locals
0433 INIT_0430:
0433 e002 | | Load 0x0,0x2
0434 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0435 e001 | | Load 0x0,0x1
0436 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0437 4800 |H | Short_Literal 0x0
0438 e20d | | Load 0x1,0xd
0439 1c08 | | Execute_Immediate Run_Utility,0x8
043a e003 | | Load 0x0,0x3
043b 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
043c 0322 | " | Declare_Variable Record
043d e5fe | | Load 0x2,-0x2
043e e003 | | Load 0x0,0x3
043f 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0440 00d9 | | Load_Top At_Offset_1
0441 017d | } | Execute Record,Structure_Write
0442 029f 175b | [| Declare_Subprogram For_Call,INIT_1758
0444 BODY_0430:
0444 e5fc | | Load 0x2,-0x4
0445 0092 19df | | Action Push_String_Extended,0x19df ; "Rcf_Unit.Full_Remote_Unit_Name"
0447 e005 | | Load 0x0,0x5
0448 180e | | Execute Package,Field_Execute,Field_Number 0xe
0449 e001 | | Load 0x0,0x1
044a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044b e002 | | Load 0x0,0x2
044c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044d e5fc | | Load 0x2,-0x4
044e 4801 |H | Short_Literal 0x1
044f 4801 |H | Short_Literal 0x1
0450 4800 |H | Short_Literal 0x0
0451 e405 | | Load 0x2,0x5
0452 e5ff | | Load 0x2,-0x1
0453 e002 | | Load 0x0,0x2
0454 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0455 c402 | | Store 0x2,0x2
0456 c403 | | Store 0x2,0x3
0457 00db | | Load_Top At_Offset_3
0458 6805 |h | Jump_Zero 0x45e
0459 00db | | Load_Top At_Offset_3
045a 00db | | Load_Top At_Offset_3
045b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
045c 00da | | Load_Top At_Offset_2
045d 4404 |D | Exit_Subprogram With_Result,0x4
045e e402 | | Load 0x2,0x2
045f e002 | | Load 0x0,0x2
0460 180f | | Execute Package,Field_Execute,Field_Number 0xf
0461 680f |h | Jump_Zero 0x471
0462 e5fc | | Load 0x2,-0x4
0463 e006 | | Load 0x0,0x6
0464 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0465 67c6 |g | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008147}
0466 e001 | | Load 0x0,0x1
0467 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0468 e006 | | Load 0x0,0x6
0469 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
046a 67c1 |g | Indirect_Literal Discrete,0x42c,{0x00000000, 0x00008147}
046b e001 | | Load 0x0,0x1
046c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
046d 00db | | Load_Top At_Offset_3
046e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
046f 00da | | Load_Top At_Offset_2
0470 4404 |D | Exit_Subprogram With_Result,0x4
0471 8406 | | Call 0x2,0x6
0472 0831 | 1 | Execute_Immediate Raise,0x31
0473 TRAP_0430:
0473 e001 | | Load 0x0,0x1
0474 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0475 010f | | Execute Exception,Equal
0476 6812 |h | Jump_Zero 0x489
0477 e001 | | Load 0x0,0x1
0478 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0479 e404 | | Load 0x2,0x4
047a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
047b e402 | | Load 0x2,0x2
047c e002 | | Load 0x0,0x2
047d 180f | | Execute Package,Field_Execute,Field_Number 0xf
047e 7008 |p | Jump_Nonzero 0x487
047f e001 | | Load 0x0,0x1
0480 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0481 e402 | | Load 0x2,0x2
0482 e5fc | | Load 0x2,-0x4
0483 e002 | | Load 0x0,0x2
0484 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0485 c402 | | Store 0x2,0x2
0486 c403 | | Store 0x2,0x3
0487 00db | | Load_Top At_Offset_3
0488 4404 |D | Exit_Subprogram With_Result,0x4
0489 e5fc | | Load 0x2,-0x4
048a 0092 19df | | Action Push_String_Extended,0x19df ; "Rcf_Unit.Full_Remote_Unit_Name"
048c e005 | | Load 0x0,0x5
048d 180f | | Execute Package,Field_Execute,Field_Number 0xf
048e 0092 19df | | Action Push_String_Extended,0x19df ; "Rcf_Unit.Full_Remote_Unit_Name"
0490 e005 | | Load 0x0,0x5
0491 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0492 e404 | | Load 0x2,0x4
0493 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0494 e402 | | Load 0x2,0x2
0495 e002 | | Load 0x0,0x2
0496 180f | | Execute Package,Field_Execute,Field_Number 0xf
0497 7008 |p | Jump_Nonzero 0x4a0
0498 e001 | | Load 0x0,0x1
0499 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049a e402 | | Load 0x2,0x2
049b e5fc | | Load 0x2,-0x4
049c e002 | | Load 0x0,0x2
049d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
049e c402 | | Store 0x2,0x2
049f c403 | | Store 0x2,0x3
04a0 00db | | Load_Top At_Offset_3
04a1 4404 |D | Exit_Subprogram With_Result,0x4
04a2 0000 0000 | | .BLANK 0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04c5 | | .CONST 0x04c5 ; Address of begin
04a9 04cd | | .CONST 0x04cd ; Address of exception handler
04aa 0006 | | .CONST 0x0006 ; Number of locals
04ab INIT_04a8:
04ab e003 | | Load 0x0,0x3
04ac 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
04ad 0322 | " | Declare_Variable Record
04ae e5fe | | Load 0x2,-0x2
04af e003 | | Load 0x0,0x3
04b0 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
04b1 00d9 | | Load_Top At_Offset_1
04b2 017d | } | Execute Record,Structure_Write
04b3 e5fc | | Load 0x2,-0x4
04b4 e5fe | | Load 0x2,-0x2
04b5 e5ff | | Load 0x2,-0x1
04b6 e008 | | Load 0x0,0x8
04b7 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04b8 00d8 | | Load_Top At_Offset_0
04b9 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
04ba e5fd | | Load 0x2,-0x3
04bb 00db | | Load_Top At_Offset_3
04bc e003 | | Load 0x0,0x3
04bd 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
04be 4800 |H | Short_Literal 0x0
04bf e20d | | Load 0x1,0xd
04c0 1c08 | | Execute_Immediate Run_Utility,0x8
04c1 00d9 | | Load_Top At_Offset_1
04c2 01db | | Execute Vector,Length
04c3 e20d | | Load 0x1,0xd
04c4 1c08 | | Execute_Immediate Run_Utility,0x8
04c5 BODY_04a8:
04c5 00da | | Load_Top At_Offset_2
04c6 00d9 | | Load_Top At_Offset_1
04c7 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
04c8 4800 |H | Short_Literal 0x0
04c9 00d9 | | Load_Top At_Offset_1
04ca 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04cb 00d8 | | Load_Top At_Offset_0
04cc 4404 |D | Exit_Subprogram With_Result,0x4
04cd TRAP_04a8:
04cd e001 | | Load 0x0,0x1
04ce 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04cf 010f | | Execute Exception,Equal
04d0 6806 |h | Jump_Zero 0x4d7
04d1 e001 | | Load 0x0,0x1
04d2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04d3 00db | | Load_Top At_Offset_3
04d4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04d5 00da | | Load_Top At_Offset_2
04d6 4404 |D | Exit_Subprogram With_Result,0x4
04d7 e5fc | | Load 0x2,-0x4
04d8 0092 19df | | Action Push_String_Extended,0x19df ; "Rcf_Unit.Full_Remote_Unit_Name"
04da e005 | | Load 0x0,0x5
04db 180f | | Execute Package,Field_Execute,Field_Number 0xf
04dc 0092 19e0 | | Action Push_String_Extended,0x19e0 ; "Full_Remote_Unit_Name"
04de e005 | | Load 0x0,0x5
04df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04e0 00db | | Load_Top At_Offset_3
04e1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04e2 00da | | Load_Top At_Offset_2
04e3 4404 |D | Exit_Subprogram With_Result,0x4
04e4 0000 0000 | | .BLANK 0000[0x4]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f8 | | .CONST 0x04f8 ; Address of begin
04e9 0543 | C | .CONST 0x0543 ; Address of exception handler
04ea 0004 | | .CONST 0x0004 ; Number of locals
04eb INIT_04e8:
04eb e002 | | Load 0x0,0x2
04ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ed e001 | | Load 0x0,0x1
04ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04f0 e003 | | Load 0x0,0x3
04f1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
04f2 0322 | " | Declare_Variable Record
04f3 e5fc | | Load 0x2,-0x4
04f4 e003 | | Load 0x0,0x3
04f5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
04f6 00d9 | | Load_Top At_Offset_1
04f7 017d | } | Execute Record,Structure_Write
04f8 BODY_04e8:
04f8 e5fb | | Load 0x2,-0x5
04f9 0092 19e1 | | Action Push_String_Extended,0x19e1 ; "Rcf_Unit.Set_Remote_Unit_Name"
04fb e005 | | Load 0x0,0x5
04fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
04fd e001 | | Load 0x0,0x1
04fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ff e002 | | Load 0x0,0x2
0500 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0501 e5fb | | Load 0x2,-0x5
0502 4800 |H | Short_Literal 0x0
0503 4801 |H | Short_Literal 0x1
0504 4801 |H | Short_Literal 0x1
0505 e404 | | Load 0x2,0x4
0506 e5ff | | Load 0x2,-0x1
0507 e002 | | Load 0x0,0x2
0508 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0509 c402 | | Store 0x2,0x2
050a 005a | Z | Store_Top Discrete,At_Offset_2
050b 00d9 | | Load_Top At_Offset_1
050c 6803 |h | Jump_Zero 0x510
050d 00d9 | | Load_Top At_Offset_1
050e a5fa | | Store_Unchecked 0x2,-0x6
050f 4506 |E | Exit_Subprogram 0x6
0510 00da | | Load_Top At_Offset_2
0511 e002 | | Load 0x0,0x2
0512 180f | | Execute Package,Field_Execute,Field_Number 0xf
0513 680d |h | Jump_Zero 0x521
0514 e5fb | | Load 0x2,-0x5
0515 e006 | | Load 0x0,0x6
0516 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0517 6058 |`X | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008147}
0518 e001 | | Load 0x0,0x1
0519 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
051a e006 | | Load 0x0,0x6
051b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
051c 6053 |`S | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008147}
051d e001 | | Load 0x0,0x1
051e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
051f a5fa | | Store_Unchecked 0x2,-0x6
0520 4506 |E | Exit_Subprogram 0x6
0521 e001 | | Load 0x0,0x1
0522 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0523 00db | | Load_Top At_Offset_3
0524 e5fb | | Load 0x2,-0x5
0525 00db | | Load_Top At_Offset_3
0526 e5fd | | Load 0x2,-0x3
0527 e5fe | | Load 0x2,-0x2
0528 e009 | | Load 0x0,0x9
0529 1b18 | | Execute Package,Field_Read,Field_Number 0x18
052a 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
052b c402 | | Store 0x2,0x2
052c 005a | Z | Store_Top Discrete,At_Offset_2
052d 00d9 | | Load_Top At_Offset_1
052e 680b |h | Jump_Zero 0x53a
052f 00d9 | | Load_Top At_Offset_1
0530 a5fa | | Store_Unchecked 0x2,-0x6
0531 e001 | | Load 0x0,0x1
0532 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0533 00db | | Load_Top At_Offset_3
0534 e5fb | | Load 0x2,-0x5
0535 e002 | | Load 0x0,0x2
0536 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0537 c402 | | Store 0x2,0x2
0538 005a | Z | Store_Top Discrete,At_Offset_2
0539 4506 |E | Exit_Subprogram 0x6
053a e001 | | Load 0x0,0x1
053b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053c 00db | | Load_Top At_Offset_3
053d e5fb | | Load 0x2,-0x5
053e e002 | | Load 0x0,0x2
053f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0540 c402 | | Store 0x2,0x2
0541 c5fa | | Store 0x2,-0x6
0542 4506 |E | Exit_Subprogram 0x6
0543 TRAP_04e8:
0543 e001 | | Load 0x0,0x1
0544 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0545 010f | | Execute Exception,Equal
0546 6810 |h | Jump_Zero 0x557
0547 e001 | | Load 0x0,0x1
0548 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0549 a5fa | | Store_Unchecked 0x2,-0x6
054a 00db | | Load_Top At_Offset_3
054b e002 | | Load 0x0,0x2
054c 180f | | Execute Package,Field_Execute,Field_Number 0xf
054d 7008 |p | Jump_Nonzero 0x556
054e e001 | | Load 0x0,0x1
054f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0550 e402 | | Load 0x2,0x2
0551 e5fb | | Load 0x2,-0x5
0552 e002 | | Load 0x0,0x2
0553 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0554 c402 | | Store 0x2,0x2
0555 005b | [ | Store_Top Discrete,At_Offset_3
0556 4506 |E | Exit_Subprogram 0x6
0557 e5fb | | Load 0x2,-0x5
0558 0092 19e1 | | Action Push_String_Extended,0x19e1 ; "Rcf_Unit.Set_Remote_Unit_Name"
055a e005 | | Load 0x0,0x5
055b 180f | | Execute Package,Field_Execute,Field_Number 0xf
055c 0092 19e1 | | Action Push_String_Extended,0x19e1 ; "Rcf_Unit.Set_Remote_Unit_Name"
055e e005 | | Load 0x0,0x5
055f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0560 a5fa | | Store_Unchecked 0x2,-0x6
0561 00db | | Load_Top At_Offset_3
0562 e002 | | Load 0x0,0x2
0563 180f | | Execute Package,Field_Execute,Field_Number 0xf
0564 7008 |p | Jump_Nonzero 0x56d
0565 e001 | | Load 0x0,0x1
0566 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0567 e402 | | Load 0x2,0x2
0568 e5fb | | Load 0x2,-0x5
0569 e002 | | Load 0x0,0x2
056a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
056b c402 | | Store 0x2,0x2
056c 005b | [ | Store_Top Discrete,At_Offset_3
056d 4506 |E | Exit_Subprogram 0x6
056e 0000 0000 | | .XXX[0x2]
0570 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
0574 0000 0000 | | .BLANK 0000[0x4]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 058a | | .CONST 0x058a ; Address of begin
0579 05b9 | | .CONST 0x05b9 ; Address of exception handler
057a 0005 | | .CONST 0x0005 ; Number of locals
057b INIT_0578:
057b e002 | | Load 0x0,0x2
057c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057d e001 | | Load 0x0,0x1
057e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0580 e003 | | Load 0x0,0x3
0581 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
0582 0322 | " | Declare_Variable Record
0583 e5fd | | Load 0x2,-0x3
0584 e003 | | Load 0x0,0x3
0585 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0586 00d9 | | Load_Top At_Offset_1
0587 017d | } | Execute Record,Structure_Write
0588 029f 177b | {| Declare_Subprogram For_Call,INIT_1778
058a BODY_0578:
058a e009 | | Load 0x0,0x9
058b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
058c 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
058d c5fb | | Store 0x2,-0x5
058e e5fc | | Load 0x2,-0x4
058f 0092 19e2 | | Action Push_String_Extended,0x19e2 ; "Rcf_Unit.Local_Update_Time"
0591 e005 | | Load 0x0,0x5
0592 180e | | Execute Package,Field_Execute,Field_Number 0xe
0593 e001 | | Load 0x0,0x1
0594 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0595 e002 | | Load 0x0,0x2
0596 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0597 e5fc | | Load 0x2,-0x4
0598 4801 |H | Short_Literal 0x1
0599 4801 |H | Short_Literal 0x1
059a 4800 |H | Short_Literal 0x0
059b e404 | | Load 0x2,0x4
059c e5ff | | Load 0x2,-0x1
059d e002 | | Load 0x0,0x2
059e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
059f c402 | | Store 0x2,0x2
05a0 005b | [ | Store_Top Discrete,At_Offset_3
05a1 00da | | Load_Top At_Offset_2
05a2 6803 |h | Jump_Zero 0x5a6
05a3 00da | | Load_Top At_Offset_2
05a4 a5fa | | Store_Unchecked 0x2,-0x6
05a5 4505 |E | Exit_Subprogram 0x5
05a6 00db | | Load_Top At_Offset_3
05a7 e002 | | Load 0x0,0x2
05a8 180f | | Execute Package,Field_Execute,Field_Number 0xf
05a9 680d |h | Jump_Zero 0x5b7
05aa e5fc | | Load 0x2,-0x4
05ab e006 | | Load 0x0,0x6
05ac 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05ad 67c2 |g | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008147}
05ae e001 | | Load 0x0,0x1
05af 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05b0 e006 | | Load 0x0,0x6
05b1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05b2 67bd |g | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008147}
05b3 e001 | | Load 0x0,0x1
05b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05b5 a5fa | | Store_Unchecked 0x2,-0x6
05b6 4505 |E | Exit_Subprogram 0x5
05b7 8405 | | Call 0x2,0x5
05b8 4505 |E | Exit_Subprogram 0x5
05b9 TRAP_0578:
05b9 e001 | | Load 0x0,0x1
05ba 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05bb 010f | | Execute Exception,Equal
05bc 6810 |h | Jump_Zero 0x5cd
05bd e001 | | Load 0x0,0x1
05be 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05bf a5fa | | Store_Unchecked 0x2,-0x6
05c0 e402 | | Load 0x2,0x2
05c1 e002 | | Load 0x0,0x2
05c2 180f | | Execute Package,Field_Execute,Field_Number 0xf
05c3 7008 |p | Jump_Nonzero 0x5cc
05c4 e001 | | Load 0x0,0x1
05c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c6 e402 | | Load 0x2,0x2
05c7 e5fc | | Load 0x2,-0x4
05c8 e002 | | Load 0x0,0x2
05c9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05ca c402 | | Store 0x2,0x2
05cb c403 | | Store 0x2,0x3
05cc 4505 |E | Exit_Subprogram 0x5
05cd e5fc | | Load 0x2,-0x4
05ce 0092 19e2 | | Action Push_String_Extended,0x19e2 ; "Rcf_Unit.Local_Update_Time"
05d0 e005 | | Load 0x0,0x5
05d1 180f | | Execute Package,Field_Execute,Field_Number 0xf
05d2 0092 19e2 | | Action Push_String_Extended,0x19e2 ; "Rcf_Unit.Local_Update_Time"
05d4 e005 | | Load 0x0,0x5
05d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05d6 a5fa | | Store_Unchecked 0x2,-0x6
05d7 e402 | | Load 0x2,0x2
05d8 e002 | | Load 0x0,0x2
05d9 180f | | Execute Package,Field_Execute,Field_Number 0xf
05da 7008 |p | Jump_Nonzero 0x5e3
05db e001 | | Load 0x0,0x1
05dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05dd e402 | | Load 0x2,0x2
05de e5fc | | Load 0x2,-0x4
05df e002 | | Load 0x0,0x2
05e0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05e1 c402 | | Store 0x2,0x2
05e2 c403 | | Store 0x2,0x3
05e3 4505 |E | Exit_Subprogram 0x5
05e4 0000 0000 | | .BLANK 0000[0x4]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f8 | | .CONST 0x05f8 ; Address of begin
05e9 064c | L | .CONST 0x064c ; Address of exception handler
05ea 0004 | | .CONST 0x0004 ; Number of locals
05eb INIT_05e8:
05eb e002 | | Load 0x0,0x2
05ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ed e001 | | Load 0x0,0x1
05ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05f0 e003 | | Load 0x0,0x3
05f1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
05f2 0322 | " | Declare_Variable Record
05f3 e5fc | | Load 0x2,-0x4
05f4 e003 | | Load 0x0,0x3
05f5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
05f6 00d9 | | Load_Top At_Offset_1
05f7 017d | } | Execute Record,Structure_Write
05f8 BODY_05e8:
05f8 e5fb | | Load 0x2,-0x5
05f9 0092 19e3 | | Action Push_String_Extended,0x19e3 ; "Rcf_Unit.Set_Local_Update_Time: Time = "
05fb 4800 |H | Short_Literal 0x0
05fc 4800 |H | Short_Literal 0x0
05fd 4800 |H | Short_Literal 0x0
05fe e5fd | | Load 0x2,-0x3
05ff e00a | | Load 0x0,0xa
0600 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0601 e00a | | Load 0x0,0xa
0602 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0603 01cc | | Execute Vector,Catenate
0604 e005 | | Load 0x0,0x5
0605 180e | | Execute Package,Field_Execute,Field_Number 0xe
0606 e001 | | Load 0x0,0x1
0607 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0608 e002 | | Load 0x0,0x2
0609 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060a e5fb | | Load 0x2,-0x5
060b 4800 |H | Short_Literal 0x0
060c 4801 |H | Short_Literal 0x1
060d 4801 |H | Short_Literal 0x1
060e e404 | | Load 0x2,0x4
060f e5ff | | Load 0x2,-0x1
0610 e002 | | Load 0x0,0x2
0611 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0612 c402 | | Store 0x2,0x2
0613 005a | Z | Store_Top Discrete,At_Offset_2
0614 00d9 | | Load_Top At_Offset_1
0615 6803 |h | Jump_Zero 0x619
0616 00d9 | | Load_Top At_Offset_1
0617 a5fa | | Store_Unchecked 0x2,-0x6
0618 4506 |E | Exit_Subprogram 0x6
0619 00da | | Load_Top At_Offset_2
061a e002 | | Load 0x0,0x2
061b 180f | | Execute Package,Field_Execute,Field_Number 0xf
061c 680d |h | Jump_Zero 0x62a
061d e5fb | | Load 0x2,-0x5
061e e006 | | Load 0x0,0x6
061f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0620 6057 |`W | Indirect_Literal Discrete,0x678,{0x00000000, 0x00008147}
0621 e001 | | Load 0x0,0x1
0622 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0623 e006 | | Load 0x0,0x6
0624 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0625 6052 |`R | Indirect_Literal Discrete,0x678,{0x00000000, 0x00008147}
0626 e001 | | Load 0x0,0x1
0627 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0628 a5fa | | Store_Unchecked 0x2,-0x6
0629 4506 |E | Exit_Subprogram 0x6
062a e001 | | Load 0x0,0x1
062b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
062c 00db | | Load_Top At_Offset_3
062d e5fb | | Load 0x2,-0x5
062e 00db | | Load_Top At_Offset_3
062f e5fd | | Load 0x2,-0x3
0630 e5fe | | Load 0x2,-0x2
0631 e009 | | Load 0x0,0x9
0632 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0633 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0634 c402 | | Store 0x2,0x2
0635 005a | Z | Store_Top Discrete,At_Offset_2
0636 00d9 | | Load_Top At_Offset_1
0637 680b |h | Jump_Zero 0x643
0638 00d9 | | Load_Top At_Offset_1
0639 a5fa | | Store_Unchecked 0x2,-0x6
063a e001 | | Load 0x0,0x1
063b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
063c 00db | | Load_Top At_Offset_3
063d e5fb | | Load 0x2,-0x5
063e e002 | | Load 0x0,0x2
063f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0640 c402 | | Store 0x2,0x2
0641 005a | Z | Store_Top Discrete,At_Offset_2
0642 4506 |E | Exit_Subprogram 0x6
0643 e001 | | Load 0x0,0x1
0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0645 00db | | Load_Top At_Offset_3
0646 e5fb | | Load 0x2,-0x5
0647 e002 | | Load 0x0,0x2
0648 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0649 c402 | | Store 0x2,0x2
064a c5fa | | Store 0x2,-0x6
064b 4506 |E | Exit_Subprogram 0x6
064c TRAP_05e8:
064c e001 | | Load 0x0,0x1
064d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
064e 010f | | Execute Exception,Equal
064f 6810 |h | Jump_Zero 0x660
0650 e001 | | Load 0x0,0x1
0651 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0652 a5fa | | Store_Unchecked 0x2,-0x6
0653 00db | | Load_Top At_Offset_3
0654 e002 | | Load 0x0,0x2
0655 180f | | Execute Package,Field_Execute,Field_Number 0xf
0656 7008 |p | Jump_Nonzero 0x65f
0657 e001 | | Load 0x0,0x1
0658 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0659 e402 | | Load 0x2,0x2
065a e5fb | | Load 0x2,-0x5
065b e002 | | Load 0x0,0x2
065c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
065d c402 | | Store 0x2,0x2
065e 005b | [ | Store_Top Discrete,At_Offset_3
065f 4506 |E | Exit_Subprogram 0x6
0660 e5fb | | Load 0x2,-0x5
0661 0092 19e4 | | Action Push_String_Extended,0x19e4 ; "Rcf_Unit.Set_Local_Update_Time"
0663 e005 | | Load 0x0,0x5
0664 180f | | Execute Package,Field_Execute,Field_Number 0xf
0665 0092 19e4 | | Action Push_String_Extended,0x19e4 ; "Rcf_Unit.Set_Local_Update_Time"
0667 e005 | | Load 0x0,0x5
0668 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0669 a5fa | | Store_Unchecked 0x2,-0x6
066a 00db | | Load_Top At_Offset_3
066b e002 | | Load 0x0,0x2
066c 180f | | Execute Package,Field_Execute,Field_Number 0xf
066d 7008 |p | Jump_Nonzero 0x676
066e e001 | | Load 0x0,0x1
066f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0670 e402 | | Load 0x2,0x2
0671 e5fb | | Load 0x2,-0x5
0672 e002 | | Load 0x0,0x2
0673 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0674 c402 | | Store 0x2,0x2
0675 005b | [ | Store_Top Discrete,At_Offset_3
0676 4506 |E | Exit_Subprogram 0x6
0677 0000 | | .XXX[0x1]
0678 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
067c 0000 0000 | | .BLANK 0000[0x4]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 068a | | .CONST 0x068a ; Address of begin
0681 069a | | .CONST 0x069a ; Address of exception handler
0682 0003 | | .CONST 0x0003 ; Number of locals
0683 INIT_0680:
0683 00da | | Load_Top At_Offset_2
0684 e004 | | Load 0x0,0x4
0685 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0686 e26f | o | Load 0x1,0x6f
0687 0322 | " | Declare_Variable Record
0688 00d8 | | Load_Top At_Offset_0
0689 1c00 | | Execute_Immediate Run_Utility,0x0
068a BODY_0680:
068a 4800 |H | Short_Literal 0x0
068b a5fc | | Store_Unchecked 0x2,-0x4
068c 00d8 | | Load_Top At_Offset_0
068d e5fe | | Load 0x2,-0x2
068e 00db | | Load_Top At_Offset_3
068f 82a3 | | Call 0x1,0xa3
0690 00d1 | | Pop_Control Pop_Count_1
0691 4801 |H | Short_Literal 0x1
0692 00d9 | | Load_Top At_Offset_1
0693 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0694 00da | | Load_Top At_Offset_2
0695 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0696 01cf | | Execute Vector,Slice_Read
0697 829b | | Call 0x1,0x9b
0698 c5fd | | Store 0x2,-0x3
0699 4503 |E | Exit_Subprogram 0x3
069a TRAP_0680:
069a 0007 | | Action Break_Optional
069b 6004 |` | Indirect_Literal Discrete,0x6a0,{0x00000000, 0x0000813b}
069c a5fc | | Store_Unchecked 0x2,-0x4
069d 4503 |E | Exit_Subprogram 0x3
069e 0000 0000 | | .XXX[0x2]
06a0 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
06a4 0000 0000 | | .BLANK 0000[0x4]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06b4 | | .CONST 0x06b4 ; Address of begin
06a9 06de | | .CONST 0x06de ; Address of exception handler
06aa 0004 | | .CONST 0x0004 ; Number of locals
06ab INIT_06a8:
06ab 00da | | Load_Top At_Offset_2
06ac e004 | | Load 0x0,0x4
06ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06ae e26f | o | Load 0x1,0x6f
06af 0322 | " | Declare_Variable Record
06b0 00d8 | | Load_Top At_Offset_0
06b1 1c00 | | Execute_Immediate Run_Utility,0x0
06b2 e5fe | | Load 0x2,-0x2
06b3 829a | | Call 0x1,0x9a
06b4 BODY_06a8:
06b4 4800 |H | Short_Literal 0x0
06b5 a5fc | | Store_Unchecked 0x2,-0x4
06b6 00d9 | | Load_Top At_Offset_1
06b7 e5fd | | Load 0x2,-0x3
06b8 e402 | | Load 0x2,0x2
06b9 82a3 | | Call 0x1,0xa3
06ba 00d1 | | Pop_Control Pop_Count_1
06bb 00d8 | | Load_Top At_Offset_0
06bc 4801 |H | Short_Literal 0x1
06bd 00da | | Load_Top At_Offset_2
06be 01db | | Execute Vector,Length
06bf 00d8 | | Load_Top At_Offset_0
06c0 00e2 | | Load_Encached Integer_Cache
06c1 0260 | ` | Execute Discrete,In_Type
06c2 7001 |p | Jump_Nonzero 0x6c4
06c3 0801 | | Execute_Immediate Raise,0x1
06c4 e403 | | Load 0x2,0x3
06c5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
06c6 01ce | | Execute Vector,Slice_Write
06c7 00d8 | | Load_Top At_Offset_0
06c8 01db | | Execute Vector,Length
06c9 00da | | Load_Top At_Offset_2
06ca 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
06cb e001 | | Load 0x0,0x1
06cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06cd e5fd | | Load 0x2,-0x3
06ce e5ff | | Load 0x2,-0x1
06cf 8261 | a | Call 0x1,0x61
06d0 c5fc | | Store 0x2,-0x4
06d1 e5fd | | Load 0x2,-0x3
06d2 00da | | Load_Top At_Offset_2
06d3 e402 | | Load 0x2,0x2
06d4 82a5 | | Call 0x1,0xa5
06d5 e001 | | Load 0x0,0x1
06d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06d7 e5fd | | Load 0x2,-0x3
06d8 e5ff | | Load 0x2,-0x1
06d9 8260 | ` | Call 0x1,0x60
06da c5fc | | Store 0x2,-0x4
06db 4800 |H | Short_Literal 0x0
06dc a5fc | | Store_Unchecked 0x2,-0x4
06dd 4504 |E | Exit_Subprogram 0x4
06de TRAP_06a8:
06de e00b | | Load 0x0,0xb
06df 010f | | Execute Exception,Equal
06e0 6816 |h | Jump_Zero 0x6f7
06e1 e5fd | | Load 0x2,-0x3
06e2 4801 |H | Short_Literal 0x1
06e3 4801 |H | Short_Literal 0x1
06e4 e006 | | Load 0x0,0x6
06e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06e6 0334 | 4 | Declare_Variable Array,With_Constraint
06e7 0092 19e5 | | Action Push_String_Extended,0x19e5 ; " 128"
06e9 e006 | | Load 0x0,0x6
06ea 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06eb e006 | | Load 0x0,0x6
06ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06ed 0119 | | Execute Any,Check_In_Formal_Type
06ee 4801 |H | Short_Literal 0x1
06ef 00da | | Load_Top At_Offset_2
06f0 01d6 | | Execute Vector,Field_Write
06f1 600a |` | Indirect_Literal Discrete,0x6fc,{0x00000000, 0x0000819e}
06f2 e001 | | Load 0x0,0x1
06f3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06f4 6007 |` | Indirect_Literal Discrete,0x6fc,{0x00000000, 0x0000819e}
06f5 a5fc | | Store_Unchecked 0x2,-0x4
06f6 4504 |E | Exit_Subprogram 0x4
06f7 67a8 |g | Indirect_Literal Discrete,0x6a0,{0x00000000, 0x0000813b}
06f8 a5fc | | Store_Unchecked 0x2,-0x4
06f9 4504 |E | Exit_Subprogram 0x4
06fa 0000 0000 | | .XXX[0x2]
06fc 0000 0000 | | .LITERAL {0x00000000, 0x0000819e}
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0731 | 1 | .CONST 0x0731 ; Address of begin
0701 085b | [ | .CONST 0x085b ; Address of exception handler
0702 000a | | .CONST 0x000a ; Number of locals
0703 INIT_0700:
0703 e003 | | Load 0x0,0x3
0704 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
0705 0322 | " | Declare_Variable Record
0706 e5fd | | Load 0x2,-0x3
0707 e003 | | Load 0x0,0x3
0708 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0709 00d9 | | Load_Top At_Offset_1
070a 017d | } | Execute Record,Structure_Write
070b e5fe | | Load 0x2,-0x2
070c 82a9 | | Call 0x1,0xa9
070d 0092 19e6 | | Action Push_String_Extended,0x19e6 ; "Rcf_Temp_"
070f 4800 |H | Short_Literal 0x0
0710 4803 |H | Short_Literal 0x3
0711 4804 |H | Short_Literal 0x4
0712 e00a | | Load 0x0,0xa
0713 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0714 e00a | | Load 0x0,0xa
0715 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0716 01cc | | Execute Vector,Catenate
0717 e5fe | | Load 0x2,-0x2
0718 82a8 | | Call 0x1,0xa8
0719 e5fa | | Load 0x2,-0x6
071a e5fc | | Load 0x2,-0x4
071b e5fd | | Load 0x2,-0x3
071c e5ff | | Load 0x2,-0x1
071d 8229 | ) | Call 0x1,0x29
071e e002 | | Load 0x0,0x2
071f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0720 e001 | | Load 0x0,0x1
0721 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0722 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0723 e00c | | Load 0x0,0xc
0724 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0725 02c7 | | Declare_Variable Any
0726 e00c | | Load 0x0,0xc
0727 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0728 a408 | | Store_Unchecked 0x2,0x8
0729 e00d | | Load 0x0,0xd
072a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
072c e00e | | Load 0x0,0xe
072d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072e 02c7 | | Declare_Variable Any
072f 00d8 | | Load_Top At_Offset_0
0730 1c00 | | Execute_Immediate Run_Utility,0x0
0731 BODY_0700:
0731 e00c | | Load 0x0,0xc
0732 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0733 c5f9 | | Store 0x2,-0x7
0734 4800 |H | Short_Literal 0x0
0735 a5f8 | | Store_Unchecked 0x2,-0x8
0736 e5fa | | Load 0x2,-0x6
0737 e5ff | | Load 0x2,-0x1
0738 e004 | | Load 0x0,0x4
0739 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
073a 6814 |h | Jump_Zero 0x74f
073b e5fa | | Load 0x2,-0x6
073c 4801 |H | Short_Literal 0x1
073d 4801 |H | Short_Literal 0x1
073e e006 | | Load 0x0,0x6
073f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0740 0334 | 4 | Declare_Variable Array,With_Constraint
0741 0092 19e7 | | Action Push_String_Extended,0x19e7 ; "Upload_Ada_Unit"
0743 e006 | | Load 0x0,0x6
0744 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0745 e006 | | Load 0x0,0x6
0746 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0747 0119 | | Execute Any,Check_In_Formal_Type
0748 4801 |H | Short_Literal 0x1
0749 00da | | Load_Top At_Offset_2
074a 01d6 | | Execute Vector,Field_Write
074b 6148 |aH | Indirect_Literal Discrete,0x894,{0x00000000, 0x0000818f}
074c e001 | | Load 0x0,0x1
074d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
074e 4507 |E | Exit_Subprogram 0x7
074f e001 | | Load 0x0,0x1
0750 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0751 e5fa | | Load 0x2,-0x6
0752 e5ff | | Load 0x2,-0x1
0753 e004 | | Load 0x0,0x4
0754 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0755 4800 |H | Short_Literal 0x0
0756 e5fb | | Load 0x2,-0x5
0757 e405 | | Load 0x2,0x5
0758 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0759 e404 | | Load 0x2,0x4
075a e00f | | Load 0x0,0xf
075b 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
075c c407 | | Store 0x2,0x7
075d 00db | | Load_Top At_Offset_3
075e 6807 |h | Jump_Zero 0x766
075f e5fa | | Load 0x2,-0x6
0760 e407 | | Load 0x2,0x7
0761 e001 | | Load 0x0,0x1
0762 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0763 00db | | Load_Top At_Offset_3
0764 a5f8 | | Store_Unchecked 0x2,-0x8
0765 4507 |E | Exit_Subprogram 0x7
0766 e5fa | | Load 0x2,-0x6
0767 6128 |a( | Indirect_Literal Discrete,0x890,{0x00000000, 0x00008191}
0768 e001 | | Load 0x0,0x1
0769 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
076a e00d | | Load 0x0,0xd
076b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
076c 00db | | Load_Top At_Offset_3
076d 0120 | | Execute Any,Is_Value
076e 6803 |h | Jump_Zero 0x772
076f e00c | | Load 0x0,0xc
0770 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0771 7801 |x | Jump 0x773
0772 00db | | Load_Top At_Offset_3
0773 e010 | | Load 0x0,0x10
0774 180e | | Execute Package,Field_Execute,Field_Number 0xe
0775 e010 | | Load 0x0,0x10
0776 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0777 e010 | | Load 0x0,0x10
0778 180e | | Execute Package,Field_Execute,Field_Number 0xe
0779 e010 | | Load 0x0,0x10
077a 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
077b e010 | | Load 0x0,0x10
077c 180e | | Execute Package,Field_Execute,Field_Number 0xe
077d e010 | | Load 0x0,0x10
077e 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
077f e010 | | Load 0x0,0x10
0780 180e | | Execute Package,Field_Execute,Field_Number 0xe
0781 e010 | | Load 0x0,0x10
0782 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0783 e010 | | Load 0x0,0x10
0784 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0785 0337 | 7 | Declare_Variable Array
0786 4801 |H | Short_Literal 0x1
0787 4805 |H | Short_Literal 0x5
0788 00da | | Load_Top At_Offset_2
0789 01d6 | | Execute Vector,Field_Write
078a 4801 |H | Short_Literal 0x1
078b 4807 |H | Short_Literal 0x7
078c 00da | | Load_Top At_Offset_2
078d 01d6 | | Execute Vector,Field_Write
078e 4801 |H | Short_Literal 0x1
078f 4808 |H | Short_Literal 0x8
0790 00da | | Load_Top At_Offset_2
0791 01d6 | | Execute Vector,Field_Write
0792 4804 |H | Short_Literal 0x4
0793 4800 |H | Short_Literal 0x0
0794 4800 |H | Short_Literal 0x0
0795 00d9 | | Load_Top At_Offset_1
0796 e411 | | Load 0x2,0x11
0797 01d6 | | Execute Vector,Field_Write
0798 3ffb |? | Loop_Increasing 0x794
0799 4800 |H | Short_Literal 0x0
079a 4806 |H | Short_Literal 0x6
079b 00da | | Load_Top At_Offset_2
079c 01d6 | | Execute Vector,Field_Write
079d 480b |H | Short_Literal 0xb
079e 4809 |H | Short_Literal 0x9
079f 4800 |H | Short_Literal 0x0
07a0 00d9 | | Load_Top At_Offset_1
07a1 e411 | | Load 0x2,0x11
07a2 01d6 | | Execute Vector,Field_Write
07a3 3ffb |? | Loop_Increasing 0x79f
07a4 e010 | | Load 0x0,0x10
07a5 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
07a6 01c3 | | Execute Vector,Check_In_Type
07a7 4802 |H | Short_Literal 0x2
07a8 e010 | | Load 0x0,0x10
07a9 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
07aa e011 | | Load 0x0,0x11
07ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07ac 00ea | | Load_Encached Null_String_Cache
07ad 4800 |H | Short_Literal 0x0
07ae 4801 |H | Short_Literal 0x1
07af 4804 |H | Short_Literal 0x4
07b0 e403 | | Load 0x2,0x3
07b1 e404 | | Load 0x2,0x4
07b2 e00d | | Load 0x0,0xd
07b3 180e | | Execute Package,Field_Execute,Field_Number 0xe
07b4 c408 | | Store 0x2,0x8
07b5 005a | Z | Store_Top Discrete,At_Offset_2
07b6 00d9 | | Load_Top At_Offset_1
07b7 6826 |h& | Jump_Zero 0x7de
07b8 e5fa | | Load 0x2,-0x6
07b9 4801 |H | Short_Literal 0x1
07ba 4802 |H | Short_Literal 0x2
07bb e006 | | Load 0x0,0x6
07bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07bd 0334 | 4 | Declare_Variable Array,With_Constraint
07be e404 | | Load 0x2,0x4
07bf e006 | | Load 0x0,0x6
07c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07c1 e006 | | Load 0x0,0x6
07c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07c3 0119 | | Execute Any,Check_In_Formal_Type
07c4 4801 |H | Short_Literal 0x1
07c5 00da | | Load_Top At_Offset_2
07c6 01d6 | | Execute Vector,Field_Write
07c7 00db | | Load_Top At_Offset_3
07c8 e00d | | Load 0x0,0xd
07c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ca 011c | | Execute Any,Convert_Unchecked
07cb 1c01 | | Execute_Immediate Run_Utility,0x1
07cc e006 | | Load 0x0,0x6
07cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07ce e006 | | Load 0x0,0x6
07cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07d0 0119 | | Execute Any,Check_In_Formal_Type
07d1 4802 |H | Short_Literal 0x2
07d2 00da | | Load_Top At_Offset_2
07d3 01d6 | | Execute Vector,Field_Write
07d4 60b7 |` | Indirect_Literal Discrete,0x88c,{0x00000000, 0x0000815d}
07d5 e001 | | Load 0x0,0x1
07d6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
07d7 e006 | | Load 0x0,0x6
07d8 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
07d9 60b2 |` | Indirect_Literal Discrete,0x88c,{0x00000000, 0x0000815d}
07da e001 | | Load 0x0,0x1
07db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07dc a5f8 | | Store_Unchecked 0x2,-0x8
07dd 4507 |E | Exit_Subprogram 0x7
07de 00da | | Load_Top At_Offset_2
07df c5f9 | | Store 0x2,-0x7
07e0 0092 19e8 | | Action Push_String_Extended,0x19e8 ; "<QUIET>"
07e2 0092 19e9 | | Action Push_String_Extended,0x19e9 ; "<DIRECTORIES>"
07e4 e404 | | Load 0x2,0x4
07e5 e012 | | Load 0x0,0x12
07e6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07e7 e5fa | | Load 0x2,-0x6
07e8 0092 19ea | | Action Push_String_Extended,0x19ea ; "Rcf_Unit.Upload_Ada_Unit"
07ea e005 | | Load 0x0,0x5
07eb 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ec e001 | | Load 0x0,0x1
07ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ee e002 | | Load 0x0,0x2
07ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f0 e5fa | | Load 0x2,-0x6
07f1 4801 |H | Short_Literal 0x1
07f2 4801 |H | Short_Literal 0x1
07f3 4801 |H | Short_Literal 0x1
07f4 e402 | | Load 0x2,0x2
07f5 e5ff | | Load 0x2,-0x1
07f6 e002 | | Load 0x0,0x2
07f7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
07f8 c406 | | Store 0x2,0x6
07f9 c407 | | Store 0x2,0x7
07fa 00db | | Load_Top At_Offset_3
07fb 6803 |h | Jump_Zero 0x7ff
07fc 00db | | Load_Top At_Offset_3
07fd a5f8 | | Store_Unchecked 0x2,-0x8
07fe 4507 |E | Exit_Subprogram 0x7
07ff e406 | | Load 0x2,0x6
0800 e002 | | Load 0x0,0x2
0801 180f | | Execute Package,Field_Execute,Field_Number 0xf
0802 680d |h | Jump_Zero 0x810
0803 e5fa | | Load 0x2,-0x6
0804 e006 | | Load 0x0,0x6
0805 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0806 6081 |` | Indirect_Literal Discrete,0x888,{0x00000000, 0x00008147}
0807 e001 | | Load 0x0,0x1
0808 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0809 e006 | | Load 0x0,0x6
080a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
080b 607c |`| | Indirect_Literal Discrete,0x888,{0x00000000, 0x00008147}
080c e001 | | Load 0x0,0x1
080d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
080e a5f8 | | Store_Unchecked 0x2,-0x8
080f 4507 |E | Exit_Subprogram 0x7
0810 00d8 | | Load_Top At_Offset_0
0811 0120 | | Execute Any,Is_Value
0812 6803 |h | Jump_Zero 0x816
0813 e00e | | Load 0x0,0xe
0814 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0815 7801 |x | Jump 0x817
0816 00d8 | | Load_Top At_Offset_0
0817 e001 | | Load 0x0,0x1
0818 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0819 e5fa | | Load 0x2,-0x6
081a e5ff | | Load 0x2,-0x1
081b e004 | | Load 0x0,0x4
081c 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
081d e5fb | | Load 0x2,-0x5
081e e405 | | Load 0x2,0x5
081f 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0820 e00f | | Load 0x0,0xf
0821 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0822 c407 | | Store 0x2,0x7
0823 c40a | | Store 0x2,0xa
0824 00db | | Load_Top At_Offset_3
0825 6805 |h | Jump_Zero 0x82b
0826 e5fa | | Load 0x2,-0x6
0827 e407 | | Load 0x2,0x7
0828 e001 | | Load 0x0,0x1
0829 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
082a 7825 |x% | Jump 0x850
082b e5fa | | Load 0x2,-0x6
082c 0092 19eb | | Action Push_String_Extended,0x19eb ; "Setting local download time (from remote time) to "
082e 4800 |H | Short_Literal 0x0
082f 4800 |H | Short_Literal 0x0
0830 4800 |H | Short_Literal 0x0
0831 e40a | | Load 0x2,0xa
0832 e00a | | Load 0x0,0xa
0833 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0834 e00a | | Load 0x0,0xa
0835 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0836 01cc | | Execute Vector,Catenate
0837 e005 | | Load 0x0,0x5
0838 180e | | Execute Package,Field_Execute,Field_Number 0xe
0839 e001 | | Load 0x0,0x1
083a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
083b e406 | | Load 0x2,0x6
083c e5fa | | Load 0x2,-0x6
083d e402 | | Load 0x2,0x2
083e e40a | | Load 0x2,0xa
083f e408 | | Load 0x2,0x8
0840 e009 | | Load 0x0,0x9
0841 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0842 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0843 c406 | | Store 0x2,0x6
0844 c407 | | Store 0x2,0x7
0845 00db | | Load_Top At_Offset_3
0846 7009 |p | Jump_Nonzero 0x850
0847 e001 | | Load 0x0,0x1
0848 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0849 e406 | | Load 0x2,0x6
084a e5fa | | Load 0x2,-0x6
084b e002 | | Load 0x0,0x2
084c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
084d c406 | | Store 0x2,0x6
084e c5f8 | | Store 0x2,-0x8
084f 4507 |E | Exit_Subprogram 0x7
0850 00db | | Load_Top At_Offset_3
0851 a5f8 | | Store_Unchecked 0x2,-0x8
0852 e001 | | Load 0x0,0x1
0853 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0854 e406 | | Load 0x2,0x6
0855 e5fa | | Load 0x2,-0x6
0856 e002 | | Load 0x0,0x2
0857 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0858 c406 | | Store 0x2,0x6
0859 c407 | | Store 0x2,0x7
085a 4507 |E | Exit_Subprogram 0x7
085b TRAP_0700:
085b e001 | | Load 0x0,0x1
085c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
085d 010f | | Execute Exception,Equal
085e 6810 |h | Jump_Zero 0x86f
085f e001 | | Load 0x0,0x1
0860 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0861 a5f8 | | Store_Unchecked 0x2,-0x8
0862 e406 | | Load 0x2,0x6
0863 e002 | | Load 0x0,0x2
0864 180f | | Execute Package,Field_Execute,Field_Number 0xf
0865 7008 |p | Jump_Nonzero 0x86e
0866 e001 | | Load 0x0,0x1
0867 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0868 e406 | | Load 0x2,0x6
0869 e5fa | | Load 0x2,-0x6
086a e002 | | Load 0x0,0x2
086b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
086c c406 | | Store 0x2,0x6
086d c407 | | Store 0x2,0x7
086e 4507 |E | Exit_Subprogram 0x7
086f e5fa | | Load 0x2,-0x6
0870 0092 19ea | | Action Push_String_Extended,0x19ea ; "Rcf_Unit.Upload_Ada_Unit"
0872 e005 | | Load 0x0,0x5
0873 180f | | Execute Package,Field_Execute,Field_Number 0xf
0874 0092 19ea | | Action Push_String_Extended,0x19ea ; "Rcf_Unit.Upload_Ada_Unit"
0876 e005 | | Load 0x0,0x5
0877 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0878 a5f8 | | Store_Unchecked 0x2,-0x8
0879 e406 | | Load 0x2,0x6
087a e002 | | Load 0x0,0x2
087b 180f | | Execute Package,Field_Execute,Field_Number 0xf
087c 7008 |p | Jump_Nonzero 0x885
087d e001 | | Load 0x0,0x1
087e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
087f e406 | | Load 0x2,0x6
0880 e5fa | | Load 0x2,-0x6
0881 e002 | | Load 0x0,0x2
0882 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0883 c406 | | Store 0x2,0x6
0884 c407 | | Store 0x2,0x7
0885 4507 |E | Exit_Subprogram 0x7
0886 0000 0000 | | .XXX[0x2]
0888 0000 0000 | | .LITERAL {0x00000000, 0x00008147}
088c 0000 0000 | | .LITERAL {0x00000000, 0x0000815d}
0890 0000 0000 | | .LITERAL {0x00000000, 0x00008191}
0894 0000 0000 | | .LITERAL {0x00000000, 0x0000818f}
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 08a0 | | .CONST 0x08a0 ; Address of begin
0899 0905 | | .CONST 0x0905 ; Address of exception handler
089a 0003 | | .CONST 0x0003 ; Number of locals
089b INIT_0898:
089b e001 | | Load 0x0,0x1
089c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
089d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
089e e00f | | Load 0x0,0xf
089f 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
08a0 BODY_0898:
08a0 e00c | | Load 0x0,0xc
08a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08a2 c5fa | | Store 0x2,-0x6
08a3 e5fb | | Load 0x2,-0x5
08a4 e5ff | | Load 0x2,-0x1
08a5 e004 | | Load 0x0,0x4
08a6 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
08a7 6816 |h | Jump_Zero 0x8be
08a8 e5fb | | Load 0x2,-0x5
08a9 4801 |H | Short_Literal 0x1
08aa 4801 |H | Short_Literal 0x1
08ab e006 | | Load 0x0,0x6
08ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08ad 0334 | 4 | Declare_Variable Array,With_Constraint
08ae 0092 19e7 | | Action Push_String_Extended,0x19e7 ; "Upload_Ada_Unit"
08b0 e006 | | Load 0x0,0x6
08b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08b2 e006 | | Load 0x0,0x6
08b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08b4 0119 | | Execute Any,Check_In_Formal_Type
08b5 4801 |H | Short_Literal 0x1
08b6 00da | | Load_Top At_Offset_2
08b7 01d6 | | Execute Vector,Field_Write
08b8 67db |g | Indirect_Literal Discrete,0x894,{0x00000000, 0x0000818f}
08b9 e001 | | Load 0x0,0x1
08ba 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
08bb 4800 |H | Short_Literal 0x0
08bc a5f9 | | Store_Unchecked 0x2,-0x7
08bd 4506 |E | Exit_Subprogram 0x6
08be e001 | | Load 0x0,0x1
08bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c0 e00f | | Load 0x0,0xf
08c1 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
08c2 e5fb | | Load 0x2,-0x5
08c3 e5ff | | Load 0x2,-0x1
08c4 e004 | | Load 0x0,0x4
08c5 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
08c6 e013 | | Load 0x0,0x13
08c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08c8 e013 | | Load 0x0,0x13
08c9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
08ca e013 | | Load 0x0,0x13
08cb 180d | | Execute Package,Field_Execute,Field_Number 0xd
08cc e5fd | | Load 0x2,-0x3
08cd e003 | | Load 0x0,0x3
08ce 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
08cf e00f | | Load 0x0,0xf
08d0 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
08d1 0032 | 2 | Store_Top Heap_Access,At_Offset_2
08d2 005a | Z | Store_Top Discrete,At_Offset_2
08d3 00d9 | | Load_Top At_Offset_1
08d4 6807 |h | Jump_Zero 0x8dc
08d5 e5fb | | Load 0x2,-0x5
08d6 00da | | Load_Top At_Offset_2
08d7 e001 | | Load 0x0,0x1
08d8 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
08d9 00d9 | | Load_Top At_Offset_1
08da a5f9 | | Store_Unchecked 0x2,-0x7
08db 4506 |E | Exit_Subprogram 0x6
08dc e001 | | Load 0x0,0x1
08dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08de e5fa | | Load 0x2,-0x6
08df 0120 | | Execute Any,Is_Value
08e0 6803 |h | Jump_Zero 0x8e4
08e1 e00c | | Load 0x0,0xc
08e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08e3 7801 |x | Jump 0x8e5
08e4 e5fa | | Load 0x2,-0x6
08e5 e5fb | | Load 0x2,-0x5
08e6 00db | | Load_Top At_Offset_3
08e7 e5fc | | Load 0x2,-0x4
08e8 e5fd | | Load 0x2,-0x3
08e9 e5fe | | Load 0x2,-0x2
08ea e5ff | | Load 0x2,-0x1
08eb 8288 | | Call 0x1,0x88
08ec c5fa | | Store 0x2,-0x6
08ed 005a | Z | Store_Top Discrete,At_Offset_2
08ee 00d9 | | Load_Top At_Offset_1
08ef 680a |h | Jump_Zero 0x8fa
08f0 00d9 | | Load_Top At_Offset_1
08f1 a5f9 | | Store_Unchecked 0x2,-0x7
08f2 e001 | | Load 0x0,0x1
08f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08f4 4800 |H | Short_Literal 0x0
08f5 00da | | Load_Top At_Offset_2
08f6 e00f | | Load 0x0,0xf
08f7 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
08f8 005a | Z | Store_Top Discrete,At_Offset_2
08f9 4506 |E | Exit_Subprogram 0x6
08fa e001 | | Load 0x0,0x1
08fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08fc e5fb | | Load 0x2,-0x5
08fd e5ff | | Load 0x2,-0x1
08fe e004 | | Load 0x0,0x4
08ff 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0900 00da | | Load_Top At_Offset_2
0901 e00f | | Load 0x0,0xf
0902 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0903 c5f9 | | Store 0x2,-0x7
0904 4506 |E | Exit_Subprogram 0x6
0905 TRAP_0898:
0905 e001 | | Load 0x0,0x1
0906 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0907 010f | | Execute Exception,Equal
0908 680e |h | Jump_Zero 0x917
0909 e001 | | Load 0x0,0x1
090a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
090b a5f9 | | Store_Unchecked 0x2,-0x7
090c e001 | | Load 0x0,0x1
090d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
090e e5fb | | Load 0x2,-0x5
090f e5ff | | Load 0x2,-0x1
0910 e004 | | Load 0x0,0x4
0911 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0912 00db | | Load_Top At_Offset_3
0913 e00f | | Load 0x0,0xf
0914 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0915 005b | [ | Store_Top Discrete,At_Offset_3
0916 4506 |E | Exit_Subprogram 0x6
0917 e5fb | | Load 0x2,-0x5
0918 0092 19ea | | Action Push_String_Extended,0x19ea ; "Rcf_Unit.Upload_Ada_Unit"
091a e005 | | Load 0x0,0x5
091b 180f | | Execute Package,Field_Execute,Field_Number 0xf
091c 0092 19ea | | Action Push_String_Extended,0x19ea ; "Rcf_Unit.Upload_Ada_Unit"
091e e005 | | Load 0x0,0x5
091f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0920 a5f9 | | Store_Unchecked 0x2,-0x7
0921 e001 | | Load 0x0,0x1
0922 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0923 e5fb | | Load 0x2,-0x5
0924 e5ff | | Load 0x2,-0x1
0925 e004 | | Load 0x0,0x4
0926 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0927 00db | | Load_Top At_Offset_3
0928 e00f | | Load 0x0,0xf
0929 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
092a 005b | [ | Store_Top Discrete,At_Offset_3
092b 4506 |E | Exit_Subprogram 0x6
092c 0000 0000 | | .BLANK 0000[0x4]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 0945 | E | .CONST 0x0945 ; Address of begin
0931 09a8 | | .CONST 0x09a8 ; Address of exception handler
0932 0006 | | .CONST 0x0006 ; Number of locals
0933 INIT_0930:
0933 00db | | Load_Top At_Offset_3
0934 82a9 | | Call 0x1,0xa9
0935 e5fb | | Load 0x2,-0x5
0936 e5fe | | Load 0x2,-0x2
0937 82a8 | | Call 0x1,0xa8
0938 e5f8 | | Load 0x2,-0x8
0939 e5fc | | Load 0x2,-0x4
093a e5fd | | Load 0x2,-0x3
093b e5ff | | Load 0x2,-0x1
093c 8229 | ) | Call 0x1,0x29
093d e001 | | Load 0x0,0x1
093e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
093f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0940 e00c | | Load 0x0,0xc
0941 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0942 02c7 | | Declare_Variable Any
0943 00d8 | | Load_Top At_Offset_0
0944 1c00 | | Execute_Immediate Run_Utility,0x0
0945 BODY_0930:
0945 4800 |H | Short_Literal 0x0
0946 a5f7 | | Store_Unchecked 0x2,-0x9
0947 e5f8 | | Load 0x2,-0x8
0948 4800 |H | Short_Literal 0x0
0949 e403 | | Load 0x2,0x3
094a e004 | | Load 0x0,0x4
094b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
094c c406 | | Store 0x2,0x6
094d 00d8 | | Load_Top At_Offset_0
094e e00c | | Load 0x0,0xc
094f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0950 7027 |p' | Jump_Nonzero 0x978
0951 e5f9 | | Load 0x2,-0x7
0952 7025 |p% | Jump_Nonzero 0x978
0953 e5f8 | | Load 0x2,-0x8
0954 4801 |H | Short_Literal 0x1
0955 4801 |H | Short_Literal 0x1
0956 e006 | | Load 0x0,0x6
0957 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0958 0334 | 4 | Declare_Variable Array,With_Constraint
0959 0092 19ec | | Action Push_String_Extended,0x19ec ; "Can't upload from remote unit \x22"
095b e5fc | | Load 0x2,-0x4
095c 01cc | | Execute Vector,Catenate
095d 0092 19ed | | Action Push_String_Extended,0x19ed ; "\x22 into existing text file \x22"
095f 01cc | | Execute Vector,Catenate
0960 e5fb | | Load 0x2,-0x5
0961 01cc | | Execute Vector,Catenate
0962 0092 19ee | | Action Push_String_Extended,0x19ee ; "\x22."
0964 01cc | | Execute Vector,Catenate
0965 e006 | | Load 0x0,0x6
0966 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0967 e006 | | Load 0x0,0x6
0968 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0969 0119 | | Execute Any,Check_In_Formal_Type
096a 4801 |H | Short_Literal 0x1
096b 00da | | Load_Top At_Offset_2
096c 01d6 | | Execute Vector,Field_Write
096d 4807 |H | Short_Literal 0x7
096e 6051 |`Q | Indirect_Literal Discrete,0x9c0,{0x00000000, 0x00008128}
096f e001 | | Load 0x0,0x1
0970 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0971 e006 | | Load 0x0,0x6
0972 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0973 604c |`L | Indirect_Literal Discrete,0x9c0,{0x00000000, 0x00008128}
0974 e001 | | Load 0x0,0x1
0975 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0976 a5f7 | | Store_Unchecked 0x2,-0x9
0977 4509 |E | Exit_Subprogram 0x9
0978 e5f8 | | Load 0x2,-0x8
0979 e5ff | | Load 0x2,-0x1
097a e004 | | Load 0x0,0x4
097b 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
097c 6814 |h | Jump_Zero 0x991
097d e5f8 | | Load 0x2,-0x8
097e 4801 |H | Short_Literal 0x1
097f 4801 |H | Short_Literal 0x1
0980 e006 | | Load 0x0,0x6
0981 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0982 0334 | 4 | Declare_Variable Array,With_Constraint
0983 0092 19ef | | Action Push_String_Extended,0x19ef ; "Upload_Text_File"
0985 e006 | | Load 0x0,0x6
0986 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0987 e006 | | Load 0x0,0x6
0988 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0989 0119 | | Execute Any,Check_In_Formal_Type
098a 4801 |H | Short_Literal 0x1
098b 00da | | Load_Top At_Offset_2
098c 01d6 | | Execute Vector,Field_Write
098d 602e |`. | Indirect_Literal Discrete,0x9bc,{0x00000000, 0x0000818f}
098e e001 | | Load 0x0,0x1
098f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0990 4509 |E | Exit_Subprogram 0x9
0991 e001 | | Load 0x0,0x1
0992 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0993 e5f8 | | Load 0x2,-0x8
0994 e5ff | | Load 0x2,-0x1
0995 e004 | | Load 0x0,0x4
0996 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0997 4800 |H | Short_Literal 0x0
0998 e5fa | | Load 0x2,-0x6
0999 e404 | | Load 0x2,0x4
099a 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
099b e403 | | Load 0x2,0x3
099c e00f | | Load 0x0,0xf
099d 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
099e 005a | Z | Store_Top Discrete,At_Offset_2
099f 00d9 | | Load_Top At_Offset_1
09a0 6806 |h | Jump_Zero 0x9a7
09a1 e5f8 | | Load 0x2,-0x8
09a2 00da | | Load_Top At_Offset_2
09a3 e001 | | Load 0x0,0x1
09a4 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
09a5 00d9 | | Load_Top At_Offset_1
09a6 a5f7 | | Store_Unchecked 0x2,-0x9
09a7 4509 |E | Exit_Subprogram 0x9
09a8 TRAP_0930:
09a8 e001 | | Load 0x0,0x1
09a9 1b17 | | Execute Package,Field_Read,Field_Number 0x17
09aa 010f | | Execute Exception,Equal
09ab 6804 |h | Jump_Zero 0x9b0
09ac e001 | | Load 0x0,0x1
09ad 181b | | Execute Package,Field_Execute,Field_Number 0x1b
09ae a5f7 | | Store_Unchecked 0x2,-0x9
09af 4509 |E | Exit_Subprogram 0x9
09b0 e5f8 | | Load 0x2,-0x8
09b1 0092 19f0 | | Action Push_String_Extended,0x19f0 ; "Rcf_Unit.Upload_Text_File"
09b3 e005 | | Load 0x0,0x5
09b4 180f | | Execute Package,Field_Execute,Field_Number 0xf
09b5 0092 19f0 | | Action Push_String_Extended,0x19f0 ; "Rcf_Unit.Upload_Text_File"
09b7 e005 | | Load 0x0,0x5
09b8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09b9 a5f7 | | Store_Unchecked 0x2,-0x9
09ba 4509 |E | Exit_Subprogram 0x9
09bb 0000 | | .XXX[0x1]
09bc 0000 0000 | | .LITERAL {0x00000000, 0x0000818f}
09c0 0000 0000 | | .LITERAL {0x00000000, 0x00008128}
09c4 0000 0000 | | .BLANK 0000[0x4]
09c8 ; --------------------------------------------------------------------------------------
09c8 ; SUBPROGRAM
09c8 ; --------------------------------------------------------------------------------------
09c8 09d0 | | .CONST 0x09d0 ; Address of begin
09c9 0a2f | / | .CONST 0x0a2f ; Address of exception handler
09ca 0003 | | .CONST 0x0003 ; Number of locals
09cb INIT_09c8:
09cb e001 | | Load 0x0,0x1
09cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09cd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
09ce e00f | | Load 0x0,0xf
09cf 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
09d0 BODY_09c8:
09d0 e5f9 | | Load 0x2,-0x7
09d1 e5ff | | Load 0x2,-0x1
09d2 e004 | | Load 0x0,0x4
09d3 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
09d4 6816 |h | Jump_Zero 0x9eb
09d5 e5f9 | | Load 0x2,-0x7
09d6 4801 |H | Short_Literal 0x1
09d7 4801 |H | Short_Literal 0x1
09d8 e006 | | Load 0x0,0x6
09d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09da 0334 | 4 | Declare_Variable Array,With_Constraint
09db 0092 19ef | | Action Push_String_Extended,0x19ef ; "Upload_Text_File"
09dd e006 | | Load 0x0,0x6
09de 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09df e006 | | Load 0x0,0x6
09e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09e1 0119 | | Execute Any,Check_In_Formal_Type
09e2 4801 |H | Short_Literal 0x1
09e3 00da | | Load_Top At_Offset_2
09e4 01d6 | | Execute Vector,Field_Write
09e5 67d6 |g | Indirect_Literal Discrete,0x9bc,{0x00000000, 0x0000818f}
09e6 e001 | | Load 0x0,0x1
09e7 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09e8 4800 |H | Short_Literal 0x0
09e9 a5f8 | | Store_Unchecked 0x2,-0x8
09ea 4508 |E | Exit_Subprogram 0x8
09eb e001 | | Load 0x0,0x1
09ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09ed e00f | | Load 0x0,0xf
09ee 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
09ef e5f9 | | Load 0x2,-0x7
09f0 e5ff | | Load 0x2,-0x1
09f1 e004 | | Load 0x0,0x4
09f2 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
09f3 e013 | | Load 0x0,0x13
09f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09f5 e013 | | Load 0x0,0x13
09f6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09f7 e013 | | Load 0x0,0x13
09f8 180d | | Execute Package,Field_Execute,Field_Number 0xd
09f9 e5fd | | Load 0x2,-0x3
09fa e003 | | Load 0x0,0x3
09fb 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
09fc e00f | | Load 0x0,0xf
09fd 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
09fe 0032 | 2 | Store_Top Heap_Access,At_Offset_2
09ff 005a | Z | Store_Top Discrete,At_Offset_2
0a00 00d9 | | Load_Top At_Offset_1
0a01 6807 |h | Jump_Zero 0xa09
0a02 e5f9 | | Load 0x2,-0x7
0a03 00da | | Load_Top At_Offset_2
0a04 e001 | | Load 0x0,0x1
0a05 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0a06 00d9 | | Load_Top At_Offset_1
0a07 a5f8 | | Store_Unchecked 0x2,-0x8
0a08 4508 |E | Exit_Subprogram 0x8
0a09 e001 | | Load 0x0,0x1
0a0a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a0b e5f9 | | Load 0x2,-0x7
0a0c e5fa | | Load 0x2,-0x6
0a0d 00db | | Load_Top At_Offset_3
0a0e e5fb | | Load 0x2,-0x5
0a0f e5fc | | Load 0x2,-0x4
0a10 e5fd | | Load 0x2,-0x3
0a11 e5fe | | Load 0x2,-0x2
0a12 e5ff | | Load 0x2,-0x1
0a13 828a | | Call 0x1,0x8a
0a14 005a | Z | Store_Top Discrete,At_Offset_2
0a15 00d9 | | Load_Top At_Offset_1
0a16 680d |h | Jump_Zero 0xa24
0a17 00d9 | | Load_Top At_Offset_1
0a18 a5f8 | | Store_Unchecked 0x2,-0x8
0a19 e001 | | Load 0x0,0x1
0a1a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a1b e5f9 | | Load 0x2,-0x7
0a1c e5ff | | Load 0x2,-0x1
0a1d e004 | | Load 0x0,0x4
0a1e 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0a1f 00da | | Load_Top At_Offset_2
0a20 e00f | | Load 0x0,0xf
0a21 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a22 005a | Z | Store_Top Discrete,At_Offset_2
0a23 4508 |E | Exit_Subprogram 0x8
0a24 e001 | | Load 0x0,0x1
0a25 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a26 e5f9 | | Load 0x2,-0x7
0a27 e5ff | | Load 0x2,-0x1
0a28 e004 | | Load 0x0,0x4
0a29 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0a2a 00da | | Load_Top At_Offset_2
0a2b e00f | | Load 0x0,0xf
0a2c 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a2d c5f8 | | Store 0x2,-0x8
0a2e 4508 |E | Exit_Subprogram 0x8
0a2f TRAP_09c8:
0a2f e001 | | Load 0x0,0x1
0a30 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0a31 010f | | Execute Exception,Equal
0a32 680b |h | Jump_Zero 0xa3e
0a33 e001 | | Load 0x0,0x1
0a34 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0a35 a5f8 | | Store_Unchecked 0x2,-0x8
0a36 e001 | | Load 0x0,0x1
0a37 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a38 4800 |H | Short_Literal 0x0
0a39 00db | | Load_Top At_Offset_3
0a3a e00f | | Load 0x0,0xf
0a3b 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a3c 005b | [ | Store_Top Discrete,At_Offset_3
0a3d 4508 |E | Exit_Subprogram 0x8
0a3e e5f9 | | Load 0x2,-0x7
0a3f 0092 19f0 | | Action Push_String_Extended,0x19f0 ; "Rcf_Unit.Upload_Text_File"
0a41 e005 | | Load 0x0,0x5
0a42 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a43 0092 19f0 | | Action Push_String_Extended,0x19f0 ; "Rcf_Unit.Upload_Text_File"
0a45 e005 | | Load 0x0,0x5
0a46 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a47 a5f8 | | Store_Unchecked 0x2,-0x8
0a48 e001 | | Load 0x0,0x1
0a49 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a4a 4800 |H | Short_Literal 0x0
0a4b 00db | | Load_Top At_Offset_3
0a4c e00f | | Load 0x0,0xf
0a4d 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0a4e 005b | [ | Store_Top Discrete,At_Offset_3
0a4f 4508 |E | Exit_Subprogram 0x8
0a50 ; --------------------------------------------------------------------------------------
0a50 ; SUBPROGRAM
0a50 ; --------------------------------------------------------------------------------------
0a50 0a60 | ` | .CONST 0x0a60 ; Address of begin
0a51 0a9f | | .CONST 0x0a9f ; Address of exception handler
0a52 0004 | | .CONST 0x0004 ; Number of locals
0a53 INIT_0a50:
0a53 e00e | | Load 0x0,0xe
0a54 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a55 02c7 | | Declare_Variable Any
0a56 00d8 | | Load_Top At_Offset_0
0a57 1c00 | | Execute_Immediate Run_Utility,0x0
0a58 e5fb | | Load 0x2,-0x5
0a59 e5fe | | Load 0x2,-0x2
0a5a e5fd | | Load 0x2,-0x3
0a5b e5ff | | Load 0x2,-0x1
0a5c 8228 | ( | Call 0x1,0x28
0a5d e001 | | Load 0x0,0x1
0a5e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a5f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a60 BODY_0a50:
0a60 e5fb | | Load 0x2,-0x5
0a61 e5ff | | Load 0x2,-0x1
0a62 e004 | | Load 0x0,0x4
0a63 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0a64 6816 |h | Jump_Zero 0xa7b
0a65 e5fb | | Load 0x2,-0x5
0a66 4801 |H | Short_Literal 0x1
0a67 4801 |H | Short_Literal 0x1
0a68 e006 | | Load 0x0,0x6
0a69 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a6a 0334 | 4 | Declare_Variable Array,With_Constraint
0a6b 0092 19f1 | | Action Push_String_Extended,0x19f1 ; "Update_Consistency"
0a6d e006 | | Load 0x0,0x6
0a6e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a6f e006 | | Load 0x0,0x6
0a70 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a71 0119 | | Execute Any,Check_In_Formal_Type
0a72 4801 |H | Short_Literal 0x1
0a73 00da | | Load_Top At_Offset_2
0a74 01d6 | | Execute Vector,Field_Write
0a75 603e |`> | Indirect_Literal Discrete,0xab4,{0x00000000, 0x0000818f}
0a76 e001 | | Load 0x0,0x1
0a77 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a78 4800 |H | Short_Literal 0x0
0a79 a5fa | | Store_Unchecked 0x2,-0x6
0a7a 4506 |E | Exit_Subprogram 0x6
0a7b 00da | | Load_Top At_Offset_2
0a7c 0120 | | Execute Any,Is_Value
0a7d 6803 |h | Jump_Zero 0xa81
0a7e e00e | | Load 0x0,0xe
0a7f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a80 7801 |x | Jump 0xa82
0a81 00da | | Load_Top At_Offset_2
0a82 e001 | | Load 0x0,0x1
0a83 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a84 4800 |H | Short_Literal 0x0
0a85 e5fc | | Load 0x2,-0x4
0a86 e403 | | Load 0x2,0x3
0a87 2503 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x3
0a88 e00f | | Load 0x0,0xf
0a89 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a8a 005a | Z | Store_Top Discrete,At_Offset_2
0a8b c402 | | Store 0x2,0x2
0a8c 00d8 | | Load_Top At_Offset_0
0a8d 6805 |h | Jump_Zero 0xa93
0a8e e5fb | | Load 0x2,-0x5
0a8f 00d9 | | Load_Top At_Offset_1
0a90 e001 | | Load 0x0,0x1
0a91 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0a92 7809 |x | Jump 0xa9c
0a93 e001 | | Load 0x0,0x1
0a94 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a95 e5fb | | Load 0x2,-0x5
0a96 e5fd | | Load 0x2,-0x3
0a97 e402 | | Load 0x2,0x2
0a98 e5fe | | Load 0x2,-0x2
0a99 e5ff | | Load 0x2,-0x1
0a9a 822c | , | Call 0x1,0x2c
0a9b 0059 | Y | Store_Top Discrete,At_Offset_1
0a9c 00d8 | | Load_Top At_Offset_0
0a9d a5fa | | Store_Unchecked 0x2,-0x6
0a9e 4506 |E | Exit_Subprogram 0x6
0a9f TRAP_0a50:
0a9f e001 | | Load 0x0,0x1
0aa0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0aa1 010f | | Execute Exception,Equal
0aa2 6804 |h | Jump_Zero 0xaa7
0aa3 e001 | | Load 0x0,0x1
0aa4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0aa5 a5fa | | Store_Unchecked 0x2,-0x6
0aa6 4506 |E | Exit_Subprogram 0x6
0aa7 e5fb | | Load 0x2,-0x5
0aa8 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Rcf_Unit.Update_Consistency"
0aaa e005 | | Load 0x0,0x5
0aab 180f | | Execute Package,Field_Execute,Field_Number 0xf
0aac 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Rcf_Unit.Update_Consistency"
0aae e005 | | Load 0x0,0x5
0aaf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ab0 a5fa | | Store_Unchecked 0x2,-0x6
0ab1 4506 |E | Exit_Subprogram 0x6
0ab2 0000 0000 | | .XXX[0x2]
0ab4 0000 0000 | | .LITERAL {0x00000000, 0x0000818f}
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0ac0 | | .CONST 0x0ac0 ; Address of begin
0ab9 0b13 | | .CONST 0x0b13 ; Address of exception handler
0aba 0003 | | .CONST 0x0003 ; Number of locals
0abb INIT_0ab8:
0abb e001 | | Load 0x0,0x1
0abc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0abd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0abe e00f | | Load 0x0,0xf
0abf 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0ac0 BODY_0ab8:
0ac0 e5fc | | Load 0x2,-0x4
0ac1 e5ff | | Load 0x2,-0x1
0ac2 e004 | | Load 0x0,0x4
0ac3 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0ac4 6816 |h | Jump_Zero 0xadb
0ac5 e5fc | | Load 0x2,-0x4
0ac6 4801 |H | Short_Literal 0x1
0ac7 4801 |H | Short_Literal 0x1
0ac8 e006 | | Load 0x0,0x6
0ac9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0aca 0334 | 4 | Declare_Variable Array,With_Constraint
0acb 0092 19f1 | | Action Push_String_Extended,0x19f1 ; "Update_Consistency"
0acd e006 | | Load 0x0,0x6
0ace 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0acf e006 | | Load 0x0,0x6
0ad0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ad1 0119 | | Execute Any,Check_In_Formal_Type
0ad2 4801 |H | Short_Literal 0x1
0ad3 00da | | Load_Top At_Offset_2
0ad4 01d6 | | Execute Vector,Field_Write
0ad5 67de |g | Indirect_Literal Discrete,0xab4,{0x00000000, 0x0000818f}
0ad6 e001 | | Load 0x0,0x1
0ad7 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ad8 4800 |H | Short_Literal 0x0
0ad9 a5fb | | Store_Unchecked 0x2,-0x5
0ada 4505 |E | Exit_Subprogram 0x5
0adb e001 | | Load 0x0,0x1
0adc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0add e00f | | Load 0x0,0xf
0ade 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0adf 4800 |H | Short_Literal 0x0
0ae0 e013 | | Load 0x0,0x13
0ae1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ae2 e013 | | Load 0x0,0x13
0ae3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0ae4 e013 | | Load 0x0,0x13
0ae5 180d | | Execute Package,Field_Execute,Field_Number 0xd
0ae6 e5fd | | Load 0x2,-0x3
0ae7 e003 | | Load 0x0,0x3
0ae8 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0ae9 e00f | | Load 0x0,0xf
0aea 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0aeb 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0aec 005a | Z | Store_Top Discrete,At_Offset_2
0aed 00d9 | | Load_Top At_Offset_1
0aee 6807 |h | Jump_Zero 0xaf6
0aef e5fc | | Load 0x2,-0x4
0af0 00da | | Load_Top At_Offset_2
0af1 e001 | | Load 0x0,0x1
0af2 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0af3 00d9 | | Load_Top At_Offset_1
0af4 a5fb | | Store_Unchecked 0x2,-0x5
0af5 4505 |E | Exit_Subprogram 0x5
0af6 e001 | | Load 0x0,0x1
0af7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0af8 e5fc | | Load 0x2,-0x4
0af9 00da | | Load_Top At_Offset_2
0afa e5fd | | Load 0x2,-0x3
0afb e5fe | | Load 0x2,-0x2
0afc e5ff | | Load 0x2,-0x1
0afd 8231 | 1 | Call 0x1,0x31
0afe 005a | Z | Store_Top Discrete,At_Offset_2
0aff 00d9 | | Load_Top At_Offset_1
0b00 680a |h | Jump_Zero 0xb0b
0b01 00d9 | | Load_Top At_Offset_1
0b02 a5fb | | Store_Unchecked 0x2,-0x5
0b03 e001 | | Load 0x0,0x1
0b04 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b05 4800 |H | Short_Literal 0x0
0b06 00da | | Load_Top At_Offset_2
0b07 e00f | | Load 0x0,0xf
0b08 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0b09 005a | Z | Store_Top Discrete,At_Offset_2
0b0a 4505 |E | Exit_Subprogram 0x5
0b0b e001 | | Load 0x0,0x1
0b0c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b0d 4800 |H | Short_Literal 0x0
0b0e 00da | | Load_Top At_Offset_2
0b0f e00f | | Load 0x0,0xf
0b10 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0b11 c5fb | | Store 0x2,-0x5
0b12 4505 |E | Exit_Subprogram 0x5
0b13 TRAP_0ab8:
0b13 e001 | | Load 0x0,0x1
0b14 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b15 010f | | Execute Exception,Equal
0b16 680b |h | Jump_Zero 0xb22
0b17 e001 | | Load 0x0,0x1
0b18 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b19 a5fb | | Store_Unchecked 0x2,-0x5
0b1a e001 | | Load 0x0,0x1
0b1b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b1c 4800 |H | Short_Literal 0x0
0b1d 00db | | Load_Top At_Offset_3
0b1e e00f | | Load 0x0,0xf
0b1f 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0b20 005b | [ | Store_Top Discrete,At_Offset_3
0b21 4505 |E | Exit_Subprogram 0x5
0b22 e5fc | | Load 0x2,-0x4
0b23 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Rcf_Unit.Update_Consistency"
0b25 e005 | | Load 0x0,0x5
0b26 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b27 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Rcf_Unit.Update_Consistency"
0b29 e005 | | Load 0x0,0x5
0b2a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b2b a5fb | | Store_Unchecked 0x2,-0x5
0b2c e001 | | Load 0x0,0x1
0b2d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b2e 4800 |H | Short_Literal 0x0
0b2f 00db | | Load_Top At_Offset_3
0b30 e00f | | Load 0x0,0xf
0b31 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0b32 005b | [ | Store_Top Discrete,At_Offset_3
0b33 4505 |E | Exit_Subprogram 0x5
0b34 0000 0000 | | .BLANK 0000[0x4]
0b38 ; --------------------------------------------------------------------------------------
0b38 ; SUBPROGRAM
0b38 ; --------------------------------------------------------------------------------------
0b38 0b59 | Y | .CONST 0x0b59 ; Address of begin
0b39 0bd3 | | .CONST 0x0bd3 ; Address of exception handler
0b3a 0008 | | .CONST 0x0008 ; Number of locals
0b3b INIT_0b38:
0b3b e00c | | Load 0x0,0xc
0b3c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b3d 02c7 | | Declare_Variable Any
0b3e 00d8 | | Load_Top At_Offset_0
0b3f 1c00 | | Execute_Immediate Run_Utility,0x0
0b40 e014 | | Load 0x0,0x14
0b41 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b42 02c7 | | Declare_Variable Any
0b43 00d8 | | Load_Top At_Offset_0
0b44 1c00 | | Execute_Immediate Run_Utility,0x0
0b45 e001 | | Load 0x0,0x1
0b46 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b47 00e1 | | Load_Encached Boolean_Cache
0b48 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b49 e00c | | Load 0x0,0xc
0b4a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b4b 02c7 | | Declare_Variable Any
0b4c 00d8 | | Load_Top At_Offset_0
0b4d 1c00 | | Execute_Immediate Run_Utility,0x0
0b4e 00e1 | | Load_Encached Boolean_Cache
0b4f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b50 e5ff | | Load 0x2,-0x1
0b51 e004 | | Load 0x0,0x4
0b52 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b53 0092 19f3 | | Action Push_String_Extended,0x19f3 ; "."
0b55 01cc | | Execute Vector,Catenate
0b56 e5fe | | Load 0x2,-0x2
0b57 01cc | | Execute Vector,Catenate
0b58 0007 | | Action Break_Optional
0b59 BODY_0b38:
0b59 4800 |H | Short_Literal 0x0
0b5a a5fc | | Store_Unchecked 0x2,-0x4
0b5b e5fe | | Load 0x2,-0x2
0b5c 01db | | Execute Vector,Length
0b5d 0f00 | | Execute_Immediate Equal,0x0
0b5e e5fe | | Load 0x2,-0x2
0b5f 0092 19f4 | | Action Push_String_Extended,0x19f4 ; "state"
0b61 01df | | Execute Vector,Equal
0b62 0278 | x | Execute Discrete,Or
0b63 6803 |h | Jump_Zero 0xb67
0b64 e001 | | Load 0x0,0x1
0b65 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b66 0257 | W | Execute Discrete,Raise
0b67 00e1 | | Load_Encached Boolean_Cache
0b68 e403 | | Load 0x2,0x3
0b69 e5fd | | Load 0x2,-0x3
0b6a 00db | | Load_Top At_Offset_3
0b6b 829e | | Call 0x1,0x9e
0b6c c403 | | Store 0x2,0x3
0b6d c405 | | Store 0x2,0x5
0b6e 00db | | Load_Top At_Offset_3
0b6f 700c |p | Jump_Nonzero 0xb7c
0b70 e403 | | Load 0x2,0x3
0b71 00ea | | Load_Encached Null_String_Cache
0b72 00da | | Load_Top At_Offset_2
0b73 4801 |H | Short_Literal 0x1
0b74 e014 | | Load 0x0,0x14
0b75 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b76 c403 | | Store 0x2,0x3
0b77 e403 | | Load 0x2,0x3
0b78 e014 | | Load 0x0,0x14
0b79 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b7a c403 | | Store 0x2,0x3
0b7b 7804 |x | Jump 0xb80
0b7c e403 | | Load 0x2,0x3
0b7d e014 | | Load 0x0,0x14
0b7e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b7f c403 | | Store 0x2,0x3
0b80 e5fd | | Load 0x2,-0x3
0b81 00d9 | | Load_Top At_Offset_1
0b82 8295 | | Call 0x1,0x95
0b83 c402 | | Store 0x2,0x2
0b84 e402 | | Load 0x2,0x2
0b85 e004 | | Load 0x0,0x4
0b86 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0b87 6815 |h | Jump_Zero 0xb9d
0b88 e5fd | | Load 0x2,-0x3
0b89 4801 |H | Short_Literal 0x1
0b8a 4801 |H | Short_Literal 0x1
0b8b e006 | | Load 0x0,0x6
0b8c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b8d 0334 | 4 | Declare_Variable Array,With_Constraint
0b8e 00da | | Load_Top At_Offset_2
0b8f e006 | | Load 0x0,0x6
0b90 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b91 e006 | | Load 0x0,0x6
0b92 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b93 0119 | | Execute Any,Check_In_Formal_Type
0b94 4801 |H | Short_Literal 0x1
0b95 00da | | Load_Top At_Offset_2
0b96 01d6 | | Execute Vector,Field_Write
0b97 6060 |`` | Indirect_Literal Discrete,0xbf8,{0x00000000, 0x000081ac}
0b98 e001 | | Load 0x0,0x1
0b99 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0b9a e001 | | Load 0x0,0x1
0b9b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b9c 0257 | W | Execute Discrete,Raise
0b9d 00db | | Load_Top At_Offset_3
0b9e 682d |h- | Jump_Zero 0xbcc
0b9f 00e1 | | Load_Encached Boolean_Cache
0ba0 00db | | Load_Top At_Offset_3
0ba1 0120 | | Execute Any,Is_Value
0ba2 6803 |h | Jump_Zero 0xba6
0ba3 e00c | | Load 0x0,0xc
0ba4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ba5 7801 |x | Jump 0xba7
0ba6 00db | | Load_Top At_Offset_3
0ba7 e5fd | | Load 0x2,-0x3
0ba8 e402 | | Load 0x2,0x2
0ba9 8287 | | Call 0x1,0x87
0baa c406 | | Store 0x2,0x6
0bab 005a | Z | Store_Top Discrete,At_Offset_2
0bac 00d9 | | Load_Top At_Offset_1
0bad 681e |h | Jump_Zero 0xbcc
0bae e5fd | | Load 0x2,-0x3
0baf 4801 |H | Short_Literal 0x1
0bb0 4802 |H | Short_Literal 0x2
0bb1 e006 | | Load 0x0,0x6
0bb2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bb3 0334 | 4 | Declare_Variable Array,With_Constraint
0bb4 e402 | | Load 0x2,0x2
0bb5 e004 | | Load 0x0,0x4
0bb6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0bb7 e006 | | Load 0x0,0x6
0bb8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bb9 0119 | | Execute Any,Check_In_Formal_Type
0bba 4801 |H | Short_Literal 0x1
0bbb 00da | | Load_Top At_Offset_2
0bbc 01d6 | | Execute Vector,Field_Write
0bbd e406 | | Load 0x2,0x6
0bbe e004 | | Load 0x0,0x4
0bbf 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0bc0 e006 | | Load 0x0,0x6
0bc1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bc2 0119 | | Execute Any,Check_In_Formal_Type
0bc3 4802 |H | Short_Literal 0x2
0bc4 00da | | Load_Top At_Offset_2
0bc5 01d6 | | Execute Vector,Field_Write
0bc6 602d |`- | Indirect_Literal Discrete,0xbf4,{0x00000000, 0x000081cb}
0bc7 e001 | | Load 0x0,0x1
0bc8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0bc9 e001 | | Load 0x0,0x1
0bca 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0bcb 0257 | W | Execute Discrete,Raise
0bcc e001 | | Load 0x0,0x1
0bcd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bce e5fd | | Load 0x2,-0x3
0bcf e402 | | Load 0x2,0x2
0bd0 8260 | ` | Call 0x1,0x60
0bd1 c404 | | Store 0x2,0x4
0bd2 4504 |E | Exit_Subprogram 0x4
0bd3 TRAP_0b38:
0bd3 0007 | | Action Break_Optional
0bd4 e5fd | | Load 0x2,-0x3
0bd5 4801 |H | Short_Literal 0x1
0bd6 4801 |H | Short_Literal 0x1
0bd7 e006 | | Load 0x0,0x6
0bd8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bd9 0334 | 4 | Declare_Variable Array,With_Constraint
0bda 00db | | Load_Top At_Offset_3
0bdb e006 | | Load 0x0,0x6
0bdc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bdd e006 | | Load 0x0,0x6
0bde 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bdf 0119 | | Execute Any,Check_In_Formal_Type
0be0 4801 |H | Short_Literal 0x1
0be1 00da | | Load_Top At_Offset_2
0be2 01d6 | | Execute Vector,Field_Write
0be3 600c |` | Indirect_Literal Discrete,0xbf0,{0x00000000, 0x000081a1}
0be4 e001 | | Load 0x0,0x1
0be5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0be6 e006 | | Load 0x0,0x6
0be7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0be8 6007 |` | Indirect_Literal Discrete,0xbf0,{0x00000000, 0x000081a1}
0be9 e001 | | Load 0x0,0x1
0bea 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0beb a5fc | | Store_Unchecked 0x2,-0x4
0bec 4504 |E | Exit_Subprogram 0x4
0bed 0000 0000 | | .XXX[0x3]
0bef 0000 | |
0bf0 0000 0000 | | .LITERAL {0x00000000, 0x000081a1}
0bf4 0000 0000 | | .LITERAL {0x00000000, 0x000081cb}
0bf8 0000 0000 | | .LITERAL {0x00000000, 0x000081ac}
0bfc 0000 0000 | | .BLANK 0000[0x4]
0c00 ; --------------------------------------------------------------------------------------
0c00 ; SUBPROGRAM
0c00 ; --------------------------------------------------------------------------------------
0c00 0c0a | | .CONST 0x0c0a ; Address of begin
0c01 0c20 | | .CONST 0x0c20 ; Address of exception handler
0c02 0005 | | .CONST 0x0005 ; Number of locals
0c03 INIT_0c00:
0c03 e00c | | Load 0x0,0xc
0c04 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c05 e28c | | Load 0x1,0x8c
0c06 0322 | " | Declare_Variable Record
0c07 00e2 | | Load_Encached Integer_Cache
0c08 e5ff | | Load 0x2,-0x1
0c09 8291 | | Call 0x1,0x91
0c0a BODY_0c00:
0c0a 4800 |H | Short_Literal 0x0
0c0b a5f9 | | Store_Unchecked 0x2,-0x7
0c0c 00da | | Load_Top At_Offset_2
0c0d e5fa | | Load 0x2,-0x6
0c0e 00da | | Load_Top At_Offset_2
0c0f 82a2 | | Call 0x1,0xa2
0c10 00d1 | | Pop_Control Pop_Count_1
0c11 00da | | Load_Top At_Offset_2
0c12 e5fb | | Load 0x2,-0x5
0c13 829d | | Call 0x1,0x9d
0c14 00d1 | | Pop_Control Pop_Count_1
0c15 e5fa | | Load 0x2,-0x6
0c16 00db | | Load_Top At_Offset_3
0c17 00da | | Load_Top At_Offset_2
0c18 82a0 | | Call 0x1,0xa0
0c19 e5fa | | Load 0x2,-0x6
0c1a e5fc | | Load 0x2,-0x4
0c1b e5fd | | Load 0x2,-0x3
0c1c e5fe | | Load 0x2,-0x2
0c1d e5ff | | Load 0x2,-0x1
0c1e 82a7 | | Call 0x1,0xa7
0c1f 4507 |E | Exit_Subprogram 0x7
0c20 TRAP_0c00:
0c20 0007 | | Action Break_Optional
0c21 e5fa | | Load 0x2,-0x6
0c22 4801 |H | Short_Literal 0x1
0c23 4801 |H | Short_Literal 0x1
0c24 e006 | | Load 0x0,0x6
0c25 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c26 0334 | 4 | Declare_Variable Array,With_Constraint
0c27 e5ff | | Load 0x2,-0x1
0c28 e006 | | Load 0x0,0x6
0c29 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0c2a e006 | | Load 0x0,0x6
0c2b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c2c 0119 | | Execute Any,Check_In_Formal_Type
0c2d 4801 |H | Short_Literal 0x1
0c2e 00da | | Load_Top At_Offset_2
0c2f 01d6 | | Execute Vector,Field_Write
0c30 600b |` | Indirect_Literal Discrete,0xc3c,{0x00000000, 0x000081a2}
0c31 e001 | | Load 0x0,0x1
0c32 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c33 e006 | | Load 0x0,0x6
0c34 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c35 6006 |` | Indirect_Literal Discrete,0xc3c,{0x00000000, 0x000081a2}
0c36 e001 | | Load 0x0,0x1
0c37 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c38 a5f9 | | Store_Unchecked 0x2,-0x7
0c39 4507 |E | Exit_Subprogram 0x7
0c3a 0000 0000 | | .XXX[0x2]
0c3c 0000 0000 | | .LITERAL {0x00000000, 0x000081a2}
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c4f | O | .CONST 0x0c4f ; Address of begin
0c41 0c6f | o | .CONST 0x0c6f ; Address of exception handler
0c42 0006 | | .CONST 0x0006 ; Number of locals
0c43 INIT_0c40:
0c43 00e1 | | Load_Encached Boolean_Cache
0c44 e00c | | Load 0x0,0xc
0c45 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c46 02c7 | | Declare_Variable Any
0c47 00d8 | | Load_Top At_Offset_0
0c48 1c00 | | Execute_Immediate Run_Utility,0x0
0c49 00e2 | | Load_Encached Integer_Cache
0c4a e5ff | | Load 0x2,-0x1
0c4b e004 | | Load 0x0,0x4
0c4c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c4d 029f 179b | | Declare_Subprogram For_Call,INIT_1798
0c4f BODY_0c40:
0c4f 4800 |H | Short_Literal 0x0
0c50 a5fd | | Store_Unchecked 0x2,-0x3
0c51 e001 | | Load 0x0,0x1
0c52 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c53 00e2 | | Load_Encached Integer_Cache
0c54 e403 | | Load 0x2,0x3
0c55 0120 | | Execute Any,Is_Value
0c56 6803 |h | Jump_Zero 0xc5a
0c57 e00c | | Load 0x0,0xc
0c58 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c59 7801 |x | Jump 0xc5b
0c5a e403 | | Load 0x2,0x3
0c5b e5fe | | Load 0x2,-0x2
0c5c e5ff | | Load 0x2,-0x1
0c5d 8267 | g | Call 0x1,0x67
0c5e c403 | | Store 0x2,0x3
0c5f c404 | | Store 0x2,0x4
0c60 c5fd | | Store 0x2,-0x3
0c61 e001 | | Load 0x0,0x1
0c62 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c63 e5fe | | Load 0x2,-0x2
0c64 e5ff | | Load 0x2,-0x1
0c65 8261 | a | Call 0x1,0x61
0c66 c5fd | | Store 0x2,-0x3
0c67 e5fe | | Load 0x2,-0x2
0c68 00da | | Load_Top At_Offset_2
0c69 828f | | Call 0x1,0x8f
0c6a 00da | | Load_Top At_Offset_2
0c6b 0f01 | | Execute_Immediate Equal,0x1
0c6c 6801 |h | Jump_Zero 0xc6e
0c6d 8406 | | Call 0x2,0x6
0c6e 4503 |E | Exit_Subprogram 0x3
0c6f TRAP_0c40:
0c6f 0007 | | Action Break_Optional
0c70 e5fe | | Load 0x2,-0x2
0c71 4801 |H | Short_Literal 0x1
0c72 4801 |H | Short_Literal 0x1
0c73 e006 | | Load 0x0,0x6
0c74 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c75 0334 | 4 | Declare_Variable Array,With_Constraint
0c76 e405 | | Load 0x2,0x5
0c77 e006 | | Load 0x0,0x6
0c78 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c79 e006 | | Load 0x0,0x6
0c7a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c7b 0119 | | Execute Any,Check_In_Formal_Type
0c7c 4801 |H | Short_Literal 0x1
0c7d 00da | | Load_Top At_Offset_2
0c7e 01d6 | | Execute Vector,Field_Write
0c7f 600c |` | Indirect_Literal Discrete,0xc8c,{0x00000000, 0x000081a3}
0c80 e001 | | Load 0x0,0x1
0c81 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c82 e006 | | Load 0x0,0x6
0c83 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c84 6007 |` | Indirect_Literal Discrete,0xc8c,{0x00000000, 0x000081a3}
0c85 e001 | | Load 0x0,0x1
0c86 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c87 a5fd | | Store_Unchecked 0x2,-0x3
0c88 4503 |E | Exit_Subprogram 0x3
0c89 0000 0000 | | .XXX[0x3]
0c8b 0000 | |
0c8c 0000 0000 | | .LITERAL {0x00000000, 0x000081a3}
0c90 ; --------------------------------------------------------------------------------------
0c90 ; SUBPROGRAM
0c90 ; --------------------------------------------------------------------------------------
0c90 0ca7 | | .CONST 0x0ca7 ; Address of begin
0c91 0d60 | ` | .CONST 0x0d60 ; Address of exception handler
0c92 0006 | | .CONST 0x0006 ; Number of locals
0c93 INIT_0c90:
0c93 e00c | | Load 0x0,0xc
0c94 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c95 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0c96 02c7 | | Declare_Variable Any
0c97 00d8 | | Load_Top At_Offset_0
0c98 1c00 | | Execute_Immediate Run_Utility,0x0
0c99 e26f | o | Load 0x1,0x6f
0c9a 0322 | " | Declare_Variable Record
0c9b 00d8 | | Load_Top At_Offset_0
0c9c 1c00 | | Execute_Immediate Run_Utility,0x0
0c9d e00c | | Load 0x0,0xc
0c9e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c9f 02c7 | | Declare_Variable Any
0ca0 00d8 | | Load_Top At_Offset_0
0ca1 1c00 | | Execute_Immediate Run_Utility,0x0
0ca2 e001 | | Load 0x0,0x1
0ca3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ca4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ca5 00e1 | | Load_Encached Boolean_Cache
0ca6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ca7 BODY_0c90:
0ca7 e001 | | Load 0x0,0x1
0ca8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ca9 e402 | | Load 0x2,0x2
0caa 0120 | | Execute Any,Is_Value
0cab 6804 |h | Jump_Zero 0xcb0
0cac e00c | | Load 0x0,0xc
0cad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0cae 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0caf 7801 |x | Jump 0xcb1
0cb0 e402 | | Load 0x2,0x2
0cb1 e5fe | | Load 0x2,-0x2
0cb2 e5ff | | Load 0x2,-0x1
0cb3 825f | _ | Call 0x1,0x5f
0cb4 c402 | | Store 0x2,0x2
0cb5 005a | Z | Store_Top Discrete,At_Offset_2
0cb6 00d9 | | Load_Top At_Offset_1
0cb7 6803 |h | Jump_Zero 0xcbb
0cb8 e001 | | Load 0x0,0x1
0cb9 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0cba 0257 | W | Execute Discrete,Raise
0cbb e402 | | Load 0x2,0x2
0cbc e00c | | Load 0x0,0xc
0cbd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0cbe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0cbf 6815 |h | Jump_Zero 0xcd5
0cc0 e5fe | | Load 0x2,-0x2
0cc1 4801 |H | Short_Literal 0x1
0cc2 4801 |H | Short_Literal 0x1
0cc3 e006 | | Load 0x0,0x6
0cc4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cc5 0334 | 4 | Declare_Variable Array,With_Constraint
0cc6 e5ff | | Load 0x2,-0x1
0cc7 e004 | | Load 0x0,0x4
0cc8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0cc9 e006 | | Load 0x0,0x6
0cca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ccb 0119 | | Execute Any,Check_In_Formal_Type
0ccc 4801 |H | Short_Literal 0x1
0ccd 00da | | Load_Top At_Offset_2
0cce 01d6 | | Execute Vector,Field_Write
0ccf 60a0 |` | Indirect_Literal Discrete,0xd70,{0x00000000, 0x000081a8}
0cd0 e001 | | Load 0x0,0x1
0cd1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0cd2 4800 |H | Short_Literal 0x0
0cd3 a5fd | | Store_Unchecked 0x2,-0x3
0cd4 4503 |E | Exit_Subprogram 0x3
0cd5 e5fe | | Load 0x2,-0x2
0cd6 4801 |H | Short_Literal 0x1
0cd7 4801 |H | Short_Literal 0x1
0cd8 e006 | | Load 0x0,0x6
0cd9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cda 0334 | 4 | Declare_Variable Array,With_Constraint
0cdb e5ff | | Load 0x2,-0x1
0cdc e004 | | Load 0x0,0x4
0cdd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0cde e006 | | Load 0x0,0x6
0cdf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ce0 0119 | | Execute Any,Check_In_Formal_Type
0ce1 4801 |H | Short_Literal 0x1
0ce2 00da | | Load_Top At_Offset_2
0ce3 01d6 | | Execute Vector,Field_Write
0ce4 6087 |` | Indirect_Literal Discrete,0xd6c,{0x00000000, 0x000081a9}
0ce5 e001 | | Load 0x0,0x1
0ce6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ce7 e5fe | | Load 0x2,-0x2
0ce8 e5ff | | Load 0x2,-0x1
0ce9 8273 | s | Call 0x1,0x73
0cea 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0ceb e5fe | | Load 0x2,-0x2
0cec 4801 |H | Short_Literal 0x1
0ced 4802 |H | Short_Literal 0x2
0cee e006 | | Load 0x0,0x6
0cef 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cf0 0334 | 4 | Declare_Variable Array,With_Constraint
0cf1 e5ff | | Load 0x2,-0x1
0cf2 e004 | | Load 0x0,0x4
0cf3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0cf4 e006 | | Load 0x0,0x6
0cf5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0cf6 0119 | | Execute Any,Check_In_Formal_Type
0cf7 4801 |H | Short_Literal 0x1
0cf8 00da | | Load_Top At_Offset_2
0cf9 01d6 | | Execute Vector,Field_Write
0cfa 00da | | Load_Top At_Offset_2
0cfb 00e1 | | Load_Encached Boolean_Cache
0cfc 011c | | Execute Any,Convert_Unchecked
0cfd 1c01 | | Execute_Immediate Run_Utility,0x1
0cfe e006 | | Load 0x0,0x6
0cff 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d00 e006 | | Load 0x0,0x6
0d01 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d02 0119 | | Execute Any,Check_In_Formal_Type
0d03 4802 |H | Short_Literal 0x2
0d04 00da | | Load_Top At_Offset_2
0d05 01d6 | | Execute Vector,Field_Write
0d06 6061 |`a | Indirect_Literal Discrete,0xd68,{0x00000000, 0x000081ab}
0d07 e001 | | Load 0x0,0x1
0d08 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d09 00cf | | Action Mark_Auxiliary
0d0a 784f |xO | Jump 0xd5a
0d0b e5fe | | Load 0x2,-0x2
0d0c 4801 |H | Short_Literal 0x1
0d0d e402 | | Load 0x2,0x2
0d0e e004 | | Load 0x0,0x4
0d0f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0d10 c404 | | Store 0x2,0x4
0d11 e403 | | Load 0x2,0x3
0d12 e5fe | | Load 0x2,-0x2
0d13 e404 | | Load 0x2,0x4
0d14 e004 | | Load 0x0,0x4
0d15 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0d16 82a3 | | Call 0x1,0xa3
0d17 00d1 | | Pop_Control Pop_Count_1
0d18 e5fe | | Load 0x2,-0x2
0d19 4801 |H | Short_Literal 0x1
0d1a 4804 |H | Short_Literal 0x4
0d1b e006 | | Load 0x0,0x6
0d1c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d1d 0334 | 4 | Declare_Variable Array,With_Constraint
0d1e e404 | | Load 0x2,0x4
0d1f e004 | | Load 0x0,0x4
0d20 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0d21 e006 | | Load 0x0,0x6
0d22 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d23 0119 | | Execute Any,Check_In_Formal_Type
0d24 4801 |H | Short_Literal 0x1
0d25 00da | | Load_Top At_Offset_2
0d26 01d6 | | Execute Vector,Field_Write
0d27 4801 |H | Short_Literal 0x1
0d28 e403 | | Load 0x2,0x3
0d29 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0d2a e403 | | Load 0x2,0x3
0d2b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0d2c 01cf | | Execute Vector,Slice_Read
0d2d e006 | | Load 0x0,0x6
0d2e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d2f e006 | | Load 0x0,0x6
0d30 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d31 0119 | | Execute Any,Check_In_Formal_Type
0d32 4802 |H | Short_Literal 0x2
0d33 00da | | Load_Top At_Offset_2
0d34 01d6 | | Execute Vector,Field_Write
0d35 4801 |H | Short_Literal 0x1
0d36 e403 | | Load 0x2,0x3
0d37 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0d38 e403 | | Load 0x2,0x3
0d39 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0d3a 01cf | | Execute Vector,Slice_Read
0d3b e006 | | Load 0x0,0x6
0d3c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d3d e006 | | Load 0x0,0x6
0d3e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d3f 0119 | | Execute Any,Check_In_Formal_Type
0d40 4803 |H | Short_Literal 0x3
0d41 00da | | Load_Top At_Offset_2
0d42 01d6 | | Execute Vector,Field_Write
0d43 4801 |H | Short_Literal 0x1
0d44 e403 | | Load 0x2,0x3
0d45 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0d46 e403 | | Load 0x2,0x3
0d47 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0d48 01cf | | Execute Vector,Slice_Read
0d49 e006 | | Load 0x0,0x6
0d4a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d4b e006 | | Load 0x0,0x6
0d4c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d4d 0119 | | Execute Any,Check_In_Formal_Type
0d4e 4804 |H | Short_Literal 0x4
0d4f 00da | | Load_Top At_Offset_2
0d50 01d6 | | Execute Vector,Field_Write
0d51 6012 |` | Indirect_Literal Discrete,0xd64,{0x00000000, 0x000081aa}
0d52 e001 | | Load 0x0,0x1
0d53 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d54 e402 | | Load 0x2,0x2
0d55 e00c | | Load 0x0,0xc
0d56 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d57 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0d58 c402 | | Store 0x2,0x2
0d59 00c9 | | Action Pop_Auxiliary_Loop
0d5a e402 | | Load 0x2,0x2
0d5b e00c | | Load 0x0,0xc
0d5c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d5d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0d5e 6fac |o | Jump_Zero 0xd0b
0d5f 4503 |E | Exit_Subprogram 0x3
0d60 TRAP_0c90:
0d60 0007 | | Action Break_Optional
0d61 00da | | Load_Top At_Offset_2
0d62 a5fd | | Store_Unchecked 0x2,-0x3
0d63 4503 |E | Exit_Subprogram 0x3
0d64 0000 0000 | | .LITERAL {0x00000000, 0x000081aa}
0d68 0000 0000 | | .LITERAL {0x00000000, 0x000081ab}
0d6c 0000 0000 | | .LITERAL {0x00000000, 0x000081a9}
0d70 0000 0000 | | .LITERAL {0x00000000, 0x000081a8}
0d74 0000 0000 | | .BLANK 0000[0x4]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0d81 | | .CONST 0x0d81 ; Address of begin
0d79 0d99 | | .CONST 0x0d99 ; Address of exception handler
0d7a 0002 | | .CONST 0x0002 ; Number of locals
0d7b INIT_0d78:
0d7b e00c | | Load 0x0,0xc
0d7c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d7d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0d7e 02c7 | | Declare_Variable Any
0d7f 00d8 | | Load_Top At_Offset_0
0d80 1c00 | | Execute_Immediate Run_Utility,0x0
0d81 BODY_0d78:
0d81 4800 |H | Short_Literal 0x0
0d82 a5fc | | Store_Unchecked 0x2,-0x4
0d83 4800 |H | Short_Literal 0x0
0d84 a5fd | | Store_Unchecked 0x2,-0x3
0d85 00db | | Load_Top At_Offset_3
0d86 e004 | | Load 0x0,0x4
0d87 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0d88 e28e | | Load 0x1,0x8e
0d89 01cc | | Execute Vector,Catenate
0d8a 8296 | | Call 0x1,0x96
0d8b c402 | | Store 0x2,0x2
0d8c 00d8 | | Load_Top At_Offset_0
0d8d e00c | | Load 0x0,0xc
0d8e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d8f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d90 7007 |p | Jump_Nonzero 0xd98
0d91 00d8 | | Load_Top At_Offset_0
0d92 e00c | | Load 0x0,0xc
0d93 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d94 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0d95 7002 |p | Jump_Nonzero 0xd98
0d96 4801 |H | Short_Literal 0x1
0d97 a5fd | | Store_Unchecked 0x2,-0x3
0d98 4503 |E | Exit_Subprogram 0x3
0d99 TRAP_0d78:
0d99 0007 | | Action Break_Optional
0d9a e006 | | Load 0x0,0x6
0d9b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d9c 6007 |` | Indirect_Literal Discrete,0xda4,{0x00000000, 0x0000813b}
0d9d e001 | | Load 0x0,0x1
0d9e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d9f a5fc | | Store_Unchecked 0x2,-0x4
0da0 4503 |E | Exit_Subprogram 0x3
0da1 0000 0000 | | .XXX[0x3]
0da3 0000 | |
0da4 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0da8 ; --------------------------------------------------------------------------------------
0da8 ; SUBPROGRAM
0da8 ; --------------------------------------------------------------------------------------
0da8 0dab | | .CONST 0x0dab ; Address of begin
0da9 0dbf | | .CONST 0x0dbf ; Address of exception handler
0daa 0001 | | .CONST 0x0001 ; Number of locals
0dab BODY_0da8:
0dab INIT_0da8:
0dab 4800 |H | Short_Literal 0x0
0dac a5fa | | Store_Unchecked 0x2,-0x6
0dad 00e2 | | Load_Encached Integer_Cache
0dae 00e1 | | Load_Encached Boolean_Cache
0daf e5fd | | Load 0x2,-0x3
0db0 0120 | | Execute Any,Is_Value
0db1 6803 |h | Jump_Zero 0xdb5
0db2 e00c | | Load 0x0,0xc
0db3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0db4 7801 |x | Jump 0xdb6
0db5 e5fd | | Load 0x2,-0x3
0db6 e5fe | | Load 0x2,-0x2
0db7 e5ff | | Load 0x2,-0x1
0db8 e004 | | Load 0x0,0x4
0db9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0dba 82aa | | Call 0x1,0xaa
0dbb c5fd | | Store 0x2,-0x3
0dbc c5fc | | Store 0x2,-0x4
0dbd c5fb | | Store 0x2,-0x5
0dbe 4503 |E | Exit_Subprogram 0x3
0dbf TRAP_0da8:
0dbf 0007 | | Action Break_Optional
0dc0 e006 | | Load 0x0,0x6
0dc1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0dc2 67e1 |g | Indirect_Literal Discrete,0xda4,{0x00000000, 0x0000813b}
0dc3 e001 | | Load 0x0,0x1
0dc4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0dc5 a5fa | | Store_Unchecked 0x2,-0x6
0dc6 4503 |E | Exit_Subprogram 0x3
0dc7 0000 | | .XXX[0x1]
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0dcc | | .CONST 0x0dcc ; Address of begin
0dc9 0dfb | | .CONST 0x0dfb ; Address of exception handler
0dca 0002 | | .CONST 0x0002 ; Number of locals
0dcb INIT_0dc8:
0dcb 00e1 | | Load_Encached Boolean_Cache
0dcc BODY_0dc8:
0dcc 4800 |H | Short_Literal 0x0
0dcd a5fb | | Store_Unchecked 0x2,-0x5
0dce e001 | | Load 0x0,0x1
0dcf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dd0 00e2 | | Load_Encached Integer_Cache
0dd1 00e1 | | Load_Encached Boolean_Cache
0dd2 e5fd | | Load 0x2,-0x3
0dd3 0120 | | Execute Any,Is_Value
0dd4 6803 |h | Jump_Zero 0xdd8
0dd5 e00c | | Load 0x0,0xc
0dd6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0dd7 7801 |x | Jump 0xdd9
0dd8 e5fd | | Load 0x2,-0x3
0dd9 e5fe | | Load 0x2,-0x2
0dda e5ff | | Load 0x2,-0x1
0ddb 8266 | f | Call 0x1,0x66
0ddc c5fd | | Store 0x2,-0x3
0ddd 005b | [ | Store_Top Discrete,At_Offset_3
0dde c5fc | | Store 0x2,-0x4
0ddf c5fb | | Store 0x2,-0x5
0de0 00d8 | | Load_Top At_Offset_0
0de1 7018 |p | Jump_Nonzero 0xdfa
0de2 e5fe | | Load 0x2,-0x2
0de3 4801 |H | Short_Literal 0x1
0de4 4801 |H | Short_Literal 0x1
0de5 e006 | | Load 0x0,0x6
0de6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0de7 0334 | 4 | Declare_Variable Array,With_Constraint
0de8 e5ff | | Load 0x2,-0x1
0de9 e004 | | Load 0x0,0x4
0dea 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0deb e006 | | Load 0x0,0x6
0dec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ded 0119 | | Execute Any,Check_In_Formal_Type
0dee 4801 |H | Short_Literal 0x1
0def 00da | | Load_Top At_Offset_2
0df0 01d6 | | Execute Vector,Field_Write
0df1 600e |` | Indirect_Literal Discrete,0xe00,{0x00000000, 0x000081a4}
0df2 e001 | | Load 0x0,0x1
0df3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0df4 e006 | | Load 0x0,0x6
0df5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0df6 6009 |` | Indirect_Literal Discrete,0xe00,{0x00000000, 0x000081a4}
0df7 e001 | | Load 0x0,0x1
0df8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0df9 a5fb | | Store_Unchecked 0x2,-0x5
0dfa 4503 |E | Exit_Subprogram 0x3
0dfb TRAP_0dc8:
0dfb 0007 | | Action Break_Optional
0dfc 4503 |E | Exit_Subprogram 0x3
0dfd 0000 0000 | | .XXX[0x3]
0dff 0000 | |
0e00 0000 0000 | | .LITERAL {0x00000000, 0x000081a4}
0e04 0000 0000 | | .BLANK 0000[0x4]
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e14 | | .CONST 0x0e14 ; Address of begin
0e09 0e1d | | .CONST 0x0e1d ; Address of exception handler
0e0a 0003 | | .CONST 0x0003 ; Number of locals
0e0b INIT_0e08:
0e0b 00db | | Load_Top At_Offset_3
0e0c 00db | | Load_Top At_Offset_3
0e0d 8293 | | Call 0x1,0x93
0e0e e00c | | Load 0x0,0xc
0e0f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e10 02c7 | | Declare_Variable Any
0e11 00d9 | | Load_Top At_Offset_1
0e12 8294 | | Call 0x1,0x94
0e13 a403 | | Store_Unchecked 0x2,0x3
0e14 BODY_0e08:
0e14 00d8 | | Load_Top At_Offset_0
0e15 e00c | | Load 0x0,0xc
0e16 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e17 012e | . | Execute Any,Not_Equal
0e18 6802 |h | Jump_Zero 0xe1b
0e19 4801 |H | Short_Literal 0x1
0e1a 4403 |D | Exit_Subprogram With_Result,0x3
0e1b 4800 |H | Short_Literal 0x0
0e1c 4403 |D | Exit_Subprogram With_Result,0x3
0e1d TRAP_0e08:
0e1d 0007 | | Action Break_Optional
0e1e 4800 |H | Short_Literal 0x0
0e1f 4403 |D | Exit_Subprogram With_Result,0x3
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e34 | 4 | .CONST 0x0e34 ; Address of begin
0e21 0e5e | ^ | .CONST 0x0e5e ; Address of exception handler
0e22 0005 | | .CONST 0x0005 ; Number of locals
0e23 INIT_0e20:
0e23 00da | | Load_Top At_Offset_2
0e24 e004 | | Load 0x0,0x4
0e25 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e26 e26f | o | Load 0x1,0x6f
0e27 0322 | " | Declare_Variable Record
0e28 00d8 | | Load_Top At_Offset_0
0e29 1c00 | | Execute_Immediate Run_Utility,0x0
0e2a e00c | | Load 0x0,0xc
0e2b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e2c 02c7 | | Declare_Variable Any
0e2d 00d8 | | Load_Top At_Offset_0
0e2e 1c00 | | Execute_Immediate Run_Utility,0x0
0e2f e00c | | Load 0x0,0xc
0e30 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e31 02c7 | | Declare_Variable Any
0e32 00d8 | | Load_Top At_Offset_0
0e33 1c00 | | Execute_Immediate Run_Utility,0x0
0e34 BODY_0e20:
0e34 4800 |H | Short_Literal 0x0
0e35 a5fc | | Store_Unchecked 0x2,-0x4
0e36 e5fe | | Load 0x2,-0x2
0e37 4801 |H | Short_Literal 0x1
0e38 e5ff | | Load 0x2,-0x1
0e39 e004 | | Load 0x0,0x4
0e3a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e3b c405 | | Store 0x2,0x5
0e3c 00da | | Load_Top At_Offset_2
0e3d e5fe | | Load 0x2,-0x2
0e3e e402 | | Load 0x2,0x2
0e3f 82a3 | | Call 0x1,0xa3
0e40 00d1 | | Pop_Control Pop_Count_1
0e41 e5fe | | Load 0x2,-0x2
0e42 4801 |H | Short_Literal 0x1
0e43 e5ff | | Load 0x2,-0x1
0e44 e004 | | Load 0x0,0x4
0e45 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e46 e004 | | Load 0x0,0x4
0e47 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e48 0092 19f3 | | Action Push_String_Extended,0x19f3 ; "."
0e4a 01cc | | Execute Vector,Catenate
0e4b 4801 |H | Short_Literal 0x1
0e4c e403 | | Load 0x2,0x3
0e4d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0e4e e403 | | Load 0x2,0x3
0e4f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0e50 01cf | | Execute Vector,Slice_Read
0e51 01cc | | Execute Vector,Catenate
0e52 8294 | | Call 0x1,0x94
0e53 c404 | | Store 0x2,0x4
0e54 00d9 | | Load_Top At_Offset_1
0e55 e00c | | Load 0x0,0xc
0e56 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0e57 6803 |h | Jump_Zero 0xe5b
0e58 e001 | | Load 0x0,0x1
0e59 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0e5a 0257 | W | Execute Discrete,Raise
0e5b 00d9 | | Load_Top At_Offset_1
0e5c c5fd | | Store 0x2,-0x3
0e5d 4503 |E | Exit_Subprogram 0x3
0e5e TRAP_0e20:
0e5e 0007 | | Action Break_Optional
0e5f e5fe | | Load 0x2,-0x2
0e60 4801 |H | Short_Literal 0x1
0e61 4801 |H | Short_Literal 0x1
0e62 e006 | | Load 0x0,0x6
0e63 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e64 0334 | 4 | Declare_Variable Array,With_Constraint
0e65 4801 |H | Short_Literal 0x1
0e66 e403 | | Load 0x2,0x3
0e67 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0e68 e403 | | Load 0x2,0x3
0e69 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0e6a 01cf | | Execute Vector,Slice_Read
0e6b e006 | | Load 0x0,0x6
0e6c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e6d e006 | | Load 0x0,0x6
0e6e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e6f 0119 | | Execute Any,Check_In_Formal_Type
0e70 4801 |H | Short_Literal 0x1
0e71 00da | | Load_Top At_Offset_2
0e72 01d6 | | Execute Vector,Field_Write
0e73 600c |` | Indirect_Literal Discrete,0xe80,{0x00000000, 0x000081a7}
0e74 e001 | | Load 0x0,0x1
0e75 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0e76 e006 | | Load 0x0,0x6
0e77 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0e78 6007 |` | Indirect_Literal Discrete,0xe80,{0x00000000, 0x000081a7}
0e79 e001 | | Load 0x0,0x1
0e7a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e7b a5fc | | Store_Unchecked 0x2,-0x4
0e7c 4503 |E | Exit_Subprogram 0x3
0e7d 0000 0000 | | .XXX[0x3]
0e7f 0000 | |
0e80 0000 0000 | | .LITERAL {0x00000000, 0x000081a7}
0e84 0000 0000 | | .BLANK 0000[0x4]
0e88 ; --------------------------------------------------------------------------------------
0e88 ; SUBPROGRAM
0e88 ; --------------------------------------------------------------------------------------
0e88 0e8c | | .CONST 0x0e8c ; Address of begin
0e89 0004 | | .CONST 0x0004 ; Address of exception handler
0e8a 0002 | | .CONST 0x0002 ; Number of locals
0e8b INIT_0e88:
0e8b 00e2 | | Load_Encached Integer_Cache
0e8c BODY_0e88:
0e8c 4800 |H | Short_Literal 0x0
0e8d a5fc | | Store_Unchecked 0x2,-0x4
0e8e e001 | | Load 0x0,0x1
0e8f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e90 00e2 | | Load_Encached Integer_Cache
0e91 e5fd | | Load 0x2,-0x3
0e92 0120 | | Execute Any,Is_Value
0e93 6803 |h | Jump_Zero 0xe97
0e94 e00c | | Load 0x0,0xc
0e95 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e96 7801 |x | Jump 0xe98
0e97 e5fd | | Load 0x2,-0x3
0e98 e5fe | | Load 0x2,-0x2
0e99 e5ff | | Load 0x2,-0x1
0e9a 8267 | g | Call 0x1,0x67
0e9b c5fd | | Store 0x2,-0x3
0e9c 005a | Z | Store_Top Discrete,At_Offset_2
0e9d c5fc | | Store 0x2,-0x4
0e9e 4503 |E | Exit_Subprogram 0x3
0e9f 0000 | | .XXX[0x1]
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ea6 | | .CONST 0x0ea6 ; Address of begin
0ea1 0eae | | .CONST 0x0eae ; Address of exception handler
0ea2 0002 | | .CONST 0x0002 ; Number of locals
0ea3 INIT_0ea0:
0ea3 00da | | Load_Top At_Offset_2
0ea4 e004 | | Load 0x0,0x4
0ea5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ea6 BODY_0ea0:
0ea6 4800 |H | Short_Literal 0x0
0ea7 a5fc | | Store_Unchecked 0x2,-0x4
0ea8 00d8 | | Load_Top At_Offset_0
0ea9 e28e | | Load 0x1,0x8e
0eaa 01cc | | Execute Vector,Catenate
0eab 8296 | | Call 0x1,0x96
0eac c5fd | | Store 0x2,-0x3
0ead 4503 |E | Exit_Subprogram 0x3
0eae TRAP_0ea0:
0eae 0007 | | Action Break_Optional
0eaf 6004 |` | Indirect_Literal Discrete,0xeb4,{0x00000000, 0x0000813b}
0eb0 a5fc | | Store_Unchecked 0x2,-0x4
0eb1 4503 |E | Exit_Subprogram 0x3
0eb2 0000 0000 | | .XXX[0x2]
0eb4 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0eb8 ; --------------------------------------------------------------------------------------
0eb8 ; SUBPROGRAM
0eb8 ; --------------------------------------------------------------------------------------
0eb8 0ec7 | | .CONST 0x0ec7 ; Address of begin
0eb9 0ece | | .CONST 0x0ece ; Address of exception handler
0eba 0005 | | .CONST 0x0005 ; Number of locals
0ebb INIT_0eb8:
0ebb 00da | | Load_Top At_Offset_2
0ebc e004 | | Load 0x0,0x4
0ebd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ebe e26f | o | Load 0x1,0x6f
0ebf 0322 | " | Declare_Variable Record
0ec0 00d8 | | Load_Top At_Offset_0
0ec1 1c00 | | Execute_Immediate Run_Utility,0x0
0ec2 4801 |H | Short_Literal 0x1
0ec3 e20d | | Load 0x1,0xd
0ec4 1c08 | | Execute_Immediate Run_Utility,0x8
0ec5 029f 17ab | | Declare_Subprogram For_Call,INIT_17a8
0ec7 BODY_0eb8:
0ec7 00da | | Load_Top At_Offset_2
0ec8 e5fe | | Load 0x2,-0x2
0ec9 e402 | | Load 0x2,0x2
0eca 82a3 | | Call 0x1,0xa3
0ecb 00d1 | | Pop_Control Pop_Count_1
0ecc 8405 | | Call 0x2,0x5
0ecd 0831 | 1 | Execute_Immediate Raise,0x31
0ece TRAP_0eb8:
0ece 0007 | | Action Break_Optional
0ecf e006 | | Load 0x0,0x6
0ed0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0ed1 67e2 |g | Indirect_Literal Discrete,0xeb4,{0x00000000, 0x0000813b}
0ed2 e001 | | Load 0x0,0x1
0ed3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ed4 00db | | Load_Top At_Offset_3
0ed5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ed6 0831 | 1 | Execute_Immediate Raise,0x31
0ed7 0000 | | .XXX[0x1]
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; SUBPROGRAM
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0ee7 | | .CONST 0x0ee7 ; Address of begin
0ed9 0eee | | .CONST 0x0eee ; Address of exception handler
0eda 0005 | | .CONST 0x0005 ; Number of locals
0edb INIT_0ed8:
0edb 00da | | Load_Top At_Offset_2
0edc e004 | | Load 0x0,0x4
0edd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ede e26f | o | Load 0x1,0x6f
0edf 0322 | " | Declare_Variable Record
0ee0 00d8 | | Load_Top At_Offset_0
0ee1 1c00 | | Execute_Immediate Run_Utility,0x0
0ee2 4801 |H | Short_Literal 0x1
0ee3 e20d | | Load 0x1,0xd
0ee4 1c08 | | Execute_Immediate Run_Utility,0x8
0ee5 029f 17c3 | | Declare_Subprogram For_Call,INIT_17c0
0ee7 BODY_0ed8:
0ee7 00da | | Load_Top At_Offset_2
0ee8 e5fe | | Load 0x2,-0x2
0ee9 e402 | | Load 0x2,0x2
0eea 82a3 | | Call 0x1,0xa3
0eeb 00d1 | | Pop_Control Pop_Count_1
0eec 8405 | | Call 0x2,0x5
0eed 0831 | 1 | Execute_Immediate Raise,0x31
0eee TRAP_0ed8:
0eee 0007 | | Action Break_Optional
0eef e006 | | Load 0x0,0x6
0ef0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0ef1 6006 |` | Indirect_Literal Discrete,0xef8,{0x00000000, 0x0000813b}
0ef2 e001 | | Load 0x0,0x1
0ef3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ef4 00db | | Load_Top At_Offset_3
0ef5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ef6 00da | | Load_Top At_Offset_2
0ef7 4402 |D | Exit_Subprogram With_Result,0x2
0ef8 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0efc 0000 0000 | | .BLANK 0000[0x4]
0f00 ; --------------------------------------------------------------------------------------
0f00 ; SUBPROGRAM
0f00 ; --------------------------------------------------------------------------------------
0f00 0f08 | | .CONST 0x0f08 ; Address of begin
0f01 0f10 | | .CONST 0x0f10 ; Address of exception handler
0f02 0004 | | .CONST 0x0004 ; Number of locals
0f03 INIT_0f00:
0f03 e28c | | Load 0x1,0x8c
0f04 0322 | " | Declare_Variable Record
0f05 00e2 | | Load_Encached Integer_Cache
0f06 e5ff | | Load 0x2,-0x1
0f07 8291 | | Call 0x1,0x91
0f08 BODY_0f00:
0f08 00da | | Load_Top At_Offset_2
0f09 e5fe | | Load 0x2,-0x2
0f0a 00da | | Load_Top At_Offset_2
0f0b 82a2 | | Call 0x1,0xa2
0f0c 00d1 | | Pop_Control Pop_Count_1
0f0d 00da | | Load_Top At_Offset_2
0f0e 829c | | Call 0x1,0x9c
0f0f 4402 |D | Exit_Subprogram With_Result,0x2
0f10 TRAP_0f00:
0f10 0007 | | Action Break_Optional
0f11 4800 |H | Short_Literal 0x0
0f12 4402 |D | Exit_Subprogram With_Result,0x2
0f13 0000 0000 | | .BLANK 0000[0x5]
0f18 ; --------------------------------------------------------------------------------------
0f18 ; SUBPROGRAM
0f18 ; --------------------------------------------------------------------------------------
0f18 0f1d | | .CONST 0x0f1d ; Address of begin
0f19 0004 | | .CONST 0x0004 ; Address of exception handler
0f1a 0002 | | .CONST 0x0002 ; Number of locals
0f1b INIT_0f18:
0f1b e00c | | Load 0x0,0xc
0f1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f1d BODY_0f18:
0f1d 4800 |H | Short_Literal 0x0
0f1e a5fd | | Store_Unchecked 0x2,-0x3
0f1f e00c | | Load 0x0,0xc
0f20 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f21 602a |`* | Indirect_Literal Discrete,0xf4c,{0x00000000, 0x00004000}
0f22 e011 | | Load 0x0,0x11
0f23 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f24 e5ff | | Load 0x2,-0x1
0f25 e00c | | Load 0x0,0xc
0f26 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0f27 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0f28 0059 | Y | Store_Top Discrete,At_Offset_1
0f29 00d8 | | Load_Top At_Offset_0
0f2a 7001 |p | Jump_Nonzero 0xf2c
0f2b 4503 |E | Exit_Subprogram 0x3
0f2c e5fe | | Load 0x2,-0x2
0f2d 4801 |H | Short_Literal 0x1
0f2e 4801 |H | Short_Literal 0x1
0f2f e006 | | Load 0x0,0x6
0f30 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f31 0334 | 4 | Declare_Variable Array,With_Constraint
0f32 e5ff | | Load 0x2,-0x1
0f33 e004 | | Load 0x0,0x4
0f34 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0f35 e006 | | Load 0x0,0x6
0f36 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f37 0119 | | Execute Any,Check_In_Formal_Type
0f38 4801 |H | Short_Literal 0x1
0f39 00da | | Load_Top At_Offset_2
0f3a 01d6 | | Execute Vector,Field_Write
0f3b 600c |` | Indirect_Literal Discrete,0xf48,{0x00000000, 0x000081a5}
0f3c e001 | | Load 0x0,0x1
0f3d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f3e e006 | | Load 0x0,0x6
0f3f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0f40 6007 |` | Indirect_Literal Discrete,0xf48,{0x00000000, 0x000081a5}
0f41 e001 | | Load 0x0,0x1
0f42 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f43 a5fd | | Store_Unchecked 0x2,-0x3
0f44 4503 |E | Exit_Subprogram 0x3
0f45 0000 0000 | | .XXX[0x3]
0f47 0000 | |
0f48 0000 0000 | | .LITERAL {0x00000000, 0x000081a5}
0f4c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0f50 ; --------------------------------------------------------------------------------------
0f50 ; SUBPROGRAM
0f50 ; --------------------------------------------------------------------------------------
0f50 0f55 | U | .CONST 0x0f55 ; Address of begin
0f51 0004 | | .CONST 0x0004 ; Address of exception handler
0f52 0002 | | .CONST 0x0002 ; Number of locals
0f53 INIT_0f50:
0f53 e00c | | Load 0x0,0xc
0f54 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f55 BODY_0f50:
0f55 4800 |H | Short_Literal 0x0
0f56 a5fd | | Store_Unchecked 0x2,-0x3
0f57 e00c | | Load 0x0,0xc
0f58 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f59 67f2 |g | Indirect_Literal Discrete,0xf4c,{0x00000000, 0x00004000}
0f5a e011 | | Load 0x0,0x11
0f5b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f5c e5ff | | Load 0x2,-0x1
0f5d e00c | | Load 0x0,0xc
0f5e 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0f5f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0f60 0059 | Y | Store_Top Discrete,At_Offset_1
0f61 00d8 | | Load_Top At_Offset_0
0f62 6814 |h | Jump_Zero 0xf77
0f63 e5fe | | Load 0x2,-0x2
0f64 4801 |H | Short_Literal 0x1
0f65 4801 |H | Short_Literal 0x1
0f66 e006 | | Load 0x0,0x6
0f67 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f68 0334 | 4 | Declare_Variable Array,With_Constraint
0f69 e5ff | | Load 0x2,-0x1
0f6a e004 | | Load 0x0,0x4
0f6b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0f6c e006 | | Load 0x0,0x6
0f6d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f6e 0119 | | Execute Any,Check_In_Formal_Type
0f6f 4801 |H | Short_Literal 0x1
0f70 00da | | Load_Top At_Offset_2
0f71 01d6 | | Execute Vector,Field_Write
0f72 6005 |` | Indirect_Literal Discrete,0xf78,{0x00000000, 0x000081a6}
0f73 e001 | | Load 0x0,0x1
0f74 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f75 6002 |` | Indirect_Literal Discrete,0xf78,{0x00000000, 0x000081a6}
0f76 a5fd | | Store_Unchecked 0x2,-0x3
0f77 4503 |E | Exit_Subprogram 0x3
0f78 0000 0000 | | .LITERAL {0x00000000, 0x000081a6}
0f7c 0000 0000 | | .BLANK 0000[0x4]
0f80 ; --------------------------------------------------------------------------------------
0f80 ; SUBPROGRAM
0f80 ; --------------------------------------------------------------------------------------
0f80 0f8a | | .CONST 0x0f8a ; Address of begin
0f81 0f91 | | .CONST 0x0f91 ; Address of exception handler
0f82 0003 | | .CONST 0x0003 ; Number of locals
0f83 INIT_0f80:
0f83 00da | | Load_Top At_Offset_2
0f84 e004 | | Load 0x0,0x4
0f85 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0f86 e26f | o | Load 0x1,0x6f
0f87 0322 | " | Declare_Variable Record
0f88 00d8 | | Load_Top At_Offset_0
0f89 1c00 | | Execute_Immediate Run_Utility,0x0
0f8a BODY_0f80:
0f8a 00d8 | | Load_Top At_Offset_0
0f8b e5fe | | Load 0x2,-0x2
0f8c 00db | | Load_Top At_Offset_3
0f8d 82a3 | | Call 0x1,0xa3
0f8e 00d1 | | Pop_Control Pop_Count_1
0f8f 00d8 | | Load_Top At_Offset_0
0f90 4402 |D | Exit_Subprogram With_Result,0x2
0f91 TRAP_0f80:
0f91 0007 | | Action Break_Optional
0f92 00d9 | | Load_Top At_Offset_1
0f93 4402 |D | Exit_Subprogram With_Result,0x2
0f94 0000 0000 | | .BLANK 0000[0x4]
0f98 ; --------------------------------------------------------------------------------------
0f98 ; SUBPROGRAM
0f98 ; --------------------------------------------------------------------------------------
0f98 0fa3 | | .CONST 0x0fa3 ; Address of begin
0f99 0fd7 | | .CONST 0x0fd7 ; Address of exception handler
0f9a 0005 | | .CONST 0x0005 ; Number of locals
0f9b INIT_0f98:
0f9b e28c | | Load 0x1,0x8c
0f9c 0322 | " | Declare_Variable Record
0f9d 00e1 | | Load_Encached Boolean_Cache
0f9e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f9f e001 | | Load 0x0,0x1
0fa0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fa1 e5ff | | Load 0x2,-0x1
0fa2 8291 | | Call 0x1,0x91
0fa3 BODY_0f98:
0fa3 4800 |H | Short_Literal 0x0
0fa4 a5fc | | Store_Unchecked 0x2,-0x4
0fa5 e001 | | Load 0x0,0x1
0fa6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fa7 00e1 | | Load_Encached Boolean_Cache
0fa8 e5fd | | Load 0x2,-0x3
0fa9 e5ff | | Load 0x2,-0x1
0faa 8245 | E | Call 0x1,0x45
0fab c403 | | Store 0x2,0x3
0fac 005a | Z | Store_Top Discrete,At_Offset_2
0fad 00d9 | | Load_Top At_Offset_1
0fae 6803 |h | Jump_Zero 0xfb2
0faf e001 | | Load 0x0,0x1
0fb0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0fb1 0257 | W | Execute Discrete,Raise
0fb2 00da | | Load_Top At_Offset_2
0fb3 7015 |p | Jump_Nonzero 0xfc9
0fb4 e5fd | | Load 0x2,-0x3
0fb5 4801 |H | Short_Literal 0x1
0fb6 4801 |H | Short_Literal 0x1
0fb7 e006 | | Load 0x0,0x6
0fb8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fb9 0334 | 4 | Declare_Variable Array,With_Constraint
0fba e5ff | | Load 0x2,-0x1
0fbb e004 | | Load 0x0,0x4
0fbc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fbd e006 | | Load 0x0,0x6
0fbe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fbf 0119 | | Execute Any,Check_In_Formal_Type
0fc0 4801 |H | Short_Literal 0x1
0fc1 00da | | Load_Top At_Offset_2
0fc2 01d6 | | Execute Vector,Field_Write
0fc3 601c |` | Indirect_Literal Discrete,0xfe0,{0x00000000, 0x000081a8}
0fc4 e001 | | Load 0x0,0x1
0fc5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0fc6 6019 |` | Indirect_Literal Discrete,0xfe0,{0x00000000, 0x000081a8}
0fc7 a5fc | | Store_Unchecked 0x2,-0x4
0fc8 4504 |E | Exit_Subprogram 0x4
0fc9 00db | | Load_Top At_Offset_3
0fca e5fd | | Load 0x2,-0x3
0fcb 00da | | Load_Top At_Offset_2
0fcc 82a2 | | Call 0x1,0xa2
0fcd 00d1 | | Pop_Control Pop_Count_1
0fce 00db | | Load_Top At_Offset_3
0fcf e5fe | | Load 0x2,-0x2
0fd0 829d | | Call 0x1,0x9d
0fd1 00d1 | | Pop_Control Pop_Count_1
0fd2 e5fd | | Load 0x2,-0x3
0fd3 e402 | | Load 0x2,0x2
0fd4 00da | | Load_Top At_Offset_2
0fd5 82a0 | | Call 0x1,0xa0
0fd6 4504 |E | Exit_Subprogram 0x4
0fd7 TRAP_0f98:
0fd7 0007 | | Action Break_Optional
0fd8 6003 |` | Indirect_Literal Discrete,0xfdc,{0x00000000, 0x0000813b}
0fd9 a5fc | | Store_Unchecked 0x2,-0x4
0fda 4504 |E | Exit_Subprogram 0x4
0fdb 0000 | | .XXX[0x1]
0fdc 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
0fe0 0000 0000 | | .LITERAL {0x00000000, 0x000081a8}
0fe4 0000 0000 | | .BLANK 0000[0x4]
0fe8 ; --------------------------------------------------------------------------------------
0fe8 ; SUBPROGRAM
0fe8 ; --------------------------------------------------------------------------------------
0fe8 0ff2 | | .CONST 0x0ff2 ; Address of begin
0fe9 1020 | | .CONST 0x1020 ; Address of exception handler
0fea 0003 | | .CONST 0x0003 ; Number of locals
0feb INIT_0fe8:
0feb 00da | | Load_Top At_Offset_2
0fec e004 | | Load 0x0,0x4
0fed 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0fee e26f | o | Load 0x1,0x6f
0fef 0322 | " | Declare_Variable Record
0ff0 00d8 | | Load_Top At_Offset_0
0ff1 1c00 | | Execute_Immediate Run_Utility,0x0
0ff2 BODY_0fe8:
0ff2 4800 |H | Short_Literal 0x0
0ff3 a5fc | | Store_Unchecked 0x2,-0x4
0ff4 00d8 | | Load_Top At_Offset_0
0ff5 e5fd | | Load 0x2,-0x3
0ff6 00db | | Load_Top At_Offset_3
0ff7 82a3 | | Call 0x1,0xa3
0ff8 00d1 | | Pop_Control Pop_Count_1
0ff9 e5fe | | Load 0x2,-0x2
0ffa 01db | | Execute Vector,Length
0ffb 0c81 | | Execute_Immediate Greater_Equal,0x81
0ffc 6802 |h | Jump_Zero 0xfff
0ffd e015 | | Load 0x0,0x15
0ffe 0257 | W | Execute Discrete,Raise
0fff e5fe | | Load 0x2,-0x2
1000 4801 |H | Short_Literal 0x1
1001 e5fe | | Load 0x2,-0x2
1002 01db | | Execute Vector,Length
1003 00d8 | | Load_Top At_Offset_0
1004 00e2 | | Load_Encached Integer_Cache
1005 0260 | ` | Execute Discrete,In_Type
1006 7001 |p | Jump_Nonzero 0x1008
1007 0801 | | Execute_Immediate Raise,0x1
1008 00db | | Load_Top At_Offset_3
1009 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
100a 01ce | | Execute Vector,Slice_Write
100b e5fe | | Load 0x2,-0x2
100c 01db | | Execute Vector,Length
100d 00d9 | | Load_Top At_Offset_1
100e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
100f e001 | | Load 0x0,0x1
1010 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1011 e5fd | | Load 0x2,-0x3
1012 e5ff | | Load 0x2,-0x1
1013 8261 | a | Call 0x1,0x61
1014 c5fc | | Store 0x2,-0x4
1015 e5fd | | Load 0x2,-0x3
1016 00d9 | | Load_Top At_Offset_1
1017 00db | | Load_Top At_Offset_3
1018 82a5 | | Call 0x1,0xa5
1019 e001 | | Load 0x0,0x1
101a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
101b e5fd | | Load 0x2,-0x3
101c e5ff | | Load 0x2,-0x1
101d 8260 | ` | Call 0x1,0x60
101e c5fc | | Store 0x2,-0x4
101f 4504 |E | Exit_Subprogram 0x4
1020 TRAP_0fe8:
1020 e015 | | Load 0x0,0x15
1021 010f | | Execute Exception,Equal
1022 6816 |h | Jump_Zero 0x1039
1023 e5fd | | Load 0x2,-0x3
1024 4801 |H | Short_Literal 0x1
1025 4801 |H | Short_Literal 0x1
1026 e006 | | Load 0x0,0x6
1027 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1028 0334 | 4 | Declare_Variable Array,With_Constraint
1029 0092 19e5 | | Action Push_String_Extended,0x19e5 ; " 128"
102b e006 | | Load 0x0,0x6
102c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
102d e006 | | Load 0x0,0x6
102e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
102f 0119 | | Execute Any,Check_In_Formal_Type
1030 4801 |H | Short_Literal 0x1
1031 00da | | Load_Top At_Offset_2
1032 01d6 | | Execute Vector,Field_Write
1033 6008 |` | Indirect_Literal Discrete,0x103c,{0x00000000, 0x0000819e}
1034 e001 | | Load 0x0,0x1
1035 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1036 6005 |` | Indirect_Literal Discrete,0x103c,{0x00000000, 0x0000819e}
1037 a5fc | | Store_Unchecked 0x2,-0x4
1038 4504 |E | Exit_Subprogram 0x4
1039 67a2 |g | Indirect_Literal Discrete,0xfdc,{0x00000000, 0x0000813b}
103a a5fc | | Store_Unchecked 0x2,-0x4
103b 4504 |E | Exit_Subprogram 0x4
103c 0000 0000 | | .LITERAL {0x00000000, 0x0000819e}
1040 ; --------------------------------------------------------------------------------------
1040 ; SUBPROGRAM
1040 ; --------------------------------------------------------------------------------------
1040 104a | J | .CONST 0x104a ; Address of begin
1041 1078 | x | .CONST 0x1078 ; Address of exception handler
1042 0003 | | .CONST 0x0003 ; Number of locals
1043 INIT_1040:
1043 00da | | Load_Top At_Offset_2
1044 e004 | | Load 0x0,0x4
1045 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1046 e26f | o | Load 0x1,0x6f
1047 0322 | " | Declare_Variable Record
1048 00d8 | | Load_Top At_Offset_0
1049 1c00 | | Execute_Immediate Run_Utility,0x0
104a BODY_1040:
104a 4800 |H | Short_Literal 0x0
104b a5fc | | Store_Unchecked 0x2,-0x4
104c 00d8 | | Load_Top At_Offset_0
104d e5fd | | Load 0x2,-0x3
104e 00db | | Load_Top At_Offset_3
104f 82a3 | | Call 0x1,0xa3
1050 00d1 | | Pop_Control Pop_Count_1
1051 e5fe | | Load 0x2,-0x2
1052 01db | | Execute Vector,Length
1053 0c81 | | Execute_Immediate Greater_Equal,0x81
1054 6802 |h | Jump_Zero 0x1057
1055 e016 | | Load 0x0,0x16
1056 0257 | W | Execute Discrete,Raise
1057 e5fe | | Load 0x2,-0x2
1058 4801 |H | Short_Literal 0x1
1059 e5fe | | Load 0x2,-0x2
105a 01db | | Execute Vector,Length
105b 00d8 | | Load_Top At_Offset_0
105c 00e2 | | Load_Encached Integer_Cache
105d 0260 | ` | Execute Discrete,In_Type
105e 7001 |p | Jump_Nonzero 0x1060
105f 0801 | | Execute_Immediate Raise,0x1
1060 00db | | Load_Top At_Offset_3
1061 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1062 01ce | | Execute Vector,Slice_Write
1063 e5fe | | Load 0x2,-0x2
1064 01db | | Execute Vector,Length
1065 00d9 | | Load_Top At_Offset_1
1066 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1067 e001 | | Load 0x0,0x1
1068 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1069 e5fd | | Load 0x2,-0x3
106a e5ff | | Load 0x2,-0x1
106b 8261 | a | Call 0x1,0x61
106c c5fc | | Store 0x2,-0x4
106d e5fd | | Load 0x2,-0x3
106e 00d9 | | Load_Top At_Offset_1
106f 00db | | Load_Top At_Offset_3
1070 82a5 | | Call 0x1,0xa5
1071 e001 | | Load 0x0,0x1
1072 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1073 e5fd | | Load 0x2,-0x3
1074 e5ff | | Load 0x2,-0x1
1075 8260 | ` | Call 0x1,0x60
1076 c5fc | | Store 0x2,-0x4
1077 4504 |E | Exit_Subprogram 0x4
1078 TRAP_1040:
1078 e016 | | Load 0x0,0x16
1079 010f | | Execute Exception,Equal
107a 6816 |h | Jump_Zero 0x1091
107b e5fd | | Load 0x2,-0x3
107c 4801 |H | Short_Literal 0x1
107d 4801 |H | Short_Literal 0x1
107e e006 | | Load 0x0,0x6
107f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1080 0334 | 4 | Declare_Variable Array,With_Constraint
1081 0092 19e5 | | Action Push_String_Extended,0x19e5 ; " 128"
1083 e006 | | Load 0x0,0x6
1084 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1085 e006 | | Load 0x0,0x6
1086 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1087 0119 | | Execute Any,Check_In_Formal_Type
1088 4801 |H | Short_Literal 0x1
1089 00da | | Load_Top At_Offset_2
108a 01d6 | | Execute Vector,Field_Write
108b 67b0 |g | Indirect_Literal Discrete,0x103c,{0x00000000, 0x0000819e}
108c e001 | | Load 0x0,0x1
108d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
108e 67ad |g | Indirect_Literal Discrete,0x103c,{0x00000000, 0x0000819e}
108f a5fc | | Store_Unchecked 0x2,-0x4
1090 4504 |E | Exit_Subprogram 0x4
1091 6002 |` | Indirect_Literal Discrete,0x1094,{0x00000000, 0x0000813b}
1092 a5fc | | Store_Unchecked 0x2,-0x4
1093 4504 |E | Exit_Subprogram 0x4
1094 0000 0000 | | .LITERAL {0x00000000, 0x0000813b}
1098 ; --------------------------------------------------------------------------------------
1098 ; SUBPROGRAM
1098 ; --------------------------------------------------------------------------------------
1098 10ad | | .CONST 0x10ad ; Address of begin
1099 113a | : | .CONST 0x113a ; Address of exception handler
109a 0006 | | .CONST 0x0006 ; Number of locals
109b INIT_1098:
109b e00c | | Load 0x0,0xc
109c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
109d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
109e e00c | | Load 0x0,0xc
109f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10a0 e00c | | Load 0x0,0xc
10a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10a2 1b18 | | Execute Package,Field_Read,Field_Number 0x18
10a3 02c7 | | Declare_Variable Any
10a4 00d8 | | Load_Top At_Offset_0
10a5 1c00 | | Execute_Immediate Run_Utility,0x0
10a6 e00c | | Load 0x0,0xc
10a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10a8 02c7 | | Declare_Variable Any
10a9 00d8 | | Load_Top At_Offset_0
10aa 1c00 | | Execute_Immediate Run_Utility,0x0
10ab 029f 17db | | Declare_Subprogram For_Call,INIT_17d8
10ad BODY_1098:
10ad 4800 |H | Short_Literal 0x0
10ae a5fd | | Store_Unchecked 0x2,-0x3
10af e00c | | Load 0x0,0xc
10b0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10b2 00db | | Load_Top At_Offset_3
10b3 60a4 |` | Indirect_Literal Discrete,0x1158,{0x00000000, 0x00004000}
10b4 e011 | | Load 0x0,0x11
10b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10b6 e017 | | Load 0x0,0x17
10b7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
10b8 e018 | | Load 0x0,0x18
10b9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
10ba 4801 |H | Short_Literal 0x1
10bb 4800 |H | Short_Literal 0x0
10bc e017 | | Load 0x0,0x17
10bd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
10be e00c | | Load 0x0,0xc
10bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10c0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
10c1 e5ff | | Load 0x2,-0x1
10c2 0092 19f5 | | Action Push_String_Extended,0x19f5 ; ".??'c(library)"
10c4 01cc | | Execute Vector,Catenate
10c5 e00c | | Load 0x0,0xc
10c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
10c8 c404 | | Store 0x2,0x4
10c9 c402 | | Store 0x2,0x2
10ca e402 | | Load 0x2,0x2
10cb 6818 |h | Jump_Zero 0x10e4
10cc e5fe | | Load 0x2,-0x2
10cd 4801 |H | Short_Literal 0x1
10ce 4801 |H | Short_Literal 0x1
10cf e006 | | Load 0x0,0x6
10d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10d1 0334 | 4 | Declare_Variable Array,With_Constraint
10d2 e5ff | | Load 0x2,-0x1
10d3 0092 19f6 | | Action Push_String_Extended,0x19f6 ; "??'c(library)"
10d5 01cc | | Execute Vector,Catenate
10d6 e006 | | Load 0x0,0x6
10d7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10d8 e006 | | Load 0x0,0x6
10d9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10da 0119 | | Execute Any,Check_In_Formal_Type
10db 4801 |H | Short_Literal 0x1
10dc 00da | | Load_Top At_Offset_2
10dd 01d6 | | Execute Vector,Field_Write
10de 6075 |`u | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
10df e001 | | Load 0x0,0x1
10e0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
10e1 6072 |`r | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
10e2 a5fd | | Store_Unchecked 0x2,-0x3
10e3 4503 |E | Exit_Subprogram 0x3
10e4 00da | | Load_Top At_Offset_2
10e5 e00c | | Load 0x0,0xc
10e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10e7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
10e8 6818 |h | Jump_Zero 0x1101
10e9 e5fe | | Load 0x2,-0x2
10ea 4801 |H | Short_Literal 0x1
10eb 4801 |H | Short_Literal 0x1
10ec e006 | | Load 0x0,0x6
10ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10ee 0334 | 4 | Declare_Variable Array,With_Constraint
10ef e5ff | | Load 0x2,-0x1
10f0 0092 19f6 | | Action Push_String_Extended,0x19f6 ; "??'c(library)"
10f2 01cc | | Execute Vector,Catenate
10f3 e006 | | Load 0x0,0x6
10f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10f5 e006 | | Load 0x0,0x6
10f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10f7 0119 | | Execute Any,Check_In_Formal_Type
10f8 4801 |H | Short_Literal 0x1
10f9 00da | | Load_Top At_Offset_2
10fa 01d6 | | Execute Vector,Field_Write
10fb 6058 |`X | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
10fc e001 | | Load 0x0,0x1
10fd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
10fe 6055 |`U | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
10ff a5fd | | Store_Unchecked 0x2,-0x3
1100 4503 |E | Exit_Subprogram 0x3
1101 00cf | | Action Mark_Auxiliary
1102 7831 |x1 | Jump 0x1134
1103 e00c | | Load 0x0,0xc
1104 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1105 00db | | Load_Top At_Offset_3
1106 0120 | | Execute Any,Is_Value
1107 6803 |h | Jump_Zero 0x110b
1108 e00c | | Load 0x0,0xc
1109 1b0f | | Execute Package,Field_Read,Field_Number 0xf
110a 7801 |x | Jump 0x110c
110b 00db | | Load_Top At_Offset_3
110c e404 | | Load 0x2,0x4
110d e00c | | Load 0x0,0xc
110e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
110f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1110 c405 | | Store 0x2,0x5
1111 c403 | | Store 0x2,0x3
1112 e403 | | Load 0x2,0x3
1113 6818 |h | Jump_Zero 0x112c
1114 e5fe | | Load 0x2,-0x2
1115 4801 |H | Short_Literal 0x1
1116 4801 |H | Short_Literal 0x1
1117 e006 | | Load 0x0,0x6
1118 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1119 0334 | 4 | Declare_Variable Array,With_Constraint
111a e5ff | | Load 0x2,-0x1
111b 0092 19f6 | | Action Push_String_Extended,0x19f6 ; "??'c(library)"
111d 01cc | | Execute Vector,Catenate
111e e006 | | Load 0x0,0x6
111f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1120 e006 | | Load 0x0,0x6
1121 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1122 0119 | | Execute Any,Check_In_Formal_Type
1123 4801 |H | Short_Literal 0x1
1124 00da | | Load_Top At_Offset_2
1125 01d6 | | Execute Vector,Field_Write
1126 602d |`- | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
1127 e001 | | Load 0x0,0x1
1128 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1129 602a |`* | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
112a a5fd | | Store_Unchecked 0x2,-0x3
112b 4503 |E | Exit_Subprogram 0x3
112c 00da | | Load_Top At_Offset_2
112d 8406 | | Call 0x2,0x6
112e 00db | | Load_Top At_Offset_3
112f e00c | | Load 0x0,0xc
1130 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1131 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1132 c404 | | Store 0x2,0x4
1133 00c9 | | Action Pop_Auxiliary_Loop
1134 00db | | Load_Top At_Offset_3
1135 e00c | | Load 0x0,0xc
1136 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1137 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1138 6fca |o | Jump_Zero 0x1103
1139 4503 |E | Exit_Subprogram 0x3
113a TRAP_1098:
113a 0007 | | Action Break_Optional
113b e5fe | | Load 0x2,-0x2
113c 4801 |H | Short_Literal 0x1
113d 4801 |H | Short_Literal 0x1
113e e006 | | Load 0x0,0x6
113f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1140 0334 | 4 | Declare_Variable Array,With_Constraint
1141 e5ff | | Load 0x2,-0x1
1142 e006 | | Load 0x0,0x6
1143 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1144 e006 | | Load 0x0,0x6
1145 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1146 0119 | | Execute Any,Check_In_Formal_Type
1147 4801 |H | Short_Literal 0x1
1148 00da | | Load_Top At_Offset_2
1149 01d6 | | Execute Vector,Field_Write
114a 6005 |` | Indirect_Literal Discrete,0x1150,{0x00000000, 0x000081b6}
114b e001 | | Load 0x0,0x1
114c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
114d 6002 |` | Indirect_Literal Discrete,0x1150,{0x00000000, 0x000081b6}
114e a5fd | | Store_Unchecked 0x2,-0x3
114f 4503 |E | Exit_Subprogram 0x3
1150 0000 0000 | | .LITERAL {0x00000000, 0x000081b6}
1154 0000 0000 | | .LITERAL {0x00000000, 0x00008197}
1158 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
115c 0000 0000 | | .BLANK 0000[0x4]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 117b | { | .CONST 0x117b ; Address of begin
1161 11dd | | .CONST 0x11dd ; Address of exception handler
1162 0009 | | .CONST 0x0009 ; Number of locals
1163 INIT_1160:
1163 e00c | | Load 0x0,0xc
1164 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1165 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1166 e00c | | Load 0x0,0xc
1167 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1168 0092 19f7 | | Action Push_String_Extended,0x19f7 ; "_secondary_"
116a e00c | | Load 0x0,0xc
116b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
116c 1b18 | | Execute Package,Field_Read,Field_Number 0x18
116d 02c7 | | Declare_Variable Any
116e 00d8 | | Load_Top At_Offset_0
116f 1c00 | | Execute_Immediate Run_Utility,0x0
1170 e00c | | Load 0x0,0xc
1171 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1172 02c7 | | Declare_Variable Any
1173 00d8 | | Load_Top At_Offset_0
1174 1c00 | | Execute_Immediate Run_Utility,0x0
1175 029f 1803 | | Declare_Subprogram For_Call,INIT_1800
1177 029f 1833 | 3| Declare_Subprogram For_Call,INIT_1830
1179 029f 185b | [| Declare_Subprogram For_Call,INIT_1858
117b BODY_1160:
117b 4800 |H | Short_Literal 0x0
117c a5fd | | Store_Unchecked 0x2,-0x3
117d e00c | | Load 0x0,0xc
117e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
117f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1180 e405 | | Load 0x2,0x5
1181 67d6 |g | Indirect_Literal Discrete,0x1158,{0x00000000, 0x00004000}
1182 e011 | | Load 0x0,0x11
1183 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1184 e017 | | Load 0x0,0x17
1185 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1186 e018 | | Load 0x0,0x18
1187 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1188 4801 |H | Short_Literal 0x1
1189 4800 |H | Short_Literal 0x0
118a e017 | | Load 0x0,0x17
118b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
118c e00c | | Load 0x0,0xc
118d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
118e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
118f e5ff | | Load 0x2,-0x1
1190 0092 19f8 | | Action Push_String_Extended,0x19f8 ; ".??[@_secondary_@_spec,@_secondary_@_body]"
1192 01cc | | Execute Vector,Catenate
1193 e00c | | Load 0x0,0xc
1194 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1195 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1196 c405 | | Store 0x2,0x5
1197 c402 | | Store 0x2,0x2
1198 e402 | | Load 0x2,0x2
1199 6803 |h | Jump_Zero 0x119d
119a 4800 |H | Short_Literal 0x0
119b a5fd | | Store_Unchecked 0x2,-0x3
119c 4503 |E | Exit_Subprogram 0x3
119d e405 | | Load 0x2,0x5
119e e00c | | Load 0x0,0xc
119f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11a0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
11a1 6802 |h | Jump_Zero 0x11a4
11a2 4800 |H | Short_Literal 0x0
11a3 a5fd | | Store_Unchecked 0x2,-0x3
11a4 00cf | | Action Mark_Auxiliary
11a5 7831 |x1 | Jump 0x11d7
11a6 e00c | | Load 0x0,0xc
11a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11a8 e406 | | Load 0x2,0x6
11a9 0120 | | Execute Any,Is_Value
11aa 6803 |h | Jump_Zero 0x11ae
11ab e00c | | Load 0x0,0xc
11ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11ad 7801 |x | Jump 0x11af
11ae e406 | | Load 0x2,0x6
11af e405 | | Load 0x2,0x5
11b0 e00c | | Load 0x0,0xc
11b1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11b2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
11b3 c406 | | Store 0x2,0x6
11b4 c403 | | Store 0x2,0x3
11b5 e403 | | Load 0x2,0x3
11b6 6818 |h | Jump_Zero 0x11cf
11b7 679c |g | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
11b8 a5fd | | Store_Unchecked 0x2,-0x3
11b9 e5fe | | Load 0x2,-0x2
11ba 4801 |H | Short_Literal 0x1
11bb 4801 |H | Short_Literal 0x1
11bc e006 | | Load 0x0,0x6
11bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11be 0334 | 4 | Declare_Variable Array,With_Constraint
11bf e5ff | | Load 0x2,-0x1
11c0 0092 19f8 | | Action Push_String_Extended,0x19f8 ; ".??[@_secondary_@_spec,@_secondary_@_body]"
11c2 01cc | | Execute Vector,Catenate
11c3 e006 | | Load 0x0,0x6
11c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11c5 e006 | | Load 0x0,0x6
11c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
11c7 0119 | | Execute Any,Check_In_Formal_Type
11c8 4801 |H | Short_Literal 0x1
11c9 00da | | Load_Top At_Offset_2
11ca 01d6 | | Execute Vector,Field_Write
11cb 6788 |g | Indirect_Literal Discrete,0x1154,{0x00000000, 0x00008197}
11cc e001 | | Load 0x0,0x1
11cd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11ce 4503 |E | Exit_Subprogram 0x3
11cf e406 | | Load 0x2,0x6
11d0 8409 | | Call 0x2,0x9
11d1 e405 | | Load 0x2,0x5
11d2 e00c | | Load 0x0,0xc
11d3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11d4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
11d5 c405 | | Store 0x2,0x5
11d6 00c9 | | Action Pop_Auxiliary_Loop
11d7 e405 | | Load 0x2,0x5
11d8 e00c | | Load 0x0,0xc
11d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11da 181e | | Execute Package,Field_Execute,Field_Number 0x1e
11db 6fca |o | Jump_Zero 0x11a6
11dc 4503 |E | Exit_Subprogram 0x3
11dd TRAP_1160:
11dd 0007 | | Action Break_Optional
11de e5fe | | Load 0x2,-0x2
11df 4801 |H | Short_Literal 0x1
11e0 4801 |H | Short_Literal 0x1
11e1 e006 | | Load 0x0,0x6
11e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11e3 0334 | 4 | Declare_Variable Array,With_Constraint
11e4 e5ff | | Load 0x2,-0x1
11e5 e006 | | Load 0x0,0x6
11e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11e7 e006 | | Load 0x0,0x6
11e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
11e9 0119 | | Execute Any,Check_In_Formal_Type
11ea 4801 |H | Short_Literal 0x1
11eb 00da | | Load_Top At_Offset_2
11ec 01d6 | | Execute Vector,Field_Write
11ed 6006 |` | Indirect_Literal Discrete,0x11f4,{0x00000000, 0x000081b7}
11ee e001 | | Load 0x0,0x1
11ef 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11f0 6003 |` | Indirect_Literal Discrete,0x11f4,{0x00000000, 0x000081b7}
11f1 a5fd | | Store_Unchecked 0x2,-0x3
11f2 4503 |E | Exit_Subprogram 0x3
11f3 0000 | | .XXX[0x1]
11f4 0000 0000 | | .LITERAL {0x00000000, 0x000081b7}
11f8 ; --------------------------------------------------------------------------------------
11f8 ; SUBPROGRAM
11f8 ; --------------------------------------------------------------------------------------
11f8 11fb | | .CONST 0x11fb ; Address of begin
11f9 1208 | | .CONST 0x1208 ; Address of exception handler
11fa 0001 | | .CONST 0x0001 ; Number of locals
11fb BODY_11f8:
11fb INIT_11f8:
11fb 0092 19e8 | | Action Push_String_Extended,0x19e8 ; "<QUIET>"
11fd 0092 19e9 | | Action Push_String_Extended,0x19e9 ; "<DIRECTORIES>"
11ff e5ff | | Load 0x2,-0x1
1200 0092 19f8 | | Action Push_String_Extended,0x19f8 ; ".??[@_secondary_@_spec,@_secondary_@_body]"
1202 01cc | | Execute Vector,Catenate
1203 e012 | | Load 0x0,0x12
1204 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1205 4800 |H | Short_Literal 0x0
1206 a5fd | | Store_Unchecked 0x2,-0x3
1207 4503 |E | Exit_Subprogram 0x3
1208 TRAP_11f8:
1208 0007 | | Action Break_Optional
1209 e5fe | | Load 0x2,-0x2
120a 4801 |H | Short_Literal 0x1
120b 4801 |H | Short_Literal 0x1
120c e006 | | Load 0x0,0x6
120d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
120e 0334 | 4 | Declare_Variable Array,With_Constraint
120f e5ff | | Load 0x2,-0x1
1210 e006 | | Load 0x0,0x6
1211 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1212 e006 | | Load 0x0,0x6
1213 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1214 0119 | | Execute Any,Check_In_Formal_Type
1215 4801 |H | Short_Literal 0x1
1216 00da | | Load_Top At_Offset_2
1217 01d6 | | Execute Vector,Field_Write
1218 6007 |` | Indirect_Literal Discrete,0x1220,{0x00000000, 0x000081b5}
1219 e001 | | Load 0x0,0x1
121a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
121b 6004 |` | Indirect_Literal Discrete,0x1220,{0x00000000, 0x000081b5}
121c a5fd | | Store_Unchecked 0x2,-0x3
121d 4503 |E | Exit_Subprogram 0x3
121e 0000 0000 | | .XXX[0x2]
1220 0000 0000 | | .LITERAL {0x00000000, 0x000081b5}
1224 0000 0000 | | .BLANK 0000[0x4]
1228 ; --------------------------------------------------------------------------------------
1228 ; SUBPROGRAM
1228 ; --------------------------------------------------------------------------------------
1228 123d | = | .CONST 0x123d ; Address of begin
1229 0004 | | .CONST 0x0004 ; Address of exception handler
122a 0007 | | .CONST 0x0007 ; Number of locals
122b INIT_1228:
122b e00c | | Load 0x0,0xc
122c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
122d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
122e 02c7 | | Declare_Variable Any
122f 00d8 | | Load_Top At_Offset_0
1230 1c00 | | Execute_Immediate Run_Utility,0x0
1231 e00c | | Load 0x0,0xc
1232 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1233 02c7 | | Declare_Variable Any
1234 00d8 | | Load_Top At_Offset_0
1235 1c00 | | Execute_Immediate Run_Utility,0x0
1236 e001 | | Load 0x0,0x1
1237 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1238 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1239 00e2 | | Load_Encached Integer_Cache
123a 00e1 | | Load_Encached Boolean_Cache
123b 029f 18ab | | Declare_Subprogram For_Call,INIT_18a8
123d BODY_1228:
123d e5ff | | Load 0x2,-0x1
123e e004 | | Load 0x0,0x4
123f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1240 7001 |p | Jump_Nonzero 0x1242
1241 8407 | | Call 0x2,0x7
1242 4800 |H | Short_Literal 0x0
1243 a5fc | | Store_Unchecked 0x2,-0x4
1244 4503 |E | Exit_Subprogram 0x3
1245 0000 0000 | | .XXX[0x3]
1247 0000 | |
1248 ; --------------------------------------------------------------------------------------
1248 ; SUBPROGRAM
1248 ; --------------------------------------------------------------------------------------
1248 1250 | P | .CONST 0x1250 ; Address of begin
1249 1260 | ` | .CONST 0x1260 ; Address of exception handler
124a 0002 | | .CONST 0x0002 ; Number of locals
124b INIT_1248:
124b e019 | | Load 0x0,0x19
124c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
124d 02c7 | | Declare_Variable Any
124e 00d8 | | Load_Top At_Offset_0
124f 1c00 | | Execute_Immediate Run_Utility,0x0
1250 BODY_1248:
1250 00d8 | | Load_Top At_Offset_0
1251 e011 | | Load 0x0,0x11
1252 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1253 e00c | | Load 0x0,0xc
1254 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1255 00ea | | Load_Encached Null_String_Cache
1256 e5ff | | Load 0x2,-0x1
1257 4801 |H | Short_Literal 0x1
1258 e019 | | Load 0x0,0x19
1259 1814 | | Execute Package,Field_Execute,Field_Number 0x14
125a c402 | | Store 0x2,0x2
125b 00d8 | | Load_Top At_Offset_0
125c e019 | | Load 0x0,0x19
125d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
125e c402 | | Store 0x2,0x2
125f 4503 |E | Exit_Subprogram 0x3
1260 TRAP_1248:
1260 0007 | | Action Break_Optional
1261 e5fe | | Load 0x2,-0x2
1262 4801 |H | Short_Literal 0x1
1263 4801 |H | Short_Literal 0x1
1264 e006 | | Load 0x0,0x6
1265 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1266 0334 | 4 | Declare_Variable Array,With_Constraint
1267 e5ff | | Load 0x2,-0x1
1268 e006 | | Load 0x0,0x6
1269 1810 | | Execute Package,Field_Execute,Field_Number 0x10
126a e006 | | Load 0x0,0x6
126b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
126c 0119 | | Execute Any,Check_In_Formal_Type
126d 4801 |H | Short_Literal 0x1
126e 00da | | Load_Top At_Offset_2
126f 01d6 | | Execute Vector,Field_Write
1270 6007 |` | Indirect_Literal Discrete,0x1278,{0x00000000, 0x00008196}
1271 e001 | | Load 0x0,0x1
1272 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1273 e001 | | Load 0x0,0x1
1274 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1275 0257 | W | Execute Discrete,Raise
1276 0000 0000 | | .XXX[0x2]
1278 0000 0000 | | .LITERAL {0x00000000, 0x00008196}
127c 0000 0000 | | .BLANK 0000[0x4]
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 1283 | | .CONST 0x1283 ; Address of begin
1281 0004 | | .CONST 0x0004 ; Address of exception handler
1282 0001 | | .CONST 0x0001 ; Number of locals
1283 BODY_1280:
1283 INIT_1280:
1283 4800 |H | Short_Literal 0x0
1284 4801 |H | Short_Literal 0x1
1285 4801 |H | Short_Literal 0x1
1286 6005 |` | Indirect_Literal Discrete,0x128c,{0x00000000, 0x0000076d}
1287 e00e | | Load 0x0,0xe
1288 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1289 00ca | | Action Exit_Nullary_Function
128a 0000 0000 | | .XXX[0x2]
128c 0000 0000 | | .LITERAL {0x00000000, 0x0000076d}
1290 ; --------------------------------------------------------------------------------------
1290 ; SUBPROGRAM
1290 ; --------------------------------------------------------------------------------------
1290 1296 | | .CONST 0x1296 ; Address of begin
1291 0004 | | .CONST 0x0004 ; Address of exception handler
1292 0002 | | .CONST 0x0002 ; Number of locals
1293 INIT_1290:
1293 00da | | Load_Top At_Offset_2
1294 e004 | | Load 0x0,0x4
1295 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1296 BODY_1290:
1296 00d8 | | Load_Top At_Offset_0
1297 0092 19f9 | | Action Push_String_Extended,0x19f9 ; ".<"
1299 01cc | | Execute Vector,Catenate
129a e28d | | Load 0x1,0x8d
129b 01cc | | Execute Vector,Catenate
129c 0092 19fa | | Action Push_String_Extended,0x19fa ; "state>"
129e 01cc | | Execute Vector,Catenate
129f 4401 |D | Exit_Subprogram With_Result,0x1
12a0 ; --------------------------------------------------------------------------------------
12a0 ; SUBPROGRAM
12a0 ; --------------------------------------------------------------------------------------
12a0 12a3 | | .CONST 0x12a3 ; Address of begin
12a1 0004 | | .CONST 0x0004 ; Address of exception handler
12a2 0001 | | .CONST 0x0001 ; Number of locals
12a3 BODY_12a0:
12a3 INIT_12a0:
12a3 00da | | Load_Top At_Offset_2
12a4 01db | | Execute Vector,Length
12a5 0c02 | | Execute_Immediate Greater_Equal,0x2
12a6 6810 |h | Jump_Zero 0x12b7
12a7 4801 |H | Short_Literal 0x1
12a8 00db | | Load_Top At_Offset_3
12a9 01d7 | | Execute Vector,Field_Read
12aa 0f20 | | Execute_Immediate Equal,0x20
12ab 680b |h | Jump_Zero 0x12b7
12ac 4802 |H | Short_Literal 0x2
12ad 00db | | Load_Top At_Offset_3
12ae 01db | | Execute Vector,Length
12af 00d8 | | Load_Top At_Offset_0
12b0 00e2 | | Load_Encached Integer_Cache
12b1 0260 | ` | Execute Discrete,In_Type
12b2 7001 |p | Jump_Nonzero 0x12b4
12b3 0801 | | Execute_Immediate Raise,0x1
12b4 e5ff | | Load 0x2,-0x1
12b5 01cf | | Execute Vector,Slice_Read
12b6 4401 |D | Exit_Subprogram With_Result,0x1
12b7 00da | | Load_Top At_Offset_2
12b8 4401 |D | Exit_Subprogram With_Result,0x1
12b9 0000 0000 | | .BLANK 0000[0x7]
12c0 ; --------------------------------------------------------------------------------------
12c0 ; SUBPROGRAM
12c0 ; --------------------------------------------------------------------------------------
12c0 12c6 | | .CONST 0x12c6 ; Address of begin
12c1 0004 | | .CONST 0x0004 ; Address of exception handler
12c2 0002 | | .CONST 0x0002 ; Number of locals
12c3 INIT_12c0:
12c3 00da | | Load_Top At_Offset_2
12c4 e004 | | Load 0x0,0x4
12c5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
12c6 BODY_12c0:
12c6 00d8 | | Load_Top At_Offset_0
12c7 0092 19f9 | | Action Push_String_Extended,0x19f9 ; ".<"
12c9 01cc | | Execute Vector,Catenate
12ca e28d | | Load 0x1,0x8d
12cb 01cc | | Execute Vector,Catenate
12cc e5fe | | Load 0x2,-0x2
12cd 01cc | | Execute Vector,Catenate
12ce 0092 19fb | | Action Push_String_Extended,0x19fb ; ">"
12d0 01cc | | Execute Vector,Catenate
12d1 4402 |D | Exit_Subprogram With_Result,0x2
12d2 0000 0000 | | .BLANK 0000[0x6]
12d8 ; --------------------------------------------------------------------------------------
12d8 ; SUBPROGRAM
12d8 ; --------------------------------------------------------------------------------------
12d8 12e3 | | .CONST 0x12e3 ; Address of begin
12d9 0004 | | .CONST 0x0004 ; Address of exception handler
12da 0003 | | .CONST 0x0003 ; Number of locals
12db INIT_12d8:
12db e00c | | Load 0x0,0xc
12dc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
12dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12de e00c | | Load 0x0,0xc
12df 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12e0 02c7 | | Declare_Variable Any
12e1 00d8 | | Load_Top At_Offset_0
12e2 1c00 | | Execute_Immediate Run_Utility,0x0
12e3 BODY_12d8:
12e3 e00c | | Load 0x0,0xc
12e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
12e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12e6 00d9 | | Load_Top At_Offset_1
12e7 0120 | | Execute Any,Is_Value
12e8 6803 |h | Jump_Zero 0x12ec
12e9 e00c | | Load 0x0,0xc
12ea 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12eb 7801 |x | Jump 0x12ed
12ec 00d9 | | Load_Top At_Offset_1
12ed 6016 |` | Indirect_Literal Discrete,0x1304,{0x00000000, 0x00004000}
12ee e011 | | Load 0x0,0x11
12ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12f0 e017 | | Load 0x0,0x17
12f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
12f2 e00c | | Load 0x0,0xc
12f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
12f4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
12f5 e5ff | | Load 0x2,-0x1
12f6 e00c | | Load 0x0,0xc
12f7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
12f8 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
12f9 c403 | | Store 0x2,0x3
12fa 005a | Z | Store_Top Discrete,At_Offset_2
12fb 00d9 | | Load_Top At_Offset_1
12fc 6803 |h | Jump_Zero 0x1300
12fd e00c | | Load 0x0,0xc
12fe 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12ff 4401 |D | Exit_Subprogram With_Result,0x1
1300 00d8 | | Load_Top At_Offset_0
1301 4401 |D | Exit_Subprogram With_Result,0x1
1302 0000 0000 | | .XXX[0x2]
1304 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1308 ; --------------------------------------------------------------------------------------
1308 ; SUBPROGRAM
1308 ; --------------------------------------------------------------------------------------
1308 1313 | | .CONST 0x1313 ; Address of begin
1309 0004 | | .CONST 0x0004 ; Address of exception handler
130a 0003 | | .CONST 0x0003 ; Number of locals
130b INIT_1308:
130b e00c | | Load 0x0,0xc
130c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
130d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
130e e00c | | Load 0x0,0xc
130f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1310 02c7 | | Declare_Variable Any
1311 00d8 | | Load_Top At_Offset_0
1312 1c00 | | Execute_Immediate Run_Utility,0x0
1313 BODY_1308:
1313 e00c | | Load 0x0,0xc
1314 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1315 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1316 00d9 | | Load_Top At_Offset_1
1317 0120 | | Execute Any,Is_Value
1318 6803 |h | Jump_Zero 0x131c
1319 e00c | | Load 0x0,0xc
131a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
131b 7801 |x | Jump 0x131d
131c 00d9 | | Load_Top At_Offset_1
131d 67e6 |g | Indirect_Literal Discrete,0x1304,{0x00000000, 0x00004000}
131e e011 | | Load 0x0,0x11
131f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1320 e017 | | Load 0x0,0x17
1321 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1322 e00c | | Load 0x0,0xc
1323 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1324 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1325 e5ff | | Load 0x2,-0x1
1326 e00c | | Load 0x0,0xc
1327 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1328 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1329 c403 | | Store 0x2,0x3
132a 005a | Z | Store_Top Discrete,At_Offset_2
132b 00d9 | | Load_Top At_Offset_1
132c 6815 |h | Jump_Zero 0x1342
132d e5fe | | Load 0x2,-0x2
132e 4801 |H | Short_Literal 0x1
132f 4801 |H | Short_Literal 0x1
1330 e006 | | Load 0x0,0x6
1331 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1332 0334 | 4 | Declare_Variable Array,With_Constraint
1333 e5ff | | Load 0x2,-0x1
1334 e006 | | Load 0x0,0x6
1335 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1336 e006 | | Load 0x0,0x6
1337 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1338 0119 | | Execute Any,Check_In_Formal_Type
1339 4801 |H | Short_Literal 0x1
133a 00da | | Load_Top At_Offset_2
133b 01d6 | | Execute Vector,Field_Write
133c 6007 |` | Indirect_Literal Discrete,0x1344,{0x00000000, 0x00008197}
133d e001 | | Load 0x0,0x1
133e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
133f e001 | | Load 0x0,0x1
1340 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1341 0257 | W | Execute Discrete,Raise
1342 00d8 | | Load_Top At_Offset_0
1343 4402 |D | Exit_Subprogram With_Result,0x2
1344 0000 0000 | | .LITERAL {0x00000000, 0x00008197}
1348 ; --------------------------------------------------------------------------------------
1348 ; SUBPROGRAM
1348 ; --------------------------------------------------------------------------------------
1348 1354 | T | .CONST 0x1354 ; Address of begin
1349 0004 | | .CONST 0x0004 ; Address of exception handler
134a 0003 | | .CONST 0x0003 ; Number of locals
134b INIT_1348:
134b e00c | | Load 0x0,0xc
134c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
134d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
134e 02c7 | | Declare_Variable Any
134f 00d8 | | Load_Top At_Offset_0
1350 1c00 | | Execute_Immediate Run_Utility,0x0
1351 e00c | | Load 0x0,0xc
1352 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1353 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1354 BODY_1348:
1354 e00c | | Load 0x0,0xc
1355 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1356 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1357 00da | | Load_Top At_Offset_2
1358 601f |` | Indirect_Literal Discrete,0x1378,{0x00000000, 0x00004000}
1359 e011 | | Load 0x0,0x11
135a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
135b e017 | | Load 0x0,0x17
135c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
135d e018 | | Load 0x0,0x18
135e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
135f 4801 |H | Short_Literal 0x1
1360 4800 |H | Short_Literal 0x0
1361 e017 | | Load 0x0,0x17
1362 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1363 e00c | | Load 0x0,0xc
1364 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1365 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1366 e5ff | | Load 0x2,-0x1
1367 e00c | | Load 0x0,0xc
1368 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1369 181b | | Execute Package,Field_Execute,Field_Number 0x1b
136a c402 | | Store 0x2,0x2
136b 0059 | Y | Store_Top Discrete,At_Offset_1
136c 00d8 | | Load_Top At_Offset_0
136d 0e00 | | Execute_Immediate Not_Equal,0x0
136e 00d9 | | Load_Top At_Offset_1
136f 0e03 | | Execute_Immediate Not_Equal,0x3
1370 0279 | y | Execute Discrete,And
1371 6804 |h | Jump_Zero 0x1376
1372 e00c | | Load 0x0,0xc
1373 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1374 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1375 4401 |D | Exit_Subprogram With_Result,0x1
1376 00d9 | | Load_Top At_Offset_1
1377 4401 |D | Exit_Subprogram With_Result,0x1
1378 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
137c 0000 0000 | | .BLANK 0000[0x4]
1380 ; --------------------------------------------------------------------------------------
1380 ; SUBPROGRAM
1380 ; --------------------------------------------------------------------------------------
1380 1383 | | .CONST 0x1383 ; Address of begin
1381 0004 | | .CONST 0x0004 ; Address of exception handler
1382 0001 | | .CONST 0x0001 ; Number of locals
1383 BODY_1380:
1383 INIT_1380:
1383 4801 |H | Short_Literal 0x1
1384 0092 19fc | | Action Push_String_Extended,0x19fc ; "<DEFAULT>"
1386 e5ff | | Load 0x2,-0x1
1387 e01a | | Load 0x0,0x1a
1388 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1389 6802 |h | Jump_Zero 0x138c
138a 00db | | Load_Top At_Offset_3
138b 4402 |D | Exit_Subprogram With_Result,0x2
138c 00da | | Load_Top At_Offset_2
138d 4402 |D | Exit_Subprogram With_Result,0x2
138e 0000 0000 | | .XXX[0x2]
1390 ; --------------------------------------------------------------------------------------
1390 ; SUBPROGRAM
1390 ; --------------------------------------------------------------------------------------
1390 139a | | .CONST 0x139a ; Address of begin
1391 0004 | | .CONST 0x0004 ; Address of exception handler
1392 0003 | | .CONST 0x0003 ; Number of locals
1393 INIT_1390:
1393 e00c | | Load 0x0,0xc
1394 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1395 02c7 | | Declare_Variable Any
1396 00d8 | | Load_Top At_Offset_0
1397 1c00 | | Execute_Immediate Run_Utility,0x0
1398 e00c | | Load 0x0,0xc
1399 1b0d | | Execute Package,Field_Read,Field_Number 0xd
139a BODY_1390:
139a e00c | | Load 0x0,0xc
139b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
139c 00da | | Load_Top At_Offset_2
139d 0120 | | Execute Any,Is_Value
139e 6803 |h | Jump_Zero 0x13a2
139f e00c | | Load 0x0,0xc
13a0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13a1 7801 |x | Jump 0x13a3
13a2 00da | | Load_Top At_Offset_2
13a3 e5ff | | Load 0x2,-0x1
13a4 e00c | | Load 0x0,0xc
13a5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
13a6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
13a7 c402 | | Store 0x2,0x2
13a8 0059 | Y | Store_Top Discrete,At_Offset_1
13a9 00d8 | | Load_Top At_Offset_0
13aa 7004 |p | Jump_Nonzero 0x13af
13ab 00d9 | | Load_Top At_Offset_1
13ac e004 | | Load 0x0,0x4
13ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17
13ae 4401 |D | Exit_Subprogram With_Result,0x1
13af 00ea | | Load_Encached Null_String_Cache
13b0 4401 |D | Exit_Subprogram With_Result,0x1
13b1 0000 0000 | | .BLANK 0000[0x7]
13b8 ; --------------------------------------------------------------------------------------
13b8 ; SUBPROGRAM
13b8 ; --------------------------------------------------------------------------------------
13b8 13bb | | .CONST 0x13bb ; Address of begin
13b9 0004 | | .CONST 0x0004 ; Address of exception handler
13ba 0001 | | .CONST 0x0001 ; Number of locals
13bb BODY_13b8:
13bb INIT_13b8:
13bb 00da | | Load_Top At_Offset_2
13bc e00c | | Load 0x0,0xc
13bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
13be 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
13bf 4401 |D | Exit_Subprogram With_Result,0x1
13c0 ; --------------------------------------------------------------------------------------
13c0 ; SUBPROGRAM
13c0 ; --------------------------------------------------------------------------------------
13c0 13c3 | | .CONST 0x13c3 ; Address of begin
13c1 0004 | | .CONST 0x0004 ; Address of exception handler
13c2 0001 | | .CONST 0x0001 ; Number of locals
13c3 BODY_13c0:
13c3 INIT_13c0:
13c3 4800 |H | Short_Literal 0x0
13c4 4800 |H | Short_Literal 0x0
13c5 4800 |H | Short_Literal 0x0
13c6 e5ff | | Load 0x2,-0x1
13c7 e00a | | Load 0x0,0xa
13c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
13c9 e00a | | Load 0x0,0xa
13ca 181f | | Execute Package,Field_Execute,Field_Number 0x1f
13cb 4401 |D | Exit_Subprogram With_Result,0x1
13cc 0000 0000 | | .BLANK 0000[0x4]
13d0 ; --------------------------------------------------------------------------------------
13d0 ; SUBPROGRAM
13d0 ; --------------------------------------------------------------------------------------
13d0 13d3 | | .CONST 0x13d3 ; Address of begin
13d1 0004 | | .CONST 0x0004 ; Address of exception handler
13d2 0001 | | .CONST 0x0001 ; Number of locals
13d3 BODY_13d0:
13d3 INIT_13d0:
13d3 00da | | Load_Top At_Offset_2
13d4 e00a | | Load 0x0,0xa
13d5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
13d6 e00a | | Load 0x0,0xa
13d7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
13d8 4401 |D | Exit_Subprogram With_Result,0x1
13d9 0000 0000 | | .BLANK 0000[0x7]
13e0 ; --------------------------------------------------------------------------------------
13e0 ; SUBPROGRAM
13e0 ; --------------------------------------------------------------------------------------
13e0 13e3 | | .CONST 0x13e3 ; Address of begin
13e1 0004 | | .CONST 0x0004 ; Address of exception handler
13e2 0001 | | .CONST 0x0001 ; Number of locals
13e3 BODY_13e0:
13e3 INIT_13e0:
13e3 00da | | Load_Top At_Offset_2
13e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
13e5 4401 |D | Exit_Subprogram With_Result,0x1
13e6 0000 0000 | | .XXX[0x2]
13e8 ; --------------------------------------------------------------------------------------
13e8 ; SUBPROGRAM
13e8 ; --------------------------------------------------------------------------------------
13e8 13eb | | .CONST 0x13eb ; Address of begin
13e9 0004 | | .CONST 0x0004 ; Address of exception handler
13ea 0001 | | .CONST 0x0001 ; Number of locals
13eb BODY_13e8:
13eb INIT_13e8:
13eb 00da | | Load_Top At_Offset_2
13ec e5fe | | Load 0x2,-0x2
13ed 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
13ee 4502 |E | Exit_Subprogram 0x2
13ef 0000 | | .XXX[0x1]
13f0 ; --------------------------------------------------------------------------------------
13f0 ; SUBPROGRAM
13f0 ; --------------------------------------------------------------------------------------
13f0 13f3 | | .CONST 0x13f3 ; Address of begin
13f1 13fd | | .CONST 0x13fd ; Address of exception handler
13f2 0001 | | .CONST 0x0001 ; Number of locals
13f3 BODY_13f0:
13f3 INIT_13f0:
13f3 e5fd | | Load 0x2,-0x3
13f4 00ea | | Load_Encached Null_String_Cache
13f5 e5ff | | Load 0x2,-0x1
13f6 4800 |H | Short_Literal 0x0
13f7 e014 | | Load 0x0,0x14
13f8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
13f9 c5fd | | Store 0x2,-0x3
13fa 4801 |H | Short_Literal 0x1
13fb a5fc | | Store_Unchecked 0x2,-0x4
13fc 4503 |E | Exit_Subprogram 0x3
13fd TRAP_13f0:
13fd 00d8 | | Load_Top At_Offset_0
13fe 0107 | | Execute Exception,Get_Name
13ff 4920 |I | Short_Literal 0x120
1400 492f |I/ | Short_Literal 0x12f
1401 0262 | b | Execute Discrete,In_Range
1402 6803 |h | Jump_Zero 0x1406
1403 4800 |H | Short_Literal 0x0
1404 a5fc | | Store_Unchecked 0x2,-0x4
1405 4503 |E | Exit_Subprogram 0x3
1406 e5fe | | Load 0x2,-0x2
1407 4801 |H | Short_Literal 0x1
1408 4801 |H | Short_Literal 0x1
1409 e006 | | Load 0x0,0x6
140a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
140b 0334 | 4 | Declare_Variable Array,With_Constraint
140c e5ff | | Load 0x2,-0x1
140d e006 | | Load 0x0,0x6
140e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
140f e006 | | Load 0x0,0x6
1410 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1411 0119 | | Execute Any,Check_In_Formal_Type
1412 4801 |H | Short_Literal 0x1
1413 00da | | Load_Top At_Offset_2
1414 01d6 | | Execute Vector,Field_Write
1415 6006 |` | Indirect_Literal Discrete,0x141c,{0x00000000, 0x00008198}
1416 e001 | | Load 0x0,0x1
1417 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1418 e001 | | Load 0x0,0x1
1419 1b17 | | Execute Package,Field_Read,Field_Number 0x17
141a 0257 | W | Execute Discrete,Raise
141b 0000 | | .XXX[0x1]
141c 0000 0000 | | .LITERAL {0x00000000, 0x00008198}
1420 ; --------------------------------------------------------------------------------------
1420 ; SUBPROGRAM
1420 ; --------------------------------------------------------------------------------------
1420 1423 | # | .CONST 0x1423 ; Address of begin
1421 0004 | | .CONST 0x0004 ; Address of exception handler
1422 0001 | | .CONST 0x0001 ; Number of locals
1423 BODY_1420:
1423 INIT_1420:
1423 00db | | Load_Top At_Offset_3
1424 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1425 00e1 | | Load_Encached Boolean_Cache
1426 011c | | Execute Any,Convert_Unchecked
1427 1c01 | | Execute_Immediate Run_Utility,0x1
1428 00db | | Load_Top At_Offset_3
1429 e014 | | Load 0x0,0x14
142a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
142b 4503 |E | Exit_Subprogram 0x3
142c 0000 0000 | | .BLANK 0000[0x4]
1430 ; --------------------------------------------------------------------------------------
1430 ; SUBPROGRAM
1430 ; --------------------------------------------------------------------------------------
1430 1441 | A | .CONST 0x1441 ; Address of begin
1431 145c | \ | .CONST 0x145c ; Address of exception handler
1432 0004 | | .CONST 0x0004 ; Number of locals
1433 INIT_1430:
1433 e014 | | Load 0x0,0x14
1434 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1435 02c7 | | Declare_Variable Any
1436 00d8 | | Load_Top At_Offset_0
1437 1c00 | | Execute_Immediate Run_Utility,0x0
1438 e00c | | Load 0x0,0xc
1439 1b0f | | Execute Package,Field_Read,Field_Number 0xf
143a 02c7 | | Declare_Variable Any
143b e5fd | | Load 0x2,-0x3
143c e5ff | | Load 0x2,-0x1
143d 8295 | | Call 0x1,0x95
143e a403 | | Store_Unchecked 0x2,0x3
143f e001 | | Load 0x0,0x1
1440 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1441 BODY_1430:
1441 e001 | | Load 0x0,0x1
1442 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1443 e5fd | | Load 0x2,-0x3
1444 00db | | Load_Top At_Offset_3
1445 8261 | a | Call 0x1,0x61
1446 0059 | Y | Store_Top Discrete,At_Offset_1
1447 00da | | Load_Top At_Offset_2
1448 00ea | | Load_Encached Null_String_Cache
1449 e5ff | | Load 0x2,-0x1
144a 4801 |H | Short_Literal 0x1
144b e014 | | Load 0x0,0x14
144c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
144d c402 | | Store 0x2,0x2
144e e5fe | | Load 0x2,-0x2
144f 00db | | Load_Top At_Offset_3
1450 829f | | Call 0x1,0x9f
1451 00da | | Load_Top At_Offset_2
1452 e014 | | Load 0x0,0x14
1453 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1454 c402 | | Store 0x2,0x2
1455 e001 | | Load 0x0,0x1
1456 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1457 e5fd | | Load 0x2,-0x3
1458 00db | | Load_Top At_Offset_3
1459 8260 | ` | Call 0x1,0x60
145a 0059 | Y | Store_Top Discrete,At_Offset_1
145b 4504 |E | Exit_Subprogram 0x4
145c TRAP_1430:
145c 0007 | | Action Break_Optional
145d e5fd | | Load 0x2,-0x3
145e 4801 |H | Short_Literal 0x1
145f 4801 |H | Short_Literal 0x1
1460 e006 | | Load 0x0,0x6
1461 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1462 0334 | 4 | Declare_Variable Array,With_Constraint
1463 e5ff | | Load 0x2,-0x1
1464 e006 | | Load 0x0,0x6
1465 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1466 e006 | | Load 0x0,0x6
1467 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1468 0119 | | Execute Any,Check_In_Formal_Type
1469 4801 |H | Short_Literal 0x1
146a 00da | | Load_Top At_Offset_2
146b 01d6 | | Execute Vector,Field_Write
146c 6007 |` | Indirect_Literal Discrete,0x1474,{0x00000000, 0x00008199}
146d e001 | | Load 0x0,0x1
146e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
146f e001 | | Load 0x0,0x1
1470 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1471 0257 | W | Execute Discrete,Raise
1472 0000 0000 | | .XXX[0x2]
1474 0000 0000 | | .LITERAL {0x00000000, 0x00008199}
1478 ; --------------------------------------------------------------------------------------
1478 ; SUBPROGRAM
1478 ; --------------------------------------------------------------------------------------
1478 1489 | | .CONST 0x1489 ; Address of begin
1479 14a8 | | .CONST 0x14a8 ; Address of exception handler
147a 0005 | | .CONST 0x0005 ; Number of locals
147b INIT_1478:
147b e014 | | Load 0x0,0x14
147c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
147d 02c7 | | Declare_Variable Any
147e 00d8 | | Load_Top At_Offset_0
147f 1c00 | | Execute_Immediate Run_Utility,0x0
1480 e28c | | Load 0x1,0x8c
1481 0322 | " | Declare_Variable Record
1482 e00c | | Load 0x0,0xc
1483 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1484 02c7 | | Declare_Variable Any
1485 00d8 | | Load_Top At_Offset_0
1486 1c00 | | Execute_Immediate Run_Utility,0x0
1487 e001 | | Load 0x0,0x1
1488 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1489 BODY_1478:
1489 00db | | Load_Top At_Offset_3
148a 00ea | | Load_Encached Null_String_Cache
148b e5ff | | Load 0x2,-0x1
148c 4801 |H | Short_Literal 0x1
148d e014 | | Load 0x0,0x14
148e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
148f c402 | | Store 0x2,0x2
1490 4800 |H | Short_Literal 0x0
1491 00db | | Load_Top At_Offset_3
1492 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1493 00da | | Load_Top At_Offset_2
1494 e402 | | Load 0x2,0x2
1495 829f | | Call 0x1,0x9f
1496 00db | | Load_Top At_Offset_3
1497 e014 | | Load 0x0,0x14
1498 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1499 c402 | | Store 0x2,0x2
149a e5fe | | Load 0x2,-0x2
149b e5ff | | Load 0x2,-0x1
149c 8295 | | Call 0x1,0x95
149d c404 | | Store 0x2,0x4
149e e001 | | Load 0x0,0x1
149f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14a0 e5fe | | Load 0x2,-0x2
14a1 00db | | Load_Top At_Offset_3
14a2 8260 | ` | Call 0x1,0x60
14a3 0059 | Y | Store_Top Discrete,At_Offset_1
14a4 00da | | Load_Top At_Offset_2
14a5 e5fd | | Load 0x2,-0x3
14a6 017d | } | Execute Record,Structure_Write
14a7 4503 |E | Exit_Subprogram 0x3
14a8 TRAP_1478:
14a8 0007 | | Action Break_Optional
14a9 e5fe | | Load 0x2,-0x2
14aa 4801 |H | Short_Literal 0x1
14ab 4801 |H | Short_Literal 0x1
14ac e006 | | Load 0x0,0x6
14ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14ae 0334 | 4 | Declare_Variable Array,With_Constraint
14af e5ff | | Load 0x2,-0x1
14b0 e006 | | Load 0x0,0x6
14b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14b2 e006 | | Load 0x0,0x6
14b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14b4 0119 | | Execute Any,Check_In_Formal_Type
14b5 4801 |H | Short_Literal 0x1
14b6 00da | | Load_Top At_Offset_2
14b7 01d6 | | Execute Vector,Field_Write
14b8 6007 |` | Indirect_Literal Discrete,0x14c0,{0x00000000, 0x0000819a}
14b9 e001 | | Load 0x0,0x1
14ba 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14bb e001 | | Load 0x0,0x1
14bc 1b17 | | Execute Package,Field_Read,Field_Number 0x17
14bd 0257 | W | Execute Discrete,Raise
14be 0000 0000 | | .XXX[0x2]
14c0 0000 0000 | | .LITERAL {0x00000000, 0x0000819a}
14c4 0000 0000 | | .BLANK 0000[0x4]
14c8 ; --------------------------------------------------------------------------------------
14c8 ; SUBPROGRAM
14c8 ; --------------------------------------------------------------------------------------
14c8 14d1 | | .CONST 0x14d1 ; Address of begin
14c9 14ec | | .CONST 0x14ec ; Address of exception handler
14ca 0003 | | .CONST 0x0003 ; Number of locals
14cb INIT_14c8:
14cb e014 | | Load 0x0,0x14
14cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14cd 02c7 | | Declare_Variable Any
14ce 00d8 | | Load_Top At_Offset_0
14cf 1c00 | | Execute_Immediate Run_Utility,0x0
14d0 00e1 | | Load_Encached Boolean_Cache
14d1 BODY_14c8:
14d1 00e1 | | Load_Encached Boolean_Cache
14d2 00da | | Load_Top At_Offset_2
14d3 e5fe | | Load 0x2,-0x2
14d4 e5ff | | Load 0x2,-0x1
14d5 829e | | Call 0x1,0x9e
14d6 c402 | | Store 0x2,0x2
14d7 0059 | Y | Store_Top Discrete,At_Offset_1
14d8 00d8 | | Load_Top At_Offset_0
14d9 7006 |p | Jump_Nonzero 0x14e0
14da e5fd | | Load 0x2,-0x3
14db e5fe | | Load 0x2,-0x2
14dc e5ff | | Load 0x2,-0x1
14dd 82a1 | | Call 0x1,0xa1
14de 00d1 | | Pop_Control Pop_Count_1
14df 4503 |E | Exit_Subprogram 0x3
14e0 00d9 | | Load_Top At_Offset_1
14e1 e014 | | Load 0x0,0x14
14e2 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
14e3 00e1 | | Load_Encached Boolean_Cache
14e4 1c02 | | Execute_Immediate Run_Utility,0x2
14e5 e5fd | | Load 0x2,-0x3
14e6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
14e7 00d9 | | Load_Top At_Offset_1
14e8 e014 | | Load 0x0,0x14
14e9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
14ea c402 | | Store 0x2,0x2
14eb 4503 |E | Exit_Subprogram 0x3
14ec TRAP_14c8:
14ec 0007 | | Action Break_Optional
14ed e5fe | | Load 0x2,-0x2
14ee 4801 |H | Short_Literal 0x1
14ef 4801 |H | Short_Literal 0x1
14f0 e006 | | Load 0x0,0x6
14f1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14f2 0334 | 4 | Declare_Variable Array,With_Constraint
14f3 e5ff | | Load 0x2,-0x1
14f4 e006 | | Load 0x0,0x6
14f5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14f6 e006 | | Load 0x0,0x6
14f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14f8 0119 | | Execute Any,Check_In_Formal_Type
14f9 4801 |H | Short_Literal 0x1
14fa 00da | | Load_Top At_Offset_2
14fb 01d6 | | Execute Vector,Field_Write
14fc 6007 |` | Indirect_Literal Discrete,0x1504,{0x00000000, 0x0000819b}
14fd e001 | | Load 0x0,0x1
14fe 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14ff e001 | | Load 0x0,0x1
1500 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1501 0257 | W | Execute Discrete,Raise
1502 0000 0000 | | .XXX[0x2]
1504 0000 0000 | | .LITERAL {0x00000000, 0x0000819b}
1508 ; --------------------------------------------------------------------------------------
1508 ; SUBPROGRAM
1508 ; --------------------------------------------------------------------------------------
1508 1512 | | .CONST 0x1512 ; Address of begin
1509 151f | | .CONST 0x151f ; Address of exception handler
150a 0003 | | .CONST 0x0003 ; Number of locals
150b INIT_1508:
150b e014 | | Load 0x0,0x14
150c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
150d 02c7 | | Declare_Variable Any
150e 00d8 | | Load_Top At_Offset_0
150f 1c00 | | Execute_Immediate Run_Utility,0x0
1510 029f 18eb | | Declare_Subprogram For_Call,INIT_18e8
1512 BODY_1508:
1512 00d9 | | Load_Top At_Offset_1
1513 00ea | | Load_Encached Null_String_Cache
1514 e5ff | | Load 0x2,-0x1
1515 4800 |H | Short_Literal 0x0
1516 e014 | | Load 0x0,0x14
1517 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1518 c402 | | Store 0x2,0x2
1519 8403 | | Call 0x2,0x3
151a 00d9 | | Load_Top At_Offset_1
151b e014 | | Load 0x0,0x14
151c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
151d c402 | | Store 0x2,0x2
151e 4503 |E | Exit_Subprogram 0x3
151f TRAP_1508:
151f 0007 | | Action Break_Optional
1520 e5fe | | Load 0x2,-0x2
1521 4801 |H | Short_Literal 0x1
1522 4801 |H | Short_Literal 0x1
1523 e006 | | Load 0x0,0x6
1524 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1525 0334 | 4 | Declare_Variable Array,With_Constraint
1526 e5ff | | Load 0x2,-0x1
1527 e006 | | Load 0x0,0x6
1528 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1529 e006 | | Load 0x0,0x6
152a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
152b 0119 | | Execute Any,Check_In_Formal_Type
152c 4801 |H | Short_Literal 0x1
152d 00da | | Load_Top At_Offset_2
152e 01d6 | | Execute Vector,Field_Write
152f 6008 |` | Indirect_Literal Discrete,0x1538,{0x00000000, 0x0000819c}
1530 e001 | | Load 0x0,0x1
1531 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1532 e001 | | Load 0x0,0x1
1533 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1534 0257 | W | Execute Discrete,Raise
1535 0000 0000 | | .XXX[0x3]
1537 0000 | |
1538 0000 0000 | | .LITERAL {0x00000000, 0x0000819c}
153c 0000 0000 | | .BLANK 0000[0x4]
1540 ; --------------------------------------------------------------------------------------
1540 ; SUBPROGRAM
1540 ; --------------------------------------------------------------------------------------
1540 1543 | C | .CONST 0x1543 ; Address of begin
1541 1568 | h | .CONST 0x1568 ; Address of exception handler
1542 0001 | | .CONST 0x0001 ; Number of locals
1543 BODY_1540:
1543 INIT_1540:
1543 4801 |H | Short_Literal 0x1
1544 e5fe | | Load 0x2,-0x2
1545 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1546 e5fe | | Load 0x2,-0x2
1547 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1548 01cf | | Execute Vector,Slice_Read
1549 00db | | Load_Top At_Offset_3
154a e014 | | Load 0x0,0x14
154b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
154c 4801 |H | Short_Literal 0x1
154d e5fe | | Load 0x2,-0x2
154e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
154f e5fe | | Load 0x2,-0x2
1550 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1551 01cf | | Execute Vector,Slice_Read
1552 00db | | Load_Top At_Offset_3
1553 e014 | | Load 0x0,0x14
1554 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1555 4801 |H | Short_Literal 0x1
1556 e5fe | | Load 0x2,-0x2
1557 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1558 e5fe | | Load 0x2,-0x2
1559 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
155a 01cf | | Execute Vector,Slice_Read
155b 00db | | Load_Top At_Offset_3
155c e014 | | Load 0x0,0x14
155d 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
155e 4801 |H | Short_Literal 0x1
155f e5fe | | Load 0x2,-0x2
1560 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
1561 e5fe | | Load 0x2,-0x2
1562 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
1563 01cf | | Execute Vector,Slice_Read
1564 00db | | Load_Top At_Offset_3
1565 e014 | | Load 0x0,0x14
1566 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1567 4504 |E | Exit_Subprogram 0x4
1568 TRAP_1540:
1568 0007 | | Action Break_Optional
1569 e001 | | Load 0x0,0x1
156a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
156b 0257 | W | Execute Discrete,Raise
156c 0000 0000 | | .BLANK 0000[0x4]
1570 ; --------------------------------------------------------------------------------------
1570 ; SUBPROGRAM
1570 ; --------------------------------------------------------------------------------------
1570 1578 | x | .CONST 0x1578 ; Address of begin
1571 1588 | | .CONST 0x1588 ; Address of exception handler
1572 0002 | | .CONST 0x0002 ; Number of locals
1573 INIT_1570:
1573 e014 | | Load 0x0,0x14
1574 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1575 02c7 | | Declare_Variable Any
1576 00d8 | | Load_Top At_Offset_0
1577 1c00 | | Execute_Immediate Run_Utility,0x0
1578 BODY_1570:
1578 00d8 | | Load_Top At_Offset_0
1579 00ea | | Load_Encached Null_String_Cache
157a e5ff | | Load 0x2,-0x1
157b 4801 |H | Short_Literal 0x1
157c e014 | | Load 0x0,0x14
157d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
157e c402 | | Store 0x2,0x2
157f e5fd | | Load 0x2,-0x3
1580 e5fe | | Load 0x2,-0x2
1581 00da | | Load_Top At_Offset_2
1582 82a4 | | Call 0x1,0xa4
1583 00d8 | | Load_Top At_Offset_0
1584 e014 | | Load 0x0,0x14
1585 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1586 c402 | | Store 0x2,0x2
1587 4504 |E | Exit_Subprogram 0x4
1588 TRAP_1570:
1588 0007 | | Action Break_Optional
1589 e5fd | | Load 0x2,-0x3
158a 4801 |H | Short_Literal 0x1
158b 4801 |H | Short_Literal 0x1
158c e006 | | Load 0x0,0x6
158d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
158e 0334 | 4 | Declare_Variable Array,With_Constraint
158f e5ff | | Load 0x2,-0x1
1590 e006 | | Load 0x0,0x6
1591 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1592 e006 | | Load 0x0,0x6
1593 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1594 0119 | | Execute Any,Check_In_Formal_Type
1595 4801 |H | Short_Literal 0x1
1596 00da | | Load_Top At_Offset_2
1597 01d6 | | Execute Vector,Field_Write
1598 6007 |` | Indirect_Literal Discrete,0x15a0,{0x00000000, 0x0000819d}
1599 e001 | | Load 0x0,0x1
159a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
159b e001 | | Load 0x0,0x1
159c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
159d 0257 | W | Execute Discrete,Raise
159e 0000 0000 | | .XXX[0x2]
15a0 0000 0000 | | .LITERAL {0x00000000, 0x0000819d}
15a4 0000 0000 | | .BLANK 0000[0x4]
15a8 ; --------------------------------------------------------------------------------------
15a8 ; SUBPROGRAM
15a8 ; --------------------------------------------------------------------------------------
15a8 15ad | | .CONST 0x15ad ; Address of begin
15a9 15fc | | .CONST 0x15fc ; Address of exception handler
15aa 0002 | | .CONST 0x0002 ; Number of locals
15ab INIT_15a8:
15ab e5fc | | Load 0x2,-0x4
15ac 829a | | Call 0x1,0x9a
15ad BODY_15a8:
15ad 00db | | Load_Top At_Offset_3
15ae 01db | | Execute Vector,Length
15af 0c81 | | Execute_Immediate Greater_Equal,0x81
15b0 e5fe | | Load 0x2,-0x2
15b1 01db | | Execute Vector,Length
15b2 0c81 | | Execute_Immediate Greater_Equal,0x81
15b3 0278 | x | Execute Discrete,Or
15b4 e5fd | | Load 0x2,-0x3
15b5 01db | | Execute Vector,Length
15b6 0c81 | | Execute_Immediate Greater_Equal,0x81
15b7 0278 | x | Execute Discrete,Or
15b8 6802 |h | Jump_Zero 0x15bb
15b9 e01b | | Load 0x0,0x1b
15ba 0257 | W | Execute Discrete,Raise
15bb 00db | | Load_Top At_Offset_3
15bc 4801 |H | Short_Literal 0x1
15bd e5ff | | Load 0x2,-0x1
15be 01db | | Execute Vector,Length
15bf 00d8 | | Load_Top At_Offset_0
15c0 00e2 | | Load_Encached Integer_Cache
15c1 0260 | ` | Execute Discrete,In_Type
15c2 7001 |p | Jump_Nonzero 0x15c4
15c3 0801 | | Execute_Immediate Raise,0x1
15c4 e5fa | | Load 0x2,-0x6
15c5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15c6 01ce | | Execute Vector,Slice_Write
15c7 00db | | Load_Top At_Offset_3
15c8 01db | | Execute Vector,Length
15c9 e5fa | | Load 0x2,-0x6
15ca 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
15cb e5fe | | Load 0x2,-0x2
15cc 4801 |H | Short_Literal 0x1
15cd e5fe | | Load 0x2,-0x2
15ce 01db | | Execute Vector,Length
15cf 00d8 | | Load_Top At_Offset_0
15d0 00e2 | | Load_Encached Integer_Cache
15d1 0260 | ` | Execute Discrete,In_Type
15d2 7001 |p | Jump_Nonzero 0x15d4
15d3 0801 | | Execute_Immediate Raise,0x1
15d4 e5fa | | Load 0x2,-0x6
15d5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
15d6 01ce | | Execute Vector,Slice_Write
15d7 e5fe | | Load 0x2,-0x2
15d8 01db | | Execute Vector,Length
15d9 e5fa | | Load 0x2,-0x6
15da 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
15db e5fd | | Load 0x2,-0x3
15dc 4801 |H | Short_Literal 0x1
15dd e5fd | | Load 0x2,-0x3
15de 01db | | Execute Vector,Length
15df 00d8 | | Load_Top At_Offset_0
15e0 00e2 | | Load_Encached Integer_Cache
15e1 0260 | ` | Execute Discrete,In_Type
15e2 7001 |p | Jump_Nonzero 0x15e4
15e3 0801 | | Execute_Immediate Raise,0x1
15e4 e5fa | | Load 0x2,-0x6
15e5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
15e6 01ce | | Execute Vector,Slice_Write
15e7 e5fd | | Load 0x2,-0x3
15e8 01db | | Execute Vector,Length
15e9 e5fa | | Load 0x2,-0x6
15ea 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
15eb 00d8 | | Load_Top At_Offset_0
15ec 4801 |H | Short_Literal 0x1
15ed 00da | | Load_Top At_Offset_2
15ee 01db | | Execute Vector,Length
15ef 00d8 | | Load_Top At_Offset_0
15f0 00e2 | | Load_Encached Integer_Cache
15f1 0260 | ` | Execute Discrete,In_Type
15f2 7001 |p | Jump_Nonzero 0x15f4
15f3 0801 | | Execute_Immediate Raise,0x1
15f4 e5fa | | Load 0x2,-0x6
15f5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
15f6 01ce | | Execute Vector,Slice_Write
15f7 00d8 | | Load_Top At_Offset_0
15f8 01db | | Execute Vector,Length
15f9 e5fa | | Load 0x2,-0x6
15fa 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
15fb 4506 |E | Exit_Subprogram 0x6
15fc TRAP_15a8:
15fc e01b | | Load 0x0,0x1b
15fd 010f | | Execute Exception,Equal
15fe 6816 |h | Jump_Zero 0x1615
15ff e5fb | | Load 0x2,-0x5
1600 4801 |H | Short_Literal 0x1
1601 4801 |H | Short_Literal 0x1
1602 e006 | | Load 0x0,0x6
1603 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1604 0334 | 4 | Declare_Variable Array,With_Constraint
1605 0092 19e5 | | Action Push_String_Extended,0x19e5 ; " 128"
1607 e006 | | Load 0x0,0x6
1608 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1609 e006 | | Load 0x0,0x6
160a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
160b 0119 | | Execute Any,Check_In_Formal_Type
160c 4801 |H | Short_Literal 0x1
160d 00da | | Load_Top At_Offset_2
160e 01d6 | | Execute Vector,Field_Write
160f 6014 |` | Indirect_Literal Discrete,0x1624,{0x00000000, 0x0000819e}
1610 e001 | | Load 0x0,0x1
1611 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1612 e001 | | Load 0x0,0x1
1613 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1614 0257 | W | Execute Discrete,Raise
1615 e5fb | | Load 0x2,-0x5
1616 e006 | | Load 0x0,0x6
1617 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1618 6007 |` | Indirect_Literal Discrete,0x1620,{0x00000000, 0x0000819f}
1619 e001 | | Load 0x0,0x1
161a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
161b e001 | | Load 0x0,0x1
161c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
161d 0257 | W | Execute Discrete,Raise
161e 0000 0000 | | .XXX[0x2]
1620 0000 0000 | | .LITERAL {0x00000000, 0x0000819f}
1624 0000 0000 | | .LITERAL {0x00000000, 0x0000819e}
1628 ; --------------------------------------------------------------------------------------
1628 ; SUBPROGRAM
1628 ; --------------------------------------------------------------------------------------
1628 1640 | @ | .CONST 0x1640 ; Address of begin
1629 166f | o | .CONST 0x166f ; Address of exception handler
162a 0007 | | .CONST 0x0007 ; Number of locals
162b INIT_1628:
162b e014 | | Load 0x0,0x14
162c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
162d 02c7 | | Declare_Variable Any
162e 00d8 | | Load_Top At_Offset_0
162f 1c00 | | Execute_Immediate Run_Utility,0x0
1630 e26f | o | Load 0x1,0x6f
1631 0322 | " | Declare_Variable Record
1632 00d8 | | Load_Top At_Offset_0
1633 1c00 | | Execute_Immediate Run_Utility,0x0
1634 00e1 | | Load_Encached Boolean_Cache
1635 e001 | | Load 0x0,0x1
1636 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1637 e5fd | | Load 0x2,-0x3
1638 e5ff | | Load 0x2,-0x1
1639 8293 | | Call 0x1,0x93
163a e00c | | Load 0x0,0xc
163b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
163c 02c7 | | Declare_Variable Any
163d 00d9 | | Load_Top At_Offset_1
163e 8294 | | Call 0x1,0x94
163f a407 | | Store_Unchecked 0x2,0x7
1640 BODY_1628:
1640 00d8 | | Load_Top At_Offset_0
1641 e00c | | Load 0x0,0xc
1642 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1643 012e | . | Execute Any,Not_Equal
1644 6806 |h | Jump_Zero 0x164b
1645 e001 | | Load 0x0,0x1
1646 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1647 e5fb | | Load 0x2,-0x5
1648 00da | | Load_Top At_Offset_2
1649 8261 | a | Call 0x1,0x61
164a 005b | [ | Store_Top Discrete,At_Offset_3
164b e402 | | Load 0x2,0x2
164c 00ea | | Load_Encached Null_String_Cache
164d 00db | | Load_Top At_Offset_3
164e 4801 |H | Short_Literal 0x1
164f e014 | | Load 0x0,0x14
1650 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1651 c402 | | Store 0x2,0x2
1652 e403 | | Load 0x2,0x3
1653 e5fb | | Load 0x2,-0x5
1654 8290 | | Call 0x1,0x90
1655 e5fd | | Load 0x2,-0x3
1656 e5fc | | Load 0x2,-0x4
1657 8297 | | Call 0x1,0x97
1658 e5fd | | Load 0x2,-0x3
1659 e5fe | | Load 0x2,-0x2
165a 82a6 | | Call 0x1,0xa6
165b 00d1 | | Pop_Control Pop_Count_1
165c e5fb | | Load 0x2,-0x5
165d e403 | | Load 0x2,0x3
165e e402 | | Load 0x2,0x2
165f 82a4 | | Call 0x1,0xa4
1660 e402 | | Load 0x2,0x2
1661 e014 | | Load 0x0,0x14
1662 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1663 c402 | | Store 0x2,0x2
1664 e5fb | | Load 0x2,-0x5
1665 00da | | Load_Top At_Offset_2
1666 8295 | | Call 0x1,0x95
1667 c407 | | Store 0x2,0x7
1668 e001 | | Load 0x0,0x1
1669 1b0d | | Execute Package,Field_Read,Field_Number 0xd
166a e5fb | | Load 0x2,-0x5
166b 00da | | Load_Top At_Offset_2
166c 8260 | ` | Call 0x1,0x60
166d 005b | [ | Store_Top Discrete,At_Offset_3
166e 4506 |E | Exit_Subprogram 0x6
166f TRAP_1628:
166f 0007 | | Action Break_Optional
1670 e5fb | | Load 0x2,-0x5
1671 4801 |H | Short_Literal 0x1
1672 4801 |H | Short_Literal 0x1
1673 e006 | | Load 0x0,0x6
1674 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1675 0334 | 4 | Declare_Variable Array,With_Constraint
1676 e406 | | Load 0x2,0x6
1677 e006 | | Load 0x0,0x6
1678 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1679 e006 | | Load 0x0,0x6
167a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
167b 0119 | | Execute Any,Check_In_Formal_Type
167c 4801 |H | Short_Literal 0x1
167d 00da | | Load_Top At_Offset_2
167e 01d6 | | Execute Vector,Field_Write
167f 6008 |` | Indirect_Literal Discrete,0x1688,{0x00000000, 0x000081a0}
1680 e001 | | Load 0x0,0x1
1681 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1682 e001 | | Load 0x0,0x1
1683 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1684 0257 | W | Execute Discrete,Raise
1685 0000 0000 | | .XXX[0x3]
1687 0000 | |
1688 0000 0000 | | .LITERAL {0x00000000, 0x000081a0}
168c 0000 0000 | | .BLANK 0000[0x4]
1690 ; --------------------------------------------------------------------------------------
1690 ; SUBPROGRAM
1690 ; --------------------------------------------------------------------------------------
1690 1693 | | .CONST 0x1693 ; Address of begin
1691 0004 | | .CONST 0x0004 ; Address of exception handler
1692 0001 | | .CONST 0x0001 ; Number of locals
1693 BODY_1690:
1693 INIT_1690:
1693 4800 |H | Short_Literal 0x0
1694 e5fe | | Load 0x2,-0x2
1695 4821 |H! | Short_Literal 0x21
1696 e01a | | Load 0x0,0x1a
1697 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1698 6802 |h | Jump_Zero 0x169b
1699 00db | | Load_Top At_Offset_3
169a 4402 |D | Exit_Subprogram With_Result,0x2
169b 00da | | Load_Top At_Offset_2
169c e004 | | Load 0x0,0x4
169d 180e | | Execute Package,Field_Execute,Field_Number 0xe
169e 6809 |h | Jump_Zero 0x16a8
169f 00da | | Load_Top At_Offset_2
16a0 e004 | | Load 0x0,0x4
16a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
16a2 0092 19fd | | Action Push_String_Extended,0x19fd ; ".Units."
16a4 01cc | | Execute Vector,Catenate
16a5 e5fe | | Load 0x2,-0x2
16a6 01cc | | Execute Vector,Catenate
16a7 4402 |D | Exit_Subprogram With_Result,0x2
16a8 00da | | Load_Top At_Offset_2
16a9 e004 | | Load 0x0,0x4
16aa 1817 | | Execute Package,Field_Execute,Field_Number 0x17
16ab 0092 19f3 | | Action Push_String_Extended,0x19f3 ; "."
16ad 01cc | | Execute Vector,Catenate
16ae e5fe | | Load 0x2,-0x2
16af 01cc | | Execute Vector,Catenate
16b0 4402 |D | Exit_Subprogram With_Result,0x2
16b1 0000 0000 | | .BLANK 0000[0x7]
16b8 ; --------------------------------------------------------------------------------------
16b8 ; SUBPROGRAM
16b8 ; --------------------------------------------------------------------------------------
16b8 16bb | | .CONST 0x16bb ; Address of begin
16b9 0004 | | .CONST 0x0004 ; Address of exception handler
16ba 0001 | | .CONST 0x0001 ; Number of locals
16bb BODY_16b8:
16bb INIT_16b8:
16bb 00da | | Load_Top At_Offset_2
16bc e004 | | Load 0x0,0x4
16bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
16be 6807 |h | Jump_Zero 0x16c6
16bf 00da | | Load_Top At_Offset_2
16c0 e004 | | Load 0x0,0x4
16c1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
16c2 0092 19fe | | Action Push_String_Extended,0x19fe ; ".units"
16c4 01cc | | Execute Vector,Catenate
16c5 4401 |D | Exit_Subprogram With_Result,0x1
16c6 00da | | Load_Top At_Offset_2
16c7 e004 | | Load 0x0,0x4
16c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
16c9 4401 |D | Exit_Subprogram With_Result,0x1
16ca 0000 0000 | | .BLANK 0000[0x6]
16d0 ; --------------------------------------------------------------------------------------
16d0 ; SUBPROGRAM
16d0 ; --------------------------------------------------------------------------------------
16d0 16ed | | .CONST 0x16ed ; Address of begin
16d1 0004 | | .CONST 0x0004 ; Address of exception handler
16d2 0009 | | .CONST 0x0009 ; Number of locals
16d3 INIT_16d0:
16d3 e00c | | Load 0x0,0xc
16d4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
16d5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
16d6 02c7 | | Declare_Variable Any
16d7 00d8 | | Load_Top At_Offset_0
16d8 1c00 | | Execute_Immediate Run_Utility,0x0
16d9 e00c | | Load 0x0,0xc
16da 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16db 02c7 | | Declare_Variable Any
16dc 00d8 | | Load_Top At_Offset_0
16dd 1c00 | | Execute_Immediate Run_Utility,0x0
16de 00e2 | | Load_Encached Integer_Cache
16df 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
16e0 00e1 | | Load_Encached Boolean_Cache
16e1 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
16e2 e00c | | Load 0x0,0xc
16e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
16e4 e5ff | | Load 0x2,-0x1
16e5 8299 | | Call 0x1,0x99
16e6 e00c | | Load 0x0,0xc
16e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16e8 02c7 | | Declare_Variable Any
16e9 00d8 | | Load_Top At_Offset_0
16ea 1c00 | | Execute_Immediate Run_Utility,0x0
16eb 029f 193b | ;| Declare_Subprogram For_Call,INIT_1938
16ed BODY_16d0:
16ed 4800 |H | Short_Literal 0x0
16ee a5fc | | Store_Unchecked 0x2,-0x4
16ef 4800 |H | Short_Literal 0x0
16f0 a5fb | | Store_Unchecked 0x2,-0x5
16f1 e00c | | Load 0x0,0xc
16f2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
16f3 c5fd | | Store 0x2,-0x3
16f4 00da | | Load_Top At_Offset_2
16f5 8294 | | Call 0x1,0x94
16f6 c408 | | Store 0x2,0x8
16f7 00d9 | | Load_Top At_Offset_1
16f8 e00c | | Load 0x0,0xc
16f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
16fa 7004 |p | Jump_Nonzero 0x16ff
16fb 00d9 | | Load_Top At_Offset_1
16fc e004 | | Load 0x0,0x4
16fd 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
16fe 7001 |p | Jump_Nonzero 0x1700
16ff 4503 |E | Exit_Subprogram 0x3
1700 00da | | Load_Top At_Offset_2
1701 e28e | | Load 0x1,0x8e
1702 01cc | | Execute Vector,Catenate
1703 8296 | | Call 0x1,0x96
1704 c402 | | Store 0x2,0x2
1705 e402 | | Load 0x2,0x2
1706 e00c | | Load 0x0,0xc
1707 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1708 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1709 6801 |h | Jump_Zero 0x170b
170a 4503 |E | Exit_Subprogram 0x3
170b 00cf | | Action Mark_Auxiliary
170c 780c |x | Jump 0x1719
170d e404 | | Load 0x2,0x4
170e 0a01 | | Execute_Immediate Plus,0x1
170f c404 | | Store 0x2,0x4
1710 e405 | | Load 0x2,0x5
1711 7001 |p | Jump_Nonzero 0x1713
1712 8409 | | Call 0x2,0x9
1713 e402 | | Load 0x2,0x2
1714 e00c | | Load 0x0,0xc
1715 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1716 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1717 c402 | | Store 0x2,0x2
1718 00c9 | | Action Pop_Auxiliary_Loop
1719 e402 | | Load 0x2,0x2
171a e00c | | Load 0x0,0xc
171b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
171c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
171d 6fef |o | Jump_Zero 0x170d
171e 00ce | | Action Pop_Auxiliary
171f e405 | | Load 0x2,0x5
1720 a5fc | | Store_Unchecked 0x2,-0x4
1721 e404 | | Load 0x2,0x4
1722 a5fb | | Store_Unchecked 0x2,-0x5
1723 00d9 | | Load_Top At_Offset_1
1724 c5fd | | Store 0x2,-0x3
1725 4503 |E | Exit_Subprogram 0x3
1726 0000 0000 | | .XXX[0x2]
1728 ; --------------------------------------------------------------------------------------
1728 ; SUBPROGRAM
1728 ; --------------------------------------------------------------------------------------
1728 1736 | 6 | .CONST 0x1736 ; Address of begin
1729 0004 | | .CONST 0x0004 ; Address of exception handler
172a 0003 | | .CONST 0x0003 ; Number of locals
172b INIT_1728:
172b e5fc | | Load 0x2,-0x4
172c e405 | | Load 0x2,0x5
172d e5fe | | Load 0x2,-0x2
172e e402 | | Load 0x2,0x2
172f e009 | | Load 0x0,0x9
1730 1b18 | | Execute Package,Field_Read,Field_Number 0x18
1731 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
1732 00d8 | | Load_Top At_Offset_0
1733 01db | | Execute Vector,Length
1734 e20d | | Load 0x1,0xd
1735 1c08 | | Execute_Immediate Run_Utility,0x8
1736 BODY_1728:
1736 e001 | | Load 0x0,0x1
1737 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1738 e402 | | Load 0x2,0x2
1739 e5fc | | Load 0x2,-0x4
173a e002 | | Load 0x0,0x2
173b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
173c c402 | | Store 0x2,0x2
173d c403 | | Store 0x2,0x3
173e 00d9 | | Load_Top At_Offset_1
173f 0092 19ff | | Action Push_String_Extended,0x19ff ; "<error>"
1741 01df | | Execute Vector,Equal
1742 6808 |h | Jump_Zero 0x174b
1743 e006 | | Load 0x0,0x6
1744 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1745 600e |` | Indirect_Literal Discrete,0x1754,{0x00000000, 0x00008128}
1746 e001 | | Load 0x0,0x1
1747 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1748 00d9 | | Load_Top At_Offset_1
1749 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
174a 7803 |x | Jump 0x174e
174b 4800 |H | Short_Literal 0x0
174c 00d9 | | Load_Top At_Offset_1
174d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
174e 00d9 | | Load_Top At_Offset_1
174f 00d9 | | Load_Top At_Offset_1
1750 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1751 00d8 | | Load_Top At_Offset_0
1752 00cb | | Action Pop_Block_With_Result
1753 4404 |D | Exit_Subprogram With_Result,0x4
1754 0000 0000 | | .LITERAL {0x00000000, 0x00008128}
1758 ; --------------------------------------------------------------------------------------
1758 ; SUBPROGRAM
1758 ; --------------------------------------------------------------------------------------
1758 1766 | f | .CONST 0x1766 ; Address of begin
1759 0004 | | .CONST 0x0004 ; Address of exception handler
175a 0002 | | .CONST 0x0002 ; Number of locals
175b INIT_1758:
175b e5fc | | Load 0x2,-0x4
175c 00d8 | | Load_Top At_Offset_0
175d e405 | | Load 0x2,0x5
175e e5fd | | Load 0x2,-0x3
175f e402 | | Load 0x2,0x2
1760 e009 | | Load 0x0,0x9
1761 1b18 | | Execute Package,Field_Read,Field_Number 0x18
1762 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
1763 e5fe | | Load 0x2,-0x2
1764 e5ff | | Load 0x2,-0x1
1765 8229 | ) | Call 0x1,0x29
1766 BODY_1758:
1766 e001 | | Load 0x0,0x1
1767 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1768 e402 | | Load 0x2,0x2
1769 e5fc | | Load 0x2,-0x4
176a e002 | | Load 0x0,0x2
176b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
176c c402 | | Store 0x2,0x2
176d c403 | | Store 0x2,0x3
176e 00d8 | | Load_Top At_Offset_0
176f 00cb | | Action Pop_Block_With_Result
1770 4404 |D | Exit_Subprogram With_Result,0x4
1771 0000 0000 | | .BLANK 0000[0x7]
1778 ; --------------------------------------------------------------------------------------
1778 ; SUBPROGRAM
1778 ; --------------------------------------------------------------------------------------
1778 1786 | | .CONST 0x1786 ; Address of begin
1779 0004 | | .CONST 0x0004 ; Address of exception handler
177a 0002 | | .CONST 0x0002 ; Number of locals
177b INIT_1778:
177b e00e | | Load 0x0,0xe
177c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
177d 02c7 | | Declare_Variable Any
177e e5fc | | Load 0x2,-0x4
177f e404 | | Load 0x2,0x4
1780 e5fe | | Load 0x2,-0x2
1781 e402 | | Load 0x2,0x2
1782 e009 | | Load 0x0,0x9
1783 1b18 | | Execute Package,Field_Read,Field_Number 0x18
1784 1855 | U | Execute Package,Field_Execute,Field_Number 0x55
1785 a602 | | Store_Unchecked 0x3,0x2
1786 BODY_1778:
1786 e001 | | Load 0x0,0x1
1787 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1788 e402 | | Load 0x2,0x2
1789 e5fc | | Load 0x2,-0x4
178a e002 | | Load 0x0,0x2
178b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
178c c402 | | Store 0x2,0x2
178d c403 | | Store 0x2,0x3
178e 00d8 | | Load_Top At_Offset_0
178f c5fb | | Store 0x2,-0x5
1790 4800 |H | Short_Literal 0x0
1791 a5fa | | Store_Unchecked 0x2,-0x6
1792 00cc | | Action Pop_Block
1793 4505 |E | Exit_Subprogram 0x5
1794 0000 0000 | | .BLANK 0000[0x4]
1798 ; --------------------------------------------------------------------------------------
1798 ; SUBPROGRAM
1798 ; --------------------------------------------------------------------------------------
1798 179d | | .CONST 0x179d ; Address of begin
1799 0004 | | .CONST 0x0004 ; Address of exception handler
179a 0002 | | .CONST 0x0002 ; Number of locals
179b INIT_1798:
179b e403 | | Load 0x2,0x3
179c 8291 | | Call 0x1,0x91
179d BODY_1798:
179d e001 | | Load 0x0,0x1
179e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
179f e5fe | | Load 0x2,-0x2
17a0 00da | | Load_Top At_Offset_2
17a1 8294 | | Call 0x1,0x94
17a2 8261 | a | Call 0x1,0x61
17a3 c5fd | | Store 0x2,-0x3
17a4 e5fe | | Load 0x2,-0x2
17a5 00d9 | | Load_Top At_Offset_1
17a6 828f | | Call 0x1,0x8f
17a7 4501 |E | Exit_Subprogram 0x1
17a8 ; --------------------------------------------------------------------------------------
17a8 ; SUBPROGRAM
17a8 ; --------------------------------------------------------------------------------------
17a8 17af | | .CONST 0x17af ; Address of begin
17a9 0004 | | .CONST 0x0004 ; Address of exception handler
17aa 0002 | | .CONST 0x0002 ; Number of locals
17ab INIT_17a8:
17ab e403 | | Load 0x2,0x3
17ac 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
17ad e20d | | Load 0x1,0xd
17ae 1c08 | | Execute_Immediate Run_Utility,0x8
17af BODY_17a8:
17af 4801 |H | Short_Literal 0x1
17b0 e403 | | Load 0x2,0x3
17b1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
17b2 e403 | | Load 0x2,0x3
17b3 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
17b4 01cf | | Execute Vector,Slice_Read
17b5 00d9 | | Load_Top At_Offset_1
17b6 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
17b7 4800 |H | Short_Literal 0x0
17b8 00d9 | | Load_Top At_Offset_1
17b9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
17ba 00d8 | | Load_Top At_Offset_0
17bb 00cb | | Action Pop_Block_With_Result
17bc 4402 |D | Exit_Subprogram With_Result,0x2
17bd 0000 0000 | | .XXX[0x3]
17bf 0000 | |
17c0 ; --------------------------------------------------------------------------------------
17c0 ; SUBPROGRAM
17c0 ; --------------------------------------------------------------------------------------
17c0 17c7 | | .CONST 0x17c7 ; Address of begin
17c1 0004 | | .CONST 0x0004 ; Address of exception handler
17c2 0002 | | .CONST 0x0002 ; Number of locals
17c3 INIT_17c0:
17c3 e403 | | Load 0x2,0x3
17c4 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
17c5 e20d | | Load 0x1,0xd
17c6 1c08 | | Execute_Immediate Run_Utility,0x8
17c7 BODY_17c0:
17c7 4801 |H | Short_Literal 0x1
17c8 e403 | | Load 0x2,0x3
17c9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
17ca e403 | | Load 0x2,0x3
17cb 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
17cc 01cf | | Execute Vector,Slice_Read
17cd 00d9 | | Load_Top At_Offset_1
17ce 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
17cf 4800 |H | Short_Literal 0x0
17d0 00d9 | | Load_Top At_Offset_1
17d1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
17d2 00d8 | | Load_Top At_Offset_0
17d3 00cb | | Action Pop_Block_With_Result
17d4 4402 |D | Exit_Subprogram With_Result,0x2
17d5 0000 0000 | | .XXX[0x3]
17d7 0000 | |
17d8 ; --------------------------------------------------------------------------------------
17d8 ; SUBPROGRAM
17d8 ; --------------------------------------------------------------------------------------
17d8 17df | | .CONST 0x17df ; Address of begin
17d9 0004 | | .CONST 0x0004 ; Address of exception handler
17da 0002 | | .CONST 0x0002 ; Number of locals
17db INIT_17d8:
17db 00da | | Load_Top At_Offset_2
17dc e00c | | Load 0x0,0xc
17dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
17de 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
17df BODY_17d8:
17df 00ea | | Load_Encached Null_String_Cache
17e0 4801 |H | Short_Literal 0x1
17e1 0092 19e8 | | Action Push_String_Extended,0x19e8 ; "<QUIET>"
17e3 4801 |H | Short_Literal 0x1
17e4 e602 | | Load 0x3,0x2
17e5 0092 1a00 | | Action Push_String_Extended,0x1a00 ; ".@_secondary_@_spec"
17e7 01cc | | Execute Vector,Catenate
17e8 e602 | | Load 0x3,0x2
17e9 0092 1a01 | | Action Push_String_Extended,0x1a01 ; ".@'spec.<secondary_@>"
17eb 01cc | | Execute Vector,Catenate
17ec e012 | | Load 0x0,0x12
17ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
17ee 00ea | | Load_Encached Null_String_Cache
17ef 4801 |H | Short_Literal 0x1
17f0 0092 19e8 | | Action Push_String_Extended,0x19e8 ; "<QUIET>"
17f2 4801 |H | Short_Literal 0x1
17f3 e602 | | Load 0x3,0x2
17f4 0092 1a02 | | Action Push_String_Extended,0x1a02 ; ".@_secondary_@_body"
17f6 01cc | | Execute Vector,Catenate
17f7 e602 | | Load 0x3,0x2
17f8 0092 1a03 | | Action Push_String_Extended,0x1a03 ; ".@'body.<secondary_@>"
17fa 01cc | | Execute Vector,Catenate
17fb e012 | | Load 0x0,0x12
17fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
17fd 4502 |E | Exit_Subprogram 0x2
17fe 0000 0000 | | .XXX[0x2]
1800 ; --------------------------------------------------------------------------------------
1800 ; SUBPROGRAM
1800 ; --------------------------------------------------------------------------------------
1800 1805 | | .CONST 0x1805 ; Address of begin
1801 0004 | | .CONST 0x0004 ; Address of exception handler
1802 0003 | | .CONST 0x0003 ; Number of locals
1803 INIT_1800:
1803 00e2 | | Load_Encached Integer_Cache
1804 00e2 | | Load_Encached Integer_Cache
1805 BODY_1800:
1805 4801 |H | Short_Literal 0x1
1806 e7ff | | Load 0x3,-0x1
1807 e404 | | Load 0x2,0x4
1808 e01a | | Load 0x0,0x1a
1809 181d | | Execute Package,Field_Execute,Field_Number 0x1d
180a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
180b 4801 |H | Short_Literal 0x1
180c e7ff | | Load 0x3,-0x1
180d 0092 1a04 | | Action Push_String_Extended,0x1a04 ; "_"
180f e01a | | Load 0x0,0x1a
1810 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1811 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
1812 e7ff | | Load 0x3,-0x1
1813 01dd | | Execute Vector,First
1814 00da | | Load_Top At_Offset_2
1815 0aff | | Execute_Immediate Plus,-0x1
1816 00d8 | | Load_Top At_Offset_0
1817 00e2 | | Load_Encached Integer_Cache
1818 0260 | ` | Execute Discrete,In_Type
1819 7001 |p | Jump_Nonzero 0x181b
181a 0801 | | Execute_Immediate Raise,0x1
181b e7ff | | Load 0x3,-0x1
181c 01cf | | Execute Vector,Slice_Read
181d 0092 1a05 | | Action Push_String_Extended,0x1a05 ; "'"
181f 01cc | | Execute Vector,Catenate
1820 00d9 | | Load_Top At_Offset_1
1821 0a01 | | Execute_Immediate Plus,0x1
1822 00d8 | | Load_Top At_Offset_0
1823 00e2 | | Load_Encached Integer_Cache
1824 0260 | ` | Execute Discrete,In_Type
1825 7001 |p | Jump_Nonzero 0x1827
1826 0801 | | Execute_Immediate Raise,0x1
1827 e7ff | | Load 0x3,-0x1
1828 01dc | | Execute Vector,Last
1829 e7ff | | Load 0x3,-0x1
182a 01cf | | Execute Vector,Slice_Read
182b 01cc | | Execute Vector,Catenate
182c 4401 |D | Exit_Subprogram With_Result,0x1
182d 0000 0000 | | .XXX[0x3]
182f 0000 | |
1830 ; --------------------------------------------------------------------------------------
1830 ; SUBPROGRAM
1830 ; --------------------------------------------------------------------------------------
1830 1835 | 5 | .CONST 0x1835 ; Address of begin
1831 0004 | | .CONST 0x0004 ; Address of exception handler
1832 0003 | | .CONST 0x0003 ; Number of locals
1833 INIT_1830:
1833 00e2 | | Load_Encached Integer_Cache
1834 00e2 | | Load_Encached Integer_Cache
1835 BODY_1830:
1835 4801 |H | Short_Literal 0x1
1836 e7ff | | Load 0x3,-0x1
1837 e404 | | Load 0x2,0x4
1838 e01a | | Load 0x0,0x1a
1839 181d | | Execute Package,Field_Execute,Field_Number 0x1d
183a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
183b 4801 |H | Short_Literal 0x1
183c e7ff | | Load 0x3,-0x1
183d 0092 1a04 | | Action Push_String_Extended,0x1a04 ; "_"
183f e01a | | Load 0x0,0x1a
1840 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1841 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
1842 00d9 | | Load_Top At_Offset_1
1843 0a0b | | Execute_Immediate Plus,0xb
1844 00d8 | | Load_Top At_Offset_0
1845 00e2 | | Load_Encached Integer_Cache
1846 0260 | ` | Execute Discrete,In_Type
1847 7001 |p | Jump_Nonzero 0x1849
1848 0801 | | Execute_Immediate Raise,0x1
1849 00d9 | | Load_Top At_Offset_1
184a 0aff | | Execute_Immediate Plus,-0x1
184b 00d8 | | Load_Top At_Offset_0
184c 00e2 | | Load_Encached Integer_Cache
184d 0260 | ` | Execute Discrete,In_Type
184e 7001 |p | Jump_Nonzero 0x1850
184f 0801 | | Execute_Immediate Raise,0x1
1850 e7ff | | Load 0x3,-0x1
1851 01cf | | Execute Vector,Slice_Read
1852 4401 |D | Exit_Subprogram With_Result,0x1
1853 0000 0000 | | .BLANK 0000[0x5]
1858 ; --------------------------------------------------------------------------------------
1858 ; SUBPROGRAM
1858 ; --------------------------------------------------------------------------------------
1858 1882 | | .CONST 0x1882 ; Address of begin
1859 0004 | | .CONST 0x0004 ; Address of exception handler
185a 0007 | | .CONST 0x0007 ; Number of locals
185b INIT_1858:
185b 00da | | Load_Top At_Offset_2
185c e00c | | Load 0x0,0xc
185d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
185e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
185f 00d8 | | Load_Top At_Offset_0
1860 e00c | | Load 0x0,0xc
1861 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1862 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
1863 00d9 | | Load_Top At_Offset_1
1864 e00c | | Load 0x0,0xc
1865 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1866 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
1867 00d9 | | Load_Top At_Offset_1
1868 0092 19f3 | | Action Push_String_Extended,0x19f3 ; "."
186a 01cc | | Execute Vector,Catenate
186b 00d9 | | Load_Top At_Offset_1
186c 8407 | | Call 0x2,0x7
186d 01cc | | Execute Vector,Catenate
186e 0092 1a06 | | Action Push_String_Extended,0x1a06 ; ".<secondary_"
1870 01cc | | Execute Vector,Catenate
1871 00d9 | | Load_Top At_Offset_1
1872 8408 | | Call 0x2,0x8
1873 01cc | | Execute Vector,Catenate
1874 0092 19fb | | Action Push_String_Extended,0x19fb ; ">"
1876 01cc | | Execute Vector,Catenate
1877 0007 | | Action Break_Optional
1878 e014 | | Load 0x0,0x14
1879 1b0d | | Execute Package,Field_Read,Field_Number 0xd
187a 02c7 | | Declare_Variable Any
187b 00d8 | | Load_Top At_Offset_0
187c 1c00 | | Execute_Immediate Run_Utility,0x0
187d e014 | | Load 0x0,0x14
187e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
187f 02c7 | | Declare_Variable Any
1880 00d8 | | Load_Top At_Offset_0
1881 1c00 | | Execute_Immediate Run_Utility,0x0
1882 BODY_1858:
1882 00d9 | | Load_Top At_Offset_1
1883 00ea | | Load_Encached Null_String_Cache
1884 e605 | | Load 0x3,0x5
1885 4801 |H | Short_Literal 0x1
1886 e014 | | Load 0x0,0x14
1887 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1888 c606 | | Store 0x3,0x6
1889 00d8 | | Load_Top At_Offset_0
188a 00ea | | Load_Encached Null_String_Cache
188b e602 | | Load 0x3,0x2
188c 4800 |H | Short_Literal 0x0
188d e014 | | Load 0x0,0x14
188e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
188f c607 | | Store 0x3,0x7
1890 00cf | | Action Mark_Auxiliary
1891 7807 |x | Jump 0x1899
1892 00d9 | | Load_Top At_Offset_1
1893 e014 | | Load 0x0,0x14
1894 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
1895 00db | | Load_Top At_Offset_3
1896 e014 | | Load 0x0,0x14
1897 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1898 00c9 | | Action Pop_Auxiliary_Loop
1899 00d9 | | Load_Top At_Offset_1
189a e014 | | Load 0x0,0x14
189b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
189c 6ff5 |o | Jump_Zero 0x1892
189d 00ce | | Action Pop_Auxiliary
189e 00d9 | | Load_Top At_Offset_1
189f e014 | | Load 0x0,0x14
18a0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
18a1 c606 | | Store 0x3,0x6
18a2 00d8 | | Load_Top At_Offset_0
18a3 e014 | | Load 0x0,0x14
18a4 181c | | Execute Package,Field_Execute,Field_Number 0x1c
18a5 c607 | | Store 0x3,0x7
18a6 4502 |E | Exit_Subprogram 0x2
18a7 0000 | | .XXX[0x1]
18a8 ; --------------------------------------------------------------------------------------
18a8 ; SUBPROGRAM
18a8 ; --------------------------------------------------------------------------------------
18a8 18bd | | .CONST 0x18bd ; Address of begin
18a9 0004 | | .CONST 0x0004 ; Address of exception handler
18aa 0002 | | .CONST 0x0002 ; Number of locals
18ab INIT_18a8:
18ab e5fe | | Load 0x2,-0x2
18ac 4801 |H | Short_Literal 0x1
18ad e5ff | | Load 0x2,-0x1
18ae e004 | | Load 0x0,0x4
18af 181e | | Execute Package,Field_Execute,Field_Number 0x1e
18b0 e004 | | Load 0x0,0x4
18b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
18b2 0092 1a07 | | Action Push_String_Extended,0x1a07 ; ".@'c(ada).<secondary_"
18b4 01cc | | Execute Vector,Catenate
18b5 e5ff | | Load 0x2,-0x1
18b6 e004 | | Load 0x0,0x4
18b7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
18b8 01cc | | Execute Vector,Catenate
18b9 0092 19fb | | Action Push_String_Extended,0x19fb ; ">"
18bb 01cc | | Execute Vector,Catenate
18bc 0007 | | Action Break_Optional
18bd BODY_18a8:
18bd 00d8 | | Load_Top At_Offset_0
18be 8296 | | Call 0x1,0x96
18bf c402 | | Store 0x2,0x2
18c0 e402 | | Load 0x2,0x2
18c1 e00c | | Load 0x0,0xc
18c2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
18c3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
18c4 7021 |p! | Jump_Nonzero 0x18e6
18c5 e402 | | Load 0x2,0x2
18c6 e00c | | Load 0x0,0xc
18c7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
18c8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
18c9 701c |p | Jump_Nonzero 0x18e6
18ca e5fe | | Load 0x2,-0x2
18cb 4801 |H | Short_Literal 0x1
18cc e402 | | Load 0x2,0x2
18cd e004 | | Load 0x0,0x4
18ce 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
18cf c403 | | Store 0x2,0x3
18d0 e001 | | Load 0x0,0x1
18d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
18d2 00e2 | | Load_Encached Integer_Cache
18d3 00e1 | | Load_Encached Boolean_Cache
18d4 e5fd | | Load 0x2,-0x3
18d5 0120 | | Execute Any,Is_Value
18d6 6803 |h | Jump_Zero 0x18da
18d7 e00c | | Load 0x0,0xc
18d8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
18d9 7801 |x | Jump 0x18db
18da e5fd | | Load 0x2,-0x3
18db e5fe | | Load 0x2,-0x2
18dc e403 | | Load 0x2,0x3
18dd 8266 | f | Call 0x1,0x66
18de c5fd | | Store 0x2,-0x3
18df c406 | | Store 0x2,0x6
18e0 c405 | | Store 0x2,0x5
18e1 c404 | | Store 0x2,0x4
18e2 e406 | | Load 0x2,0x6
18e3 a5fc | | Store_Unchecked 0x2,-0x4
18e4 00cc | | Action Pop_Block
18e5 4503 |E | Exit_Subprogram 0x3
18e6 4501 |E | Exit_Subprogram 0x1
18e7 0000 | | .XXX[0x1]
18e8 ; --------------------------------------------------------------------------------------
18e8 ; SUBPROGRAM
18e8 ; --------------------------------------------------------------------------------------
18e8 18f7 | | .CONST 0x18f7 ; Address of begin
18e9 0004 | | .CONST 0x0004 ; Address of exception handler
18ea 0005 | | .CONST 0x0005 ; Number of locals
18eb INIT_18e8:
18eb e402 | | Load 0x2,0x2
18ec e014 | | Load 0x0,0x14
18ed 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
18ee e402 | | Load 0x2,0x2
18ef e014 | | Load 0x0,0x14
18f0 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
18f1 e402 | | Load 0x2,0x2
18f2 e014 | | Load 0x0,0x14
18f3 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
18f4 e402 | | Load 0x2,0x2
18f5 e014 | | Load 0x0,0x14
18f6 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
18f7 BODY_18e8:
18f7 00db | | Load_Top At_Offset_3
18f8 4801 |H | Short_Literal 0x1
18f9 e602 | | Load 0x3,0x2
18fa 01db | | Execute Vector,Length
18fb 00d8 | | Load_Top At_Offset_0
18fc 00e2 | | Load_Encached Integer_Cache
18fd 0260 | ` | Execute Discrete,In_Type
18fe 7001 |p | Jump_Nonzero 0x1900
18ff 0801 | | Execute_Immediate Raise,0x1
1900 e5fd | | Load 0x2,-0x3
1901 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1902 01ce | | Execute Vector,Slice_Write
1903 00db | | Load_Top At_Offset_3
1904 01db | | Execute Vector,Length
1905 e5fd | | Load 0x2,-0x3
1906 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
1907 00da | | Load_Top At_Offset_2
1908 4801 |H | Short_Literal 0x1
1909 e603 | | Load 0x3,0x3
190a 01db | | Execute Vector,Length
190b 00d8 | | Load_Top At_Offset_0
190c 00e2 | | Load_Encached Integer_Cache
190d 0260 | ` | Execute Discrete,In_Type
190e 7001 |p | Jump_Nonzero 0x1910
190f 0801 | | Execute_Immediate Raise,0x1
1910 e5fd | | Load 0x2,-0x3
1911 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1912 01ce | | Execute Vector,Slice_Write
1913 00da | | Load_Top At_Offset_2
1914 01db | | Execute Vector,Length
1915 e5fd | | Load 0x2,-0x3
1916 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1917 00d9 | | Load_Top At_Offset_1
1918 4801 |H | Short_Literal 0x1
1919 00db | | Load_Top At_Offset_3
191a 01db | | Execute Vector,Length
191b 00d8 | | Load_Top At_Offset_0
191c 00e2 | | Load_Encached Integer_Cache
191d 0260 | ` | Execute Discrete,In_Type
191e 7001 |p | Jump_Nonzero 0x1920
191f 0801 | | Execute_Immediate Raise,0x1
1920 e5fd | | Load 0x2,-0x3
1921 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1922 01ce | | Execute Vector,Slice_Write
1923 00d9 | | Load_Top At_Offset_1
1924 01db | | Execute Vector,Length
1925 e5fd | | Load 0x2,-0x3
1926 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1927 00d8 | | Load_Top At_Offset_0
1928 4801 |H | Short_Literal 0x1
1929 00da | | Load_Top At_Offset_2
192a 01db | | Execute Vector,Length
192b 00d8 | | Load_Top At_Offset_0
192c 00e2 | | Load_Encached Integer_Cache
192d 0260 | ` | Execute Discrete,In_Type
192e 7001 |p | Jump_Nonzero 0x1930
192f 0801 | | Execute_Immediate Raise,0x1
1930 e5fd | | Load 0x2,-0x3
1931 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
1932 01ce | | Execute Vector,Slice_Write
1933 00d8 | | Load_Top At_Offset_0
1934 01db | | Execute Vector,Length
1935 e5fd | | Load 0x2,-0x3
1936 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
1937 4501 |E | Exit_Subprogram 0x1
1938 ; --------------------------------------------------------------------------------------
1938 ; SUBPROGRAM
1938 ; --------------------------------------------------------------------------------------
1938 193d | = | .CONST 0x193d ; Address of begin
1939 0004 | | .CONST 0x0004 ; Address of exception handler
193a 0002 | | .CONST 0x0002 ; Number of locals
193b INIT_1938:
193b e402 | | Load 0x2,0x2
193c 8298 | | Call 0x1,0x98
193d BODY_1938:
193d 4801 |H | Short_Literal 0x1
193e e5ff | | Load 0x2,-0x1
193f 00da | | Load_Top At_Offset_2
1940 e01a | | Load 0x0,0x1a
1941 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1942 6811 |h | Jump_Zero 0x1954
1943 4801 |H | Short_Literal 0x1
1944 a405 | | Store_Unchecked 0x2,0x5
1945 e00c | | Load 0x0,0xc
1946 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1947 e403 | | Load 0x2,0x3
1948 0120 | | Execute Any,Is_Value
1949 6803 |h | Jump_Zero 0x194d
194a e00c | | Load 0x0,0xc
194b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
194c 7801 |x | Jump 0x194e
194d e403 | | Load 0x2,0x3
194e e402 | | Load 0x2,0x2
194f e00c | | Load 0x0,0xc
1950 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1951 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1952 c403 | | Store 0x2,0x3
1953 c406 | | Store 0x2,0x6
1954 4501 |E | Exit_Subprogram 0x1
1955 0000 0000 | | .XXX[0x3]
1957 0000 | |
1958 ; --------------------------------------------------------------------------------------
1958 ; SUBPROGRAM
1958 ; --------------------------------------------------------------------------------------
1958 195b | [ | .CONST 0x195b ; Address of begin
1959 0004 | | .CONST 0x0004 ; Address of exception handler
195a 0001 | | .CONST 0x0001 ; Number of locals
195b BODY_1958:
195b INIT_1958:
195b 4608 |F | Jump_Case 0x8
195c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
195d 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
195e 7819 |x | Jump 0x1978 ; case 0x2
195f 7818 |x | Jump 0x1978 ; case 0x3
1960 7817 |x | Jump 0x1978 ; case 0x4
1961 7816 |x | Jump 0x1978 ; case 0x5
1962 7815 |x | Jump 0x1978 ; case 0x6
1963 7801 |x | Jump 0x1965 ; case 0x7
1964 7809 |x | Jump 0x196e ; case 0x8
1965 00db | | Load_Top At_Offset_3
1966 4801 |H | Short_Literal 0x1
1967 e5fe | | Load 0x2,-0x2
1968 00e9 | | Load_Encached String_Cache
1969 035b | [ | Declare_Type Array,Constrained
196a 4801 |H | Short_Literal 0x1
196b e5ff | | Load 0x2,-0x1
196c 031b | | Declare_Type Variant_Record,Constrained
196d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
196e 00db | | Load_Top At_Offset_3
196f 00db | | Load_Top At_Offset_3
1970 02fc | | Declare_Variable Variant_Record,With_Constraint
1971 4801 |H | Short_Literal 0x1
1972 e5fe | | Load 0x2,-0x2
1973 00e9 | | Load_Encached String_Cache
1974 0334 | 4 | Declare_Variable Array,With_Constraint
1975 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
1976 016a | j | Execute Variant_Record,Indirects_Appended
1977 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
1978 0869 | i | Execute_Immediate Raise,0x69
1979 0000 0000 | | .BLANK 0000[0x7]
1980 ; --------------------------------------------------------------------------------------
1980 ; SUBPROGRAM
1980 ; --------------------------------------------------------------------------------------
1980 1983 | | .CONST 0x1983 ; Address of begin
1981 0004 | | .CONST 0x0004 ; Address of exception handler
1982 0001 | | .CONST 0x0001 ; Number of locals
1983 BODY_1980:
1983 INIT_1980:
1983 4608 |F | Jump_Case 0x8
1984 7808 |x | Jump 0x198d ; case 0x0
1985 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
1986 7851 |xQ | Jump 0x19d8 ; case 0x2
1987 7850 |xP | Jump 0x19d8 ; case 0x3
1988 784f |xO | Jump 0x19d8 ; case 0x4
1989 784e |xN | Jump 0x19d8 ; case 0x5
198a 784d |xM | Jump 0x19d8 ; case 0x6
198b 784c |xL | Jump 0x19d8 ; case 0x7
198c 784b |xK | Jump 0x19d8 ; case 0x8
198d e26f | o | Load 0x1,0x6f
198e 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
198f 0337 | 7 | Declare_Variable Array
1990 4880 |H | Short_Literal 0x80
1991 4801 |H | Short_Literal 0x1
1992 4820 |H | Short_Literal 0x20
1993 00d9 | | Load_Top At_Offset_1
1994 e402 | | Load 0x2,0x2
1995 01d6 | | Execute Vector,Field_Write
1996 3ffb |? | Loop_Increasing 0x1992
1997 00db | | Load_Top At_Offset_3
1998 00d9 | | Load_Top At_Offset_1
1999 00d9 | | Load_Top At_Offset_1
199a 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
199b 0119 | | Execute Any,Check_In_Formal_Type
199c 00d1 | | Pop_Control Pop_Count_1
199d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
199e 4800 |H | Short_Literal 0x0
199f 00db | | Load_Top At_Offset_3
19a0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
19a1 e26f | o | Load 0x1,0x6f
19a2 3003 |0 | Execute Record,Field_Type,Field_Number 0x3
19a3 0337 | 7 | Declare_Variable Array
19a4 4880 |H | Short_Literal 0x80
19a5 4801 |H | Short_Literal 0x1
19a6 4820 |H | Short_Literal 0x20
19a7 00d9 | | Load_Top At_Offset_1
19a8 e402 | | Load 0x2,0x2
19a9 01d6 | | Execute Vector,Field_Write
19aa 3ffb |? | Loop_Increasing 0x19a6
19ab 00db | | Load_Top At_Offset_3
19ac 00d9 | | Load_Top At_Offset_1
19ad 00d9 | | Load_Top At_Offset_1
19ae 3003 |0 | Execute Record,Field_Type,Field_Number 0x3
19af 0119 | | Execute Any,Check_In_Formal_Type
19b0 00d1 | | Pop_Control Pop_Count_1
19b1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
19b2 e26f | o | Load 0x1,0x6f
19b3 3005 |0 | Execute Record,Field_Type,Field_Number 0x5
19b4 0337 | 7 | Declare_Variable Array
19b5 4880 |H | Short_Literal 0x80
19b6 4801 |H | Short_Literal 0x1
19b7 4820 |H | Short_Literal 0x20
19b8 00d9 | | Load_Top At_Offset_1
19b9 e402 | | Load 0x2,0x2
19ba 01d6 | | Execute Vector,Field_Write
19bb 3ffb |? | Loop_Increasing 0x19b7
19bc 00db | | Load_Top At_Offset_3
19bd 00d9 | | Load_Top At_Offset_1
19be 00d9 | | Load_Top At_Offset_1
19bf 3005 |0 | Execute Record,Field_Type,Field_Number 0x5
19c0 0119 | | Execute Any,Check_In_Formal_Type
19c1 00d1 | | Pop_Control Pop_Count_1
19c2 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
19c3 4800 |H | Short_Literal 0x0
19c4 00db | | Load_Top At_Offset_3
19c5 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
19c6 e26f | o | Load 0x1,0x6f
19c7 3007 |0 | Execute Record,Field_Type,Field_Number 0x7
19c8 0337 | 7 | Declare_Variable Array
19c9 4880 |H | Short_Literal 0x80
19ca 4801 |H | Short_Literal 0x1
19cb 4820 |H | Short_Literal 0x20
19cc 00d9 | | Load_Top At_Offset_1
19cd e402 | | Load 0x2,0x2
19ce 01d6 | | Execute Vector,Field_Write
19cf 3ffb |? | Loop_Increasing 0x19cb
19d0 00db | | Load_Top At_Offset_3
19d1 00d9 | | Load_Top At_Offset_1
19d2 00d9 | | Load_Top At_Offset_1
19d3 3007 |0 | Execute Record,Field_Type,Field_Number 0x7
19d4 0119 | | Execute Any,Check_In_Formal_Type
19d5 00d1 | | Pop_Control Pop_Count_1
19d6 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
19d7 4302 |C | Exit_Subprogram From_Utility,0x2
19d8 0869 | i | Execute_Immediate Raise,0x69
19d9 ; --------------------------------------------------------------------------------------
19d9 ; STRING TABLE
19d9 ; --------------------------------------------------------------------------------------
19d9 0060 | ` | .STRTAB 0x0060->0x1a09 ; "secondary_"
19da 0068 | h | .STRTAB 0x0068->0x1a0e ; "<secondary_[@,~state]>"
19db 007c | | | .STRTAB 0x007c->0x1a19 ; "Rcf_Unit.Display_Unit_Options"
; "Rcf_Unit.Display_Unit_Options"
; "Rcf_Unit.Display_Unit_Options"
19dc 0097 | | .STRTAB 0x0097->0x1a27 ; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
; "Rcf_Unit.Set_Unit_Options"
19dd 00ae | | .STRTAB 0x00ae->0x1a34 ; "Rcf_Unit.Remove_Unit_Options"
19de 00c8 | | .STRTAB 0x00c8->0x1a42 ; "Rcf_Unit.Remote_Unit_Name"
; "Rcf_Unit.Remote_Unit_Name"
; "Rcf_Unit.Remote_Unit_Name"
19df 00df | | .STRTAB 0x00df->0x1a4e ; "Rcf_Unit.Full_Remote_Unit_Name"
; "Rcf_Unit.Full_Remote_Unit_Name"
; "Rcf_Unit.Full_Remote_Unit_Name"
; "Rcf_Unit.Full_Remote_Unit_Name"
19e0 00fb | | .STRTAB 0x00fb->0x1a5d ; "Full_Remote_Unit_Name"
19e1 010e | | .STRTAB 0x010e->0x1a68 ; "Rcf_Unit.Set_Remote_Unit_Name"
; "Rcf_Unit.Set_Remote_Unit_Name"
; "Rcf_Unit.Set_Remote_Unit_Name"
19e2 0129 | ) | .STRTAB 0x0129->0x1a76 ; "Rcf_Unit.Local_Update_Time"
; "Rcf_Unit.Local_Update_Time"
; "Rcf_Unit.Local_Update_Time"
19e3 0141 | A | .STRTAB 0x0141->0x1a83 ; "Rcf_Unit.Set_Local_Update_Time: Time = "
19e4 0166 | f | .STRTAB 0x0166->0x1a97 ; "Rcf_Unit.Set_Local_Update_Time"
; "Rcf_Unit.Set_Local_Update_Time"
19e5 0182 | | .STRTAB 0x0182->0x1aa6 ; " 128"
; " 128"
; " 128"
; " 128"
19e6 0184 | | .STRTAB 0x0184->0x1aa8 ; "Rcf_Temp_"
19e7 018b | | .STRTAB 0x018b->0x1aac ; "Upload_Ada_Unit"
; "Upload_Ada_Unit"
19e8 0198 | | .STRTAB 0x0198->0x1ab4 ; "<QUIET>"
; "<QUIET>"
; "<QUIET>"
; "<QUIET>"
19e9 019d | | .STRTAB 0x019d->0x1ab7 ; "<DIRECTORIES>"
; "<DIRECTORIES>"
19ea 01a8 | | .STRTAB 0x01a8->0x1abe ; "Rcf_Unit.Upload_Ada_Unit"
; "Rcf_Unit.Upload_Ada_Unit"
; "Rcf_Unit.Upload_Ada_Unit"
; "Rcf_Unit.Upload_Ada_Unit"
; "Rcf_Unit.Upload_Ada_Unit"
19eb 01be | | .STRTAB 0x01be->0x1aca ; "Setting local download time (from remote time) to "
19ec 01ee | | .STRTAB 0x01ee->0x1ae3 ; "Can't upload from remote unit \x22"
19ed 020b | | .STRTAB 0x020b->0x1af2 ; "\x22 into existing text file \x22"
19ee 0224 | $ | .STRTAB 0x0224->0x1b00 ; "\x22."
19ef 0224 | $ | .STRTAB 0x0224->0x1b01 ; "Upload_Text_File"
; "Upload_Text_File"
19f0 0232 | 2 | .STRTAB 0x0232->0x1b09 ; "Rcf_Unit.Upload_Text_File"
; "Rcf_Unit.Upload_Text_File"
; "Rcf_Unit.Upload_Text_File"
; "Rcf_Unit.Upload_Text_File"
19f1 0249 | I | .STRTAB 0x0249->0x1b15 ; "Update_Consistency"
; "Update_Consistency"
19f2 0259 | Y | .STRTAB 0x0259->0x1b1e ; "Rcf_Unit.Update_Consistency"
; "Rcf_Unit.Update_Consistency"
; "Rcf_Unit.Update_Consistency"
; "Rcf_Unit.Update_Consistency"
19f3 0272 | r | .STRTAB 0x0272->0x1b2c ; "."
; "."
; "."
; "."
19f4 0271 | q | .STRTAB 0x0271->0x1b2c ; "state"
19f5 0274 | t | .STRTAB 0x0274->0x1b2f ; ".??'c(library)"
19f6 0280 | | .STRTAB 0x0280->0x1b36 ; "??'c(library)"
; "??'c(library)"
; "??'c(library)"
19f7 028b | | .STRTAB 0x028b->0x1b3c ; "_secondary_"
19f8 0294 | | .STRTAB 0x0294->0x1b42 ; ".??[@_secondary_@_spec,@_secondary_@_body]"
; ".??[@_secondary_@_spec,@_secondary_@_body]"
; ".??[@_secondary_@_spec,@_secondary_@_body]"
19f9 02bc | | .STRTAB 0x02bc->0x1b57 ; ".<"
; ".<"
19fa 02bc | | .STRTAB 0x02bc->0x1b58 ; "state>"
19fb 02c0 | | .STRTAB 0x02c0->0x1b5b ; ">"
; ">"
; ">"
19fc 02bf | | .STRTAB 0x02bf->0x1b5b ; "<DEFAULT>"
19fd 02c6 | | .STRTAB 0x02c6->0x1b60 ; ".Units."
19fe 02cb | | .STRTAB 0x02cb->0x1b63 ; ".units"
19ff 02cf | | .STRTAB 0x02cf->0x1b66 ; "<error>"
1a00 02d4 | | .STRTAB 0x02d4->0x1b6a ; ".@_secondary_@_spec"
1a01 02e5 | | .STRTAB 0x02e5->0x1b73 ; ".@'spec.<secondary_@>"
1a02 02f8 | | .STRTAB 0x02f8->0x1b7e ; ".@_secondary_@_body"
1a03 0309 | | .STRTAB 0x0309->0x1b87 ; ".@'body.<secondary_@>"
1a04 031c | | .STRTAB 0x031c->0x1b92 ; "_"
; "_"
1a05 031b | | .STRTAB 0x031b->0x1b92 ; "'"
1a06 031a | | .STRTAB 0x031a->0x1b93 ; ".<secondary_"
1a07 0324 | $ | .STRTAB 0x0324->0x1b99 ; ".@'c(ada).<secondary_"
1a08 0337 | 7 | .STREND 0x0337->0x1ba3
1a09 7365 636f |seco| .STRTAB_STRINGS
1ba4 0000 0000 | | .BLANK 0000[0x4]
1ba8 ; --------------------------------------------------------------------------------------
1ba8 ; Debug Table
1ba8 ; --------------------------------------------------------------------------------------
1ba8 0004 000c | | .DEBUG4 0x0004,0x000c,0x2dec,0x0000,0x0001,0x0000
1bae 0000 0000 | | .BLANK 0000[0x52]