|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 17408 (0x4400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 2140 |!@ | .CONST 0x2140 ; 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 8015 | | .CONST 0x8015 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0091 | | .CONST 0x0091 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 0093 009b | | push_full_address INIT_0098
000e 02a0 | | Declare_Subprogram Null_Subprogram
000f 038f | | Declare_Type Package,Defined,Visible
0010 0386 | | Declare_Variable Package,Visible
0011 00bf | | Action Accept_Activation
0012 4800 |H | Short_Literal 0x0
0013 0093 1b0b | | push_full_address INIT_1b08
0015 02a0 | | Declare_Subprogram Null_Subprogram
0016 038e | | Declare_Type Package,Defined
0017 0387 | | Declare_Variable Package
0018 e001 | | Load 0x0,0x1
0019 4801 |H | Short_Literal 0x1
001a e20e | | Load 0x1,0xe
001b 020e | | Execute Module,Augment_Imports
001c 00d8 | | Load_Top At_Offset_0
001d 020f | | Execute Module,Activate
001e 4800 |H | Short_Literal 0x0
001f 0093 1493 | | push_full_address INIT_1490
0021 02a0 | | Declare_Subprogram Null_Subprogram
0022 038e | | Declare_Type Package,Defined
0023 0387 | | Declare_Variable Package
0024 e002 | | Load 0x0,0x2
0025 e003 | | Load 0x0,0x3
0026 e004 | | Load 0x0,0x4
0027 e005 | | Load 0x0,0x5
0028 e001 | | Load 0x0,0x1
0029 e006 | | Load 0x0,0x6
002a e007 | | Load 0x0,0x7
002b 4807 |H | Short_Literal 0x7
002c e20f | | Load 0x1,0xf
002d 020e | | Execute Module,Augment_Imports
002e 00d8 | | Load_Top At_Offset_0
002f 020f | | Execute Module,Activate
0030 4800 |H | Short_Literal 0x0
0031 0093 144b | K| push_full_address INIT_1448
0033 02a0 | | Declare_Subprogram Null_Subprogram
0034 038e | | Declare_Type Package,Defined
0035 0387 | | Declare_Variable Package
0036 e20f | | Load 0x1,0xf
0037 4801 |H | Short_Literal 0x1
0038 e210 | | Load 0x1,0x10
0039 020e | | Execute Module,Augment_Imports
003a 00d8 | | Load_Top At_Offset_0
003b 020f | | Execute Module,Activate
003c e003 | | Load 0x0,0x3
003d e002 | | Load 0x0,0x2
003e e008 | | Load 0x0,0x8
003f e009 | | Load 0x0,0x9
0040 e00a | | Load 0x0,0xa
0041 e00b | | Load 0x0,0xb
0042 e00c | | Load 0x0,0xc
0043 e00d | | Load 0x0,0xd
0044 e00e | | Load 0x0,0xe
0045 e00f | | Load 0x0,0xf
0046 e010 | | Load 0x0,0x10
0047 e011 | | Load 0x0,0x11
0048 e012 | | Load 0x0,0x12
0049 e013 | | Load 0x0,0x13
004a e014 | | Load 0x0,0x14
004b e015 | | Load 0x0,0x15
004c e016 | | Load 0x0,0x16
004d e017 | | Load 0x0,0x17
004e e018 | | Load 0x0,0x18
004f e019 | | Load 0x0,0x19
0050 e01a | | Load 0x0,0x1a
0051 e01b | | Load 0x0,0x1b
0052 e01c | | Load 0x0,0x1c
0053 e01d | | Load 0x0,0x1d
0054 e01e | | Load 0x0,0x1e
0055 e01f | | Load 0x0,0x1f
0056 e020 | | Load 0x0,0x20
0057 e021 | ! | Load 0x0,0x21
0058 e022 | " | Load 0x0,0x22
0059 e023 | # | Load 0x0,0x23
005a e024 | $ | Load 0x0,0x24
005b e025 | % | Load 0x0,0x25
005c e026 | & | Load 0x0,0x26
005d e027 | ' | Load 0x0,0x27
005e e028 | ( | Load 0x0,0x28
005f e029 | ) | Load 0x0,0x29
0060 e02a | * | Load 0x0,0x2a
0061 e02b | + | Load 0x0,0x2b
0062 e02c | , | Load 0x0,0x2c
0063 e02d | - | Load 0x0,0x2d
0064 e02e | . | Load 0x0,0x2e
0065 e02f | / | Load 0x0,0x2f
0066 e030 | 0 | Load 0x0,0x30
0067 e031 | 1 | Load 0x0,0x31
0068 e032 | 2 | Load 0x0,0x32
0069 e033 | 3 | Load 0x0,0x33
006a e034 | 4 | Load 0x0,0x34
006b e035 | 5 | Load 0x0,0x35
006c e036 | 6 | Load 0x0,0x36
006d e037 | 7 | Load 0x0,0x37
006e e038 | 8 | Load 0x0,0x38
006f e039 | 9 | Load 0x0,0x39
0070 e03a | : | Load 0x0,0x3a
0071 e03b | ; | Load 0x0,0x3b
0072 e03c | < | Load 0x0,0x3c
0073 e03d | = | Load 0x0,0x3d
0074 e03e | > | Load 0x0,0x3e
0075 e03f | ? | Load 0x0,0x3f
0076 e040 | @ | Load 0x0,0x40
0077 e041 | A | Load 0x0,0x41
0078 e042 | B | Load 0x0,0x42
0079 e043 | C | Load 0x0,0x43
007a e044 | D | Load 0x0,0x44
007b e045 | E | Load 0x0,0x45
007c e046 | F | Load 0x0,0x46
007d e047 | G | Load 0x0,0x47
007e e048 | H | Load 0x0,0x48
007f e049 | I | Load 0x0,0x49
0080 e04a | J | Load 0x0,0x4a
0081 e20f | | Load 0x1,0xf
0082 e210 | | Load 0x1,0x10
0083 e04b | K | Load 0x0,0x4b
0084 e04c | L | Load 0x0,0x4c
0085 e04d | M | Load 0x0,0x4d
0086 e006 | | Load 0x0,0x6
0087 e04e | N | Load 0x0,0x4e
0088 a04f | O | Store_Unchecked 0x0,0x4f
0089 e050 | P | Load 0x0,0x50
008a e051 | Q | Load 0x0,0x51
008b e20e | | Load 0x1,0xe
008c 4850 |HP | Short_Literal 0x50
008d e20d | | Load 0x1,0xd
008e 020e | | Execute Module,Augment_Imports
008f e20d | | Load 0x1,0xd
0090 020f | | Execute Module,Activate
0091 BODY_0008:
0091 4850 |HP | Short_Literal 0x50
0092 e20d | | Load 0x1,0xd
0093 1a0d | | Execute Package,Field_Write,Field_Number 0xd
0094 00bc | | Action Signal_Activated
0095 00bb | | Action Signal_Completion
0096 0000 0000 | | .XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00f9 | | .CONST 0x00f9 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 000e | | .CONST 0x000e ; Number of locals
009b INIT_0098:
009b 00e4 | | Load_Encached Positive_Cache
009c 0129 | ) | Execute Any,Make_Visible
009d 4800 |H | Short_Literal 0x0
009e 0093 0103 | | push_full_address INIT_0100
00a0 02a0 | | Declare_Subprogram Null_Subprogram
00a1 038f | | Declare_Type Package,Defined,Visible
00a2 0386 | | Declare_Variable Package,Visible
00a3 00bf | | Action Accept_Activation
00a4 e001 | | Load 0x0,0x1
00a5 e002 | | Load 0x0,0x2
00a6 e003 | | Load 0x0,0x3
00a7 e004 | | Load 0x0,0x4
00a8 e005 | | Load 0x0,0x5
00a9 e006 | | Load 0x0,0x6
00aa e007 | | Load 0x0,0x7
00ab e008 | | Load 0x0,0x8
00ac e009 | | Load 0x0,0x9
00ad e00a | | Load 0x0,0xa
00ae e00b | | Load 0x0,0xb
00af e00c | | Load 0x0,0xc
00b0 e00d | | Load 0x0,0xd
00b1 e00e | | Load 0x0,0xe
00b2 e00f | | Load 0x0,0xf
00b3 e010 | | Load 0x0,0x10
00b4 e011 | | Load 0x0,0x11
00b5 e012 | | Load 0x0,0x12
00b6 e013 | | Load 0x0,0x13
00b7 e014 | | Load 0x0,0x14
00b8 e015 | | Load 0x0,0x15
00b9 e016 | | Load 0x0,0x16
00ba e017 | | Load 0x0,0x17
00bb e018 | | Load 0x0,0x18
00bc e019 | | Load 0x0,0x19
00bd e01a | | Load 0x0,0x1a
00be e01b | | Load 0x0,0x1b
00bf e01c | | Load 0x0,0x1c
00c0 e01d | | Load 0x0,0x1d
00c1 e01e | | Load 0x0,0x1e
00c2 e01f | | Load 0x0,0x1f
00c3 e020 | | Load 0x0,0x20
00c4 e021 | ! | Load 0x0,0x21
00c5 e022 | " | Load 0x0,0x22
00c6 e023 | # | Load 0x0,0x23
00c7 e024 | $ | Load 0x0,0x24
00c8 e025 | % | Load 0x0,0x25
00c9 e026 | & | Load 0x0,0x26
00ca e027 | ' | Load 0x0,0x27
00cb e028 | ( | Load 0x0,0x28
00cc e029 | ) | Load 0x0,0x29
00cd e02a | * | Load 0x0,0x2a
00ce e02b | + | Load 0x0,0x2b
00cf e02c | , | Load 0x0,0x2c
00d0 e02d | - | Load 0x0,0x2d
00d1 e02e | . | Load 0x0,0x2e
00d2 e02f | / | Load 0x0,0x2f
00d3 e030 | 0 | Load 0x0,0x30
00d4 e031 | 1 | Load 0x0,0x31
00d5 e032 | 2 | Load 0x0,0x32
00d6 e033 | 3 | Load 0x0,0x33
00d7 e034 | 4 | Load 0x0,0x34
00d8 e035 | 5 | Load 0x0,0x35
00d9 e036 | 6 | Load 0x0,0x36
00da e037 | 7 | Load 0x0,0x37
00db e038 | 8 | Load 0x0,0x38
00dc e039 | 9 | Load 0x0,0x39
00dd e03a | : | Load 0x0,0x3a
00de e03b | ; | Load 0x0,0x3b
00df e03c | < | Load 0x0,0x3c
00e0 e03d | = | Load 0x0,0x3d
00e1 e03e | > | Load 0x0,0x3e
00e2 e03f | ? | Load 0x0,0x3f
00e3 e040 | @ | Load 0x0,0x40
00e4 e041 | A | Load 0x0,0x41
00e5 e042 | B | Load 0x0,0x42
00e6 e043 | C | Load 0x0,0x43
00e7 e044 | D | Load 0x0,0x44
00e8 e045 | E | Load 0x0,0x45
00e9 e046 | F | Load 0x0,0x46
00ea e047 | G | Load 0x0,0x47
00eb e048 | H | Load 0x0,0x48
00ec e049 | I | Load 0x0,0x49
00ed e04a | J | Load 0x0,0x4a
00ee e04b | K | Load 0x0,0x4b
00ef e04c | L | Load 0x0,0x4c
00f0 a04d | M | Store_Unchecked 0x0,0x4d
00f1 e04e | N | Load 0x0,0x4e
00f2 e04f | O | Load 0x0,0x4f
00f3 e050 | P | Load 0x0,0x50
00f4 4850 |HP | Short_Literal 0x50
00f5 e20e | | Load 0x1,0xe
00f6 020e | | Execute Module,Augment_Imports
00f7 00d8 | | Load_Top At_Offset_0
00f8 020f | | Execute Module,Activate
00f9 BODY_0098:
00f9 00bc | | Action Signal_Activated
00fa 00bb | | Action Signal_Completion
00fb 0000 0000 | | .BLANK 0000[0x5]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0378 | x | .CONST 0x0378 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 011d | | .CONST 0x011d ; Number of locals
0103 INIT_0100:
0103 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated
0105 00bf | | Action Accept_Activation
0106 00e5 | | Load_Encached Long_Integer_Cache
0107 029d 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call
0109 029d 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call
010b 029d 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call
010d 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call
010f 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call
0111 029d 040b | | Declare_Subprogram INIT_0408,For_Outer_Call
0113 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call
0115 029d 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call
0117 029d 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call
0119 029d 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call
011b 029d 049b | | Declare_Subprogram INIT_0498,For_Outer_Call
011d 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call
011f 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
0121 029d 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call
0123 029d 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call
0125 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call
0127 029d 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call
0129 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call
012b 029d 050b | | Declare_Subprogram INIT_0508,For_Outer_Call
012d 029d 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call
012f 029d 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call
0131 029d 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call
0133 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call
0135 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call
0137 029d 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call
0139 029d 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call
013b 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call
013d 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call
013f 029d 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call
0141 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
0143 029d 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call
0145 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
0147 029d 0663 | c| Declare_Subprogram INIT_0660,For_Outer_Call
0149 029d 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call
014b 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call
014d 029d 068b | | Declare_Subprogram INIT_0688,For_Outer_Call
014f 029d 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call
0151 029d 069b | | Declare_Subprogram INIT_0698,For_Outer_Call
0153 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call
0155 029d 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call
0157 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call
0159 029d 06db | | Declare_Subprogram INIT_06d8,For_Outer_Call
015b 029d 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call
015d 029d 071b | | Declare_Subprogram INIT_0718,For_Outer_Call
015f 029d 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call
0161 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call
0163 029d 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call
0165 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call
0167 029d 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call
0169 029d 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call
016b 029d 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call
016d 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call
016f 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call
0171 029d 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call
0173 029d 0823 | #| Declare_Subprogram INIT_0820,For_Outer_Call
0175 029d 083b | ;| Declare_Subprogram INIT_0838,For_Outer_Call
0177 029d 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call
0179 029d 089b | | Declare_Subprogram INIT_0898,For_Outer_Call
017b 029d 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call
017d 029d 08bb | | Declare_Subprogram INIT_08b8,For_Outer_Call
017f 029d 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call
0181 029d 090b | | Declare_Subprogram INIT_0908,For_Outer_Call
0183 029d 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call
0185 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call
0187 029d 096b | k| Declare_Subprogram INIT_0968,For_Outer_Call
0189 029d 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call
018b 029d 0993 | | Declare_Subprogram INIT_0990,For_Outer_Call
018d 029d 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call
018f 029d 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call
0191 029d 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call
0193 029d 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call
0195 029d 0a0b | | Declare_Subprogram INIT_0a08,For_Outer_Call
0197 029d 0a23 | #| Declare_Subprogram INIT_0a20,For_Outer_Call
0199 029d 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call
019b 029d 0a5b | [| Declare_Subprogram INIT_0a58,For_Outer_Call
019d 029d 0a7b | {| Declare_Subprogram INIT_0a78,For_Outer_Call
019f 029d 0a83 | | Declare_Subprogram INIT_0a80,For_Outer_Call
01a1 029d 0acb | | Declare_Subprogram INIT_0ac8,For_Outer_Call
01a3 029d 0aeb | | Declare_Subprogram INIT_0ae8,For_Outer_Call
01a5 029d 0b23 | #| Declare_Subprogram INIT_0b20,For_Outer_Call
01a7 e001 | | Load 0x0,0x1
01a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a9 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01aa 00c6 | | Action Check_Subprogram_Elaborated
01ab e002 | | Load 0x0,0x2
01ac 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01ad e002 | | Load 0x0,0x2
01ae 1b62 | b | Execute Package,Field_Read,Field_Number 0x62
01af e003 | | Load 0x0,0x3
01b0 e004 | | Load 0x0,0x4
01b1 4800 |H | Short_Literal 0x0
01b2 0007 | | Action Break_Optional
01b3 e001 | | Load 0x0,0x1
01b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b5 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01b6 00c6 | | Action Check_Subprogram_Elaborated
01b7 e002 | | Load 0x0,0x2
01b8 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01b9 e002 | | Load 0x0,0x2
01ba 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a
01bb e005 | | Load 0x0,0x5
01bc e006 | | Load 0x0,0x6
01bd 4800 |H | Short_Literal 0x0
01be 0007 | | Action Break_Optional
01bf e001 | | Load 0x0,0x1
01c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c1 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01c2 00c6 | | Action Check_Subprogram_Elaborated
01c3 e002 | | Load 0x0,0x2
01c4 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01c5 e002 | | Load 0x0,0x2
01c6 1b73 | s | Execute Package,Field_Read,Field_Number 0x73
01c7 e007 | | Load 0x0,0x7
01c8 e008 | | Load 0x0,0x8
01c9 4800 |H | Short_Literal 0x0
01ca 0007 | | Action Break_Optional
01cb e001 | | Load 0x0,0x1
01cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cd 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01ce 00c6 | | Action Check_Subprogram_Elaborated
01cf e002 | | Load 0x0,0x2
01d0 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01d1 e002 | | Load 0x0,0x2
01d2 1b8e | | Execute Package,Field_Read,Field_Number 0x8e
01d3 e009 | | Load 0x0,0x9
01d4 e00a | | Load 0x0,0xa
01d5 4800 |H | Short_Literal 0x0
01d6 0007 | | Action Break_Optional
01d7 e001 | | Load 0x0,0x1
01d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d9 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01da 00c6 | | Action Check_Subprogram_Elaborated
01db e002 | | Load 0x0,0x2
01dc 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01dd e002 | | Load 0x0,0x2
01de 1b78 | x | Execute Package,Field_Read,Field_Number 0x78
01df e00b | | Load 0x0,0xb
01e0 e00c | | Load 0x0,0xc
01e1 4800 |H | Short_Literal 0x0
01e2 0007 | | Action Break_Optional
01e3 e001 | | Load 0x0,0x1
01e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e5 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01e6 00c6 | | Action Check_Subprogram_Elaborated
01e7 e002 | | Load 0x0,0x2
01e8 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01e9 e002 | | Load 0x0,0x2
01ea 1b79 | y | Execute Package,Field_Read,Field_Number 0x79
01eb e00d | | Load 0x0,0xd
01ec e00e | | Load 0x0,0xe
01ed 4800 |H | Short_Literal 0x0
01ee 0007 | | Action Break_Optional
01ef e001 | | Load 0x0,0x1
01f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f1 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01f2 00c6 | | Action Check_Subprogram_Elaborated
01f3 e002 | | Load 0x0,0x2
01f4 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
01f5 e002 | | Load 0x0,0x2
01f6 1b8b | | Execute Package,Field_Read,Field_Number 0x8b
01f7 e00f | | Load 0x0,0xf
01f8 e010 | | Load 0x0,0x10
01f9 4800 |H | Short_Literal 0x0
01fa 0007 | | Action Break_Optional
01fb e001 | | Load 0x0,0x1
01fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fd 1910 | | Execute Package,Field_Reference,Field_Number 0x10
01fe 00c6 | | Action Check_Subprogram_Elaborated
01ff e002 | | Load 0x0,0x2
0200 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0201 e002 | | Load 0x0,0x2
0202 1b71 | q | Execute Package,Field_Read,Field_Number 0x71
0203 e011 | | Load 0x0,0x11
0204 e012 | | Load 0x0,0x12
0205 4800 |H | Short_Literal 0x0
0206 0007 | | Action Break_Optional
0207 e001 | | Load 0x0,0x1
0208 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0209 1910 | | Execute Package,Field_Reference,Field_Number 0x10
020a 00c6 | | Action Check_Subprogram_Elaborated
020b e002 | | Load 0x0,0x2
020c 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
020d e002 | | Load 0x0,0x2
020e 1b66 | f | Execute Package,Field_Read,Field_Number 0x66
020f e013 | | Load 0x0,0x13
0210 e014 | | Load 0x0,0x14
0211 4800 |H | Short_Literal 0x0
0212 0007 | | Action Break_Optional
0213 e001 | | Load 0x0,0x1
0214 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0215 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0216 00c6 | | Action Check_Subprogram_Elaborated
0217 e002 | | Load 0x0,0x2
0218 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0219 e002 | | Load 0x0,0x2
021a 1b70 | p | Execute Package,Field_Read,Field_Number 0x70
021b e015 | | Load 0x0,0x15
021c e016 | | Load 0x0,0x16
021d 4800 |H | Short_Literal 0x0
021e 0007 | | Action Break_Optional
021f e001 | | Load 0x0,0x1
0220 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0221 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0222 00c6 | | Action Check_Subprogram_Elaborated
0223 e002 | | Load 0x0,0x2
0224 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0225 e002 | | Load 0x0,0x2
0226 1b6b | k | Execute Package,Field_Read,Field_Number 0x6b
0227 e017 | | Load 0x0,0x17
0228 e018 | | Load 0x0,0x18
0229 4800 |H | Short_Literal 0x0
022a 0007 | | Action Break_Optional
022b e001 | | Load 0x0,0x1
022c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022d 1910 | | Execute Package,Field_Reference,Field_Number 0x10
022e 00c6 | | Action Check_Subprogram_Elaborated
022f e002 | | Load 0x0,0x2
0230 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0231 e002 | | Load 0x0,0x2
0232 1b67 | g | Execute Package,Field_Read,Field_Number 0x67
0233 e019 | | Load 0x0,0x19
0234 e01a | | Load 0x0,0x1a
0235 4800 |H | Short_Literal 0x0
0236 0007 | | Action Break_Optional
0237 e001 | | Load 0x0,0x1
0238 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0239 1910 | | Execute Package,Field_Reference,Field_Number 0x10
023a 00c6 | | Action Check_Subprogram_Elaborated
023b e002 | | Load 0x0,0x2
023c 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
023d e002 | | Load 0x0,0x2
023e 1b7a | z | Execute Package,Field_Read,Field_Number 0x7a
023f e01b | | Load 0x0,0x1b
0240 e01c | | Load 0x0,0x1c
0241 4800 |H | Short_Literal 0x0
0242 0007 | | Action Break_Optional
0243 e001 | | Load 0x0,0x1
0244 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0245 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0246 00c6 | | Action Check_Subprogram_Elaborated
0247 e002 | | Load 0x0,0x2
0248 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0249 e002 | | Load 0x0,0x2
024a 1b8f | | Execute Package,Field_Read,Field_Number 0x8f
024b e01d | | Load 0x0,0x1d
024c e01e | | Load 0x0,0x1e
024d 4800 |H | Short_Literal 0x0
024e 0007 | | Action Break_Optional
024f e001 | | Load 0x0,0x1
0250 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0251 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0252 00c6 | | Action Check_Subprogram_Elaborated
0253 e002 | | Load 0x0,0x2
0254 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0255 e002 | | Load 0x0,0x2
0256 1b69 | i | Execute Package,Field_Read,Field_Number 0x69
0257 e01f | | Load 0x0,0x1f
0258 e020 | | Load 0x0,0x20
0259 4800 |H | Short_Literal 0x0
025a 0007 | | Action Break_Optional
025b e001 | | Load 0x0,0x1
025c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
025d 1910 | | Execute Package,Field_Reference,Field_Number 0x10
025e 00c6 | | Action Check_Subprogram_Elaborated
025f e002 | | Load 0x0,0x2
0260 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0261 e002 | | Load 0x0,0x2
0262 1b7b | { | Execute Package,Field_Read,Field_Number 0x7b
0263 e021 | ! | Load 0x0,0x21
0264 e022 | " | Load 0x0,0x22
0265 4800 |H | Short_Literal 0x0
0266 0007 | | Action Break_Optional
0267 e001 | | Load 0x0,0x1
0268 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0269 1910 | | Execute Package,Field_Reference,Field_Number 0x10
026a 00c6 | | Action Check_Subprogram_Elaborated
026b e002 | | Load 0x0,0x2
026c 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
026d e002 | | Load 0x0,0x2
026e 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d
026f e023 | # | Load 0x0,0x23
0270 e024 | $ | Load 0x0,0x24
0271 4800 |H | Short_Literal 0x0
0272 0007 | | Action Break_Optional
0273 e001 | | Load 0x0,0x1
0274 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0275 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0276 00c6 | | Action Check_Subprogram_Elaborated
0277 e002 | | Load 0x0,0x2
0278 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0279 e002 | | Load 0x0,0x2
027a 1b77 | w | Execute Package,Field_Read,Field_Number 0x77
027b e025 | % | Load 0x0,0x25
027c e026 | & | Load 0x0,0x26
027d 4800 |H | Short_Literal 0x0
027e 0007 | | Action Break_Optional
027f e001 | | Load 0x0,0x1
0280 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0281 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0282 00c6 | | Action Check_Subprogram_Elaborated
0283 e002 | | Load 0x0,0x2
0284 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0285 e002 | | Load 0x0,0x2
0286 1b7c | | | Execute Package,Field_Read,Field_Number 0x7c
0287 e027 | ' | Load 0x0,0x27
0288 e028 | ( | Load 0x0,0x28
0289 4800 |H | Short_Literal 0x0
028a 0007 | | Action Break_Optional
028b e001 | | Load 0x0,0x1
028c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028d 1910 | | Execute Package,Field_Reference,Field_Number 0x10
028e 00c6 | | Action Check_Subprogram_Elaborated
028f e002 | | Load 0x0,0x2
0290 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0291 e002 | | Load 0x0,0x2
0292 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c
0293 e029 | ) | Load 0x0,0x29
0294 e02a | * | Load 0x0,0x2a
0295 4800 |H | Short_Literal 0x0
0296 0007 | | Action Break_Optional
0297 e001 | | Load 0x0,0x1
0298 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0299 1910 | | Execute Package,Field_Reference,Field_Number 0x10
029a 00c6 | | Action Check_Subprogram_Elaborated
029b e002 | | Load 0x0,0x2
029c 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
029d e002 | | Load 0x0,0x2
029e 1b68 | h | Execute Package,Field_Read,Field_Number 0x68
029f e02b | + | Load 0x0,0x2b
02a0 e02c | , | Load 0x0,0x2c
02a1 4800 |H | Short_Literal 0x0
02a2 0007 | | Action Break_Optional
02a3 e001 | | Load 0x0,0x1
02a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a5 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02a6 00c6 | | Action Check_Subprogram_Elaborated
02a7 e002 | | Load 0x0,0x2
02a8 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02a9 e002 | | Load 0x0,0x2
02aa 1b6e | n | Execute Package,Field_Read,Field_Number 0x6e
02ab e02d | - | Load 0x0,0x2d
02ac e02e | . | Load 0x0,0x2e
02ad 4800 |H | Short_Literal 0x0
02ae 0007 | | Action Break_Optional
02af e001 | | Load 0x0,0x1
02b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b1 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02b2 00c6 | | Action Check_Subprogram_Elaborated
02b3 e002 | | Load 0x0,0x2
02b4 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02b5 e002 | | Load 0x0,0x2
02b6 1b75 | u | Execute Package,Field_Read,Field_Number 0x75
02b7 e02f | / | Load 0x0,0x2f
02b8 e030 | 0 | Load 0x0,0x30
02b9 4800 |H | Short_Literal 0x0
02ba 0007 | | Action Break_Optional
02bb e001 | | Load 0x0,0x1
02bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02bd 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02be 00c6 | | Action Check_Subprogram_Elaborated
02bf e002 | | Load 0x0,0x2
02c0 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02c1 e002 | | Load 0x0,0x2
02c2 1b8a | | Execute Package,Field_Read,Field_Number 0x8a
02c3 e031 | 1 | Load 0x0,0x31
02c4 e032 | 2 | Load 0x0,0x32
02c5 4800 |H | Short_Literal 0x0
02c6 0007 | | Action Break_Optional
02c7 e001 | | Load 0x0,0x1
02c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c9 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02ca 00c6 | | Action Check_Subprogram_Elaborated
02cb e002 | | Load 0x0,0x2
02cc 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02cd e002 | | Load 0x0,0x2
02ce 1b72 | r | Execute Package,Field_Read,Field_Number 0x72
02cf e033 | 3 | Load 0x0,0x33
02d0 e034 | 4 | Load 0x0,0x34
02d1 4800 |H | Short_Literal 0x0
02d2 0007 | | Action Break_Optional
02d3 e001 | | Load 0x0,0x1
02d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d5 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02d6 00c6 | | Action Check_Subprogram_Elaborated
02d7 e002 | | Load 0x0,0x2
02d8 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02d9 e002 | | Load 0x0,0x2
02da 1b8d | | Execute Package,Field_Read,Field_Number 0x8d
02db e035 | 5 | Load 0x0,0x35
02dc e036 | 6 | Load 0x0,0x36
02dd 4800 |H | Short_Literal 0x0
02de 0007 | | Action Break_Optional
02df e001 | | Load 0x0,0x1
02e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e1 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02e2 00c6 | | Action Check_Subprogram_Elaborated
02e3 e002 | | Load 0x0,0x2
02e4 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02e5 e002 | | Load 0x0,0x2
02e6 1baa | | Execute Package,Field_Read,Field_Number 0xaa
02e7 e037 | 7 | Load 0x0,0x37
02e8 e038 | 8 | Load 0x0,0x38
02e9 4800 |H | Short_Literal 0x0
02ea 0007 | | Action Break_Optional
02eb e001 | | Load 0x0,0x1
02ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ed 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02ee 00c6 | | Action Check_Subprogram_Elaborated
02ef e002 | | Load 0x0,0x2
02f0 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02f1 e002 | | Load 0x0,0x2
02f2 1b76 | v | Execute Package,Field_Read,Field_Number 0x76
02f3 e039 | 9 | Load 0x0,0x39
02f4 e03a | : | Load 0x0,0x3a
02f5 4800 |H | Short_Literal 0x0
02f6 0007 | | Action Break_Optional
02f7 e001 | | Load 0x0,0x1
02f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f9 1910 | | Execute Package,Field_Reference,Field_Number 0x10
02fa 00c6 | | Action Check_Subprogram_Elaborated
02fb e002 | | Load 0x0,0x2
02fc 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
02fd e002 | | Load 0x0,0x2
02fe 1ba8 | | Execute Package,Field_Read,Field_Number 0xa8
02ff e03b | ; | Load 0x0,0x3b
0300 e03c | < | Load 0x0,0x3c
0301 4800 |H | Short_Literal 0x0
0302 0007 | | Action Break_Optional
0303 e001 | | Load 0x0,0x1
0304 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0305 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0306 00c6 | | Action Check_Subprogram_Elaborated
0307 e002 | | Load 0x0,0x2
0308 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0309 e002 | | Load 0x0,0x2
030a 1b6f | o | Execute Package,Field_Read,Field_Number 0x6f
030b e03d | = | Load 0x0,0x3d
030c e03e | > | Load 0x0,0x3e
030d 4800 |H | Short_Literal 0x0
030e 0007 | | Action Break_Optional
030f e001 | | Load 0x0,0x1
0310 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0311 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0312 00c6 | | Action Check_Subprogram_Elaborated
0313 e002 | | Load 0x0,0x2
0314 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0315 e002 | | Load 0x0,0x2
0316 1b74 | t | Execute Package,Field_Read,Field_Number 0x74
0317 e03f | ? | Load 0x0,0x3f
0318 e040 | @ | Load 0x0,0x40
0319 4800 |H | Short_Literal 0x0
031a 0007 | | Action Break_Optional
031b 00e5 | | Load_Encached Long_Integer_Cache
031c 00e5 | | Load_Encached Long_Integer_Cache
031d 02a0 | | Declare_Subprogram Null_Subprogram
031e 4802 |H | Short_Literal 0x2
031f 032d | - | Declare_Type Record,Defined
0320 e001 | | Load 0x0,0x1
0321 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0322 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0323 00c6 | | Action Check_Subprogram_Elaborated
0324 e002 | | Load 0x0,0x2
0325 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60
0326 e2fa | | Load 0x1,0xfa
0327 e041 | A | Load 0x0,0x41
0328 e042 | B | Load 0x0,0x42
0329 4800 |H | Short_Literal 0x0
032a 0007 | | Action Break_Optional
032b e002 | | Load 0x0,0x2
032c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
032d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
032e 00e1 | | Load_Encached Boolean_Cache
032f 00e1 | | Load_Encached Boolean_Cache
0330 02a0 | | Declare_Subprogram Null_Subprogram
0331 4803 |H | Short_Literal 0x3
0332 032d | - | Declare_Type Record,Defined
0333 e001 | | Load 0x0,0x1
0334 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0335 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0336 00c6 | | Action Check_Subprogram_Elaborated
0337 e002 | | Load 0x0,0x2
0338 1b61 | a | Execute Package,Field_Read,Field_Number 0x61
0339 e300 | | Load 0x1,0x100
033a e043 | C | Load 0x0,0x43
033b e044 | D | Load 0x0,0x44
033c 4800 |H | Short_Literal 0x0
033d 0007 | | Action Break_Optional
033e e002 | | Load 0x0,0x2
033f 1b61 | a | Execute Package,Field_Read,Field_Number 0x61
0340 012c | , | Execute Any,Size
0341 e300 | | Load 0x1,0x100
0342 012c | , | Execute Any,Size
0343 027f | | Execute Discrete,Equal
0344 7001 |p | Jump_Nonzero 0x346
0345 0887 | | Execute_Immediate Raise,0x87
0346 029d 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call
0348 029d 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call
034a 029d 0bc3 | | Declare_Subprogram INIT_0bc0,For_Outer_Call
034c 029d 0c03 | | Declare_Subprogram INIT_0c00,For_Outer_Call
034e 029d 0c0b | | Declare_Subprogram INIT_0c08,For_Outer_Call
0350 029d 0c23 | #| Declare_Subprogram INIT_0c20,For_Outer_Call
0352 029d 0c3b | ;| Declare_Subprogram INIT_0c38,For_Outer_Call
0354 029d 0c53 | S| Declare_Subprogram INIT_0c50,For_Outer_Call
0356 029d 0c63 | c| Declare_Subprogram INIT_0c60,For_Outer_Call
0358 029d 0c73 | s| Declare_Subprogram INIT_0c70,For_Outer_Call
035a 029d 0c83 | | Declare_Subprogram INIT_0c80,For_Outer_Call
035c 029d 0ccb | | Declare_Subprogram INIT_0cc8,For_Outer_Call
035e 029d 0d53 | S| Declare_Subprogram INIT_0d50,For_Outer_Call
0360 029d 0d93 | | Declare_Subprogram INIT_0d90,For_Outer_Call
0362 029d 0dbb | | Declare_Subprogram INIT_0db8,For_Outer_Call
0364 029d 0ddb | | Declare_Subprogram INIT_0dd8,For_Outer_Call
0366 029d 0df3 | | Declare_Subprogram INIT_0df0,For_Outer_Call
0368 029d 0e0b | | Declare_Subprogram INIT_0e08,For_Outer_Call
036a 029d 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call
036c 029d 0e3b | ;| Declare_Subprogram INIT_0e38,For_Outer_Call
036e 029d 0e4b | K| Declare_Subprogram INIT_0e48,For_Outer_Call
0370 029d 0e63 | c| Declare_Subprogram INIT_0e60,For_Outer_Call
0372 029d 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call
0374 029d 0fc3 | | Declare_Subprogram INIT_0fc0,For_Outer_Call
0376 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0377 00c7 | | Action Elaborate_Subprogram
0378 BODY_0100:
0378 00bc | | Action Signal_Activated
0379 00bb | | Action Signal_Completion
037a 0000 0000 | | .BLANK 0000[0x6]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 e5fd | | Load 0x2,-0x3
0384 0f01 | | Execute_Immediate Equal,0x1
0385 7004 |p | Jump_Nonzero 0x38a
0386 e5fc | | Load 0x2,-0x4
0387 e5ff | | Load 0x2,-0x1
0388 831b | | Call 0x1,0x11b
0389 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
038a e5fe | | Load 0x2,-0x2
038b 0b03 | | Execute_Immediate Case_Compare,0x3
038c 7006 |p | Jump_Nonzero 0x393
038d 0f09 | | Execute_Immediate Equal,0x9
038e 7009 |p | Jump_Nonzero 0x398
038f e5fc | | Load 0x2,-0x4
0390 e5ff | | Load 0x2,-0x1
0391 831b | | Call 0x1,0x11b
0392 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0393 00d1 | | Pop_Control Pop_Count_1
0394 e5fc | | Load 0x2,-0x4
0395 e5ff | | Load 0x2,-0x1
0396 831c | | Call 0x1,0x11c
0397 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0398 e5fc | | Load 0x2,-0x4
0399 e5ff | | Load 0x2,-0x1
039a 831d | | Call 0x1,0x11d
039b 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
039c 0000 0000 | | .BLANK 0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 e5ff | | Load 0x2,-0x1
03a4 e045 | E | Load 0x0,0x45
03a5 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
03a6 025e | ^ | Execute Discrete,Convert
03a7 1c01 | | Execute_Immediate Run_Utility,0x1
03a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a9 0000 0000 | | .BLANK 0000[0x7]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3 | | .CONST 0x03b3 ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0001 | | .CONST 0x0001 ; Number of locals
03b3 BODY_03b0:
03b3 INIT_03b0:
03b3 e5ff | | Load 0x2,-0x1
03b4 e045 | E | Load 0x0,0x45
03b5 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
03b6 025e | ^ | Execute Discrete,Convert
03b7 1c01 | | Execute_Immediate Run_Utility,0x1
03b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b9 0000 0000 | | .BLANK 0000[0x7]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 e5ff | | Load 0x2,-0x1
03c4 e046 | F | Load 0x0,0x46
03c5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03c7 0000 | | .XXX[0x1]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03d7 | | .CONST 0x03d7 ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb INIT_03c8:
03cb e002 | | Load 0x0,0x2
03cc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03cd 012c | , | Execute Any,Size
03ce 0f06 | | Execute_Immediate Equal,0x6
03cf 7001 |p | Jump_Nonzero 0x3d1
03d0 0887 | | Execute_Immediate Raise,0x87
03d1 e002 | | Load 0x0,0x2
03d2 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03d3 012c | , | Execute Any,Size
03d4 0f07 | | Execute_Immediate Equal,0x7
03d5 7001 |p | Jump_Nonzero BODY_03c8
03d6 0887 | | Execute_Immediate Raise,0x87
03d7 BODY_03c8:
03d7 e5ff | | Load 0x2,-0x1
03d8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d9 090d | | Execute_Immediate Binary_Scale,0xd
03da e5ff | | Load 0x2,-0x1
03db 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03dc 0907 | | Execute_Immediate Binary_Scale,0x7
03dd 0273 | s | Execute Discrete,Plus
03de e046 | F | Load 0x0,0x46
03df 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e1 0000 0000 | | .BLANK 0000[0x7]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f7 | | .CONST 0x03f7 ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb INIT_03e8:
03eb e002 | | Load 0x0,0x2
03ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03ed 012c | , | Execute Any,Size
03ee 0f06 | | Execute_Immediate Equal,0x6
03ef 7001 |p | Jump_Nonzero 0x3f1
03f0 0887 | | Execute_Immediate Raise,0x87
03f1 e002 | | Load 0x0,0x2
03f2 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03f3 012c | , | Execute Any,Size
03f4 0f07 | | Execute_Immediate Equal,0x7
03f5 7001 |p | Jump_Nonzero BODY_03e8
03f6 0887 | | Execute_Immediate Raise,0x87
03f7 BODY_03e8:
03f7 e5ff | | Load 0x2,-0x1
03f8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03f9 090d | | Execute_Immediate Binary_Scale,0xd
03fa e5ff | | Load 0x2,-0x1
03fb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03fc 0907 | | Execute_Immediate Binary_Scale,0x7
03fd 0273 | s | Execute Discrete,Plus
03fe e046 | F | Load 0x0,0x46
03ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0400 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0401 0000 0000 | | .BLANK 0000[0x7]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b | | .CONST 0x040b ; Address of begin
0409 0004 | | .CONST 0x0004 ; Address of exception handler
040a 0001 | | .CONST 0x0001 ; Number of locals
040b BODY_0408:
040b INIT_0408:
040b e5ff | | Load 0x2,-0x1
040c 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
040d 8212 | | Call 0x1,0x12
040e 0092 1b80 | | Action Push_String_Extended,0x1b80 ; "Type_Offset"
0410 e5ff | | Load 0x2,-0x1
0411 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0412 e046 | F | Load 0x0,0x46
0413 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0414 0092 1b81 | | Action Push_String_Extended,0x1b81 ; "To_Be_Aborted"
0416 e5ff | | Load 0x2,-0x1
0417 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0418 e046 | F | Load 0x0,0x46
0419 1817 | | Execute Package,Field_Execute,Field_Number 0x17
041a 0092 1b82 | | Action Push_String_Extended,0x1b82 ; "Abort_Protected"
041c e5ff | | Load 0x2,-0x1
041d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041e e047 | G | Load 0x0,0x47
041f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0420 180d | | Execute Package,Field_Execute,Field_Number 0xd
0421 0092 1b83 | | Action Push_String_Extended,0x1b83 ; "Stack"
0423 e046 | F | Load 0x0,0x46
0424 180f | | Execute Package,Field_Execute,Field_Number 0xf
0425 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0426 0000 0000 | | .XXX[0x2]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0437 | 7 | .CONST 0x0437 ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b INIT_0428:
042b e002 | | Load 0x0,0x2
042c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
042d 012c | , | Execute Any,Size
042e 0f06 | | Execute_Immediate Equal,0x6
042f 7001 |p | Jump_Nonzero 0x431
0430 0887 | | Execute_Immediate Raise,0x87
0431 e002 | | Load 0x0,0x2
0432 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0433 012c | , | Execute Any,Size
0434 0f07 | | Execute_Immediate Equal,0x7
0435 7001 |p | Jump_Nonzero BODY_0428
0436 0887 | | Execute_Immediate Raise,0x87
0437 BODY_0428:
0437 e5ff | | Load 0x2,-0x1
0438 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0439 090d | | Execute_Immediate Binary_Scale,0xd
043a e5ff | | Load 0x2,-0x1
043b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
043c 0907 | | Execute_Immediate Binary_Scale,0x7
043d 0273 | s | Execute Discrete,Plus
043e e5ff | | Load 0x2,-0x1
043f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0440 0273 | s | Execute Discrete,Plus
0441 e046 | F | Load 0x0,0x46
0442 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0443 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0444 0000 0000 | | .BLANK 0000[0x4]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b e5ff | | Load 0x2,-0x1
044c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
044d 8215 | | Call 0x1,0x15
044e 0092 1b84 | | Action Push_String_Extended,0x1b84 ; "Data_Offset"
0450 e5ff | | Load 0x2,-0x1
0451 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0452 e047 | G | Load 0x0,0x47
0453 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0454 180d | | Execute Package,Field_Execute,Field_Number 0xd
0455 0092 1b83 | | Action Push_String_Extended,0x1b83 ; "Stack"
0457 e046 | F | Load 0x0,0x46
0458 180d | | Execute Package,Field_Execute,Field_Number 0xd
0459 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
045a 0000 0000 | | .BLANK 0000[0x6]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463 | c | .CONST 0x0463 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0001 | | .CONST 0x0001 ; Number of locals
0463 BODY_0460:
0463 INIT_0460:
0463 e5ff | | Load 0x2,-0x1
0464 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0465 8212 | | Call 0x1,0x12
0466 0092 1b80 | | Action Push_String_Extended,0x1b80 ; "Type_Offset"
0468 e5ff | | Load 0x2,-0x1
0469 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
046a e046 | F | Load 0x0,0x46
046b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
046c 0092 1b85 | | Action Push_String_Extended,0x1b85 ; "Bounds_With_Object"
046e e5ff | | Load 0x2,-0x1
046f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0470 e046 | F | Load 0x0,0x46
0471 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0472 0092 1b86 | | Action Push_String_Extended,0x1b86 ; "Derives_Privacy"
0474 e5ff | | Load 0x2,-0x1
0475 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0476 e046 | F | Load 0x0,0x46
0477 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0478 0092 1b87 | | Action Push_String_Extended,0x1b87 ; "Is_Private"
047a e5ff | | Load 0x2,-0x1
047b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
047c e046 | F | Load 0x0,0x46
047d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
047e 0092 1b88 | | Action Push_String_Extended,0x1b88 ; "Is_Constant"
0480 e5ff | | Load 0x2,-0x1
0481 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0482 e046 | F | Load 0x0,0x46
0483 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0484 0092 1b89 | | Action Push_String_Extended,0x1b89 ; "Is_Visible"
0486 e5ff | | Load 0x2,-0x1
0487 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0488 e047 | G | Load 0x0,0x47
0489 1b0d | | Execute Package,Field_Read,Field_Number 0xd
048a 180d | | Execute Package,Field_Execute,Field_Number 0xd
048b 0092 1b8a | | Action Push_String_Extended,0x1b8a ; "Path_Stack"
048d e046 | F | Load 0x0,0x46
048e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
048f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493 | | .CONST 0x0493 ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0001 | | .CONST 0x0001 ; Number of locals
0493 BODY_0490:
0493 INIT_0490:
0493 e5ff | | Load 0x2,-0x1
0494 e046 | F | Load 0x0,0x46
0495 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0496 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0497 0000 | | .XXX[0x1]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 04a1 | | .CONST 0x04a1 ; Address of begin
0499 0004 | | .CONST 0x0004 ; Address of exception handler
049a 0001 | | .CONST 0x0001 ; Number of locals
049b INIT_0498:
049b e002 | | Load 0x0,0x2
049c 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
049d 012c | , | Execute Any,Size
049e 0f03 | | Execute_Immediate Equal,0x3
049f 7001 |p | Jump_Nonzero BODY_0498
04a0 0887 | | Execute_Immediate Raise,0x87
04a1 BODY_0498:
04a1 e5ff | | Load 0x2,-0x1
04a2 0903 | | Execute_Immediate Binary_Scale,0x3
04a3 e5fe | | Load 0x2,-0x2
04a4 0273 | s | Execute Discrete,Plus
04a5 e046 | F | Load 0x0,0x46
04a6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04a7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab e5ff | | Load 0x2,-0x1
04ac 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04ad e5ff | | Load 0x2,-0x1
04ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04af 8219 | | Call 0x1,0x19
04b0 0092 1b8b | | Action Push_String_Extended,0x1b8b ; "Offset"
04b2 e5ff | | Load 0x2,-0x1
04b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04b4 e047 | G | Load 0x0,0x47
04b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
04b7 0092 1b8c | | Action Push_String_Extended,0x1b8c ; "Segment"
04b9 e046 | F | Load 0x0,0x46
04ba 180d | | Execute Package,Field_Execute,Field_Number 0xd
04bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04bc 0000 0000 | | .BLANK 0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3 | | .CONST 0x04c3 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0001 | | .CONST 0x0001 ; Number of locals
04c3 BODY_04c0:
04c3 INIT_04c0:
04c3 e5ff | | Load 0x2,-0x1
04c4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04c5 e5ff | | Load 0x2,-0x1
04c6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
04c7 8219 | | Call 0x1,0x19
04c8 0092 1b8b | | Action Push_String_Extended,0x1b8b ; "Offset"
04ca e5ff | | Load 0x2,-0x1
04cb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04cc 8218 | | Call 0x1,0x18
04cd 0092 1b8d | | Action Push_String_Extended,0x1b8d ; "Children_Start"
04cf e5ff | | Load 0x2,-0x1
04d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04d1 e047 | G | Load 0x0,0x47
04d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d3 180e | | Execute Package,Field_Execute,Field_Number 0xe
04d4 0092 1b8c | | Action Push_String_Extended,0x1b8c ; "Segment"
04d6 e046 | F | Load 0x0,0x46
04d7 180e | | Execute Package,Field_Execute,Field_Number 0xe
04d8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04d9 0000 0000 | | .BLANK 0000[0x7]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3 | | .CONST 0x04e3 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0001 | | .CONST 0x0001 ; Number of locals
04e3 BODY_04e0:
04e3 INIT_04e0:
04e3 e5ff | | Load 0x2,-0x1
04e4 e046 | F | Load 0x0,0x46
04e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04e7 0000 | | .XXX[0x1]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb | | .CONST 0x04eb ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0001 | | .CONST 0x0001 ; Number of locals
04eb BODY_04e8:
04eb INIT_04e8:
04eb e5ff | | Load 0x2,-0x1
04ec e046 | F | Load 0x0,0x46
04ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ef 0000 | | .XXX[0x1]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 e5ff | | Load 0x2,-0x1
04f4 e046 | F | Load 0x0,0x46
04f5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04f7 0000 | | .XXX[0x1]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb | | .CONST 0x04fb ; Address of begin
04f9 0004 | | .CONST 0x0004 ; Address of exception handler
04fa 0001 | | .CONST 0x0001 ; Number of locals
04fb BODY_04f8:
04fb INIT_04f8:
04fb e5ff | | Load 0x2,-0x1
04fc e046 | F | Load 0x0,0x46
04fd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ff 0000 | | .XXX[0x1]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503 | | .CONST 0x0503 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0001 | | .CONST 0x0001 ; Number of locals
0503 BODY_0500:
0503 INIT_0500:
0503 e5ff | | Load 0x2,-0x1
0504 e046 | F | Load 0x0,0x46
0505 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0506 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0507 0000 | | .XXX[0x1]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0517 | | .CONST 0x0517 ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b INIT_0508:
050b e002 | | Load 0x0,0x2
050c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
050d 012c | , | Execute Any,Size
050e 0f06 | | Execute_Immediate Equal,0x6
050f 7001 |p | Jump_Nonzero 0x511
0510 0887 | | Execute_Immediate Raise,0x87
0511 e002 | | Load 0x0,0x2
0512 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0513 012c | , | Execute Any,Size
0514 0f07 | | Execute_Immediate Equal,0x7
0515 7001 |p | Jump_Nonzero BODY_0508
0516 0887 | | Execute_Immediate Raise,0x87
0517 BODY_0508:
0517 e5ff | | Load 0x2,-0x1
0518 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0519 090d | | Execute_Immediate Binary_Scale,0xd
051a e5ff | | Load 0x2,-0x1
051b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
051c 0907 | | Execute_Immediate Binary_Scale,0x7
051d 0273 | s | Execute Discrete,Plus
051e e046 | F | Load 0x0,0x46
051f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0520 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0521 0000 0000 | | .BLANK 0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0537 | 7 | .CONST 0x0537 ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b INIT_0528:
052b e002 | | Load 0x0,0x2
052c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
052d 012c | , | Execute Any,Size
052e 0f06 | | Execute_Immediate Equal,0x6
052f 7001 |p | Jump_Nonzero 0x531
0530 0887 | | Execute_Immediate Raise,0x87
0531 e002 | | Load 0x0,0x2
0532 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0533 012c | , | Execute Any,Size
0534 0f07 | | Execute_Immediate Equal,0x7
0535 7001 |p | Jump_Nonzero BODY_0528
0536 0887 | | Execute_Immediate Raise,0x87
0537 BODY_0528:
0537 e5ff | | Load 0x2,-0x1
0538 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0539 090d | | Execute_Immediate Binary_Scale,0xd
053a e5ff | | Load 0x2,-0x1
053b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
053c 0907 | | Execute_Immediate Binary_Scale,0x7
053d 0273 | s | Execute Discrete,Plus
053e e046 | F | Load 0x0,0x46
053f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0540 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0541 0000 0000 | | .BLANK 0000[0x7]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b | K | .CONST 0x054b ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0001 | | .CONST 0x0001 ; Number of locals
054b BODY_0548:
054b INIT_0548:
054b e5ff | | Load 0x2,-0x1
054c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
054d 8221 | ! | Call 0x1,0x21
054e 0092 1b8e | | Action Push_String_Extended,0x1b8e ; "Control_Offset"
0550 e5ff | | Load 0x2,-0x1
0551 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0552 e047 | G | Load 0x0,0x47
0553 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0554 180d | | Execute Package,Field_Execute,Field_Number 0xd
0555 0092 1b83 | | Action Push_String_Extended,0x1b83 ; "Stack"
0557 e046 | F | Load 0x0,0x46
0558 180d | | Execute Package,Field_Execute,Field_Number 0xd
0559 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
055a 0000 0000 | | .BLANK 0000[0x6]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0578 | x | .CONST 0x0578 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0003 | | .CONST 0x0003 ; Number of locals
0563 INIT_0560:
0563 e002 | | Load 0x0,0x2
0564 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
0565 012c | , | Execute Any,Size
0566 0f03 | | Execute_Immediate Equal,0x3
0567 7001 |p | Jump_Nonzero 0x569
0568 0887 | | Execute_Immediate Raise,0x87
0569 e5fe | | Load 0x2,-0x2
056a 0903 | | Execute_Immediate Binary_Scale,0x3
056b e5fd | | Load 0x2,-0x3
056c 0273 | s | Execute Discrete,Plus
056d 0904 | | Execute_Immediate Binary_Scale,0x4
056e 00d8 | | Load_Top At_Offset_0
056f e002 | | Load 0x0,0x2
0570 1bb1 | | Execute Package,Field_Read,Field_Number 0xb1
0571 0260 | ` | Execute Discrete,In_Type
0572 7001 |p | Jump_Nonzero 0x574
0573 08e0 | | Execute_Immediate Raise,0xe0
0574 00d8 | | Load_Top At_Offset_0
0575 e5ff | | Load 0x2,-0x1
0576 e001 | | Load 0x0,0x1
0577 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0578 BODY_0560:
0578 4811 |H | Short_Literal 0x11
0579 e403 | | Load 0x2,0x3
057a e048 | H | Load 0x0,0x48
057b 180e | | Execute Package,Field_Execute,Field_Number 0xe
057c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
057d 0000 0000 | | .XXX[0x3]
057f 0000 | |
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583 | | .CONST 0x0583 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0001 | | .CONST 0x0001 ; Number of locals
0583 BODY_0580:
0583 INIT_0580:
0583 e5ff | | Load 0x2,-0x1
0584 e5fe | | Load 0x2,-0x2
0585 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0586 e5fe | | Load 0x2,-0x2
0587 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0588 e5fe | | Load 0x2,-0x2
0589 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
058a 8224 | $ | Call 0x1,0x24
058b 01cc | | Execute Vector,Catenate
058c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
058d 0000 0000 | | .XXX[0x3]
058f 0000 | |
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593 | | .CONST 0x0593 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0001 | | .CONST 0x0001 ; Number of locals
0593 BODY_0590:
0593 INIT_0590:
0593 e5ff | | Load 0x2,-0x1
0594 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0595 8223 | # | Call 0x1,0x23
0596 0092 1b8f | | Action Push_String_Extended,0x1b8f ; "Subprog_Site"
0598 e5ff | | Load 0x2,-0x1
0599 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
059a 820f | | Call 0x1,0xf
059b 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
059d e5ff | | Load 0x2,-0x1
059e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
059f e046 | F | Load 0x0,0x46
05a0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05a1 0092 1b89 | | Action Push_String_Extended,0x1b89 ; "Is_Visible"
05a3 e5ff | | Load 0x2,-0x1
05a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05a5 e047 | G | Load 0x0,0x47
05a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a7 180d | | Execute Package,Field_Execute,Field_Number 0xd
05a8 0092 1b91 | | Action Push_String_Extended,0x1b91 ; "Scope_For_Site"
05aa e046 | F | Load 0x0,0x46
05ab 180f | | Execute Package,Field_Execute,Field_Number 0xf
05ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ad 0000 0000 | | .XXX[0x3]
05af 0000 | |
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3 | | .CONST 0x05b3 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0001 | | .CONST 0x0001 ; Number of locals
05b3 BODY_05b0:
05b3 INIT_05b0:
05b3 e5ff | | Load 0x2,-0x1
05b4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
05b5 821c | | Call 0x1,0x1c
05b6 0092 1b92 | | Action Push_String_Extended,0x1b92 ; "Lex_Level"
05b8 e5ff | | Load 0x2,-0x1
05b9 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
05ba 821a | | Call 0x1,0x1a
05bb 0092 1b93 | | Action Push_String_Extended,0x1b93 ; "Subprog_Start"
05bd e5ff | | Load 0x2,-0x1
05be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05bf 820f | | Call 0x1,0xf
05c0 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
05c2 e5ff | | Load 0x2,-0x1
05c3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
05c4 8223 | # | Call 0x1,0x23
05c5 0092 1b94 | | Action Push_String_Extended,0x1b94 ; "Declare_Frame"
05c7 e046 | F | Load 0x0,0x46
05c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
05c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ca 0000 0000 | | .BLANK 0000[0x6]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3 | | .CONST 0x05d3 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0001 | | .CONST 0x0001 ; Number of locals
05d3 BODY_05d0:
05d3 INIT_05d0:
05d3 e5ff | | Load 0x2,-0x1
05d4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
05d5 0092 1b95 | | Action Push_String_Extended,0x1b95 ; "start pc = "
05d7 8225 | % | Call 0x1,0x25
05d8 0092 1b96 | | Action Push_String_Extended,0x1b96 ; "; lex = "
05da 01cc | | Execute Vector,Catenate
05db e5ff | | Load 0x2,-0x1
05dc 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
05dd 821c | | Call 0x1,0x1c
05de 01cc | | Execute Vector,Catenate
05df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05f5 | | .CONST 0x05f5 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 000a | | .CONST 0x000a ; Number of locals
05e3 INIT_05e0:
05e3 029f 0fdb | | Declare_Subprogram INIT_0fd8,For_Call
05e5 e046 | F | Load 0x0,0x46
05e6 191a | | Execute Package,Field_Reference,Field_Number 0x1a
05e7 00c6 | | Action Check_Subprogram_Elaborated
05e8 e002 | | Load 0x0,0x2
05e9 1b42 | B | Execute Package,Field_Read,Field_Number 0x42
05ea 00e1 | | Load_Encached Boolean_Cache
05eb e002 | | Load 0x0,0x2
05ec 1b43 | C | Execute Package,Field_Read,Field_Number 0x43
05ed 4802 |H | Short_Literal 0x2
05ee 4802 |H | Short_Literal 0x2
05ef 0099 | | Action Reference_Dynamic
05f0 1d10 | | Execute_Immediate Reference_Lex_1,0x10
05f1 e049 | I | Load 0x0,0x49
05f2 e04a | J | Load 0x0,0x4a
05f3 480a |H | Short_Literal 0xa
05f4 0007 | | Action Break_Optional
05f5 BODY_05e0:
05f5 e5ff | | Load 0x2,-0x1
05f6 e403 | | Load 0x2,0x3
05f7 e404 | | Load 0x2,0x4
05f8 e405 | | Load 0x2,0x5
05f9 4806 |H | Short_Literal 0x6
05fa 4802 |H | Short_Literal 0x2
05fb 0099 | | Action Reference_Dynamic
05fc 4807 |H | Short_Literal 0x7
05fd 4802 |H | Short_Literal 0x2
05fe 0099 | | Action Reference_Dynamic
05ff 4808 |H | Short_Literal 0x8
0600 4802 |H | Short_Literal 0x2
0601 0099 | | Action Reference_Dynamic
0602 e046 | F | Load 0x0,0x46
0603 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0604 00e9 | | Load_Encached String_Cache
0605 01c6 | | Execute Vector,Convert_To_Formal
0606 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0607 0000 | | .XXX[0x1]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 0615 | | .CONST 0x0615 ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0004 | | .CONST 0x0004 ; Number of locals
060b INIT_0608:
060b 4880 |H | Short_Literal 0x80
060c e04b | K | Load 0x0,0x4b
060d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
060e 1c08 | | Execute_Immediate Run_Utility,0x8
060f 00d8 | | Load_Top At_Offset_0
0610 1c00 | | Execute_Immediate Run_Utility,0x0
0611 029f 0fe3 | | Declare_Subprogram INIT_0fe0,For_Call
0613 029f 0ffb | | Declare_Subprogram INIT_0ff8,For_Call
0615 BODY_0608:
0615 4800 |H | Short_Literal 0x0
0616 e5ff | | Load 0x2,-0x1
0617 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0618 e047 | G | Load 0x0,0x47
0619 1b0d | | Execute Package,Field_Read,Field_Number 0xd
061a 180d | | Execute Package,Field_Execute,Field_Number 0xd
061b 0092 1b97 | | Action Push_String_Extended,0x1b97 ; "distributor"
061d 8403 | | Call 0x2,0x3
061e 4801 |H | Short_Literal 0x1
061f e5ff | | Load 0x2,-0x1
0620 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0621 8221 | ! | Call 0x1,0x21
0622 0092 1b98 | | Action Push_String_Extended,0x1b98 ; "control extent"
0624 8403 | | Call 0x2,0x3
0625 4801 |H | Short_Literal 0x1
0626 e5ff | | Load 0x2,-0x1
0627 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
0628 8229 | ) | Call 0x1,0x29
0629 0092 1b99 | | Action Push_String_Extended,0x1b99 ; "break mask"
062b 8403 | | Call 0x2,0x3
062c 0092 1b9a | | Action Push_String_Extended,0x1b9a ; "Is_Catalogued "
062e e5ff | | Load 0x2,-0x1
062f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0630 8404 | | Call 0x2,0x4
0631 0092 1b9b | | Action Push_String_Extended,0x1b9b ; "Is_Wired "
0633 e5ff | | Load 0x2,-0x1
0634 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0635 8404 | | Call 0x2,0x4
0636 e402 | | Load 0x2,0x2
0637 e04b | K | Load 0x0,0x4b
0638 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0639 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
063a 0000 0000 | | .BLANK 0000[0x6]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643 | C | .CONST 0x0643 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0001 | | .CONST 0x0001 ; Number of locals
0643 BODY_0640:
0643 INIT_0640:
0643 e5ff | | Load 0x2,-0x1
0644 e046 | F | Load 0x0,0x46
0645 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0646 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0647 0000 | | .XXX[0x1]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b e5ff | | Load 0x2,-0x1
064c e046 | F | Load 0x0,0x46
064d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
064e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
064f 0000 | | .XXX[0x1]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653 | S | .CONST 0x0653 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0001 | | .CONST 0x0001 ; Number of locals
0653 BODY_0650:
0653 INIT_0650:
0653 e5ff | | Load 0x2,-0x1
0654 e046 | F | Load 0x0,0x46
0655 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0656 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0657 0000 | | .XXX[0x1]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b e5ff | | Load 0x2,-0x1
065c e046 | F | Load 0x0,0x46
065d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
065e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
065f 0000 | | .XXX[0x1]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663 | c | .CONST 0x0663 ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0001 | | .CONST 0x0001 ; Number of locals
0663 BODY_0660:
0663 INIT_0660:
0663 e5ff | | Load 0x2,-0x1
0664 e046 | F | Load 0x0,0x46
0665 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0666 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0667 0000 | | .XXX[0x1]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b e5ff | | Load 0x2,-0x1
066c e046 | F | Load 0x0,0x46
066d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
066e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
066f 0000 | | .XXX[0x1]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673 | s | .CONST 0x0673 ; Address of begin
0671 0004 | | .CONST 0x0004 ; Address of exception handler
0672 0001 | | .CONST 0x0001 ; Number of locals
0673 BODY_0670:
0673 INIT_0670:
0673 e5ff | | Load 0x2,-0x1
0674 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0675 8230 | 0 | Call 0x1,0x30
0676 0092 1b9c | | Action Push_String_Extended,0x1b9c ; "Delay_Duration"
0678 e5ff | | Load 0x2,-0x1
0679 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
067a 820f | | Call 0x1,0xf
067b 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
067d e5ff | | Load 0x2,-0x1
067e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
067f 822f | / | Call 0x1,0x2f
0680 0092 1b9d | | Action Push_String_Extended,0x1b9d ; "Timed_Choice"
0682 e046 | F | Load 0x0,0x46
0683 180e | | Execute Package,Field_Execute,Field_Number 0xe
0684 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0685 0000 0000 | | .XXX[0x3]
0687 0000 | |
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b e5ff | | Load 0x2,-0x1
068c e046 | F | Load 0x0,0x46
068d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
068e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
068f 0000 | | .XXX[0x1]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0693 | | .CONST 0x0693 ; Address of begin
0691 0004 | | .CONST 0x0004 ; Address of exception handler
0692 0001 | | .CONST 0x0001 ; Number of locals
0693 BODY_0690:
0693 INIT_0690:
0693 e5ff | | Load 0x2,-0x1
0694 e046 | F | Load 0x0,0x46
0695 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0696 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0697 0000 | | .XXX[0x1]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b e5ff | | Load 0x2,-0x1
069c e046 | F | Load 0x0,0x46
069d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
069e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
069f 0000 | | .XXX[0x1]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3 | | .CONST 0x06a3 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0001 | | .CONST 0x0001 ; Number of locals
06a3 BODY_06a0:
06a3 INIT_06a0:
06a3 e5ff | | Load 0x2,-0x1
06a4 e046 | F | Load 0x0,0x46
06a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06a7 0000 | | .XXX[0x1]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06ab | | .CONST 0x06ab ; Address of begin
06a9 0004 | | .CONST 0x0004 ; Address of exception handler
06aa 0001 | | .CONST 0x0001 ; Number of locals
06ab BODY_06a8:
06ab INIT_06a8:
06ab e5ff | | Load 0x2,-0x1
06ac 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
06ad 8234 | 4 | Call 0x1,0x34
06ae 0092 1b9e | | Action Push_String_Extended,0x1b9e ; "Member_Index"
06b0 e5ff | | Load 0x2,-0x1
06b1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
06b2 8234 | 4 | Call 0x1,0x34
06b3 0092 1b9f | | Action Push_String_Extended,0x1b9f ; "First_Member"
06b5 e5ff | | Load 0x2,-0x1
06b6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06b7 820f | | Call 0x1,0xf
06b8 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
06ba e5ff | | Load 0x2,-0x1
06bb 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
06bc 8222 | " | Call 0x1,0x22
06bd 0092 1ba0 | | Action Push_String_Extended,0x1ba0 ; "Member_Site"
06bf e5ff | | Load 0x2,-0x1
06c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06c1 8233 | 3 | Call 0x1,0x33
06c2 0092 1ba1 | | Action Push_String_Extended,0x1ba1 ; "Entry_Params"
06c4 e5ff | | Load 0x2,-0x1
06c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06c6 8232 | 2 | Call 0x1,0x32
06c7 0092 1ba2 | | Action Push_String_Extended,0x1ba2 ; "Entry_Name"
06c9 e046 | F | Load 0x0,0x46
06ca 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06cc 0000 0000 | | .BLANK 0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3 | | .CONST 0x06d3 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0001 | | .CONST 0x0001 ; Number of locals
06d3 BODY_06d0:
06d3 INIT_06d0:
06d3 e5ff | | Load 0x2,-0x1
06d4 e046 | F | Load 0x0,0x46
06d5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06d7 0000 | | .XXX[0x1]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db | | .CONST 0x06db ; Address of begin
06d9 0004 | | .CONST 0x0004 ; Address of exception handler
06da 0001 | | .CONST 0x0001 ; Number of locals
06db BODY_06d8:
06db INIT_06d8:
06db e5ff | | Load 0x2,-0x1
06dc 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
06dd 821f | | Call 0x1,0x1f
06de 0092 1ba3 | | Action Push_String_Extended,0x1ba3 ; "Raise_Index"
06e0 e5ff | | Load 0x2,-0x1
06e1 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
06e2 821e | | Call 0x1,0x1e
06e3 0092 1ba4 | | Action Push_String_Extended,0x1ba4 ; "Raise_Offset"
06e5 e5ff | | Load 0x2,-0x1
06e6 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
06e7 e046 | F | Load 0x0,0x46
06e8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06e9 0092 1ba5 | | Action Push_String_Extended,0x1ba5 ; "Reraising"
06eb e5ff | | Load 0x2,-0x1
06ec 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06ed 821d | | Call 0x1,0x1d
06ee 0092 1ba6 | | Action Push_String_Extended,0x1ba6 ; "Exception_Name"
06f0 e5ff | | Load 0x2,-0x1
06f1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
06f2 820f | | Call 0x1,0xf
06f3 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
06f5 e5ff | | Load 0x2,-0x1
06f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
06f7 e047 | G | Load 0x0,0x47
06f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06f9 180e | | Execute Package,Field_Execute,Field_Number 0xe
06fa 0092 1ba7 | | Action Push_String_Extended,0x1ba7 ; "Raise_Segment"
06fc e046 | F | Load 0x0,0x46
06fd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06ff 0000 | | .XXX[0x1]
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703 | | .CONST 0x0703 ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0001 | | .CONST 0x0001 ; Number of locals
0703 BODY_0700:
0703 INIT_0700:
0703 0092 1ba8 | | Action Push_String_Extended,0x1ba8 ; "pc = "
0705 e5ff | | Load 0x2,-0x1
0706 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0707 e5ff | | Load 0x2,-0x1
0708 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0709 e5ff | | Load 0x2,-0x1
070a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
070b 8224 | $ | Call 0x1,0x24
070c 01cc | | Execute Vector,Catenate
070d 0092 1ba9 | | Action Push_String_Extended,0x1ba9 ; "; "
070f 01cc | | Execute Vector,Catenate
0710 e5ff | | Load 0x2,-0x1
0711 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0712 e04c | L | Load 0x0,0x4c
0713 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0714 01cc | | Execute Vector,Catenate
0715 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0716 0000 0000 | | .XXX[0x2]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b | | .CONST 0x071b ; Address of begin
0719 0004 | | .CONST 0x0004 ; Address of exception handler
071a 0001 | | .CONST 0x0001 ; Number of locals
071b BODY_0718:
071b INIT_0718:
071b e5ff | | Load 0x2,-0x1
071c e046 | F | Load 0x0,0x46
071d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
071e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
071f 0000 | | .XXX[0x1]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 INIT_0720:
0723 e5ff | | Load 0x2,-0x1
0724 e046 | F | Load 0x0,0x46
0725 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0726 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0727 0000 | | .XXX[0x1]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b | + | .CONST 0x072b ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0001 | | .CONST 0x0001 ; Number of locals
072b BODY_0728:
072b INIT_0728:
072b e5ff | | Load 0x2,-0x1
072c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
072d 823b | ; | Call 0x1,0x3b
072e 0092 1baa | | Action Push_String_Extended,0x1baa ; "Mantissa"
0730 e5ff | | Load 0x2,-0x1
0731 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0732 823a | : | Call 0x1,0x3a
0733 0092 1bab | | Action Push_String_Extended,0x1bab ; "Exponent"
0735 e5ff | | Load 0x2,-0x1
0736 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0737 e046 | F | Load 0x0,0x46
0738 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0739 0092 1bac | | Action Push_String_Extended,0x1bac ; "Is_Negative"
073b e046 | F | Load 0x0,0x46
073c 180e | | Execute Package,Field_Execute,Field_Number 0xe
073d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
073e 0000 0000 | | .XXX[0x2]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0754 | T | .CONST 0x0754 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0007 | | .CONST 0x0007 ; Number of locals
0743 INIT_0740:
0743 a04d | M | Store_Unchecked 0x0,0x4d
0744 00c6 | | Action Check_Subprogram_Elaborated
0745 e002 | | Load 0x0,0x2
0746 1b65 | e | Execute Package,Field_Read,Field_Number 0x65
0747 00e6 | | Load_Encached Float_Cache
0748 e04e | N | Load 0x0,0x4e
0749 e04f | O | Load 0x0,0x4f
074a 4806 |H | Short_Literal 0x6
074b 0007 | | Action Break_Optional
074c e5ff | | Load 0x2,-0x1
074d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
074e e402 | | Load 0x2,0x2
074f e403 | | Load 0x2,0x3
0750 4804 |H | Short_Literal 0x4
0751 4802 |H | Short_Literal 0x2
0752 0099 | | Action Reference_Dynamic
0753 804d | M | Call 0x0,0x4d
0754 BODY_0740:
0754 00d8 | | Load_Top At_Offset_0
0755 e050 | P | Load 0x0,0x50
0756 180e | | Execute Package,Field_Execute,Field_Number 0xe
0757 e050 | P | Load 0x0,0x50
0758 180f | | Execute Package,Field_Execute,Field_Number 0xf
0759 00e9 | | Load_Encached String_Cache
075a 01c6 | | Execute Vector,Convert_To_Formal
075b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
075c 0000 0000 | | .BLANK 0000[0x4]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763 | c | .CONST 0x0763 ; Address of begin
0761 0004 | | .CONST 0x0004 ; Address of exception handler
0762 0001 | | .CONST 0x0001 ; Number of locals
0763 BODY_0760:
0763 INIT_0760:
0763 e5ff | | Load 0x2,-0x1
0764 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0765 823c | < | Call 0x1,0x3c
0766 0092 1bad | | Action Push_String_Extended,0x1bad ; "Val_Part"
0768 e5ff | | Load 0x2,-0x1
0769 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
076a 820f | | Call 0x1,0xf
076b 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
076d e5ff | | Load 0x2,-0x1
076e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
076f 8217 | | Call 0x1,0x17
0770 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
0772 e046 | F | Load 0x0,0x46
0773 180e | | Execute Package,Field_Execute,Field_Number 0xe
0774 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0775 0000 0000 | | .XXX[0x3]
0777 0000 | |
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b | { | .CONST 0x077b ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0001 | | .CONST 0x0001 ; Number of locals
077b BODY_0778:
077b INIT_0778:
077b e5ff | | Load 0x2,-0x1
077c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
077d 8223 | # | Call 0x1,0x23
077e 0092 1baf | | Action Push_String_Extended,0x1baf ; "Var_Site"
0780 e5ff | | Load 0x2,-0x1
0781 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0782 820f | | Call 0x1,0xf
0783 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0785 e5ff | | Load 0x2,-0x1
0786 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0787 e046 | F | Load 0x0,0x46
0788 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0789 0092 1b89 | | Action Push_String_Extended,0x1b89 ; "Is_Visible"
078b e046 | F | Load 0x0,0x46
078c 180e | | Execute Package,Field_Execute,Field_Number 0xe
078d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
078e 0000 0000 | | .XXX[0x2]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793 | | .CONST 0x0793 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0001 | | .CONST 0x0001 ; Number of locals
0793 BODY_0790:
0793 INIT_0790:
0793 e5ff | | Load 0x2,-0x1
0794 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0795 820f | | Call 0x1,0xf
0796 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0798 e5ff | | Load 0x2,-0x1
0799 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
079a 8233 | 3 | Call 0x1,0x33
079b 0092 1ba1 | | Action Push_String_Extended,0x1ba1 ; "Entry_Params"
079d e5ff | | Load 0x2,-0x1
079e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
079f 8232 | 2 | Call 0x1,0x32
07a0 0092 1ba2 | | Action Push_String_Extended,0x1ba2 ; "Entry_Name"
07a2 e046 | F | Load 0x0,0x46
07a3 180e | | Execute Package,Field_Execute,Field_Number 0xe
07a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07a5 0000 0000 | | .XXX[0x3]
07a7 0000 | |
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab e5ff | | Load 0x2,-0x1
07ac 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
07ad 8234 | 4 | Call 0x1,0x34
07ae 0092 1b9f | | Action Push_String_Extended,0x1b9f ; "First_Member"
07b0 e5ff | | Load 0x2,-0x1
07b1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
07b2 8235 | 5 | Call 0x1,0x35
07b3 0092 1bb0 | | Action Push_String_Extended,0x1bb0 ; "Last_Bias"
07b5 e5ff | | Load 0x2,-0x1
07b6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
07b7 820f | | Call 0x1,0xf
07b8 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
07ba e5ff | | Load 0x2,-0x1
07bb 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07bc 8222 | " | Call 0x1,0x22
07bd 0092 1bb1 | | Action Push_String_Extended,0x1bb1 ; "Family_Site"
07bf e5ff | | Load 0x2,-0x1
07c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07c1 8233 | 3 | Call 0x1,0x33
07c2 0092 1ba1 | | Action Push_String_Extended,0x1ba1 ; "Entry_Params"
07c4 e5ff | | Load 0x2,-0x1
07c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07c6 8232 | 2 | Call 0x1,0x32
07c7 0092 1ba2 | | Action Push_String_Extended,0x1ba2 ; "Entry_Name"
07c9 e046 | F | Load 0x0,0x46
07ca 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07cc 0000 0000 | | .BLANK 0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 e5ff | | Load 0x2,-0x1
07d4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07d5 8215 | | Call 0x1,0x15
07d6 0092 1bb2 | | Action Push_String_Extended,0x1bb2 ; "Pointer"
07d8 e5ff | | Load 0x2,-0x1
07d9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07da 820f | | Call 0x1,0xf
07db 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
07dd e5ff | | Load 0x2,-0x1
07de 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
07df 8217 | | Call 0x1,0x17
07e0 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
07e2 e046 | F | Load 0x0,0x46
07e3 180e | | Execute Package,Field_Execute,Field_Number 0xe
07e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07e5 0000 0000 | | .XXX[0x3]
07e7 0000 | |
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07eb | | .CONST 0x07eb ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0001 | | .CONST 0x0001 ; Number of locals
07eb BODY_07e8:
07eb INIT_07e8:
07eb e5ff | | Load 0x2,-0x1
07ec 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
07ed 8216 | | Call 0x1,0x16
07ee 0092 1bb2 | | Action Push_String_Extended,0x1bb2 ; "Pointer"
07f0 e5ff | | Load 0x2,-0x1
07f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
07f2 820f | | Call 0x1,0xf
07f3 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
07f5 e5ff | | Load 0x2,-0x1
07f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
07f7 8217 | | Call 0x1,0x17
07f8 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
07fa e046 | F | Load 0x0,0x46
07fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
07fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07fd 0000 0000 | | .XXX[0x3]
07ff 0000 | |
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0803 | | .CONST 0x0803 ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0001 | | .CONST 0x0001 ; Number of locals
0803 BODY_0800:
0803 INIT_0800:
0803 e5ff | | Load 0x2,-0x1
0804 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0805 e047 | G | Load 0x0,0x47
0806 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0807 180d | | Execute Package,Field_Execute,Field_Number 0xd
0808 0092 1bb3 | | Action Push_String_Extended,0x1bb3 ; "Declarer_Name"
080a e5ff | | Load 0x2,-0x1
080b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
080c e047 | G | Load 0x0,0x47
080d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
080e 180d | | Execute Package,Field_Execute,Field_Number 0xd
080f 0092 1bb4 | | Action Push_String_Extended,0x1bb4 ; "Module_Imports"
0811 e5ff | | Load 0x2,-0x1
0812 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0813 820f | | Call 0x1,0xf
0814 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0816 e5ff | | Load 0x2,-0x1
0817 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0818 8217 | | Call 0x1,0x17
0819 0092 1bb5 | | Action Push_String_Extended,0x1bb5 ; "Module_Type"
081b e046 | F | Load 0x0,0x46
081c 180f | | Execute Package,Field_Execute,Field_Number 0xf
081d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
081e 0000 0000 | | .XXX[0x2]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0823 | # | .CONST 0x0823 ; Address of begin
0821 0004 | | .CONST 0x0004 ; Address of exception handler
0822 0001 | | .CONST 0x0001 ; Number of locals
0823 BODY_0820:
0823 INIT_0820:
0823 0092 1bb6 | | Action Push_String_Extended,0x1bb6 ; "import space = "
0825 e5ff | | Load 0x2,-0x1
0826 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0827 e047 | G | Load 0x0,0x47
0828 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0829 180d | | Execute Package,Field_Execute,Field_Number 0xd
082a 01cc | | Execute Vector,Catenate
082b 0092 1bb7 | | Action Push_String_Extended,0x1bb7 ; "; declared by "
082d 01cc | | Execute Vector,Catenate
082e e5ff | | Load 0x2,-0x1
082f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0830 e047 | G | Load 0x0,0x47
0831 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0832 180d | | Execute Package,Field_Execute,Field_Number 0xd
0833 01cc | | Execute Vector,Catenate
0834 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0835 0000 0000 | | .XXX[0x3]
0837 0000 | |
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 0843 | C | .CONST 0x0843 ; Address of begin
0839 0004 | | .CONST 0x0004 ; Address of exception handler
083a 0003 | | .CONST 0x0003 ; Number of locals
083b INIT_0838:
083b 48a5 |H | Short_Literal 0xa5
083c e04b | K | Load 0x0,0x4b
083d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
083e 1c08 | | Execute_Immediate Run_Utility,0x8
083f 00d8 | | Load_Top At_Offset_0
0840 1c00 | | Execute_Immediate Run_Utility,0x0
0841 029f 100b | | Declare_Subprogram INIT_1008,For_Call
0843 BODY_0838:
0843 e402 | | Load 0x2,0x2
0844 0092 1bb8 | | Action Push_String_Extended,0x1bb8 ; "type frame = "
0846 e5ff | | Load 0x2,-0x1
0847 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0848 8212 | | Call 0x1,0x12
0849 01cc | | Execute Vector,Catenate
084a 0092 1ba9 | | Action Push_String_Extended,0x1ba9 ; "; "
084c 01cc | | Execute Vector,Catenate
084d 0092 1bb9 | | Action Push_String_Extended,0x1bb9 ; "data frame = "
084f 01cc | | Execute Vector,Catenate
0850 e5ff | | Load 0x2,-0x1
0851 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0852 8215 | | Call 0x1,0x15
0853 01cc | | Execute Vector,Catenate
0854 0092 1bba | | Action Push_String_Extended,0x1bba ; " "
0856 01cc | | Execute Vector,Catenate
0857 e04b | K | Load 0x0,0x4b
0858 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0859 00d1 | | Pop_Control Pop_Count_1
085a 0092 1bbb | | Action Push_String_Extended,0x1bbb ; "In_Rendezvous "
085c e5ff | | Load 0x2,-0x1
085d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
085e 8403 | | Call 0x2,0x3
085f 0092 1bbc | | Action Push_String_Extended,0x1bbc ; "In_Utility "
0861 e5ff | | Load 0x2,-0x1
0862 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0863 8403 | | Call 0x2,0x3
0864 0092 1bbd | | Action Push_String_Extended,0x1bbd ; "Has_Package "
0866 e5ff | | Load 0x2,-0x1
0867 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0868 8403 | | Call 0x2,0x3
0869 0092 1bbe | | Action Push_String_Extended,0x1bbe ; "Has_Children "
086b e5ff | | Load 0x2,-0x1
086c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
086d 8403 | | Call 0x2,0x3
086e e402 | | Load 0x2,0x2
086f e04b | K | Load 0x0,0x4b
0870 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0871 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0872 0000 0000 | | .BLANK 0000[0x6]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087d | } | .CONST 0x087d ; Address of begin
0879 0004 | | .CONST 0x0004 ; Address of exception handler
087a 0002 | | .CONST 0x0002 ; Number of locals
087b INIT_0878:
087b 029f 101b | | Declare_Subprogram INIT_1018,For_Call
087d BODY_0878:
087d 0092 1bbf | | Action Push_String_Extended,0x1bbf ; "enclosing frame = "
087f e5ff | | Load 0x2,-0x1
0880 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0881 e047 | G | Load 0x0,0x47
0882 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0883 180d | | Execute Package,Field_Execute,Field_Number 0xd
0884 01cc | | Execute Vector,Catenate
0885 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
0887 01cc | | Execute Vector,Catenate
0888 e5ff | | Load 0x2,-0x1
0889 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
088a 8221 | ! | Call 0x1,0x21
088b 01cc | | Execute Vector,Catenate
088c 0092 1bc1 | | Action Push_String_Extended,0x1bc1 ; "Auxiliary_Marked"
088e e5ff | | Load 0x2,-0x1
088f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0890 8402 | | Call 0x2,0x2
0891 01cc | | Execute Vector,Catenate
0892 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0893 0000 0000 | | .BLANK 0000[0x5]
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 089b | | .CONST 0x089b ; Address of begin
0899 0004 | | .CONST 0x0004 ; Address of exception handler
089a 0001 | | .CONST 0x0001 ; Number of locals
089b BODY_0898:
089b INIT_0898:
089b e5ff | | Load 0x2,-0x1
089c e5fe | | Load 0x2,-0x2
089d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
089e e047 | G | Load 0x0,0x47
089f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a0 180d | | Execute Package,Field_Execute,Field_Number 0xd
08a1 01cc | | Execute Vector,Catenate
08a2 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
08a4 01cc | | Execute Vector,Catenate
08a5 e5fe | | Load 0x2,-0x2
08a6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
08a7 8215 | | Call 0x1,0x15
08a8 01cc | | Execute Vector,Catenate
08a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08aa 0000 0000 | | .BLANK 0000[0x6]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b3 | | .CONST 0x08b3 ; Address of begin
08b1 0004 | | .CONST 0x0004 ; Address of exception handler
08b2 0001 | | .CONST 0x0001 ; Number of locals
08b3 BODY_08b0:
08b3 INIT_08b0:
08b3 e5ff | | Load 0x2,-0x1
08b4 e046 | F | Load 0x0,0x46
08b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08b7 0000 | | .XXX[0x1]
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08bb | | .CONST 0x08bb ; Address of begin
08b9 0004 | | .CONST 0x0004 ; Address of exception handler
08ba 0001 | | .CONST 0x0001 ; Number of locals
08bb BODY_08b8:
08bb INIT_08b8:
08bb e5ff | | Load 0x2,-0x1
08bc 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
08bd 8249 | I | Call 0x1,0x49
08be 0092 1bc2 | | Action Push_String_Extended,0x1bc2 ; "Forcing_Instruction"
08c0 e5ff | | Load 0x2,-0x1
08c1 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
08c2 8229 | ) | Call 0x1,0x29
08c3 0092 1bc3 | | Action Push_String_Extended,0x1bc3 ; "Breakpoint_Mask"
08c5 e5ff | | Load 0x2,-0x1
08c6 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
08c7 820f | | Call 0x1,0xf
08c8 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
08ca e5ff | | Load 0x2,-0x1
08cb 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
08cc 8221 | ! | Call 0x1,0x21
08cd 0092 1bc4 | | Action Push_String_Extended,0x1bc4 ; "Control_Extent"
08cf e5ff | | Load 0x2,-0x1
08d0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
08d1 e046 | F | Load 0x0,0x46
08d2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08d3 0092 1bc5 | | Action Push_String_Extended,0x1bc5 ; "Force_Breakpoint"
08d5 e5ff | | Load 0x2,-0x1
08d6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
08d7 e046 | F | Load 0x0,0x46
08d8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08d9 0092 1bc6 | | Action Push_String_Extended,0x1bc6 ; "Is_Wired"
08db e5ff | | Load 0x2,-0x1
08dc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
08dd e046 | F | Load 0x0,0x46
08de 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08df 0092 1bc7 | | Action Push_String_Extended,0x1bc7 ; "Is_Catalogued"
08e1 e5ff | | Load 0x2,-0x1
08e2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08e3 e046 | F | Load 0x0,0x46
08e4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08e5 0092 1bc8 | | Action Push_String_Extended,0x1bc8 ; "Queue_Not_Empty"
08e7 e5ff | | Load 0x2,-0x1
08e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08e9 e046 | F | Load 0x0,0x46
08ea 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08eb 0092 1bc9 | | Action Push_String_Extended,0x1bc9 ; "Queue_Allocated"
08ed e5ff | | Load 0x2,-0x1
08ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08ef e047 | G | Load 0x0,0x47
08f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08f1 180d | | Execute Package,Field_Execute,Field_Number 0xd
08f2 0092 1bca | | Action Push_String_Extended,0x1bca ; "Distributor"
08f4 e046 | F | Load 0x0,0x46
08f5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
08f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08f7 0000 | | .XXX[0x1]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 08fb | | .CONST 0x08fb ; Address of begin
08f9 0004 | | .CONST 0x0004 ; Address of exception handler
08fa 0001 | | .CONST 0x0001 ; Number of locals
08fb BODY_08f8:
08fb INIT_08f8:
08fb e5ff | | Load 0x2,-0x1
08fc e045 | E | Load 0x0,0x45
08fd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
08fe 025e | ^ | Execute Discrete,Convert
08ff 1c01 | | Execute_Immediate Run_Utility,0x1
0900 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0901 0000 0000 | | .BLANK 0000[0x7]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090b | | .CONST 0x090b ; Address of begin
0909 0004 | | .CONST 0x0004 ; Address of exception handler
090a 0001 | | .CONST 0x0001 ; Number of locals
090b BODY_0908:
090b INIT_0908:
090b e5ff | | Load 0x2,-0x1
090c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
090d 824b | K | Call 0x1,0x4b
090e 0092 1bcb | | Action Push_String_Extended,0x1bcb ; "Break_Cause"
0910 e5ff | | Load 0x2,-0x1
0911 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0912 821a | | Call 0x1,0x1a
0913 0092 1bcc | | Action Push_String_Extended,0x1bcc ; "Break_Address"
0915 e5ff | | Load 0x2,-0x1
0916 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0917 820f | | Call 0x1,0xf
0918 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
091a e5ff | | Load 0x2,-0x1
091b 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
091c 8229 | ) | Call 0x1,0x29
091d 0092 1bcd | | Action Push_String_Extended,0x1bcd ; "Restore_Enable"
091f e5ff | | Load 0x2,-0x1
0920 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0921 e047 | G | Load 0x0,0x47
0922 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0923 180d | | Execute Package,Field_Execute,Field_Number 0xd
0924 0092 1bce | | Action Push_String_Extended,0x1bce ; "Debugging_Scope"
0926 e046 | F | Load 0x0,0x46
0927 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0928 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0929 0000 0000 | | .BLANK 0000[0x7]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 0933 | 3 | .CONST 0x0933 ; Address of begin
0931 0004 | | .CONST 0x0004 ; Address of exception handler
0932 0001 | | .CONST 0x0001 ; Number of locals
0933 BODY_0930:
0933 INIT_0930:
0933 0092 1bcf | | Action Push_String_Extended,0x1bcf ; "debugging scope = "
0935 e5ff | | Load 0x2,-0x1
0936 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0937 e047 | G | Load 0x0,0x47
0938 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0939 180d | | Execute Package,Field_Execute,Field_Number 0xd
093a 01cc | | Execute Vector,Catenate
093b 0092 1bd0 | | Action Push_String_Extended,0x1bd0 ; "; restore enable = "
093d 01cc | | Execute Vector,Catenate
093e e5ff | | Load 0x2,-0x1
093f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0940 8229 | ) | Call 0x1,0x29
0941 01cc | | Execute Vector,Catenate
0942 e5ff | | Load 0x2,-0x1
0943 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0944 0092 1bd1 | | Action Push_String_Extended,0x1bd1 ; "; break address = "
0946 8225 | % | Call 0x1,0x25
0947 01cc | | Execute Vector,Catenate
0948 0092 1bd2 | | Action Push_String_Extended,0x1bd2 ; "; cause = "
094a 01cc | | Execute Vector,Catenate
094b e5ff | | Load 0x2,-0x1
094c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
094d 824b | K | Call 0x1,0x4b
094e 01cc | | Execute Vector,Catenate
094f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953 | S | .CONST 0x0953 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0001 | | .CONST 0x0001 ; Number of locals
0953 BODY_0950:
0953 INIT_0950:
0953 e5ff | | Load 0x2,-0x1
0954 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0955 e046 | F | Load 0x0,0x46
0956 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0957 0092 1bd3 | | Action Push_String_Extended,0x1bd3 ; "Node"
0959 e5ff | | Load 0x2,-0x1
095a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
095b e047 | G | Load 0x0,0x47
095c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
095d 180d | | Execute Package,Field_Execute,Field_Number 0xd
095e 0092 1bd4 | | Action Push_String_Extended,0x1bd4 ; "Name"
0960 e046 | F | Load 0x0,0x46
0961 180d | | Execute Package,Field_Execute,Field_Number 0xd
0962 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0963 0000 0000 | | .BLANK 0000[0x5]
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096b | k | .CONST 0x096b ; Address of begin
0969 0004 | | .CONST 0x0004 ; Address of exception handler
096a 0001 | | .CONST 0x0001 ; Number of locals
096b BODY_0968:
096b INIT_0968:
096b e5ff | | Load 0x2,-0x1
096c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
096d 824e | N | Call 0x1,0x4e
096e 0092 1bad | | Action Push_String_Extended,0x1bad ; "Val_Part"
0970 e5ff | | Load 0x2,-0x1
0971 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0972 820f | | Call 0x1,0xf
0973 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0975 e5ff | | Load 0x2,-0x1
0976 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0977 8217 | | Call 0x1,0x17
0978 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
097a e046 | F | Load 0x0,0x46
097b 180e | | Execute Package,Field_Execute,Field_Number 0xe
097c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
097d 0000 0000 | | .XXX[0x3]
097f 0000 | |
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983 | | .CONST 0x0983 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0001 | | .CONST 0x0001 ; Number of locals
0983 BODY_0980:
0983 INIT_0980:
0983 e5ff | | Load 0x2,-0x1
0984 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0985 820f | | Call 0x1,0xf
0986 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0988 e5ff | | Load 0x2,-0x1
0989 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
098a 8214 | | Call 0x1,0x14
098b 0092 1bd5 | | Action Push_String_Extended,0x1bd5 ; "Dependence_Site"
098d e046 | F | Load 0x0,0x46
098e 180d | | Execute Package,Field_Execute,Field_Number 0xd
098f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 0993 | | .CONST 0x0993 ; Address of begin
0991 0004 | | .CONST 0x0004 ; Address of exception handler
0992 0001 | | .CONST 0x0001 ; Number of locals
0993 BODY_0990:
0993 INIT_0990:
0993 e5ff | | Load 0x2,-0x1
0994 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0995 8222 | " | Call 0x1,0x22
0996 0092 1bd6 | | Action Push_String_Extended,0x1bd6 ; "Select_Site"
0998 e5ff | | Load 0x2,-0x1
0999 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
099a 8237 | 7 | Call 0x1,0x37
099b 0092 1bd7 | | Action Push_String_Extended,0x1bd7 ; "Field_Count"
099d e5ff | | Load 0x2,-0x1
099e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
099f 820f | | Call 0x1,0xf
09a0 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
09a2 e5ff | | Load 0x2,-0x1
09a3 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
09a4 8221 | ! | Call 0x1,0x21
09a5 0092 1bd8 | | Action Push_String_Extended,0x1bd8 ; "Select_Ref"
09a7 e5ff | | Load 0x2,-0x1
09a8 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
09a9 e046 | F | Load 0x0,0x46
09aa 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09ab 0092 1bd9 | | Action Push_String_Extended,0x1bd9 ; "Some_Choice_Open"
09ad e5ff | | Load 0x2,-0x1
09ae 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
09af e046 | F | Load 0x0,0x46
09b0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09b1 0092 1bda | | Action Push_String_Extended,0x1bda ; "Terminate_Is_Open"
09b3 e5ff | | Load 0x2,-0x1
09b4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
09b5 e046 | F | Load 0x0,0x46
09b6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09b7 0092 1bdb | | Action Push_String_Extended,0x1bdb ; "Has_Terminate"
09b9 e5ff | | Load 0x2,-0x1
09ba 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09bb e046 | F | Load 0x0,0x46
09bc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09bd 0092 1bdc | | Action Push_String_Extended,0x1bdc ; "Timed_Is_Open"
09bf e5ff | | Load 0x2,-0x1
09c0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
09c1 e046 | F | Load 0x0,0x46
09c2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09c3 0092 1bdd | | Action Push_String_Extended,0x1bdd ; "Has_Timed_Clause"
09c5 e5ff | | Load 0x2,-0x1
09c6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09c7 8237 | 7 | Call 0x1,0x37
09c8 0092 1bde | | Action Push_String_Extended,0x1bde ; "Last_Choice"
09ca e046 | F | Load 0x0,0x46
09cb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
09cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09cd 0000 0000 | | .XXX[0x3]
09cf 0000 | |
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3 | | .CONST 0x09d3 ; Address of begin
09d1 0004 | | .CONST 0x0004 ; Address of exception handler
09d2 0001 | | .CONST 0x0001 ; Number of locals
09d3 BODY_09d0:
09d3 INIT_09d0:
09d3 0092 1bdf | | Action Push_String_Extended,0x1bdf ; "(Of_Kind => "
09d5 e5ff | | Load 0x2,-0x1
09d6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09d7 820f | | Call 0x1,0xf
09d8 01cc | | Execute Vector,Catenate
09d9 0092 1be0 | | Action Push_String_Extended,0x1be0 ; ")"
09db 01cc | | Execute Vector,Catenate
09dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09dd 0000 0000 | | .XXX[0x3]
09df 0000 | |
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 e5ff | | Load 0x2,-0x1
09e4 e046 | F | Load 0x0,0x46
09e5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09e7 0000 | | .XXX[0x1]
09e8 ; --------------------------------------------------------------------------------------
09e8 ; SUBPROGRAM
09e8 ; --------------------------------------------------------------------------------------
09e8 09eb | | .CONST 0x09eb ; Address of begin
09e9 0004 | | .CONST 0x0004 ; Address of exception handler
09ea 0001 | | .CONST 0x0001 ; Number of locals
09eb BODY_09e8:
09eb INIT_09e8:
09eb e5ff | | Load 0x2,-0x1
09ec e046 | F | Load 0x0,0x46
09ed 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09ef 0000 | | .XXX[0x1]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3 | | .CONST 0x09f3 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0001 | | .CONST 0x0001 ; Number of locals
09f3 BODY_09f0:
09f3 INIT_09f0:
09f3 e5ff | | Load 0x2,-0x1
09f4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
09f5 8254 | T | Call 0x1,0x54
09f6 0092 1bad | | Action Push_String_Extended,0x1bad ; "Val_Part"
09f8 e5ff | | Load 0x2,-0x1
09f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09fa 820f | | Call 0x1,0xf
09fb 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
09fd e5ff | | Load 0x2,-0x1
09fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09ff 8253 | S | Call 0x1,0x53
0a00 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
0a02 e046 | F | Load 0x0,0x46
0a03 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a04 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a05 0000 0000 | | .XXX[0x3]
0a07 0000 | |
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a0b | | .CONST 0x0a0b ; Address of begin
0a09 0004 | | .CONST 0x0004 ; Address of exception handler
0a0a 0001 | | .CONST 0x0001 ; Number of locals
0a0b BODY_0a08:
0a0b INIT_0a08:
0a0b e5ff | | Load 0x2,-0x1
0a0c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a0d 8211 | | Call 0x1,0x11
0a0e 0092 1bad | | Action Push_String_Extended,0x1bad ; "Val_Part"
0a10 e5ff | | Load 0x2,-0x1
0a11 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a12 820f | | Call 0x1,0xf
0a13 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0a15 e5ff | | Load 0x2,-0x1
0a16 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a17 8217 | | Call 0x1,0x17
0a18 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
0a1a e046 | F | Load 0x0,0x46
0a1b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a1c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a1d 0000 0000 | | .XXX[0x3]
0a1f 0000 | |
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a23 | # | .CONST 0x0a23 ; Address of begin
0a21 0004 | | .CONST 0x0004 ; Address of exception handler
0a22 0001 | | .CONST 0x0001 ; Number of locals
0a23 BODY_0a20:
0a23 INIT_0a20:
0a23 e5ff | | Load 0x2,-0x1
0a24 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0a25 8221 | ! | Call 0x1,0x21
0a26 0092 1b8e | | Action Push_String_Extended,0x1b8e ; "Control_Offset"
0a28 e5ff | | Load 0x2,-0x1
0a29 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a2a e046 | F | Load 0x0,0x46
0a2b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a2c 0092 1bc1 | | Action Push_String_Extended,0x1bc1 ; "Auxiliary_Marked"
0a2e e5ff | | Load 0x2,-0x1
0a2f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a30 e047 | G | Load 0x0,0x47
0a31 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a32 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a33 0092 1b83 | | Action Push_String_Extended,0x1b83 ; "Stack"
0a35 e046 | F | Load 0x0,0x46
0a36 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a37 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a3b | ; | .CONST 0x0a3b ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0001 | | .CONST 0x0001 ; Number of locals
0a3b BODY_0a38:
0a3b INIT_0a38:
0a3b e5ff | | Load 0x2,-0x1
0a3c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0a3d 8221 | ! | Call 0x1,0x21
0a3e 0092 1be1 | | Action Push_String_Extended,0x1be1 ; "Ctl_Offset"
0a40 e5ff | | Load 0x2,-0x1
0a41 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a42 e046 | F | Load 0x0,0x46
0a43 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a44 0092 1be2 | | Action Push_String_Extended,0x1be2 ; "Is_Open"
0a46 e5ff | | Load 0x2,-0x1
0a47 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a48 e046 | F | Load 0x0,0x46
0a49 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a4a 0092 1be3 | | Action Push_String_Extended,0x1be3 ; "Is_Family"
0a4c e5ff | | Load 0x2,-0x1
0a4d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a4e e047 | G | Load 0x0,0x47
0a4f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a50 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a51 0092 1b83 | | Action Push_String_Extended,0x1b83 ; "Stack"
0a53 e046 | F | Load 0x0,0x46
0a54 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a55 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a56 0000 0000 | | .XXX[0x2]
0a58 ; --------------------------------------------------------------------------------------
0a58 ; SUBPROGRAM
0a58 ; --------------------------------------------------------------------------------------
0a58 0a5b | [ | .CONST 0x0a5b ; Address of begin
0a59 0004 | | .CONST 0x0004 ; Address of exception handler
0a5a 0001 | | .CONST 0x0001 ; Number of locals
0a5b BODY_0a58:
0a5b INIT_0a58:
0a5b e5ff | | Load 0x2,-0x1
0a5c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a5d 821c | | Call 0x1,0x1c
0a5e 0092 1be4 | | Action Push_String_Extended,0x1be4 ; "Frame_Lex_Level"
0a60 e5ff | | Load 0x2,-0x1
0a61 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0a62 821b | | Call 0x1,0x1b
0a63 0092 1be5 | | Action Push_String_Extended,0x1be5 ; "Return_Address"
0a65 e5ff | | Load 0x2,-0x1
0a66 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a67 820f | | Call 0x1,0xf
0a68 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0a6a e5ff | | Load 0x2,-0x1
0a6b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a6c 8257 | W | Call 0x1,0x57
0a6d 0092 1be6 | | Action Push_String_Extended,0x1be6 ; "Enclosing_Frame"
0a6f e046 | F | Load 0x0,0x46
0a70 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a71 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a72 0000 0000 | | .BLANK 0000[0x6]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7b | { | .CONST 0x0a7b ; Address of begin
0a79 0004 | | .CONST 0x0004 ; Address of exception handler
0a7a 0001 | | .CONST 0x0001 ; Number of locals
0a7b BODY_0a78:
0a7b INIT_0a78:
0a7b e5ff | | Load 0x2,-0x1
0a7c e046 | F | Load 0x0,0x46
0a7d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a7e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a7f 0000 | | .XXX[0x1]
0a80 ; --------------------------------------------------------------------------------------
0a80 ; SUBPROGRAM
0a80 ; --------------------------------------------------------------------------------------
0a80 0a83 | | .CONST 0x0a83 ; Address of begin
0a81 0004 | | .CONST 0x0004 ; Address of exception handler
0a82 0001 | | .CONST 0x0001 ; Number of locals
0a83 BODY_0a80:
0a83 INIT_0a80:
0a83 e5ff | | Load 0x2,-0x1
0a84 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0a85 8215 | | Call 0x1,0x15
0a86 0092 1be7 | | Action Push_String_Extended,0x1be7 ; "Data_Frame"
0a88 e5ff | | Load 0x2,-0x1
0a89 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0a8a 821e | | Call 0x1,0x1e
0a8b 0092 1be8 | | Action Push_String_Extended,0x1be8 ; "Block_Start"
0a8d e5ff | | Load 0x2,-0x1
0a8e 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
0a8f 8221 | ! | Call 0x1,0x21
0a90 0092 1be9 | | Action Push_String_Extended,0x1be9 ; "Dynamic_Link"
0a92 e5ff | | Load 0x2,-0x1
0a93 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0a94 820f | | Call 0x1,0xf
0a95 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0a97 e5ff | | Load 0x2,-0x1
0a98 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0a99 8212 | | Call 0x1,0x12
0a9a 0092 1bea | | Action Push_String_Extended,0x1bea ; "Type_Frame"
0a9c e5ff | | Load 0x2,-0x1
0a9d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a9e e046 | F | Load 0x0,0x46
0a9f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0aa0 0092 1beb | | Action Push_String_Extended,0x1beb ; "Has_Children"
0aa2 e5ff | | Load 0x2,-0x1
0aa3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0aa4 e046 | F | Load 0x0,0x46
0aa5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0aa6 0092 1bec | | Action Push_String_Extended,0x1bec ; "Has_Package"
0aa8 e5ff | | Load 0x2,-0x1
0aa9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0aaa e046 | F | Load 0x0,0x46
0aab 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0aac 0092 1bed | | Action Push_String_Extended,0x1bed ; "In_Utility"
0aae e5ff | | Load 0x2,-0x1
0aaf 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0ab0 e046 | F | Load 0x0,0x46
0ab1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ab2 0092 1bee | | Action Push_String_Extended,0x1bee ; "In_Rendezvous"
0ab4 e5ff | | Load 0x2,-0x1
0ab5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ab6 e046 | F | Load 0x0,0x46
0ab7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ab8 0092 1bef | | Action Push_String_Extended,0x1bef ; "Exports_Legal"
0aba e5ff | | Load 0x2,-0x1
0abb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0abc e047 | G | Load 0x0,0x47
0abd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0abe 180d | | Execute Package,Field_Execute,Field_Number 0xd
0abf 0092 1bf0 | | Action Push_String_Extended,0x1bf0 ; "Outer_Lex_Frame"
0ac1 e046 | F | Load 0x0,0x46
0ac2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ac3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ac4 0000 0000 | | .BLANK 0000[0x4]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb | | .CONST 0x0acb ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0001 | | .CONST 0x0001 ; Number of locals
0acb BODY_0ac8:
0acb INIT_0ac8:
0acb e5ff | | Load 0x2,-0x1
0acc 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0acd 821c | | Call 0x1,0x1c
0ace 0092 1b92 | | Action Push_String_Extended,0x1b92 ; "Lex_Level"
0ad0 e5ff | | Load 0x2,-0x1
0ad1 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0ad2 821a | | Call 0x1,0x1a
0ad3 0092 1b93 | | Action Push_String_Extended,0x1b93 ; "Subprog_Start"
0ad5 e5ff | | Load 0x2,-0x1
0ad6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0ad7 8220 | | Call 0x1,0x20
0ad8 0092 1ba2 | | Action Push_String_Extended,0x1ba2 ; "Entry_Name"
0ada e5ff | | Load 0x2,-0x1
0adb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0adc 820f | | Call 0x1,0xf
0add 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0adf e5ff | | Load 0x2,-0x1
0ae0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0ae1 8258 | X | Call 0x1,0x58
0ae2 0092 1b94 | | Action Push_String_Extended,0x1b94 ; "Declare_Frame"
0ae4 e046 | F | Load 0x0,0x46
0ae5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ae6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ae7 0000 | | .XXX[0x1]
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0aeb | | .CONST 0x0aeb ; Address of begin
0ae9 0004 | | .CONST 0x0004 ; Address of exception handler
0aea 0001 | | .CONST 0x0001 ; Number of locals
0aeb BODY_0ae8:
0aeb INIT_0ae8:
0aeb e5ff | | Load 0x2,-0x1
0aec 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0aed e047 | G | Load 0x0,0x47
0aee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aef 180f | | Execute Package,Field_Execute,Field_Number 0xf
0af0 0092 1bf1 | | Action Push_String_Extended,0x1bf1 ; "Partner_Charge_Vpid"
0af2 e5ff | | Load 0x2,-0x1
0af3 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0af4 e047 | G | Load 0x0,0x47
0af5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0af6 180d | | Execute Package,Field_Execute,Field_Number 0xd
0af7 0092 1bf2 | | Action Push_String_Extended,0x1bf2 ; "Partner_Name"
0af9 e5ff | | Load 0x2,-0x1
0afa 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0afb 820f | | Call 0x1,0xf
0afc 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0afe e5ff | | Load 0x2,-0x1
0aff 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0b00 8233 | 3 | Call 0x1,0x33
0b01 0092 1bf3 | | Action Push_String_Extended,0x1bf3 ; "Total_Params"
0b03 e5ff | | Load 0x2,-0x1
0b04 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0b05 e046 | F | Load 0x0,0x46
0b06 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b07 0092 1bf4 | | Action Push_String_Extended,0x1bf4 ; "In_Select"
0b09 e5ff | | Load 0x2,-0x1
0b0a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b0b 822b | + | Call 0x1,0x2b
0b0c 0092 1bf5 | | Action Push_String_Extended,0x1bf5 ; "Return_Priority"
0b0e e5ff | | Load 0x2,-0x1
0b0f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b10 e047 | G | Load 0x0,0x47
0b11 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b12 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b13 0092 1bf6 | | Action Push_String_Extended,0x1bf6 ; "Return_Charge_Vpid"
0b15 e5ff | | Load 0x2,-0x1
0b16 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b17 822f | / | Call 0x1,0x2f
0b18 0092 1bf7 | | Action Push_String_Extended,0x1bf7 ; "Select_Choice"
0b1a e046 | F | Load 0x0,0x46
0b1b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b1c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b1d 0000 0000 | | .XXX[0x3]
0b1f 0000 | |
0b20 ; --------------------------------------------------------------------------------------
0b20 ; SUBPROGRAM
0b20 ; --------------------------------------------------------------------------------------
0b20 0b23 | # | .CONST 0x0b23 ; Address of begin
0b21 0004 | | .CONST 0x0004 ; Address of exception handler
0b22 0001 | | .CONST 0x0001 ; Number of locals
0b23 BODY_0b20:
0b23 INIT_0b20:
0b23 e5ff | | Load 0x2,-0x1
0b24 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0b25 8215 | | Call 0x1,0x15
0b26 0092 1bf8 | | Action Push_String_Extended,0x1bf8 ; "Data_Stack_Mark"
0b28 e5ff | | Load 0x2,-0x1
0b29 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0b2a 820f | | Call 0x1,0xf
0b2b 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0b2d e5ff | | Load 0x2,-0x1
0b2e 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0b2f 8212 | | Call 0x1,0x12
0b30 0092 1bf9 | | Action Push_String_Extended,0x1bf9 ; "Type_Stack_Mark"
0b32 e5ff | | Load 0x2,-0x1
0b33 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0b34 e046 | F | Load 0x0,0x46
0b35 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b36 0092 1bfa | | Action Push_String_Extended,0x1bfa ; "Appending_Fields"
0b38 e5ff | | Load 0x2,-0x1
0b39 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0b3a e046 | F | Load 0x0,0x46
0b3b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b3c 0092 1bfb | | Action Push_String_Extended,0x1bfb ; "Data_Mark_Used"
0b3e e5ff | | Load 0x2,-0x1
0b3f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b40 e046 | F | Load 0x0,0x46
0b41 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b42 0092 1bfc | | Action Push_String_Extended,0x1bfc ; "Type_Mark_Used"
0b44 e5ff | | Load 0x2,-0x1
0b45 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b46 e046 | F | Load 0x0,0x46
0b47 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b48 0092 1bfd | | Action Push_String_Extended,0x1bfd ; "Has_Prior_Mark"
0b4a e5ff | | Load 0x2,-0x1
0b4b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b4c e046 | F | Load 0x0,0x46
0b4d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b4e 0092 1bfe | | Action Push_String_Extended,0x1bfe ; "In_Export_Frame"
0b50 e046 | F | Load 0x0,0x46
0b51 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b52 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b53 0000 0000 | | .BLANK 0000[0x5]
0b58 ; --------------------------------------------------------------------------------------
0b58 ; SUBPROGRAM
0b58 ; --------------------------------------------------------------------------------------
0b58 0b68 | h | .CONST 0x0b68 ; Address of begin
0b59 0004 | | .CONST 0x0004 ; Address of exception handler
0b5a 0002 | | .CONST 0x0002 ; Number of locals
0b5b INIT_0b58:
0b5b e300 | | Load 0x1,0x100
0b5c 0322 | " | Declare_Variable Record
0b5d e5ff | | Load 0x2,-0x1
0b5e e301 | | Load 0x1,0x101
0b5f e302 | | Load 0x1,0x102
0b60 4903 |I | Short_Literal 0x103
0b61 4801 |H | Short_Literal 0x1
0b62 0099 | | Action Reference_Dynamic
0b63 e001 | | Load 0x0,0x1
0b64 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b65 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b66 e402 | | Load 0x2,0x2
0b67 017d | } | Execute Record,Structure_Write
0b68 BODY_0b58:
0b68 00d8 | | Load_Top At_Offset_0
0b69 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b6a e046 | F | Load 0x0,0x46
0b6b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b6c 0092 1bff | | Action Push_String_Extended,0x1bff ; "Constrained"
0b6e e402 | | Load 0x2,0x2
0b6f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b70 e046 | F | Load 0x0,0x46
0b71 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b72 0092 1c00 | | Action Push_String_Extended,0x1c00 ; "Global_Only"
0b74 e402 | | Load 0x2,0x2
0b75 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b76 e046 | F | Load 0x0,0x46
0b77 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b78 0092 1c01 | | Action Push_String_Extended,0x1c01 ; "Database_Index"
0b7a e046 | F | Load 0x0,0x46
0b7b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b7c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b7d 0000 0000 | | .XXX[0x3]
0b7f 0000 | |
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b98 | | .CONST 0x0b98 ; Address of begin
0b81 0004 | | .CONST 0x0004 ; Address of exception handler
0b82 0004 | | .CONST 0x0004 ; Number of locals
0b83 INIT_0b80:
0b83 e300 | | Load 0x1,0x100
0b84 0322 | " | Declare_Variable Record
0b85 e5ff | | Load 0x2,-0x1
0b86 e301 | | Load 0x1,0x101
0b87 e302 | | Load 0x1,0x102
0b88 4903 |I | Short_Literal 0x103
0b89 4801 |H | Short_Literal 0x1
0b8a 0099 | | Action Reference_Dynamic
0b8b e001 | | Load 0x0,0x1
0b8c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b8d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b8e e402 | | Load 0x2,0x2
0b8f 017d | } | Execute Record,Structure_Write
0b90 483c |H< | Short_Literal 0x3c
0b91 e04b | K | Load 0x0,0x4b
0b92 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b93 1c08 | | Execute_Immediate Run_Utility,0x8
0b94 00d8 | | Load_Top At_Offset_0
0b95 1c00 | | Execute_Immediate Run_Utility,0x0
0b96 029f 102b | +| Declare_Subprogram INIT_1028,For_Call
0b98 BODY_0b80:
0b98 0092 1c02 | | Action Push_String_Extended,0x1c02 ; "database index = "
0b9a e402 | | Load 0x2,0x2
0b9b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b9c e046 | F | Load 0x0,0x46
0b9d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b9e 01cc | | Execute Vector,Catenate
0b9f 8404 | | Call 0x2,0x4
0ba0 0092 1c03 | | Action Push_String_Extended,0x1c03 ; "; mode = "
0ba2 8404 | | Call 0x2,0x4
0ba3 e402 | | Load 0x2,0x2
0ba4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ba5 6804 |h | Jump_Zero 0xbaa
0ba6 0092 1c04 | | Action Push_String_Extended,0x1c04 ; " GLOBAL"
0ba8 8404 | | Call 0x2,0x4
0ba9 7803 |x | Jump 0xbad
0baa 0092 1c05 | | Action Push_String_Extended,0x1c05 ; " LOCAL"
0bac 8404 | | Call 0x2,0x4
0bad e402 | | Load 0x2,0x2
0bae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0baf 6804 |h | Jump_Zero 0xbb4
0bb0 0092 1c06 | | Action Push_String_Extended,0x1c06 ; " CONSTRAINED"
0bb2 8404 | | Call 0x2,0x4
0bb3 7803 |x | Jump 0xbb7
0bb4 0092 1c07 | | Action Push_String_Extended,0x1c07 ; " UNCONSTRAINED"
0bb6 8404 | | Call 0x2,0x4
0bb7 e403 | | Load 0x2,0x3
0bb8 e04b | K | Load 0x0,0x4b
0bb9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bbb 0000 0000 | | .BLANK 0000[0x5]
0bc0 ; --------------------------------------------------------------------------------------
0bc0 ; SUBPROGRAM
0bc0 ; --------------------------------------------------------------------------------------
0bc0 0bcb | | .CONST 0x0bcb ; Address of begin
0bc1 0004 | | .CONST 0x0004 ; Address of exception handler
0bc2 0003 | | .CONST 0x0003 ; Number of locals
0bc3 INIT_0bc0:
0bc3 48b4 |H | Short_Literal 0xb4
0bc4 e04b | K | Load 0x0,0x4b
0bc5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bc6 1c08 | | Execute_Immediate Run_Utility,0x8
0bc7 00d8 | | Load_Top At_Offset_0
0bc8 1c00 | | Execute_Immediate Run_Utility,0x0
0bc9 029f 1033 | 3| Declare_Subprogram INIT_1030,For_Call
0bcb BODY_0bc0:
0bcb 0092 1c08 | | Action Push_String_Extended,0x1c08 ; "In_Entry_Call "
0bcd e5ff | | Load 0x2,-0x1
0bce 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0bcf 8403 | | Call 0x2,0x3
0bd0 e402 | | Load 0x2,0x2
0bd1 0092 1c09 | | Action Push_String_Extended,0x1c09 ; "debugging state = ("
0bd3 e5ff | | Load 0x2,-0x1
0bd4 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0bd5 8307 | | Call 0x1,0x107
0bd6 01cc | | Execute Vector,Catenate
0bd7 0092 1be0 | | Action Push_String_Extended,0x1be0 ; ")"
0bd9 01cc | | Execute Vector,Catenate
0bda e04b | K | Load 0x0,0x4b
0bdb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0bdc 00d1 | | Pop_Control Pop_Count_1
0bdd e5ff | | Load 0x2,-0x1
0bde 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0bdf 0c01 | | Execute_Immediate Greater_Equal,0x1
0be0 6810 |h | Jump_Zero 0xbf1
0be1 e402 | | Load 0x2,0x2
0be2 0092 1c0a | | Action Push_String_Extended,0x1c0a ; " In_Critical_Region "
0be4 e04b | K | Load 0x0,0x4b
0be5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0be6 00d1 | | Pop_Control Pop_Count_1
0be7 e5ff | | Load 0x2,-0x1
0be8 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0be9 680c |h | Jump_Zero 0xbf6
0bea e402 | | Load 0x2,0x2
0beb 0092 1c0b | | Action Push_String_Extended,0x1c0b ; "and Aborted"
0bed e04b | K | Load 0x0,0x4b
0bee 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0bef 00d1 | | Pop_Control Pop_Count_1
0bf0 7805 |x | Jump 0xbf6
0bf1 0092 1c0c | | Action Push_String_Extended,0x1c0c ; " Aborted_Critical_Region"
0bf3 e5ff | | Load 0x2,-0x1
0bf4 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0bf5 8403 | | Call 0x2,0x3
0bf6 e402 | | Load 0x2,0x2
0bf7 e04b | K | Load 0x0,0x4b
0bf8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bf9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bfa 0000 0000 | | .BLANK 0000[0x6]
0c00 ; --------------------------------------------------------------------------------------
0c00 ; SUBPROGRAM
0c00 ; --------------------------------------------------------------------------------------
0c00 0c03 | | .CONST 0x0c03 ; Address of begin
0c01 0004 | | .CONST 0x0004 ; Address of exception handler
0c02 0001 | | .CONST 0x0001 ; Number of locals
0c03 BODY_0c00:
0c03 INIT_0c00:
0c03 e5ff | | Load 0x2,-0x1
0c04 e046 | F | Load 0x0,0x46
0c05 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c06 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c07 0000 | | .XXX[0x1]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c0b | | .CONST 0x0c0b ; Address of begin
0c09 0004 | | .CONST 0x0004 ; Address of exception handler
0c0a 0001 | | .CONST 0x0001 ; Number of locals
0c0b BODY_0c08:
0c0b INIT_0c08:
0c0b e5ff | | Load 0x2,-0x1
0c0c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0c0d 824e | N | Call 0x1,0x4e
0c0e 0092 1c0d | | Action Push_String_Extended,0x1c0d ; "For_Module"
0c10 e5ff | | Load 0x2,-0x1
0c11 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c12 820f | | Call 0x1,0xf
0c13 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0c15 e5ff | | Load 0x2,-0x1
0c16 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c17 8309 | | Call 0x1,0x109
0c18 0092 1c0e | | Action Push_String_Extended,0x1c0e ; "Permitted"
0c1a e046 | F | Load 0x0,0x46
0c1b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c1c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c1d 0000 0000 | | .XXX[0x3]
0c1f 0000 | |
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c23 | # | .CONST 0x0c23 ; Address of begin
0c21 0004 | | .CONST 0x0004 ; Address of exception handler
0c22 0001 | | .CONST 0x0001 ; Number of locals
0c23 BODY_0c20:
0c23 INIT_0c20:
0c23 e5ff | | Load 0x2,-0x1
0c24 0092 1c0f | | Action Push_String_Extended,0x1c0f ; " @ "
0c26 01cc | | Execute Vector,Catenate
0c27 e5fe | | Load 0x2,-0x2
0c28 e047 | G | Load 0x0,0x47
0c29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c2a 180d | | Execute Package,Field_Execute,Field_Number 0xd
0c2b 01cc | | Execute Vector,Catenate
0c2c 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
0c2e 01cc | | Execute Vector,Catenate
0c2f e5fd | | Load 0x2,-0x3
0c30 8212 | | Call 0x1,0x12
0c31 01cc | | Execute Vector,Catenate
0c32 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c33 0000 0000 | | .BLANK 0000[0x5]
0c38 ; --------------------------------------------------------------------------------------
0c38 ; SUBPROGRAM
0c38 ; --------------------------------------------------------------------------------------
0c38 0c3b | ; | .CONST 0x0c3b ; Address of begin
0c39 0004 | | .CONST 0x0004 ; Address of exception handler
0c3a 0001 | | .CONST 0x0001 ; Number of locals
0c3b BODY_0c38:
0c3b INIT_0c38:
0c3b e5ff | | Load 0x2,-0x1
0c3c 0092 1c0f | | Action Push_String_Extended,0x1c0f ; " @ "
0c3e 01cc | | Execute Vector,Catenate
0c3f e5fe | | Load 0x2,-0x2
0c40 e047 | G | Load 0x0,0x47
0c41 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c42 180d | | Execute Package,Field_Execute,Field_Number 0xd
0c43 01cc | | Execute Vector,Catenate
0c44 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
0c46 01cc | | Execute Vector,Catenate
0c47 e5fd | | Load 0x2,-0x3
0c48 8215 | | Call 0x1,0x15
0c49 01cc | | Execute Vector,Catenate
0c4a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0c4b 0000 0000 | | .BLANK 0000[0x5]
0c50 ; --------------------------------------------------------------------------------------
0c50 ; SUBPROGRAM
0c50 ; --------------------------------------------------------------------------------------
0c50 0c53 | S | .CONST 0x0c53 ; Address of begin
0c51 0004 | | .CONST 0x0004 ; Address of exception handler
0c52 0001 | | .CONST 0x0001 ; Number of locals
0c53 BODY_0c50:
0c53 INIT_0c50:
0c53 e5ff | | Load 0x2,-0x1
0c54 e002 | | Load 0x0,0x2
0c55 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0c56 025e | ^ | Execute Discrete,Convert
0c57 1c01 | | Execute_Immediate Run_Utility,0x1
0c58 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c59 0000 0000 | | .BLANK 0000[0x7]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0004 | | .CONST 0x0004 ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 e5ff | | Load 0x2,-0x1
0c64 e002 | | Load 0x0,0x2
0c65 1b46 | F | Execute Package,Field_Read,Field_Number 0x46
0c66 025e | ^ | Execute Discrete,Convert
0c67 1c01 | | Execute_Immediate Run_Utility,0x1
0c68 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c69 0000 0000 | | .BLANK 0000[0x7]
0c70 ; --------------------------------------------------------------------------------------
0c70 ; SUBPROGRAM
0c70 ; --------------------------------------------------------------------------------------
0c70 0c73 | s | .CONST 0x0c73 ; Address of begin
0c71 0004 | | .CONST 0x0004 ; Address of exception handler
0c72 0001 | | .CONST 0x0001 ; Number of locals
0c73 BODY_0c70:
0c73 INIT_0c70:
0c73 e5ff | | Load 0x2,-0x1
0c74 e045 | E | Load 0x0,0x45
0c75 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0c76 025e | ^ | Execute Discrete,Convert
0c77 1c01 | | Execute_Immediate Run_Utility,0x1
0c78 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c79 0000 0000 | | .BLANK 0000[0x7]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c83 | | .CONST 0x0c83 ; Address of begin
0c81 0004 | | .CONST 0x0004 ; Address of exception handler
0c82 0001 | | .CONST 0x0001 ; Number of locals
0c83 BODY_0c80:
0c83 INIT_0c80:
0c83 e5ff | | Load 0x2,-0x1
0c84 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0c85 822b | + | Call 0x1,0x2b
0c86 0092 1c10 | | Action Push_String_Extended,0x1c10 ; "Base_Priority"
0c88 e5ff | | Load 0x2,-0x1
0c89 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0c8a e046 | F | Load 0x0,0x46
0c8b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c8c 0092 1c11 | | Action Push_String_Extended,0x1c11 ; "Fixed_Priority"
0c8e e5ff | | Load 0x2,-0x1
0c8f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0c90 e046 | F | Load 0x0,0x46
0c91 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c92 0092 1c12 | | Action Push_String_Extended,0x1c12 ; "Last_Job_Priority"
0c94 e5ff | | Load 0x2,-0x1
0c95 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0c96 e046 | F | Load 0x0,0x46
0c97 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c98 0092 1c13 | | Action Push_String_Extended,0x1c13 ; "Aborted_In_Critical_Region"
0c9a e5ff | | Load 0x2,-0x1
0c9b 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0c9c e046 | F | Load 0x0,0x46
0c9d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c9e 0092 1c14 | | Action Push_String_Extended,0x1c14 ; "Critical_Region_Count"
0ca0 e5ff | | Load 0x2,-0x1
0ca1 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0ca2 8306 | | Call 0x1,0x106
0ca3 0092 1c15 | | Action Push_String_Extended,0x1c15 ; "Debugging_State"
0ca5 e5ff | | Load 0x2,-0x1
0ca6 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0ca7 e047 | G | Load 0x0,0x47
0ca8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ca9 180d | | Execute Package,Field_Execute,Field_Number 0xd
0caa 0092 1c16 | | Action Push_String_Extended,0x1c16 ; "Associated_Heap"
0cac e5ff | | Load 0x2,-0x1
0cad 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cae 820f | | Call 0x1,0xf
0caf 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0cb1 e5ff | | Load 0x2,-0x1
0cb2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0cb3 e046 | F | Load 0x0,0x46
0cb4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0cb5 0092 1c17 | | Action Push_String_Extended,0x1c17 ; "In_Entry_Call"
0cb7 e5ff | | Load 0x2,-0x1
0cb8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cb9 822e | . | Call 0x1,0x2e
0cba 0092 1c18 | | Action Push_String_Extended,0x1c18 ; "Mode"
0cbc e5ff | | Load 0x2,-0x1
0cbd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cbe 822c | , | Call 0x1,0x2c
0cbf 0092 1c19 | | Action Push_String_Extended,0x1c19 ; "Delay_Time"
0cc1 e046 | F | Load 0x0,0x46
0cc2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cc3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0cc4 0000 0000 | | .BLANK 0000[0x4]
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; SUBPROGRAM
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0cd5 | | .CONST 0x0cd5 ; Address of begin
0cc9 0004 | | .CONST 0x0004 ; Address of exception handler
0cca 0004 | | .CONST 0x0004 ; Number of locals
0ccb INIT_0cc8:
0ccb 6080 |` | Indirect_Literal Discrete,0xd4c,{0x00000000, 0x00000400}
0ccc e04b | K | Load 0x0,0x4b
0ccd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0cce 1c08 | | Execute_Immediate Run_Utility,0x8
0ccf 00d8 | | Load_Top At_Offset_0
0cd0 1c00 | | Execute_Immediate Run_Utility,0x0
0cd1 029f 1043 | C| Declare_Subprogram INIT_1040,For_Call
0cd3 029f 1053 | S| Declare_Subprogram INIT_1050,For_Call
0cd5 BODY_0cc8:
0cd5 e402 | | Load 0x2,0x2
0cd6 0092 1c1a | | Action Push_String_Extended,0x1c1a ; "(Current_Slice => "
0cd8 e5ff | | Load 0x2,-0x1
0cd9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cda 825a | Z | Call 0x1,0x5a
0cdb 01cc | | Execute Vector,Catenate
0cdc e04b | K | Load 0x0,0x4b
0cdd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0cde 00d1 | | Pop_Control Pop_Count_1
0cdf e5ff | | Load 0x2,-0x1
0ce0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ce1 0092 1c1b | | Action Push_String_Extended,0x1c1b ; "Caller_Is_Waiting"
0ce3 8404 | | Call 0x2,0x4
0ce4 e5ff | | Load 0x2,-0x1
0ce5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0ce6 0092 1c1c | | Action Push_String_Extended,0x1c1c ; "Has_Been_Rousted"
0ce8 8404 | | Call 0x2,0x4
0ce9 e5ff | | Load 0x2,-0x1
0cea 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0ceb 0092 1c1d | | Action Push_String_Extended,0x1c1d ; "Held_By_Scheduler"
0ced 8404 | | Call 0x2,0x4
0cee e5ff | | Load 0x2,-0x1
0cef 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cf0 6806 |h | Jump_Zero 0xcf7
0cf1 e5ff | | Load 0x2,-0x1
0cf2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cf3 830d | | Call 0x1,0x10d
0cf4 0092 1c1e | | Action Push_String_Extended,0x1c1e ; "Memory_Condition"
0cf6 8403 | | Call 0x2,0x3
0cf7 e5ff | | Load 0x2,-0x1
0cf8 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0cf9 830f | | Call 0x1,0x10f
0cfa 0092 1c1f | | Action Push_String_Extended,0x1c1f ; "Block_Condition"
0cfc 8403 | | Call 0x2,0x3
0cfd e5ff | | Load 0x2,-0x1
0cfe 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0cff 830e | | Call 0x1,0x10e
0d00 0092 1c20 | | Action Push_String_Extended,0x1c20 ; "Current_Mode"
0d02 8403 | | Call 0x2,0x3
0d03 e5ff | | Load 0x2,-0x1
0d04 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0d05 822b | + | Call 0x1,0x2b
0d06 0092 1c21 | !| Action Push_String_Extended,0x1c21 ; "Current_Priority"
0d08 8403 | | Call 0x2,0x3
0d09 e5ff | | Load 0x2,-0x1
0d0a 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0d0b 0092 1c22 | "| Action Push_String_Extended,0x1c22 ; "Caller_Must_Wait"
0d0d 8404 | | Call 0x2,0x4
0d0e e5ff | | Load 0x2,-0x1
0d0f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0d10 0092 1c23 | #| Action Push_String_Extended,0x1c23 ; "Module_Is_Task"
0d12 8404 | | Call 0x2,0x4
0d13 e5ff | | Load 0x2,-0x1
0d14 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0d15 0092 1c24 | $| Action Push_String_Extended,0x1c24 ; "Module_Aborted"
0d17 8404 | | Call 0x2,0x4
0d18 e5ff | | Load 0x2,-0x1
0d19 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0d1a 0092 1c25 | %| Action Push_String_Extended,0x1c25 ; "Breakpoint_On"
0d1c 8404 | | Call 0x2,0x4
0d1d e5ff | | Load 0x2,-0x1
0d1e 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
0d1f 0092 1c26 | &| Action Push_String_Extended,0x1c26 ; "Intrainstruction"
0d21 8404 | | Call 0x2,0x4
0d22 e5ff | | Load 0x2,-0x1
0d23 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0d24 8221 | ! | Call 0x1,0x21
0d25 0092 1c27 | '| Action Push_String_Extended,0x1c27 ; "Control_Tos"
0d27 8403 | | Call 0x2,0x3
0d28 e5ff | | Load 0x2,-0x1
0d29 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0d2a 820f | | Call 0x1,0xf
0d2b 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0d2d 8403 | | Call 0x2,0x3
0d2e e5ff | | Load 0x2,-0x1
0d2f 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
0d30 e047 | G | Load 0x0,0x47
0d31 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d32 180f | | Execute Package,Field_Execute,Field_Number 0xf
0d33 0092 1c28 | (| Action Push_String_Extended,0x1c28 ; "Job_For_Charging"
0d35 8403 | | Call 0x2,0x3
0d36 e5ff | | Load 0x2,-0x1
0d37 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10
0d38 821a | | Call 0x1,0x1a
0d39 0092 1c29 | )| Action Push_String_Extended,0x1c29 ; "Program_Counter"
0d3b 8403 | | Call 0x2,0x3
0d3c e5ff | | Load 0x2,-0x1
0d3d 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0d3e 821c | | Call 0x1,0x1c
0d3f 0092 1c2a | *| Action Push_String_Extended,0x1c2a ; "Executing_Lex"
0d41 8403 | | Call 0x2,0x3
0d42 e402 | | Load 0x2,0x2
0d43 0092 1be0 | | Action Push_String_Extended,0x1be0 ; ")"
0d45 e04b | K | Load 0x0,0x4b
0d46 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d47 00d1 | | Pop_Control Pop_Count_1
0d48 e402 | | Load 0x2,0x2
0d49 e04b | K | Load 0x0,0x4b
0d4a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d4b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d4c 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
0d50 ; --------------------------------------------------------------------------------------
0d50 ; SUBPROGRAM
0d50 ; --------------------------------------------------------------------------------------
0d50 0d5d | ] | .CONST 0x0d5d ; Address of begin
0d51 0004 | | .CONST 0x0004 ; Address of exception handler
0d52 0004 | | .CONST 0x0004 ; Number of locals
0d53 INIT_0d50:
0d53 4882 |H | Short_Literal 0x82
0d54 e04b | K | Load 0x0,0x4b
0d55 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d56 1c08 | | Execute_Immediate Run_Utility,0x8
0d57 00d8 | | Load_Top At_Offset_0
0d58 1c00 | | Execute_Immediate Run_Utility,0x0
0d59 029f 1063 | c| Declare_Subprogram INIT_1060,For_Call
0d5b 029f 1073 | s| Declare_Subprogram INIT_1070,For_Call
0d5d BODY_0d50:
0d5d e402 | | Load 0x2,0x2
0d5e 0092 1c2b | +| Action Push_String_Extended,0x1c2b ; "(Queue_Successor => "
0d60 e5ff | | Load 0x2,-0x1
0d61 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d62 e047 | G | Load 0x0,0x47
0d63 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d64 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d65 01cc | | Execute Vector,Catenate
0d66 e04b | K | Load 0x0,0x4b
0d67 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d68 00d1 | | Pop_Control Pop_Count_1
0d69 e5ff | | Load 0x2,-0x1
0d6a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0d6b 0092 1c2c | ,| Action Push_String_Extended,0x1c2c ; "Has_Micro_Context"
0d6d 8404 | | Call 0x2,0x4
0d6e e5ff | | Load 0x2,-0x1
0d6f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0d70 8212 | | Call 0x1,0x12
0d71 0092 1c2d | -| Action Push_String_Extended,0x1c2d ; "Type_Tos"
0d73 8403 | | Call 0x2,0x3
0d74 e5ff | | Load 0x2,-0x1
0d75 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0d76 820f | | Call 0x1,0xf
0d77 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0d79 8403 | | Call 0x2,0x3
0d7a e5ff | | Load 0x2,-0x1
0d7b 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
0d7c 8221 | ! | Call 0x1,0x21
0d7d 0092 1c2e | .| Action Push_String_Extended,0x1c2e ; "Current_Frame"
0d7f 8403 | | Call 0x2,0x3
0d80 e5ff | | Load 0x2,-0x1
0d81 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0d82 8215 | | Call 0x1,0x15
0d83 0092 1c2f | /| Action Push_String_Extended,0x1c2f ; "Data_Tos"
0d85 8403 | | Call 0x2,0x3
0d86 e402 | | Load 0x2,0x2
0d87 0092 1be0 | | Action Push_String_Extended,0x1be0 ; ")"
0d89 e04b | K | Load 0x0,0x4b
0d8a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d8b 00d1 | | Pop_Control Pop_Count_1
0d8c e402 | | Load 0x2,0x2
0d8d e04b | K | Load 0x0,0x4b
0d8e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d8f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d90 ; --------------------------------------------------------------------------------------
0d90 ; SUBPROGRAM
0d90 ; --------------------------------------------------------------------------------------
0d90 0d93 | | .CONST 0x0d93 ; Address of begin
0d91 0004 | | .CONST 0x0004 ; Address of exception handler
0d92 0001 | | .CONST 0x0001 ; Number of locals
0d93 BODY_0d90:
0d93 INIT_0d90:
0d93 e5ff | | Load 0x2,-0x1
0d94 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0d95 8215 | | Call 0x1,0x15
0d96 0092 1c30 | 0| Action Push_String_Extended,0x1c30 ; "Data_Extent"
0d98 e5ff | | Load 0x2,-0x1
0d99 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0d9a 8213 | | Call 0x1,0x13
0d9b 0092 1c31 | 1| Action Push_String_Extended,0x1c31 ; "Queue_Extent"
0d9d e5ff | | Load 0x2,-0x1
0d9e 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0d9f 822d | - | Call 0x1,0x2d
0da0 0092 1c32 | 2| Action Push_String_Extended,0x1c32 ; "Space_Mgr_Retries"
0da2 e5ff | | Load 0x2,-0x1
0da3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0da4 820f | | Call 0x1,0xf
0da5 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0da7 e5ff | | Load 0x2,-0x1
0da8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0da9 8212 | | Call 0x1,0x12
0daa 0092 1c33 | 3| Action Push_String_Extended,0x1c33 ; "Type_Extent"
0dac e5ff | | Load 0x2,-0x1
0dad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0dae e047 | G | Load 0x0,0x47
0daf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0db0 180d | | Execute Package,Field_Execute,Field_Number 0xd
0db1 0092 1c34 | 4| Action Push_String_Extended,0x1c34 ; "Breakpoint_Scope"
0db3 e046 | F | Load 0x0,0x46
0db4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0db5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0db6 0000 0000 | | .XXX[0x2]
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dbd | | .CONST 0x0dbd ; Address of begin
0db9 0004 | | .CONST 0x0004 ; Address of exception handler
0dba 0002 | | .CONST 0x0002 ; Number of locals
0dbb INIT_0db8:
0dbb 029f 1083 | | Declare_Subprogram INIT_1080,For_Call
0dbd BODY_0db8:
0dbd e5ff | | Load 0x2,-0x1
0dbe 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0dbf 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0dc0 e5ff | | Load 0x2,-0x1
0dc1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0dc2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0dc3 0092 1c35 | 5| Action Push_String_Extended,0x1c35 ; "value"
0dc5 830c | | Call 0x1,0x10c
0dc6 e5ff | | Load 0x2,-0x1
0dc7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0dc8 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0dc9 e5ff | | Load 0x2,-0x1
0dca 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0dcb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0dcc 0092 1c36 | 6| Action Push_String_Extended,0x1c36 ; "; type"
0dce 830b | | Call 0x1,0x10b
0dcf 01cc | | Execute Vector,Catenate
0dd0 8402 | | Call 0x2,0x2
0dd1 01cc | | Execute Vector,Catenate
0dd2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0dd3 0000 0000 | | .BLANK 0000[0x5]
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0ddb | | .CONST 0x0ddb ; Address of begin
0dd9 0004 | | .CONST 0x0004 ; Address of exception handler
0dda 0001 | | .CONST 0x0001 ; Number of locals
0ddb BODY_0dd8:
0ddb INIT_0dd8:
0ddb e5ff | | Load 0x2,-0x1
0ddc e5fe | | Load 0x2,-0x2
0ddd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0dde e047 | G | Load 0x0,0x47
0ddf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0de0 180d | | Execute Package,Field_Execute,Field_Number 0xd
0de1 01cc | | Execute Vector,Catenate
0de2 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
0de4 01cc | | Execute Vector,Catenate
0de5 e5fe | | Load 0x2,-0x2
0de6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0de7 8221 | ! | Call 0x1,0x21
0de8 01cc | | Execute Vector,Catenate
0de9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dea 0000 0000 | | .BLANK 0000[0x6]
0df0 ; --------------------------------------------------------------------------------------
0df0 ; SUBPROGRAM
0df0 ; --------------------------------------------------------------------------------------
0df0 0df3 | | .CONST 0x0df3 ; Address of begin
0df1 0004 | | .CONST 0x0004 ; Address of exception handler
0df2 0001 | | .CONST 0x0001 ; Number of locals
0df3 BODY_0df0:
0df3 INIT_0df0:
0df3 e5ff | | Load 0x2,-0x1
0df4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0df5 830f | | Call 0x1,0x10f
0df6 0092 1ba9 | | Action Push_String_Extended,0x1ba9 ; "; "
0df8 01cc | | Execute Vector,Catenate
0df9 e5ff | | Load 0x2,-0x1
0dfa 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10
0dfb 0092 1ba8 | | Action Push_String_Extended,0x1ba8 ; "pc = "
0dfd 8225 | % | Call 0x1,0x25
0dfe 01cc | | Execute Vector,Catenate
0dff 0092 1c37 | 7| Action Push_String_Extended,0x1c37 ; "; ctos = "
0e01 01cc | | Execute Vector,Catenate
0e02 e5ff | | Load 0x2,-0x1
0e03 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0e04 8221 | ! | Call 0x1,0x21
0e05 01cc | | Execute Vector,Catenate
0e06 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e07 0000 | | .XXX[0x1]
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e0b | | .CONST 0x0e0b ; Address of begin
0e09 0004 | | .CONST 0x0004 ; Address of exception handler
0e0a 0001 | | .CONST 0x0001 ; Number of locals
0e0b BODY_0e08:
0e0b INIT_0e08:
0e0b 0092 1c38 | 8| Action Push_String_Extended,0x1c38 ; "type tos = "
0e0d e5ff | | Load 0x2,-0x1
0e0e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0e0f 8212 | | Call 0x1,0x12
0e10 01cc | | Execute Vector,Catenate
0e11 0092 1c39 | 9| Action Push_String_Extended,0x1c39 ; "; data tos = "
0e13 01cc | | Execute Vector,Catenate
0e14 e5ff | | Load 0x2,-0x1
0e15 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0e16 8215 | | Call 0x1,0x15
0e17 01cc | | Execute Vector,Catenate
0e18 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e19 0000 0000 | | .BLANK 0000[0x7]
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e23 | # | .CONST 0x0e23 ; Address of begin
0e21 0004 | | .CONST 0x0004 ; Address of exception handler
0e22 0001 | | .CONST 0x0001 ; Number of locals
0e23 BODY_0e20:
0e23 INIT_0e20:
0e23 0092 1c3a | :| Action Push_String_Extended,0x1c3a ; "type extent = "
0e25 e5ff | | Load 0x2,-0x1
0e26 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0e27 8212 | | Call 0x1,0x12
0e28 01cc | | Execute Vector,Catenate
0e29 0092 1c3b | ;| Action Push_String_Extended,0x1c3b ; "; queue extent = "
0e2b 01cc | | Execute Vector,Catenate
0e2c e5ff | | Load 0x2,-0x1
0e2d 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0e2e 8213 | | Call 0x1,0x13
0e2f 01cc | | Execute Vector,Catenate
0e30 0092 1c3c | <| Action Push_String_Extended,0x1c3c ; "; data extent = "
0e32 01cc | | Execute Vector,Catenate
0e33 e5ff | | Load 0x2,-0x1
0e34 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0e35 8215 | | Call 0x1,0x15
0e36 01cc | | Execute Vector,Catenate
0e37 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e38 ; --------------------------------------------------------------------------------------
0e38 ; SUBPROGRAM
0e38 ; --------------------------------------------------------------------------------------
0e38 0e3b | ; | .CONST 0x0e3b ; Address of begin
0e39 0004 | | .CONST 0x0004 ; Address of exception handler
0e3a 0001 | | .CONST 0x0001 ; Number of locals
0e3b BODY_0e38:
0e3b INIT_0e38:
0e3b e5ff | | Load 0x2,-0x1
0e3c 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0e3d 0092 1c3d | =| Action Push_String_Extended,0x1c3d ; "subr @ "
0e3f 8315 | | Call 0x1,0x115
0e40 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e41 0000 0000 | | .BLANK 0000[0x7]
0e48 ; --------------------------------------------------------------------------------------
0e48 ; SUBPROGRAM
0e48 ; --------------------------------------------------------------------------------------
0e48 0e4b | K | .CONST 0x0e4b ; Address of begin
0e49 0004 | | .CONST 0x0004 ; Address of exception handler
0e4a 0001 | | .CONST 0x0001 ; Number of locals
0e4b BODY_0e48:
0e4b INIT_0e48:
0e4b e5ff | | Load 0x2,-0x1
0e4c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0e4d 8216 | | Call 0x1,0x16
0e4e 0092 1c3e | >| Action Push_String_Extended,0x1c3e ; "Ref_Item"
0e50 e5ff | | Load 0x2,-0x1
0e51 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e52 820f | | Call 0x1,0xf
0e53 0092 1b90 | | Action Push_String_Extended,0x1b90 ; "Of_Kind"
0e55 e5ff | | Load 0x2,-0x1
0e56 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0e57 8217 | | Call 0x1,0x17
0e58 0092 1bae | | Action Push_String_Extended,0x1bae ; "Typ_Part"
0e5a e046 | F | Load 0x0,0x46
0e5b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e5c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e5d 0000 0000 | | .XXX[0x3]
0e5f 0000 | |
0e60 ; --------------------------------------------------------------------------------------
0e60 ; SUBPROGRAM
0e60 ; --------------------------------------------------------------------------------------
0e60 0eab | | .CONST 0x0eab ; Address of begin
0e61 0004 | | .CONST 0x0004 ; Address of exception handler
0e62 0021 | ! | .CONST 0x0021 ; Number of locals
0e63 INIT_0e60:
0e63 029f 1093 | | Declare_Subprogram INIT_1090,For_Call
0e65 e5ff | | Load 0x2,-0x1
0e66 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0e67 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0e68 0007 | | Action Break_Optional
0e69 00d8 | | Load_Top At_Offset_0
0e6a e045 | E | Load 0x0,0x45
0e6b 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59
0e6c 025e | ^ | Execute Discrete,Convert
0e6d 1c01 | | Execute_Immediate Run_Utility,0x1
0e6e 0092 1c3f | ?| Action Push_String_Extended,0x1c3f ; ": "
0e70 01cc | | Execute Vector,Catenate
0e71 029f 10f3 | | Declare_Subprogram INIT_10f0,For_Call
0e73 029f 111b | | Declare_Subprogram INIT_1118,For_Call
0e75 029f 1133 | 3| Declare_Subprogram INIT_1130,For_Call
0e77 029f 114b | K| Declare_Subprogram INIT_1148,For_Call
0e79 029f 1163 | c| Declare_Subprogram INIT_1160,For_Call
0e7b 029f 1183 | | Declare_Subprogram INIT_1180,For_Call
0e7d 029f 11a3 | | Declare_Subprogram INIT_11a0,For_Call
0e7f 029f 11bb | | Declare_Subprogram INIT_11b8,For_Call
0e81 029f 11d3 | | Declare_Subprogram INIT_11d0,For_Call
0e83 029f 11eb | | Declare_Subprogram INIT_11e8,For_Call
0e85 029f 120b | | Declare_Subprogram INIT_1208,For_Call
0e87 029f 1223 | #| Declare_Subprogram INIT_1220,For_Call
0e89 029f 123b | ;| Declare_Subprogram INIT_1238,For_Call
0e8b 029f 125b | [| Declare_Subprogram INIT_1258,For_Call
0e8d 029f 1283 | | Declare_Subprogram INIT_1280,For_Call
0e8f 029f 12ab | | Declare_Subprogram INIT_12a8,For_Call
0e91 029f 12cb | | Declare_Subprogram INIT_12c8,For_Call
0e93 029f 12e3 | | Declare_Subprogram INIT_12e0,For_Call
0e95 029f 12fb | | Declare_Subprogram INIT_12f8,For_Call
0e97 029f 1313 | | Declare_Subprogram INIT_1310,For_Call
0e99 029f 132b | +| Declare_Subprogram INIT_1328,For_Call
0e9b 029f 1343 | C| Declare_Subprogram INIT_1340,For_Call
0e9d 029f 1363 | c| Declare_Subprogram INIT_1360,For_Call
0e9f 029f 137b | {| Declare_Subprogram INIT_1378,For_Call
0ea1 029f 1393 | | Declare_Subprogram INIT_1390,For_Call
0ea3 029f 13b3 | | Declare_Subprogram INIT_13b0,For_Call
0ea5 029f 13d3 | | Declare_Subprogram INIT_13d0,For_Call
0ea7 029f 13f3 | | Declare_Subprogram INIT_13f0,For_Call
0ea9 029f 142b | +| Declare_Subprogram INIT_1428,For_Call
0eab BODY_0e60:
0eab e403 | | Load 0x2,0x3
0eac 467f |F | Jump_Case 0x80
0ead 7881 |x | Jump 0xf2f ; case 0x0
0eae 7884 |x | Jump 0xf33 ; case 0x1
0eaf 7885 |x | Jump 0xf35 ; case 0x2
0eb0 78f3 |x | Jump 0xfa4 ; case 0x3
0eb1 787f |x | Jump 0xf31 ; case 0x4
0eb2 7884 |x | Jump 0xf37 ; case 0x5
0eb3 7885 |x | Jump 0xf39 ; case 0x6
0eb4 78ef |x | Jump 0xfa4 ; case 0x7
0eb5 7885 |x | Jump 0xf3b ; case 0x8
0eb6 78ed |x | Jump 0xfa4 ; case 0x9
0eb7 7885 |x | Jump 0xf3d ; case 0xa
0eb8 78eb |x | Jump 0xfa4 ; case 0xb
0eb9 7877 |xw | Jump 0xf31 ; case 0xc
0eba 78e9 |x | Jump 0xfa4 ; case 0xd
0ebb 7883 |x | Jump 0xf3f ; case 0xe
0ebc 78e7 |x | Jump 0xfa4 ; case 0xf
0ebd 7883 |x | Jump 0xf41 ; case 0x10
0ebe 7884 |x | Jump 0xf43 ; case 0x11
0ebf 7875 |xu | Jump 0xf35 ; case 0x12
0ec0 78e3 |x | Jump 0xfa4 ; case 0x13
0ec1 786f |xo | Jump 0xf31 ; case 0x14
0ec2 7882 |x | Jump 0xf45 ; case 0x15
0ec3 7875 |xu | Jump 0xf39 ; case 0x16
0ec4 78df |x | Jump 0xfa4 ; case 0x17
0ec5 7881 |x | Jump 0xf47 ; case 0x18
0ec6 7882 |x | Jump 0xf49 ; case 0x19
0ec7 78dc |x | Jump 0xfa4 ; case 0x1a
0ec8 78db |x | Jump 0xfa4 ; case 0x1b
0ec9 7867 |xg | Jump 0xf31 ; case 0x1c
0eca 78d9 |x | Jump 0xfa4 ; case 0x1d
0ecb 787f |x | Jump 0xf4b ; case 0x1e
0ecc 788b |x | Jump 0xf58 ; case 0x1f
0ecd 78d6 |x | Jump 0xfa4 ; case 0x20
0ece 788b |x | Jump 0xf5a ; case 0x21
0ecf 7865 |xe | Jump 0xf35 ; case 0x22
0ed0 78d3 |x | Jump 0xfa4 ; case 0x23
0ed1 785f |x_ | Jump 0xf31 ; case 0x24
0ed2 78d1 |x | Jump 0xfa4 ; case 0x25
0ed3 7865 |xe | Jump 0xf39 ; case 0x26
0ed4 78cf |x | Jump 0xfa4 ; case 0x27
0ed5 78ce |x | Jump 0xfa4 ; case 0x28
0ed6 7883 |x | Jump 0xf5a ; case 0x29
0ed7 78cc |x | Jump 0xfa4 ; case 0x2a
0ed8 78cb |x | Jump 0xfa4 ; case 0x2b
0ed9 7857 |xW | Jump 0xf31 ; case 0x2c
0eda 78c9 |x | Jump 0xfa4 ; case 0x2d
0edb 788b |x | Jump 0xf67 ; case 0x2e
0edc 78c7 |x | Jump 0xfa4 ; case 0x2f
0edd 78c6 |x | Jump 0xfa4 ; case 0x30
0ede 78c5 |x | Jump 0xfa4 ; case 0x31
0edf 7855 |xU | Jump 0xf35 ; case 0x32
0ee0 78c3 |x | Jump 0xfa4 ; case 0x33
0ee1 78c2 |x | Jump 0xfa4 ; case 0x34
0ee2 78c1 |x | Jump 0xfa4 ; case 0x35
0ee3 7855 |xU | Jump 0xf39 ; case 0x36
0ee4 78bf |x | Jump 0xfa4 ; case 0x37
0ee5 7883 |x | Jump 0xf69 ; case 0x38
0ee6 78bd |x | Jump 0xfa4 ; case 0x39
0ee7 78bc |x | Jump 0xfa4 ; case 0x3a
0ee8 78bb |x | Jump 0xfa4 ; case 0x3b
0ee9 7847 |xG | Jump 0xf31 ; case 0x3c
0eea 78b9 |x | Jump 0xfa4 ; case 0x3d
0eeb 787f |x | Jump 0xf6b ; case 0x3e
0eec 788b |x | Jump 0xf78 ; case 0x3f
0eed 78b6 |x | Jump 0xfa4 ; case 0x40
0eee 788b |x | Jump 0xf7a ; case 0x41
0eef 7849 |xI | Jump 0xf39 ; case 0x42
0ef0 78b3 |x | Jump 0xfa4 ; case 0x43
0ef1 783f |x? | Jump 0xf31 ; case 0x44
0ef2 78b1 |x | Jump 0xfa4 ; case 0x45
0ef3 7888 |x | Jump 0xf7c ; case 0x46
0ef4 78af |x | Jump 0xfa4 ; case 0x47
0ef5 78ae |x | Jump 0xfa4 ; case 0x48
0ef6 7887 |x | Jump 0xf7e ; case 0x49
0ef7 78ac |x | Jump 0xfa4 ; case 0x4a
0ef8 78ab |x | Jump 0xfa4 ; case 0x4b
0ef9 7837 |x7 | Jump 0xf31 ; case 0x4c
0efa 78a9 |x | Jump 0xfa4 ; case 0x4d
0efb 7884 |x | Jump 0xf80 ; case 0x4e
0efc 78a7 |x | Jump 0xfa4 ; case 0x4f
0efd 78a6 |x | Jump 0xfa4 ; case 0x50
0efe 78a5 |x | Jump 0xfa4 ; case 0x51
0eff 788d |x | Jump 0xf8d ; case 0x52
0f00 78a3 |x | Jump 0xfa4 ; case 0x53
0f01 78a2 |x | Jump 0xfa4 ; case 0x54
0f02 78a1 |x | Jump 0xfa4 ; case 0x55
0f03 788b |x | Jump 0xf8f ; case 0x56
0f04 789f |x | Jump 0xfa4 ; case 0x57
0f05 788b |x | Jump 0xf91 ; case 0x58
0f06 789d |x | Jump 0xfa4 ; case 0x59
0f07 789c |x | Jump 0xfa4 ; case 0x5a
0f08 789b |x | Jump 0xfa4 ; case 0x5b
0f09 789a |x | Jump 0xfa4 ; case 0x5c
0f0a 7899 |x | Jump 0xfa4 ; case 0x5d
0f0b 7898 |x | Jump 0xfa4 ; case 0x5e
0f0c 7886 |x | Jump 0xf93 ; case 0x5f
0f0d 7896 |x | Jump 0xfa4 ; case 0x60
0f0e 7895 |x | Jump 0xfa4 ; case 0x61
0f0f 7894 |x | Jump 0xfa4 ; case 0x62
0f10 7893 |x | Jump 0xfa4 ; case 0x63
0f11 7892 |x | Jump 0xfa4 ; case 0x64
0f12 7891 |x | Jump 0xfa4 ; case 0x65
0f13 7890 |x | Jump 0xfa4 ; case 0x66
0f14 788f |x | Jump 0xfa4 ; case 0x67
0f15 788e |x | Jump 0xfa4 ; case 0x68
0f16 788d |x | Jump 0xfa4 ; case 0x69
0f17 788c |x | Jump 0xfa4 ; case 0x6a
0f18 788b |x | Jump 0xfa4 ; case 0x6b
0f19 7817 |x | Jump 0xf31 ; case 0x6c
0f1a 7889 |x | Jump 0xfa4 ; case 0x6d
0f1b 7879 |xy | Jump 0xf95 ; case 0x6e
0f1c 7887 |x | Jump 0xfa4 ; case 0x6f
0f1d 7886 |x | Jump 0xfa4 ; case 0x70
0f1e 7885 |x | Jump 0xfa4 ; case 0x71
0f1f 7884 |x | Jump 0xfa4 ; case 0x72
0f20 7883 |x | Jump 0xfa4 ; case 0x73
0f21 780f |x | Jump 0xf31 ; case 0x74
0f22 7881 |x | Jump 0xfa4 ; case 0x75
0f23 7815 |x | Jump 0xf39 ; case 0x76
0f24 787f |x | Jump 0xfa4 ; case 0x77
0f25 787e |x~ | Jump 0xfa4 ; case 0x78
0f26 787d |x} | Jump 0xfa4 ; case 0x79
0f27 787c |x| | Jump 0xfa4 ; case 0x7a
0f28 787b |x{ | Jump 0xfa4 ; case 0x7b
0f29 7807 |x | Jump 0xf31 ; case 0x7c
0f2a 7879 |xy | Jump 0xfa4 ; case 0x7d
0f2b 7876 |xv | Jump 0xfa2 ; case 0x7e
0f2c 7800 |x | Jump 0xf2d ; case 0x7f
0f2d 8420 | | Call 0x2,0x20
0f2e 7876 |xv | Jump 0xfa5
0f2f 8405 | | Call 0x2,0x5
0f30 7874 |xt | Jump 0xfa5
0f31 8406 | | Call 0x2,0x6
0f32 7872 |xr | Jump 0xfa5
0f33 8407 | | Call 0x2,0x7
0f34 7870 |xp | Jump 0xfa5
0f35 8408 | | Call 0x2,0x8
0f36 786e |xn | Jump 0xfa5
0f37 8409 | | Call 0x2,0x9
0f38 786c |xl | Jump 0xfa5
0f39 840a | | Call 0x2,0xa
0f3a 786a |xj | Jump 0xfa5
0f3b 840b | | Call 0x2,0xb
0f3c 7868 |xh | Jump 0xfa5
0f3d 840c | | Call 0x2,0xc
0f3e 7866 |xf | Jump 0xfa5
0f3f 840d | | Call 0x2,0xd
0f40 7864 |xd | Jump 0xfa5
0f41 840e | | Call 0x2,0xe
0f42 7862 |xb | Jump 0xfa5
0f43 840f | | Call 0x2,0xf
0f44 7860 |x` | Jump 0xfa5
0f45 8410 | | Call 0x2,0x10
0f46 785e |x^ | Jump 0xfa5
0f47 8411 | | Call 0x2,0x11
0f48 785c |x\ | Jump 0xfa5
0f49 8412 | | Call 0x2,0x12
0f4a 785a |xZ | Jump 0xfa5
0f4b e5fe | | Load 0x2,-0x2
0f4c 6809 |h | Jump_Zero 0xf56
0f4d e5ff | | Load 0x2,-0x1
0f4e e2af | | Load 0x1,0xaf
0f4f e2b0 | | Load 0x1,0xb0
0f50 1db1 | | Execute_Immediate Reference_Lex_1,0xb1
0f51 e001 | | Load 0x0,0x1
0f52 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f53 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f54 8251 | Q | Call 0x1,0x51
0f55 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f56 e404 | | Load 0x2,0x4
0f57 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f58 8413 | | Call 0x2,0x13
0f59 784b |xK | Jump 0xfa5
0f5a e5fe | | Load 0x2,-0x2
0f5b 6809 |h | Jump_Zero 0xf65
0f5c e5ff | | Load 0x2,-0x1
0f5d e2b9 | | Load 0x1,0xb9
0f5e e2ba | | Load 0x1,0xba
0f5f 1dbb | | Execute_Immediate Reference_Lex_1,0xbb
0f60 e001 | | Load 0x0,0x1
0f61 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f62 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f63 8255 | U | Call 0x1,0x55
0f64 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f65 8414 | | Call 0x2,0x14
0f66 783e |x> | Jump 0xfa5
0f67 8415 | | Call 0x2,0x15
0f68 783c |x< | Jump 0xfa5
0f69 8416 | | Call 0x2,0x16
0f6a 783a |x: | Jump 0xfa5
0f6b e5fe | | Load 0x2,-0x2
0f6c 6809 |h | Jump_Zero 0xf76
0f6d e5ff | | Load 0x2,-0x1
0f6e e2c8 | | Load 0x1,0xc8
0f6f e2c9 | | Load 0x1,0xc9
0f70 1dca | | Execute_Immediate Reference_Lex_1,0xca
0f71 e001 | | Load 0x0,0x1
0f72 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f73 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f74 8252 | R | Call 0x1,0x52
0f75 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f76 e404 | | Load 0x2,0x4
0f77 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f78 8417 | | Call 0x2,0x17
0f79 782b |x+ | Jump 0xfa5
0f7a 8418 | | Call 0x2,0x18
0f7b 7829 |x) | Jump 0xfa5
0f7c 8419 | | Call 0x2,0x19
0f7d 7827 |x' | Jump 0xfa5
0f7e 841a | | Call 0x2,0x1a
0f7f 7825 |x% | Jump 0xfa5
0f80 e5fe | | Load 0x2,-0x2
0f81 6809 |h | Jump_Zero 0xf8b
0f82 e5ff | | Load 0x2,-0x1
0f83 e2e1 | | Load 0x1,0xe1
0f84 e2e2 | | Load 0x1,0xe2
0f85 1de3 | | Execute_Immediate Reference_Lex_1,0xe3
0f86 e001 | | Load 0x0,0x1
0f87 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f88 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f89 8231 | 1 | Call 0x1,0x31
0f8a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f8b e404 | | Load 0x2,0x4
0f8c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f8d 841b | | Call 0x2,0x1b
0f8e 7816 |x | Jump 0xfa5
0f8f 841c | | Call 0x2,0x1c
0f90 7814 |x | Jump 0xfa5
0f91 841d | | Call 0x2,0x1d
0f92 7812 |x | Jump 0xfa5
0f93 841e | | Call 0x2,0x1e
0f94 7810 |x | Jump 0xfa5
0f95 e5fe | | Load 0x2,-0x2
0f96 6809 |h | Jump_Zero 0xfa0
0f97 e5ff | | Load 0x2,-0x1
0f98 e2eb | | Load 0x1,0xeb
0f99 e2ec | | Load 0x1,0xec
0f9a 1ded | | Execute_Immediate Reference_Lex_1,0xed
0f9b e001 | | Load 0x0,0x1
0f9c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f9d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f9e 8236 | 6 | Call 0x1,0x36
0f9f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fa0 e404 | | Load 0x2,0x4
0fa1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fa2 841f | | Call 0x2,0x1f
0fa3 7801 |x | Jump 0xfa5
0fa4 8421 | ! | Call 0x2,0x21
0fa5 0831 | 1 | Execute_Immediate Raise,0x31
0fa6 0000 0000 | | .XXX[0x2]
0fa8 ; --------------------------------------------------------------------------------------
0fa8 ; SUBPROGRAM
0fa8 ; --------------------------------------------------------------------------------------
0fa8 0fb4 | | .CONST 0x0fb4 ; Address of begin
0fa9 0004 | | .CONST 0x0004 ; Address of exception handler
0faa 0003 | | .CONST 0x0003 ; Number of locals
0fab INIT_0fa8:
0fab e5ff | | Load 0x2,-0x1
0fac e278 | x | Load 0x1,0x78
0fad e279 | y | Load 0x1,0x79
0fae 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a
0faf e001 | | Load 0x0,0x1
0fb0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fb1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0fb2 0092 1c40 | @| Action Push_String_Extended,0x1c40 ; "AUXILIARY_STATE: "
0fb4 BODY_0fa8:
0fb4 e5fe | | Load 0x2,-0x2
0fb5 6803 |h | Jump_Zero 0xfb9
0fb6 e402 | | Load 0x2,0x2
0fb7 8312 | | Call 0x1,0x112
0fb8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fb9 00d8 | | Load_Top At_Offset_0
0fba e402 | | Load 0x2,0x2
0fbb 8317 | | Call 0x1,0x117
0fbc 01cc | | Execute Vector,Catenate
0fbd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fbe 0000 0000 | | .XXX[0x2]
0fc0 ; --------------------------------------------------------------------------------------
0fc0 ; SUBPROGRAM
0fc0 ; --------------------------------------------------------------------------------------
0fc0 0fcc | | .CONST 0x0fcc ; Address of begin
0fc1 0004 | | .CONST 0x0004 ; Address of exception handler
0fc2 0003 | | .CONST 0x0003 ; Number of locals
0fc3 INIT_0fc0:
0fc3 e5ff | | Load 0x2,-0x1
0fc4 e27d | } | Load 0x1,0x7d
0fc5 e27e | ~ | Load 0x1,0x7e
0fc6 1d7f | | Execute_Immediate Reference_Lex_1,0x7f
0fc7 e001 | | Load 0x0,0x1
0fc8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fc9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0fca 0092 1c41 | A| Action Push_String_Extended,0x1c41 ; "AUXILIARY_ALLOCATION: "
0fcc BODY_0fc0:
0fcc e5fe | | Load 0x2,-0x2
0fcd 6803 |h | Jump_Zero 0xfd1
0fce e402 | | Load 0x2,0x2
0fcf 8313 | | Call 0x1,0x113
0fd0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fd1 00d8 | | Load_Top At_Offset_0
0fd2 e402 | | Load 0x2,0x2
0fd3 8318 | | Call 0x1,0x118
0fd4 01cc | | Execute Vector,Catenate
0fd5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fd6 0000 0000 | | .XXX[0x2]
0fd8 ; --------------------------------------------------------------------------------------
0fd8 ; SUBPROGRAM
0fd8 ; --------------------------------------------------------------------------------------
0fd8 0fdb | | .CONST 0x0fdb ; Address of begin
0fd9 0004 | | .CONST 0x0004 ; Address of exception handler
0fda 0001 | | .CONST 0x0001 ; Number of locals
0fdb BODY_0fd8:
0fdb INIT_0fd8:
0fdb e7ff | | Load 0x3,-0x1
0fdc 0f00 | | Execute_Immediate Equal,0x0
0fdd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fde 0000 0000 | | .XXX[0x2]
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; SUBPROGRAM
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0fe3 | | .CONST 0x0fe3 ; Address of begin
0fe1 0004 | | .CONST 0x0004 ; Address of exception handler
0fe2 0001 | | .CONST 0x0001 ; Number of locals
0fe3 BODY_0fe0:
0fe3 INIT_0fe0:
0fe3 e7fd | | Load 0x3,-0x3
0fe4 6806 |h | Jump_Zero 0xfeb
0fe5 e402 | | Load 0x2,0x2
0fe6 0092 1ba9 | | Action Push_String_Extended,0x1ba9 ; "; "
0fe8 e04b | K | Load 0x0,0x4b
0fe9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0fea 00d1 | | Pop_Control Pop_Count_1
0feb e402 | | Load 0x2,0x2
0fec e7ff | | Load 0x3,-0x1
0fed 0092 1c42 | B| Action Push_String_Extended,0x1c42 ; " = "
0fef 01cc | | Execute Vector,Catenate
0ff0 e7fe | | Load 0x3,-0x2
0ff1 01cc | | Execute Vector,Catenate
0ff2 e04b | K | Load 0x0,0x4b
0ff3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ff4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ff5 0000 0000 | | .XXX[0x3]
0ff7 0000 | |
0ff8 ; --------------------------------------------------------------------------------------
0ff8 ; SUBPROGRAM
0ff8 ; --------------------------------------------------------------------------------------
0ff8 0ffb | | .CONST 0x0ffb ; Address of begin
0ff9 0004 | | .CONST 0x0004 ; Address of exception handler
0ffa 0001 | | .CONST 0x0001 ; Number of locals
0ffb BODY_0ff8:
0ffb INIT_0ff8:
0ffb e7ff | | Load 0x3,-0x1
0ffc 0f01 | | Execute_Immediate Equal,0x1
0ffd 6808 |h | Jump_Zero 0x1006
0ffe e402 | | Load 0x2,0x2
0fff 0092 1ba9 | | Action Push_String_Extended,0x1ba9 ; "; "
1001 e7fe | | Load 0x3,-0x2
1002 01cc | | Execute Vector,Catenate
1003 e04b | K | Load 0x0,0x4b
1004 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1005 00d1 | | Pop_Control Pop_Count_1
1006 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1007 0000 | | .XXX[0x1]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 100b | | .CONST 0x100b ; Address of begin
1009 0004 | | .CONST 0x0004 ; Address of exception handler
100a 0001 | | .CONST 0x0001 ; Number of locals
100b BODY_1008:
100b INIT_1008:
100b e7ff | | Load 0x3,-0x1
100c 0f01 | | Execute_Immediate Equal,0x1
100d 6805 |h | Jump_Zero 0x1013
100e e402 | | Load 0x2,0x2
100f e7fe | | Load 0x3,-0x2
1010 e04b | K | Load 0x0,0x4b
1011 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1012 00d1 | | Pop_Control Pop_Count_1
1013 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1014 0000 0000 | | .BLANK 0000[0x4]
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 101b | | .CONST 0x101b ; Address of begin
1019 0004 | | .CONST 0x0004 ; Address of exception handler
101a 0001 | | .CONST 0x0001 ; Number of locals
101b BODY_1018:
101b INIT_1018:
101b e7ff | | Load 0x3,-0x1
101c 0f01 | | Execute_Immediate Equal,0x1
101d 6804 |h | Jump_Zero 0x1022
101e 4820 |H | Short_Literal 0x20
101f e7fe | | Load 0x3,-0x2
1020 01ca | | Execute Vector,Prepend
1021 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1022 00ea | | Load_Encached Null_String_Cache
1023 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1024 0000 0000 | | .BLANK 0000[0x4]
1028 ; --------------------------------------------------------------------------------------
1028 ; SUBPROGRAM
1028 ; --------------------------------------------------------------------------------------
1028 102b | + | .CONST 0x102b ; Address of begin
1029 0004 | | .CONST 0x0004 ; Address of exception handler
102a 0001 | | .CONST 0x0001 ; Number of locals
102b BODY_1028:
102b INIT_1028:
102b e403 | | Load 0x2,0x3
102c e7ff | | Load 0x3,-0x1
102d e04b | K | Load 0x0,0x4b
102e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
102f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1030 ; --------------------------------------------------------------------------------------
1030 ; SUBPROGRAM
1030 ; --------------------------------------------------------------------------------------
1030 1033 | 3 | .CONST 0x1033 ; Address of begin
1031 0004 | | .CONST 0x0004 ; Address of exception handler
1032 0001 | | .CONST 0x0001 ; Number of locals
1033 BODY_1030:
1033 INIT_1030:
1033 e7ff | | Load 0x3,-0x1
1034 0f01 | | Execute_Immediate Equal,0x1
1035 6805 |h | Jump_Zero 0x103b
1036 e402 | | Load 0x2,0x2
1037 e7fe | | Load 0x3,-0x2
1038 e04b | K | Load 0x0,0x4b
1039 1818 | | Execute Package,Field_Execute,Field_Number 0x18
103a 00d1 | | Pop_Control Pop_Count_1
103b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
103c 0000 0000 | | .BLANK 0000[0x4]
1040 ; --------------------------------------------------------------------------------------
1040 ; SUBPROGRAM
1040 ; --------------------------------------------------------------------------------------
1040 1043 | C | .CONST 0x1043 ; Address of begin
1041 0004 | | .CONST 0x0004 ; Address of exception handler
1042 0001 | | .CONST 0x0001 ; Number of locals
1043 BODY_1040:
1043 INIT_1040:
1043 e402 | | Load 0x2,0x2
1044 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
1046 e7ff | | Load 0x3,-0x1
1047 01cc | | Execute Vector,Catenate
1048 0092 1c43 | C| Action Push_String_Extended,0x1c43 ; " => "
104a 01cc | | Execute Vector,Catenate
104b e7fe | | Load 0x3,-0x2
104c 01cc | | Execute Vector,Catenate
104d e04b | K | Load 0x0,0x4b
104e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
104f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1050 ; --------------------------------------------------------------------------------------
1050 ; SUBPROGRAM
1050 ; --------------------------------------------------------------------------------------
1050 1053 | S | .CONST 0x1053 ; Address of begin
1051 0004 | | .CONST 0x0004 ; Address of exception handler
1052 0001 | | .CONST 0x0001 ; Number of locals
1053 BODY_1050:
1053 INIT_1050:
1053 e7fe | | Load 0x3,-0x2
1054 0f01 | | Execute_Immediate Equal,0x1
1055 6805 |h | Jump_Zero 0x105b
1056 e7fe | | Load 0x3,-0x2
1057 e046 | F | Load 0x0,0x46
1058 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1059 e7ff | | Load 0x3,-0x1
105a 8403 | | Call 0x2,0x3
105b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
105c 0000 0000 | | .BLANK 0000[0x4]
1060 ; --------------------------------------------------------------------------------------
1060 ; SUBPROGRAM
1060 ; --------------------------------------------------------------------------------------
1060 1063 | c | .CONST 0x1063 ; Address of begin
1061 0004 | | .CONST 0x0004 ; Address of exception handler
1062 0001 | | .CONST 0x0001 ; Number of locals
1063 BODY_1060:
1063 INIT_1060:
1063 e402 | | Load 0x2,0x2
1064 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
1066 e7ff | | Load 0x3,-0x1
1067 01cc | | Execute Vector,Catenate
1068 0092 1c43 | C| Action Push_String_Extended,0x1c43 ; " => "
106a 01cc | | Execute Vector,Catenate
106b e7fe | | Load 0x3,-0x2
106c 01cc | | Execute Vector,Catenate
106d e04b | K | Load 0x0,0x4b
106e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
106f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1070 ; --------------------------------------------------------------------------------------
1070 ; SUBPROGRAM
1070 ; --------------------------------------------------------------------------------------
1070 1073 | s | .CONST 0x1073 ; Address of begin
1071 0004 | | .CONST 0x0004 ; Address of exception handler
1072 0001 | | .CONST 0x0001 ; Number of locals
1073 BODY_1070:
1073 INIT_1070:
1073 e7fe | | Load 0x3,-0x2
1074 0f01 | | Execute_Immediate Equal,0x1
1075 6805 |h | Jump_Zero 0x107b
1076 e7fe | | Load 0x3,-0x2
1077 e046 | F | Load 0x0,0x46
1078 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1079 e7ff | | Load 0x3,-0x1
107a 8403 | | Call 0x2,0x3
107b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
107c 0000 0000 | | .BLANK 0000[0x4]
1080 ; --------------------------------------------------------------------------------------
1080 ; SUBPROGRAM
1080 ; --------------------------------------------------------------------------------------
1080 1083 | | .CONST 0x1083 ; Address of begin
1081 0004 | | .CONST 0x0004 ; Address of exception handler
1082 0001 | | .CONST 0x0001 ; Number of locals
1083 BODY_1080:
1083 INIT_1080:
1083 e5ff | | Load 0x2,-0x1
1084 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1085 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1086 6803 |h | Jump_Zero 0x108a
1087 0092 1c44 | D| Action Push_String_Extended,0x1c44 ; "; BWO"
1089 00ca | | Action Exit_Nullary_Function
108a 00ea | | Load_Encached Null_String_Cache
108b 00ca | | Action Exit_Nullary_Function
108c 0000 0000 | | .BLANK 0000[0x4]
1090 ; --------------------------------------------------------------------------------------
1090 ; SUBPROGRAM
1090 ; --------------------------------------------------------------------------------------
1090 10a3 | | .CONST 0x10a3 ; Address of begin
1091 0004 | | .CONST 0x0004 ; Address of exception handler
1092 0002 | | .CONST 0x0002 ; Number of locals
1093 INIT_1090:
1093 4801 |H | Short_Literal 0x1
1094 4846 |HF | Short_Literal 0x46
1095 00e9 | | Load_Encached String_Cache
1096 0334 | 4 | Declare_Variable Array,With_Constraint
1097 00d8 | | Load_Top At_Offset_0
1098 0335 | 5 | Declare_Variable Array,Duplicate
1099 00cd | | Action Spare6_Action
109a 4846 |HF | Short_Literal 0x46
109b 4801 |H | Short_Literal 0x1
109c 4820 |H | Short_Literal 0x20
109d e605 | | Load 0x3,0x5
109e e603 | | Load 0x3,0x3
109f 01d6 | | Execute Vector,Field_Write
10a0 3ffb |? | Loop_Increasing 0x109c
10a1 e602 | | Load 0x3,0x2
10a2 01d4 | | Execute Vector,Structure_Write
10a3 BODY_1090:
10a3 e7ff | | Load 0x3,-0x1
10a4 01db | | Execute Vector,Length
10a5 0d47 | G | Execute_Immediate Less,0x47
10a6 6807 |h | Jump_Zero 0x10ae
10a7 e7ff | | Load 0x3,-0x1
10a8 4801 |H | Short_Literal 0x1
10a9 e7ff | | Load 0x3,-0x1
10aa 01db | | Execute Vector,Length
10ab e602 | | Load 0x3,0x2
10ac 01ce | | Execute Vector,Slice_Write
10ad 780a |x | Jump 0x10b8
10ae e7ff | | Load 0x3,-0x1
10af 01dd | | Execute Vector,First
10b0 e7ff | | Load 0x3,-0x1
10b1 01dd | | Execute Vector,First
10b2 0a45 | E | Execute_Immediate Plus,0x45
10b3 0248 | H | Execute Discrete,Check_In_Integer
10b4 e7ff | | Load 0x3,-0x1
10b5 01cf | | Execute Vector,Slice_Read
10b6 e602 | | Load 0x3,0x2
10b7 01d4 | | Execute Vector,Structure_Write
10b8 00d8 | | Load_Top At_Offset_0
10b9 483e |H> | Short_Literal 0x3e
10ba 4846 |HF | Short_Literal 0x46
10bb e603 | | Load 0x3,0x3
10bc 035b | [ | Declare_Type Array,Constrained
10bd e603 | | Load 0x3,0x3
10be 01cd | | Execute Vector,Slice_Reference
10bf 4801 |H | Short_Literal 0x1
10c0 4809 |H | Short_Literal 0x9
10c1 00e9 | | Load_Encached String_Cache
10c2 0334 | 4 | Declare_Variable Array,With_Constraint
10c3 483c |H< | Short_Literal 0x3c
10c4 4801 |H | Short_Literal 0x1
10c5 e605 | | Load 0x3,0x5
10c6 01d6 | | Execute Vector,Field_Write
10c7 483d |H= | Short_Literal 0x3d
10c8 4802 |H | Short_Literal 0x2
10c9 e605 | | Load 0x3,0x5
10ca 01d6 | | Execute Vector,Field_Write
10cb 483d |H= | Short_Literal 0x3d
10cc 4803 |H | Short_Literal 0x3
10cd e605 | | Load 0x3,0x5
10ce 01d6 | | Execute Vector,Field_Write
10cf 4820 |H | Short_Literal 0x20
10d0 4804 |H | Short_Literal 0x4
10d1 e605 | | Load 0x3,0x5
10d2 01d6 | | Execute Vector,Field_Write
10d3 4866 |Hf | Short_Literal 0x66
10d4 4805 |H | Short_Literal 0x5
10d5 e605 | | Load 0x3,0x5
10d6 01d6 | | Execute Vector,Field_Write
10d7 4872 |Hr | Short_Literal 0x72
10d8 4806 |H | Short_Literal 0x6
10d9 e605 | | Load 0x3,0x5
10da 01d6 | | Execute Vector,Field_Write
10db 4861 |Ha | Short_Literal 0x61
10dc 4807 |H | Short_Literal 0x7
10dd e605 | | Load 0x3,0x5
10de 01d6 | | Execute Vector,Field_Write
10df 486d |Hm | Short_Literal 0x6d
10e0 4808 |H | Short_Literal 0x8
10e1 e605 | | Load 0x3,0x5
10e2 01d6 | | Execute Vector,Field_Write
10e3 4865 |He | Short_Literal 0x65
10e4 4809 |H | Short_Literal 0x9
10e5 e605 | | Load 0x3,0x5
10e6 01d6 | | Execute Vector,Field_Write
10e7 00cd | | Action Spare6_Action
10e8 483e |H> | Short_Literal 0x3e
10e9 4846 |HF | Short_Literal 0x46
10ea e603 | | Load 0x3,0x3
10eb 01ce | | Execute Vector,Slice_Write
10ec 00d1 | | Pop_Control Pop_Count_1
10ed 00d8 | | Load_Top At_Offset_0
10ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
10ef 0000 | | .XXX[0x1]
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10fd | | .CONST 0x10fd ; Address of begin
10f1 0004 | | .CONST 0x0004 ; Address of exception handler
10f2 0003 | | .CONST 0x0003 ; Number of locals
10f3 INIT_10f0:
10f3 e5ff | | Load 0x2,-0x1
10f4 e25f | _ | Load 0x1,0x5f
10f5 e260 | ` | Load 0x1,0x60
10f6 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
10f7 e001 | | Load 0x0,0x1
10f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10fa 00d8 | | Load_Top At_Offset_0
10fb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
10fc 0007 | | Action Break_Optional
10fd BODY_10f0:
10fd e5fe | | Load 0x2,-0x2
10fe 6804 |h | Jump_Zero 0x1103
10ff e602 | | Load 0x3,0x2
1100 8256 | V | Call 0x1,0x56
1101 00cb | | Action Pop_Block_With_Result
1102 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1103 e404 | | Load 0x2,0x4
1104 e603 | | Load 0x3,0x3
1105 e046 | F | Load 0x0,0x46
1106 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1107 01cc | | Execute Vector,Catenate
1108 0092 1c42 | B| Action Push_String_Extended,0x1c42 ; " = "
110a 01cc | | Execute Vector,Catenate
110b e603 | | Load 0x3,0x3
110c e046 | F | Load 0x0,0x46
110d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
110e 01cc | | Execute Vector,Catenate
110f 00cb | | Action Pop_Block_With_Result
1110 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1111 0000 0000 | | .BLANK 0000[0x7]
1118 ; --------------------------------------------------------------------------------------
1118 ; SUBPROGRAM
1118 ; --------------------------------------------------------------------------------------
1118 1122 | " | .CONST 0x1122 ; Address of begin
1119 0004 | | .CONST 0x0004 ; Address of exception handler
111a 0002 | | .CONST 0x0002 ; Number of locals
111b INIT_1118:
111b e5ff | | Load 0x2,-0x1
111c e264 | d | Load 0x1,0x64
111d e265 | e | Load 0x1,0x65
111e 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
111f e001 | | Load 0x0,0x1
1120 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1121 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1122 BODY_1118:
1122 e5fe | | Load 0x2,-0x2
1123 6804 |h | Jump_Zero 0x1128
1124 00d8 | | Load_Top At_Offset_0
1125 831a | | Call 0x1,0x11a
1126 00cb | | Action Pop_Block_With_Result
1127 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1128 e404 | | Load 0x2,0x4
1129 e602 | | Load 0x3,0x2
112a 8314 | | Call 0x1,0x114
112b 01cc | | Execute Vector,Catenate
112c 00cb | | Action Pop_Block_With_Result
112d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
112e 0000 0000 | | .XXX[0x2]
1130 ; --------------------------------------------------------------------------------------
1130 ; SUBPROGRAM
1130 ; --------------------------------------------------------------------------------------
1130 113a | : | .CONST 0x113a ; Address of begin
1131 0004 | | .CONST 0x0004 ; Address of exception handler
1132 0002 | | .CONST 0x0002 ; Number of locals
1133 INIT_1130:
1133 e5ff | | Load 0x2,-0x1
1134 e273 | s | Load 0x1,0x73
1135 e274 | t | Load 0x1,0x74
1136 1d75 | u | Execute_Immediate Reference_Lex_1,0x75
1137 e001 | | Load 0x0,0x1
1138 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1139 1810 | | Execute Package,Field_Execute,Field_Number 0x10
113a BODY_1130:
113a e5fe | | Load 0x2,-0x2
113b 6804 |h | Jump_Zero 0x1140
113c 00d8 | | Load_Top At_Offset_0
113d 8311 | | Call 0x1,0x111
113e 00cb | | Action Pop_Block_With_Result
113f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1140 e404 | | Load 0x2,0x4
1141 e602 | | Load 0x3,0x2
1142 8316 | | Call 0x1,0x116
1143 01cc | | Execute Vector,Catenate
1144 00cb | | Action Pop_Block_With_Result
1145 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1146 0000 0000 | | .XXX[0x2]
1148 ; --------------------------------------------------------------------------------------
1148 ; SUBPROGRAM
1148 ; --------------------------------------------------------------------------------------
1148 1152 | R | .CONST 0x1152 ; Address of begin
1149 0004 | | .CONST 0x0004 ; Address of exception handler
114a 0002 | | .CONST 0x0002 ; Number of locals
114b INIT_1148:
114b e5ff | | Load 0x2,-0x1
114c e269 | i | Load 0x1,0x69
114d e26a | j | Load 0x1,0x6a
114e 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b
114f e001 | | Load 0x0,0x1
1150 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1151 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1152 BODY_1148:
1152 e5fe | | Load 0x2,-0x2
1153 6804 |h | Jump_Zero 0x1158
1154 00d8 | | Load_Top At_Offset_0
1155 8226 | & | Call 0x1,0x26
1156 00cb | | Action Pop_Block_With_Result
1157 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1158 e404 | | Load 0x2,0x4
1159 e602 | | Load 0x3,0x2
115a 8319 | | Call 0x1,0x119
115b 01cc | | Execute Vector,Catenate
115c 00cb | | Action Pop_Block_With_Result
115d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
115e 0000 0000 | | .XXX[0x2]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 116a | j | .CONST 0x116a ; Address of begin
1161 0004 | | .CONST 0x0004 ; Address of exception handler
1162 0002 | | .CONST 0x0002 ; Number of locals
1163 INIT_1160:
1163 e5ff | | Load 0x2,-0x1
1164 e26e | n | Load 0x1,0x6e
1165 e26f | o | Load 0x1,0x6f
1166 1d70 | p | Execute_Immediate Reference_Lex_1,0x70
1167 e001 | | Load 0x0,0x1
1168 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1169 1810 | | Execute Package,Field_Execute,Field_Number 0x10
116a BODY_1160:
116a e5fe | | Load 0x2,-0x2
116b 6804 |h | Jump_Zero 0x1170
116c 00d8 | | Load_Top At_Offset_0
116d 830a | | Call 0x1,0x10a
116e 00cb | | Action Pop_Block_With_Result
116f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1170 e404 | | Load 0x2,0x4
1171 e602 | | Load 0x3,0x2
1172 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1173 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1174 e047 | G | Load 0x0,0x47
1175 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1176 180d | | Execute Package,Field_Execute,Field_Number 0xd
1177 01cc | | Execute Vector,Catenate
1178 00cb | | Action Pop_Block_With_Result
1179 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
117a 0000 0000 | | .BLANK 0000[0x6]
1180 ; --------------------------------------------------------------------------------------
1180 ; SUBPROGRAM
1180 ; --------------------------------------------------------------------------------------
1180 118a | | .CONST 0x118a ; Address of begin
1181 0004 | | .CONST 0x0004 ; Address of exception handler
1182 0002 | | .CONST 0x0002 ; Number of locals
1183 INIT_1180:
1183 e5ff | | Load 0x2,-0x1
1184 e282 | | Load 0x1,0x82
1185 e283 | | Load 0x1,0x83
1186 1d84 | | Execute_Immediate Reference_Lex_1,0x84
1187 e001 | | Load 0x0,0x1
1188 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1189 1810 | | Execute Package,Field_Execute,Field_Number 0x10
118a BODY_1180:
118a e5fe | | Load 0x2,-0x2
118b 6804 |h | Jump_Zero 0x1190
118c 00d8 | | Load_Top At_Offset_0
118d 8227 | ' | Call 0x1,0x27
118e 00cb | | Action Pop_Block_With_Result
118f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1190 e403 | | Load 0x2,0x3
1191 0f76 | v | Execute_Immediate Equal,0x76
1192 6803 |h | Jump_Zero 0x1196
1193 e404 | | Load 0x2,0x4
1194 00cb | | Action Pop_Block_With_Result
1195 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1196 e404 | | Load 0x2,0x4
1197 e602 | | Load 0x3,0x2
1198 8228 | ( | Call 0x1,0x28
1199 01cc | | Execute Vector,Catenate
119a 00cb | | Action Pop_Block_With_Result
119b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
119c 0000 0000 | | .BLANK 0000[0x4]
11a0 ; --------------------------------------------------------------------------------------
11a0 ; SUBPROGRAM
11a0 ; --------------------------------------------------------------------------------------
11a0 11aa | | .CONST 0x11aa ; Address of begin
11a1 0004 | | .CONST 0x0004 ; Address of exception handler
11a2 0002 | | .CONST 0x0002 ; Number of locals
11a3 INIT_11a0:
11a3 e5ff | | Load 0x2,-0x1
11a4 e287 | | Load 0x1,0x87
11a5 e288 | | Load 0x1,0x88
11a6 1d89 | | Execute_Immediate Reference_Lex_1,0x89
11a7 e001 | | Load 0x0,0x1
11a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11aa BODY_11a0:
11aa e5fe | | Load 0x2,-0x2
11ab 6804 |h | Jump_Zero 0x11b0
11ac 00d8 | | Load_Top At_Offset_0
11ad 823e | > | Call 0x1,0x3e
11ae 00cb | | Action Pop_Block_With_Result
11af 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11b0 e404 | | Load 0x2,0x4
11b1 e602 | | Load 0x3,0x2
11b2 823d | = | Call 0x1,0x3d
11b3 01cc | | Execute Vector,Catenate
11b4 00cb | | Action Pop_Block_With_Result
11b5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11b6 0000 0000 | | .XXX[0x2]
11b8 ; --------------------------------------------------------------------------------------
11b8 ; SUBPROGRAM
11b8 ; --------------------------------------------------------------------------------------
11b8 11c2 | | .CONST 0x11c2 ; Address of begin
11b9 0004 | | .CONST 0x0004 ; Address of exception handler
11ba 0002 | | .CONST 0x0002 ; Number of locals
11bb INIT_11b8:
11bb e5ff | | Load 0x2,-0x1
11bc e28c | | Load 0x1,0x8c
11bd e28d | | Load 0x1,0x8d
11be 1d8e | | Execute_Immediate Reference_Lex_1,0x8e
11bf e001 | | Load 0x0,0x1
11c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11c1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11c2 BODY_11b8:
11c2 e5fe | | Load 0x2,-0x2
11c3 6804 |h | Jump_Zero 0x11c8
11c4 00d8 | | Load_Top At_Offset_0
11c5 823f | ? | Call 0x1,0x3f
11c6 00cb | | Action Pop_Block_With_Result
11c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11c8 00d8 | | Load_Top At_Offset_0
11c9 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
11ca e404 | | Load 0x2,0x4
11cb 8315 | | Call 0x1,0x115
11cc 00cb | | Action Pop_Block_With_Result
11cd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11ce 0000 0000 | | .XXX[0x2]
11d0 ; --------------------------------------------------------------------------------------
11d0 ; SUBPROGRAM
11d0 ; --------------------------------------------------------------------------------------
11d0 11da | | .CONST 0x11da ; Address of begin
11d1 0004 | | .CONST 0x0004 ; Address of exception handler
11d2 0002 | | .CONST 0x0002 ; Number of locals
11d3 INIT_11d0:
11d3 e5ff | | Load 0x2,-0x1
11d4 e291 | | Load 0x1,0x91
11d5 e292 | | Load 0x1,0x92
11d6 1d93 | | Execute_Immediate Reference_Lex_1,0x93
11d7 e001 | | Load 0x0,0x1
11d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11d9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11da BODY_11d0:
11da e5fe | | Load 0x2,-0x2
11db 6804 |h | Jump_Zero 0x11e0
11dc 00d8 | | Load_Top At_Offset_0
11dd 8240 | @ | Call 0x1,0x40
11de 00cb | | Action Pop_Block_With_Result
11df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11e0 e404 | | Load 0x2,0x4
11e1 00cb | | Action Pop_Block_With_Result
11e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11e3 0000 0000 | | .BLANK 0000[0x5]
11e8 ; --------------------------------------------------------------------------------------
11e8 ; SUBPROGRAM
11e8 ; --------------------------------------------------------------------------------------
11e8 11f2 | | .CONST 0x11f2 ; Address of begin
11e9 0004 | | .CONST 0x0004 ; Address of exception handler
11ea 0002 | | .CONST 0x0002 ; Number of locals
11eb INIT_11e8:
11eb e5ff | | Load 0x2,-0x1
11ec e296 | | Load 0x1,0x96
11ed e297 | | Load 0x1,0x97
11ee 1d98 | | Execute_Immediate Reference_Lex_1,0x98
11ef e001 | | Load 0x0,0x1
11f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11f1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11f2 BODY_11e8:
11f2 e5fe | | Load 0x2,-0x2
11f3 6804 |h | Jump_Zero 0x11f8
11f4 00d8 | | Load_Top At_Offset_0
11f5 8242 | B | Call 0x1,0x42
11f6 00cb | | Action Pop_Block_With_Result
11f7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11f8 e404 | | Load 0x2,0x4
11f9 0092 1c45 | E| Action Push_String_Extended,0x1c45 ; "collection + "
11fb 01cc | | Execute Vector,Catenate
11fc e602 | | Load 0x3,0x2
11fd 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
11fe 8215 | | Call 0x1,0x15
11ff 01cc | | Execute Vector,Catenate
1200 00cb | | Action Pop_Block_With_Result
1201 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1202 0000 0000 | | .BLANK 0000[0x6]
1208 ; --------------------------------------------------------------------------------------
1208 ; SUBPROGRAM
1208 ; --------------------------------------------------------------------------------------
1208 1212 | | .CONST 0x1212 ; Address of begin
1209 0004 | | .CONST 0x0004 ; Address of exception handler
120a 0002 | | .CONST 0x0002 ; Number of locals
120b INIT_1208:
120b e5ff | | Load 0x2,-0x1
120c e29b | | Load 0x1,0x9b
120d e29c | | Load 0x1,0x9c
120e 1d9d | | Execute_Immediate Reference_Lex_1,0x9d
120f e001 | | Load 0x0,0x1
1210 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1211 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1212 BODY_1208:
1212 e5fe | | Load 0x2,-0x2
1213 6804 |h | Jump_Zero 0x1218
1214 00d8 | | Load_Top At_Offset_0
1215 8244 | D | Call 0x1,0x44
1216 00cb | | Action Pop_Block_With_Result
1217 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1218 e404 | | Load 0x2,0x4
1219 e602 | | Load 0x3,0x2
121a 8245 | E | Call 0x1,0x45
121b 01cc | | Execute Vector,Catenate
121c 00cb | | Action Pop_Block_With_Result
121d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
121e 0000 0000 | | .XXX[0x2]
1220 ; --------------------------------------------------------------------------------------
1220 ; SUBPROGRAM
1220 ; --------------------------------------------------------------------------------------
1220 122a | * | .CONST 0x122a ; Address of begin
1221 0004 | | .CONST 0x0004 ; Address of exception handler
1222 0002 | | .CONST 0x0002 ; Number of locals
1223 INIT_1220:
1223 e5ff | | Load 0x2,-0x1
1224 e2a0 | | Load 0x1,0xa0
1225 e2a1 | | Load 0x1,0xa1
1226 1da2 | | Execute_Immediate Reference_Lex_1,0xa2
1227 e001 | | Load 0x0,0x1
1228 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1229 1810 | | Execute Package,Field_Execute,Field_Number 0x10
122a BODY_1220:
122a e5fe | | Load 0x2,-0x2
122b 6804 |h | Jump_Zero 0x1230
122c 00d8 | | Load_Top At_Offset_0
122d 824c | L | Call 0x1,0x4c
122e 00cb | | Action Pop_Block_With_Result
122f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1230 e404 | | Load 0x2,0x4
1231 e602 | | Load 0x3,0x2
1232 824d | M | Call 0x1,0x4d
1233 01cc | | Execute Vector,Catenate
1234 00cb | | Action Pop_Block_With_Result
1235 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1236 0000 0000 | | .XXX[0x2]
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 1242 | B | .CONST 0x1242 ; Address of begin
1239 0004 | | .CONST 0x0004 ; Address of exception handler
123a 0002 | | .CONST 0x0002 ; Number of locals
123b INIT_1238:
123b e5ff | | Load 0x2,-0x1
123c e2a5 | | Load 0x1,0xa5
123d e2a6 | | Load 0x1,0xa6
123e 1da7 | | Execute_Immediate Reference_Lex_1,0xa7
123f e001 | | Load 0x0,0x1
1240 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1241 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1242 BODY_1238:
1242 e5fe | | Load 0x2,-0x2
1243 6804 |h | Jump_Zero 0x1248
1244 00d8 | | Load_Top At_Offset_0
1245 824f | O | Call 0x1,0x4f
1246 00cb | | Action Pop_Block_With_Result
1247 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1248 e404 | | Load 0x2,0x4
1249 e602 | | Load 0x3,0x2
124a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
124b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
124c e047 | G | Load 0x0,0x47
124d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
124e 180d | | Execute Package,Field_Execute,Field_Number 0xd
124f 01cc | | Execute Vector,Catenate
1250 00cb | | Action Pop_Block_With_Result
1251 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1252 0000 0000 | | .BLANK 0000[0x6]
1258 ; --------------------------------------------------------------------------------------
1258 ; SUBPROGRAM
1258 ; --------------------------------------------------------------------------------------
1258 1262 | b | .CONST 0x1262 ; Address of begin
1259 0004 | | .CONST 0x0004 ; Address of exception handler
125a 0002 | | .CONST 0x0002 ; Number of locals
125b INIT_1258:
125b e5ff | | Load 0x2,-0x1
125c e2aa | | Load 0x1,0xaa
125d e2ab | | Load 0x1,0xab
125e 1dac | | Execute_Immediate Reference_Lex_1,0xac
125f e001 | | Load 0x0,0x1
1260 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1261 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1262 BODY_1258:
1262 e5fe | | Load 0x2,-0x2
1263 6804 |h | Jump_Zero 0x1268
1264 00d8 | | Load_Top At_Offset_0
1265 8250 | P | Call 0x1,0x50
1266 00cb | | Action Pop_Block_With_Result
1267 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1268 e404 | | Load 0x2,0x4
1269 e602 | | Load 0x3,0x2
126a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
126b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
126c e047 | G | Load 0x0,0x47
126d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
126e 180d | | Execute Package,Field_Execute,Field_Number 0xd
126f 01cc | | Execute Vector,Catenate
1270 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
1272 01cc | | Execute Vector,Catenate
1273 e602 | | Load 0x3,0x2
1274 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1275 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
1276 8212 | | Call 0x1,0x12
1277 01cc | | Execute Vector,Catenate
1278 00cb | | Action Pop_Block_With_Result
1279 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
127a 0000 0000 | | .BLANK 0000[0x6]
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 128a | | .CONST 0x128a ; Address of begin
1281 0004 | | .CONST 0x0004 ; Address of exception handler
1282 0002 | | .CONST 0x0002 ; Number of locals
1283 INIT_1280:
1283 e5ff | | Load 0x2,-0x1
1284 e2b4 | | Load 0x1,0xb4
1285 e2b5 | | Load 0x1,0xb5
1286 1db6 | | Execute_Immediate Reference_Lex_1,0xb6
1287 e001 | | Load 0x0,0x1
1288 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1289 1810 | | Execute Package,Field_Execute,Field_Number 0x10
128a BODY_1280:
128a e5fe | | Load 0x2,-0x2
128b 6804 |h | Jump_Zero 0x1290
128c 00d8 | | Load_Top At_Offset_0
128d 825e | ^ | Call 0x1,0x5e
128e 00cb | | Action Pop_Block_With_Result
128f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1290 e404 | | Load 0x2,0x4
1291 0092 1c46 | F| Action Push_String_Extended,0x1c46 ; " type mark "
1293 01cc | | Execute Vector,Catenate
1294 e602 | | Load 0x3,0x2
1295 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
1296 8212 | | Call 0x1,0x12
1297 01cc | | Execute Vector,Catenate
1298 0092 1c47 | G| Action Push_String_Extended,0x1c47 ; " data mark "
129a 01cc | | Execute Vector,Catenate
129b e602 | | Load 0x3,0x2
129c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
129d 8215 | | Call 0x1,0x15
129e 01cc | | Execute Vector,Catenate
129f 00cb | | Action Pop_Block_With_Result
12a0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12a1 0000 0000 | | .BLANK 0000[0x7]
12a8 ; --------------------------------------------------------------------------------------
12a8 ; SUBPROGRAM
12a8 ; --------------------------------------------------------------------------------------
12a8 12b2 | | .CONST 0x12b2 ; Address of begin
12a9 0004 | | .CONST 0x0004 ; Address of exception handler
12aa 0002 | | .CONST 0x0002 ; Number of locals
12ab INIT_12a8:
12ab e5ff | | Load 0x2,-0x1
12ac e2fb | | Load 0x1,0xfb
12ad e2fc | | Load 0x1,0xfc
12ae 1dfd | | Execute_Immediate Reference_Lex_1,0xfd
12af e001 | | Load 0x0,0x1
12b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12b2 BODY_12a8:
12b2 e404 | | Load 0x2,0x4
12b3 e602 | | Load 0x3,0x2
12b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
12b5 e046 | F | Load 0x0,0x46
12b6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
12b7 01cc | | Execute Vector,Catenate
12b8 0092 1bba | | Action Push_String_Extended,0x1bba ; " "
12ba 01cc | | Execute Vector,Catenate
12bb e602 | | Load 0x3,0x2
12bc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
12bd e046 | F | Load 0x0,0x46
12be 1816 | | Execute Package,Field_Execute,Field_Number 0x16
12bf 01cc | | Execute Vector,Catenate
12c0 00cb | | Action Pop_Block_With_Result
12c1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12c2 0000 0000 | | .BLANK 0000[0x6]
12c8 ; --------------------------------------------------------------------------------------
12c8 ; SUBPROGRAM
12c8 ; --------------------------------------------------------------------------------------
12c8 12d2 | | .CONST 0x12d2 ; Address of begin
12c9 0004 | | .CONST 0x0004 ; Address of exception handler
12ca 0002 | | .CONST 0x0002 ; Number of locals
12cb INIT_12c8:
12cb e5ff | | Load 0x2,-0x1
12cc e2be | | Load 0x1,0xbe
12cd e2bf | | Load 0x1,0xbf
12ce 1dc0 | | Execute_Immediate Reference_Lex_1,0xc0
12cf e001 | | Load 0x0,0x1
12d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12d2 BODY_12c8:
12d2 e5fe | | Load 0x2,-0x2
12d3 6804 |h | Jump_Zero 0x12d8
12d4 00d8 | | Load_Top At_Offset_0
12d5 8241 | A | Call 0x1,0x41
12d6 00cb | | Action Pop_Block_With_Result
12d7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12d8 e404 | | Load 0x2,0x4
12d9 00cb | | Action Pop_Block_With_Result
12da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12db 0000 0000 | | .BLANK 0000[0x5]
12e0 ; --------------------------------------------------------------------------------------
12e0 ; SUBPROGRAM
12e0 ; --------------------------------------------------------------------------------------
12e0 12ea | | .CONST 0x12ea ; Address of begin
12e1 0004 | | .CONST 0x0004 ; Address of exception handler
12e2 0002 | | .CONST 0x0002 ; Number of locals
12e3 INIT_12e0:
12e3 e5ff | | Load 0x2,-0x1
12e4 e2c3 | | Load 0x1,0xc3
12e5 e2c4 | | Load 0x1,0xc4
12e6 1dc5 | | Execute_Immediate Reference_Lex_1,0xc5
12e7 e001 | | Load 0x0,0x1
12e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12e9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12ea BODY_12e0:
12ea e5fe | | Load 0x2,-0x2
12eb 6804 |h | Jump_Zero 0x12f0
12ec 00d8 | | Load_Top At_Offset_0
12ed 8243 | C | Call 0x1,0x43
12ee 00cb | | Action Pop_Block_With_Result
12ef 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12f0 00d8 | | Load_Top At_Offset_0
12f1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
12f2 e404 | | Load 0x2,0x4
12f3 8248 | H | Call 0x1,0x48
12f4 00cb | | Action Pop_Block_With_Result
12f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
12f6 0000 0000 | | .XXX[0x2]
12f8 ; --------------------------------------------------------------------------------------
12f8 ; SUBPROGRAM
12f8 ; --------------------------------------------------------------------------------------
12f8 1302 | | .CONST 0x1302 ; Address of begin
12f9 0004 | | .CONST 0x0004 ; Address of exception handler
12fa 0002 | | .CONST 0x0002 ; Number of locals
12fb INIT_12f8:
12fb e5ff | | Load 0x2,-0x1
12fc e2cd | | Load 0x1,0xcd
12fd e2ce | | Load 0x1,0xce
12fe 1dcf | | Execute_Immediate Reference_Lex_1,0xcf
12ff e001 | | Load 0x0,0x1
1300 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1301 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1302 BODY_12f8:
1302 e5fe | | Load 0x2,-0x2
1303 6804 |h | Jump_Zero 0x1308
1304 00d8 | | Load_Top At_Offset_0
1305 825b | [ | Call 0x1,0x5b
1306 00cb | | Action Pop_Block_With_Result
1307 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1308 e404 | | Load 0x2,0x4
1309 e602 | | Load 0x3,0x2
130a 8246 | F | Call 0x1,0x46
130b 01cc | | Execute Vector,Catenate
130c 00cb | | Action Pop_Block_With_Result
130d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
130e 0000 0000 | | .XXX[0x2]
1310 ; --------------------------------------------------------------------------------------
1310 ; SUBPROGRAM
1310 ; --------------------------------------------------------------------------------------
1310 131a | | .CONST 0x131a ; Address of begin
1311 0004 | | .CONST 0x0004 ; Address of exception handler
1312 0002 | | .CONST 0x0002 ; Number of locals
1313 INIT_1310:
1313 e5ff | | Load 0x2,-0x1
1314 e2d2 | | Load 0x1,0xd2
1315 e2d3 | | Load 0x1,0xd3
1316 1dd4 | | Execute_Immediate Reference_Lex_1,0xd4
1317 e001 | | Load 0x0,0x1
1318 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1319 1810 | | Execute Package,Field_Execute,Field_Number 0x10
131a BODY_1310:
131a e5fe | | Load 0x2,-0x2
131b 6804 |h | Jump_Zero 0x1320
131c 00d8 | | Load_Top At_Offset_0
131d 824a | J | Call 0x1,0x4a
131e 00cb | | Action Pop_Block_With_Result
131f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1320 e404 | | Load 0x2,0x4
1321 e602 | | Load 0x3,0x2
1322 822a | * | Call 0x1,0x2a
1323 01cc | | Execute Vector,Catenate
1324 00cb | | Action Pop_Block_With_Result
1325 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1326 0000 0000 | | .XXX[0x2]
1328 ; --------------------------------------------------------------------------------------
1328 ; SUBPROGRAM
1328 ; --------------------------------------------------------------------------------------
1328 1332 | 2 | .CONST 0x1332 ; Address of begin
1329 0004 | | .CONST 0x0004 ; Address of exception handler
132a 0002 | | .CONST 0x0002 ; Number of locals
132b INIT_1328:
132b e5ff | | Load 0x2,-0x1
132c e2d7 | | Load 0x1,0xd7
132d e2d8 | | Load 0x1,0xd8
132e 1dd9 | | Execute_Immediate Reference_Lex_1,0xd9
132f e001 | | Load 0x0,0x1
1330 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1331 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1332 BODY_1328:
1332 e5fe | | Load 0x2,-0x2
1333 6804 |h | Jump_Zero 0x1338
1334 00d8 | | Load_Top At_Offset_0
1335 825c | \ | Call 0x1,0x5c
1336 00cb | | Action Pop_Block_With_Result
1337 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1338 00d8 | | Load_Top At_Offset_0
1339 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
133a e404 | | Load 0x2,0x4
133b 8225 | % | Call 0x1,0x25
133c 00cb | | Action Pop_Block_With_Result
133d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
133e 0000 0000 | | .XXX[0x2]
1340 ; --------------------------------------------------------------------------------------
1340 ; SUBPROGRAM
1340 ; --------------------------------------------------------------------------------------
1340 134f | O | .CONST 0x134f ; Address of begin
1341 0004 | | .CONST 0x0004 ; Address of exception handler
1342 0002 | | .CONST 0x0002 ; Number of locals
1343 INIT_1340:
1343 e002 | | Load 0x0,0x2
1344 1b8d | | Execute Package,Field_Read,Field_Number 0x8d
1345 0322 | " | Declare_Variable Record
1346 e5ff | | Load 0x2,-0x1
1347 e2dc | | Load 0x1,0xdc
1348 e2dd | | Load 0x1,0xdd
1349 1dde | | Execute_Immediate Reference_Lex_1,0xde
134a e001 | | Load 0x0,0x1
134b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
134c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
134d e602 | | Load 0x3,0x2
134e 017d | } | Execute Record,Structure_Write
134f BODY_1340:
134f e5fe | | Load 0x2,-0x2
1350 6804 |h | Jump_Zero 0x1355
1351 00d8 | | Load_Top At_Offset_0
1352 8310 | | Call 0x1,0x110
1353 00cb | | Action Pop_Block_With_Result
1354 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1355 e404 | | Load 0x2,0x4
1356 e602 | | Load 0x3,0x2
1357 8308 | | Call 0x1,0x108
1358 01cc | | Execute Vector,Catenate
1359 00cb | | Action Pop_Block_With_Result
135a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
135b 0000 0000 | | .BLANK 0000[0x5]
1360 ; --------------------------------------------------------------------------------------
1360 ; SUBPROGRAM
1360 ; --------------------------------------------------------------------------------------
1360 136a | j | .CONST 0x136a ; Address of begin
1361 0004 | | .CONST 0x0004 ; Address of exception handler
1362 0002 | | .CONST 0x0002 ; Number of locals
1363 INIT_1360:
1363 e5ff | | Load 0x2,-0x1
1364 e269 | i | Load 0x1,0x69
1365 e26a | j | Load 0x1,0x6a
1366 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b
1367 e001 | | Load 0x0,0x1
1368 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1369 1810 | | Execute Package,Field_Execute,Field_Number 0x10
136a BODY_1360:
136a e5fe | | Load 0x2,-0x2
136b 6804 |h | Jump_Zero 0x1370
136c 00d8 | | Load_Top At_Offset_0
136d 8226 | & | Call 0x1,0x26
136e 00cb | | Action Pop_Block_With_Result
136f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1370 e404 | | Load 0x2,0x4
1371 e602 | | Load 0x3,0x2
1372 8319 | | Call 0x1,0x119
1373 01cc | | Execute Vector,Catenate
1374 00cb | | Action Pop_Block_With_Result
1375 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1376 0000 0000 | | .XXX[0x2]
1378 ; --------------------------------------------------------------------------------------
1378 ; SUBPROGRAM
1378 ; --------------------------------------------------------------------------------------
1378 1382 | | .CONST 0x1382 ; Address of begin
1379 0004 | | .CONST 0x0004 ; Address of exception handler
137a 0002 | | .CONST 0x0002 ; Number of locals
137b INIT_1378:
137b e5ff | | Load 0x2,-0x1
137c e282 | | Load 0x1,0x82
137d e283 | | Load 0x1,0x83
137e 1d84 | | Execute_Immediate Reference_Lex_1,0x84
137f e001 | | Load 0x0,0x1
1380 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1381 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1382 BODY_1378:
1382 e5fe | | Load 0x2,-0x2
1383 6804 |h | Jump_Zero 0x1388
1384 00d8 | | Load_Top At_Offset_0
1385 8227 | ' | Call 0x1,0x27
1386 00cb | | Action Pop_Block_With_Result
1387 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1388 e404 | | Load 0x2,0x4
1389 e602 | | Load 0x3,0x2
138a 8228 | ( | Call 0x1,0x28
138b 01cc | | Execute Vector,Catenate
138c 00cb | | Action Pop_Block_With_Result
138d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 0002 | | .CONST 0x0002 ; Number of locals
1393 INIT_1390:
1393 e5ff | | Load 0x2,-0x1
1394 e2a5 | | Load 0x1,0xa5
1395 e2a6 | | Load 0x1,0xa6
1396 1da7 | | Execute_Immediate Reference_Lex_1,0xa7
1397 e001 | | Load 0x0,0x1
1398 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1399 1810 | | Execute Package,Field_Execute,Field_Number 0x10
139a BODY_1390:
139a e5fe | | Load 0x2,-0x2
139b 6804 |h | Jump_Zero 0x13a0
139c 00d8 | | Load_Top At_Offset_0
139d 824f | O | Call 0x1,0x4f
139e 00cb | | Action Pop_Block_With_Result
139f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13a0 e404 | | Load 0x2,0x4
13a1 e602 | | Load 0x3,0x2
13a2 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
13a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
13a4 e047 | G | Load 0x0,0x47
13a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13a6 180d | | Execute Package,Field_Execute,Field_Number 0xd
13a7 01cc | | Execute Vector,Catenate
13a8 00cb | | Action Pop_Block_With_Result
13a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13aa 0000 0000 | | .BLANK 0000[0x6]
13b0 ; --------------------------------------------------------------------------------------
13b0 ; SUBPROGRAM
13b0 ; --------------------------------------------------------------------------------------
13b0 13ba | | .CONST 0x13ba ; Address of begin
13b1 0004 | | .CONST 0x0004 ; Address of exception handler
13b2 0002 | | .CONST 0x0002 ; Number of locals
13b3 INIT_13b0:
13b3 e5ff | | Load 0x2,-0x1
13b4 e2e6 | | Load 0x1,0xe6
13b5 e2e7 | | Load 0x1,0xe7
13b6 1de8 | | Execute_Immediate Reference_Lex_1,0xe8
13b7 e001 | | Load 0x0,0x1
13b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13ba BODY_13b0:
13ba e5fe | | Load 0x2,-0x2
13bb 6804 |h | Jump_Zero 0x13c0
13bc 00d8 | | Load_Top At_Offset_0
13bd 825d | ] | Call 0x1,0x5d
13be 00cb | | Action Pop_Block_With_Result
13bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13c0 e404 | | Load 0x2,0x4
13c1 0092 1c48 | H| Action Push_String_Extended,0x1c48 ; "partner = "
13c3 01cc | | Execute Vector,Catenate
13c4 e602 | | Load 0x3,0x2
13c5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
13c6 e047 | G | Load 0x0,0x47
13c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13c8 180d | | Execute Package,Field_Execute,Field_Number 0xd
13c9 01cc | | Execute Vector,Catenate
13ca 00cb | | Action Pop_Block_With_Result
13cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13cc 0000 0000 | | .BLANK 0000[0x4]
13d0 ; --------------------------------------------------------------------------------------
13d0 ; SUBPROGRAM
13d0 ; --------------------------------------------------------------------------------------
13d0 13df | | .CONST 0x13df ; Address of begin
13d1 0004 | | .CONST 0x0004 ; Address of exception handler
13d2 0002 | | .CONST 0x0002 ; Number of locals
13d3 INIT_13d0:
13d3 e002 | | Load 0x0,0x2
13d4 1b6f | o | Execute Package,Field_Read,Field_Number 0x6f
13d5 0322 | " | Declare_Variable Record
13d6 e5ff | | Load 0x2,-0x1
13d7 e2f0 | | Load 0x1,0xf0
13d8 e2f1 | | Load 0x1,0xf1
13d9 1df2 | | Execute_Immediate Reference_Lex_1,0xf2
13da e001 | | Load 0x0,0x1
13db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13dd e602 | | Load 0x3,0x2
13de 017d | } | Execute Record,Structure_Write
13df BODY_13d0:
13df e5fe | | Load 0x2,-0x2
13e0 6804 |h | Jump_Zero 0x13e5
13e1 00d8 | | Load_Top At_Offset_0
13e2 8238 | 8 | Call 0x1,0x38
13e3 00cb | | Action Pop_Block_With_Result
13e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13e5 e404 | | Load 0x2,0x4
13e6 e602 | | Load 0x3,0x2
13e7 8239 | 9 | Call 0x1,0x39
13e8 01cc | | Execute Vector,Catenate
13e9 00cb | | Action Pop_Block_With_Result
13ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
13eb 0000 0000 | | .BLANK 0000[0x5]
13f0 ; --------------------------------------------------------------------------------------
13f0 ; SUBPROGRAM
13f0 ; --------------------------------------------------------------------------------------
13f0 13fa | | .CONST 0x13fa ; Address of begin
13f1 0004 | | .CONST 0x0004 ; Address of exception handler
13f2 0002 | | .CONST 0x0002 ; Number of locals
13f3 INIT_13f0:
13f3 e5ff | | Load 0x2,-0x1
13f4 e2f5 | | Load 0x1,0xf5
13f5 e2f6 | | Load 0x1,0xf6
13f6 1df7 | | Execute_Immediate Reference_Lex_1,0xf7
13f7 e001 | | Load 0x0,0x1
13f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13fa BODY_13f0:
13fa e5fe | | Load 0x2,-0x2
13fb 6804 |h | Jump_Zero 0x1400
13fc 00d8 | | Load_Top At_Offset_0
13fd 8259 | Y | Call 0x1,0x59
13fe 00cb | | Action Pop_Block_With_Result
13ff 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1400 480a |H | Short_Literal 0xa
1401 e404 | | Load 0x2,0x4
1402 e602 | | Load 0x3,0x2
1403 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1404 8247 | G | Call 0x1,0x47
1405 01cc | | Execute Vector,Catenate
1406 0092 1c49 | I| Action Push_String_Extended,0x1c49 ; ";"
1408 01cc | | Execute Vector,Catenate
1409 01cb | | Execute Vector,Append
140a 0092 1c4a | J| Action Push_String_Extended,0x1c4a ; "return pc = "
140c e602 | | Load 0x3,0x2
140d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
140e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
140f e602 | | Load 0x3,0x2
1410 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1411 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1412 e602 | | Load 0x3,0x2
1413 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1414 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1415 8224 | $ | Call 0x1,0x24
1416 01cc | | Execute Vector,Catenate
1417 0092 1b96 | | Action Push_String_Extended,0x1b96 ; "; lex = "
1419 01cc | | Execute Vector,Catenate
141a e602 | | Load 0x3,0x2
141b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
141c 821c | | Call 0x1,0x1c
141d 01cc | | Execute Vector,Catenate
141e 8402 | | Call 0x2,0x2
141f 01cc | | Execute Vector,Catenate
1420 00cb | | Action Pop_Block_With_Result
1421 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1422 0000 0000 | | .BLANK 0000[0x6]
1428 ; --------------------------------------------------------------------------------------
1428 ; SUBPROGRAM
1428 ; --------------------------------------------------------------------------------------
1428 1432 | 2 | .CONST 0x1432 ; Address of begin
1429 0004 | | .CONST 0x0004 ; Address of exception handler
142a 0002 | | .CONST 0x0002 ; Number of locals
142b INIT_1428:
142b e5ff | | Load 0x2,-0x1
142c e2fb | | Load 0x1,0xfb
142d e2fc | | Load 0x1,0xfc
142e 1dfd | | Execute_Immediate Reference_Lex_1,0xfd
142f e001 | | Load 0x0,0x1
1430 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1431 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1432 BODY_1428:
1432 e404 | | Load 0x2,0x4
1433 e602 | | Load 0x3,0x2
1434 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1435 e046 | F | Load 0x0,0x46
1436 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1437 01cc | | Execute Vector,Catenate
1438 0092 1bba | | Action Push_String_Extended,0x1bba ; " "
143a 01cc | | Execute Vector,Catenate
143b e602 | | Load 0x3,0x2
143c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
143d e046 | F | Load 0x0,0x46
143e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
143f 01cc | | Execute Vector,Catenate
1440 00cb | | Action Pop_Block_With_Result
1441 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1442 0000 0000 | | .BLANK 0000[0x6]
1448 ; --------------------------------------------------------------------------------------
1448 ; SUBPROGRAM
1448 ; --------------------------------------------------------------------------------------
1448 1458 | X | .CONST 0x1458 ; Address of begin
1449 0004 | | .CONST 0x0004 ; Address of exception handler
144a 000d | | .CONST 0x000d ; Number of locals
144b INIT_1448:
144b 4800 |H | Short_Literal 0x0
144c 0093 1463 | c| push_full_address INIT_1460
144e 02a0 | | Declare_Subprogram Null_Subprogram
144f 038f | | Declare_Type Package,Defined,Visible
1450 0386 | | Declare_Variable Package,Visible
1451 00bf | | Action Accept_Activation
1452 e001 | | Load 0x0,0x1
1453 4801 |H | Short_Literal 0x1
1454 e20d | | Load 0x1,0xd
1455 020e | | Execute Module,Augment_Imports
1456 00d8 | | Load_Top At_Offset_0
1457 020f | | Execute Module,Activate
1458 BODY_1448:
1458 00bc | | Action Signal_Activated
1459 00bb | | Action Signal_Completion
145a 0000 0000 | | .BLANK 0000[0x6]
1460 ; --------------------------------------------------------------------------------------
1460 ; SUBPROGRAM
1460 ; --------------------------------------------------------------------------------------
1460 1471 | q | .CONST 0x1471 ; Address of begin
1461 0004 | | .CONST 0x0004 ; Address of exception handler
1462 0010 | | .CONST 0x0010 ; Number of locals
1463 INIT_1460:
1463 029a 147b | {| Declare_Subprogram INIT_1478,For_Outer_Call,Visible,Unelaborated
1465 029a 1483 | | Declare_Subprogram INIT_1480,For_Outer_Call,Visible,Unelaborated
1467 029a 148b | | Declare_Subprogram INIT_1488,For_Outer_Call,Visible,Unelaborated
1469 00bf | | Action Accept_Activation
146a 00e5 | | Load_Encached Long_Integer_Cache
146b 1d0d | | Execute_Immediate Reference_Lex_1,0xd
146c 00c7 | | Action Elaborate_Subprogram
146d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
146e 00c7 | | Action Elaborate_Subprogram
146f 1d0f | | Execute_Immediate Reference_Lex_1,0xf
1470 00c7 | | Action Elaborate_Subprogram
1471 BODY_1460:
1471 00bc | | Action Signal_Activated
1472 00bb | | Action Signal_Completion
1473 0000 0000 | | .BLANK 0000[0x5]
1478 ; --------------------------------------------------------------------------------------
1478 ; SUBPROGRAM
1478 ; --------------------------------------------------------------------------------------
1478 147b | { | .CONST 0x147b ; Address of begin
1479 0004 | | .CONST 0x0004 ; Address of exception handler
147a 0001 | | .CONST 0x0001 ; Number of locals
147b BODY_1478:
147b INIT_1478:
147b e5ff | | Load 0x2,-0x1
147c e001 | | Load 0x0,0x1
147d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
147e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
147f 0000 | | .XXX[0x1]
1480 ; --------------------------------------------------------------------------------------
1480 ; SUBPROGRAM
1480 ; --------------------------------------------------------------------------------------
1480 1483 | | .CONST 0x1483 ; Address of begin
1481 0004 | | .CONST 0x0004 ; Address of exception handler
1482 0001 | | .CONST 0x0001 ; Number of locals
1483 BODY_1480:
1483 INIT_1480:
1483 e5ff | | Load 0x2,-0x1
1484 e001 | | Load 0x0,0x1
1485 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1486 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1487 0000 | | .XXX[0x1]
1488 ; --------------------------------------------------------------------------------------
1488 ; SUBPROGRAM
1488 ; --------------------------------------------------------------------------------------
1488 148b | | .CONST 0x148b ; Address of begin
1489 0004 | | .CONST 0x0004 ; Address of exception handler
148a 0001 | | .CONST 0x0001 ; Number of locals
148b BODY_1488:
148b INIT_1488:
148b e5ff | | Load 0x2,-0x1
148c e001 | | Load 0x0,0x1
148d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
148e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
148f 0000 | | .XXX[0x1]
1490 ; --------------------------------------------------------------------------------------
1490 ; SUBPROGRAM
1490 ; --------------------------------------------------------------------------------------
1490 14f6 | | .CONST 0x14f6 ; Address of begin
1491 0004 | | .CONST 0x0004 ; Address of exception handler
1492 002a | * | .CONST 0x002a ; Number of locals
1493 INIT_1490:
1493 029a 14fb | | Declare_Subprogram INIT_14f8,For_Outer_Call,Visible,Unelaborated
1495 029a 152b | +| Declare_Subprogram INIT_1528,For_Outer_Call,Visible,Unelaborated
1497 029a 156b | k| Declare_Subprogram INIT_1568,For_Outer_Call,Visible,Unelaborated
1499 029a 15b3 | | Declare_Subprogram INIT_15b0,For_Outer_Call,Visible,Unelaborated
149b 029a 1603 | | Declare_Subprogram INIT_1600,For_Outer_Call,Visible,Unelaborated
149d 029a 1663 | c| Declare_Subprogram INIT_1660,For_Outer_Call,Visible,Unelaborated
149f 029a 16cb | | Declare_Subprogram INIT_16c8,For_Outer_Call,Visible,Unelaborated
14a1 029a 1743 | C| Declare_Subprogram INIT_1740,For_Outer_Call,Visible,Unelaborated
14a3 029a 17cb | | Declare_Subprogram INIT_17c8,For_Outer_Call,Visible,Unelaborated
14a5 029a 185b | [| Declare_Subprogram INIT_1858,For_Outer_Call,Visible,Unelaborated
14a7 029a 188b | | Declare_Subprogram INIT_1888,For_Outer_Call,Visible,Unelaborated
14a9 029a 189b | | Declare_Subprogram INIT_1898,For_Outer_Call,Visible,Unelaborated
14ab 029a 18a3 | | Declare_Subprogram INIT_18a0,For_Outer_Call,Visible,Unelaborated
14ad 029a 18ab | | Declare_Subprogram INIT_18a8,For_Outer_Call,Visible,Unelaborated
14af 00bf | | Action Accept_Activation
14b0 0092 1c4b | K| Action Push_String_Extended,0x1c4b ; "("
14b2 0092 1be0 | | Action Push_String_Extended,0x1be0 ; ")"
14b4 0092 1bc0 | | Action Push_String_Extended,0x1bc0 ; ", "
14b6 4801 |H | Short_Literal 0x1
14b7 4802 |H | Short_Literal 0x2
14b8 00e9 | | Load_Encached String_Cache
14b9 0334 | 4 | Declare_Variable Array,With_Constraint
14ba 4809 |H | Short_Literal 0x9
14bb 4801 |H | Short_Literal 0x1
14bc e21e | | Load 0x1,0x1e
14bd 01d6 | | Execute Vector,Field_Write
14be 4800 |H | Short_Literal 0x0
14bf 4802 |H | Short_Literal 0x2
14c0 e21e | | Load 0x1,0x1e
14c1 01d6 | | Execute Vector,Field_Write
14c2 0092 1c43 | C| Action Push_String_Extended,0x1c43 ; " => "
14c4 029d 18cb | | Declare_Subprogram INIT_18c8,For_Outer_Call
14c6 029d 18e3 | | Declare_Subprogram INIT_18e0,For_Outer_Call
14c8 029d 1903 | | Declare_Subprogram INIT_1900,For_Outer_Call
14ca 029d 192b | +| Declare_Subprogram INIT_1928,For_Outer_Call
14cc 029d 194b | K| Declare_Subprogram INIT_1948,For_Outer_Call
14ce 029d 1973 | s| Declare_Subprogram INIT_1970,For_Outer_Call
14d0 029d 199b | | Declare_Subprogram INIT_1998,For_Outer_Call
14d2 029d 19c3 | | Declare_Subprogram INIT_19c0,For_Outer_Call
14d4 029d 19f3 | | Declare_Subprogram INIT_19f0,For_Outer_Call
14d6 1d0d | | Execute_Immediate Reference_Lex_1,0xd
14d7 00c7 | | Action Elaborate_Subprogram
14d8 1d0e | | Execute_Immediate Reference_Lex_1,0xe
14d9 00c7 | | Action Elaborate_Subprogram
14da 1d0f | | Execute_Immediate Reference_Lex_1,0xf
14db 00c7 | | Action Elaborate_Subprogram
14dc 1d10 | | Execute_Immediate Reference_Lex_1,0x10
14dd 00c7 | | Action Elaborate_Subprogram
14de 1d11 | | Execute_Immediate Reference_Lex_1,0x11
14df 00c7 | | Action Elaborate_Subprogram
14e0 1d12 | | Execute_Immediate Reference_Lex_1,0x12
14e1 00c7 | | Action Elaborate_Subprogram
14e2 1d13 | | Execute_Immediate Reference_Lex_1,0x13
14e3 00c7 | | Action Elaborate_Subprogram
14e4 1d14 | | Execute_Immediate Reference_Lex_1,0x14
14e5 00c7 | | Action Elaborate_Subprogram
14e6 1d15 | | Execute_Immediate Reference_Lex_1,0x15
14e7 00c7 | | Action Elaborate_Subprogram
14e8 1d16 | | Execute_Immediate Reference_Lex_1,0x16
14e9 00c7 | | Action Elaborate_Subprogram
14ea 1d17 | | Execute_Immediate Reference_Lex_1,0x17
14eb 00c7 | | Action Elaborate_Subprogram
14ec 029d 1a03 | | Declare_Subprogram INIT_1a00,For_Outer_Call
14ee 1d19 | | Execute_Immediate Reference_Lex_1,0x19
14ef 00c7 | | Action Elaborate_Subprogram
14f0 1d18 | | Execute_Immediate Reference_Lex_1,0x18
14f1 00c7 | | Action Elaborate_Subprogram
14f2 029d 1a0b | | Declare_Subprogram INIT_1a08,For_Outer_Call
14f4 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
14f5 00c7 | | Action Elaborate_Subprogram
14f6 BODY_1490:
14f6 00bc | | Action Signal_Activated
14f7 00bb | | Action Signal_Completion
14f8 ; --------------------------------------------------------------------------------------
14f8 ; SUBPROGRAM
14f8 ; --------------------------------------------------------------------------------------
14f8 1511 | | .CONST 0x1511 ; Address of begin
14f9 0004 | | .CONST 0x0004 ; Address of exception handler
14fa 0004 | | .CONST 0x0004 ; Number of locals
14fb INIT_14f8:
14fb 4802 |H | Short_Literal 0x2
14fc 8228 | ( | Call 0x1,0x28
14fd e5ff | | Load 0x2,-0x1
14fe 01db | | Execute Vector,Length
14ff 0273 | s | Execute Discrete,Plus
1500 e5fe | | Load 0x2,-0x2
1501 01db | | Execute Vector,Length
1502 0273 | s | Execute Discrete,Plus
1503 e5fd | | Load 0x2,-0x3
1504 01db | | Execute Vector,Length
1505 0273 | s | Execute Discrete,Plus
1506 e5fc | | Load 0x2,-0x4
1507 01db | | Execute Vector,Length
1508 0273 | s | Execute Discrete,Plus
1509 00e2 | | Load_Encached Integer_Cache
150a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
150b 00e2 | | Load_Encached Integer_Cache
150c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
150d 4801 |H | Short_Literal 0x1
150e e402 | | Load 0x2,0x2
150f 00e9 | | Load_Encached String_Cache
1510 0334 | 4 | Declare_Variable Array,With_Constraint
1511 BODY_14f8:
1511 e403 | | Load 0x2,0x3
1512 e404 | | Load 0x2,0x4
1513 e5fe | | Load 0x2,-0x2
1514 e5ff | | Load 0x2,-0x1
1515 8221 | ! | Call 0x1,0x21
1516 00d1 | | Pop_Control Pop_Count_1
1517 c403 | | Store 0x2,0x3
1518 e403 | | Load 0x2,0x3
1519 e404 | | Load 0x2,0x4
151a e5fc | | Load 0x2,-0x4
151b e5fd | | Load 0x2,-0x3
151c 8222 | " | Call 0x1,0x22
151d 00d1 | | Pop_Control Pop_Count_1
151e c403 | | Store 0x2,0x3
151f e403 | | Load 0x2,0x3
1520 e404 | | Load 0x2,0x4
1521 01dc | | Execute Vector,Last
1522 0a01 | | Execute_Immediate Plus,0x1
1523 027f | | Execute Discrete,Equal
1524 7001 |p | Jump_Nonzero 0x1526
1525 0887 | | Execute_Immediate Raise,0x87
1526 00d8 | | Load_Top At_Offset_0
1527 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
1528 ; --------------------------------------------------------------------------------------
1528 ; SUBPROGRAM
1528 ; --------------------------------------------------------------------------------------
1528 1547 | G | .CONST 0x1547 ; Address of begin
1529 0004 | | .CONST 0x0004 ; Address of exception handler
152a 0004 | | .CONST 0x0004 ; Number of locals
152b INIT_1528:
152b 4803 |H | Short_Literal 0x3
152c 8228 | ( | Call 0x1,0x28
152d e5ff | | Load 0x2,-0x1
152e 01db | | Execute Vector,Length
152f 0273 | s | Execute Discrete,Plus
1530 e5fe | | Load 0x2,-0x2
1531 01db | | Execute Vector,Length
1532 0273 | s | Execute Discrete,Plus
1533 e5fd | | Load 0x2,-0x3
1534 01db | | Execute Vector,Length
1535 0273 | s | Execute Discrete,Plus
1536 e5fc | | Load 0x2,-0x4
1537 01db | | Execute Vector,Length
1538 0273 | s | Execute Discrete,Plus
1539 e5fb | | Load 0x2,-0x5
153a 01db | | Execute Vector,Length
153b 0273 | s | Execute Discrete,Plus
153c e5fa | | Load 0x2,-0x6
153d 01db | | Execute Vector,Length
153e 0273 | s | Execute Discrete,Plus
153f 00e2 | | Load_Encached Integer_Cache
1540 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1541 00e2 | | Load_Encached Integer_Cache
1542 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1543 4801 |H | Short_Literal 0x1
1544 e402 | | Load 0x2,0x2
1545 00e9 | | Load_Encached String_Cache
1546 0334 | 4 | Declare_Variable Array,With_Constraint
1547 BODY_1528:
1547 e403 | | Load 0x2,0x3
1548 e404 | | Load 0x2,0x4
1549 e5fe | | Load 0x2,-0x2
154a e5ff | | Load 0x2,-0x1
154b 8221 | ! | Call 0x1,0x21
154c 00d1 | | Pop_Control Pop_Count_1
154d c403 | | Store 0x2,0x3
154e e403 | | Load 0x2,0x3
154f e404 | | Load 0x2,0x4
1550 e5fc | | Load 0x2,-0x4
1551 e5fd | | Load 0x2,-0x3
1552 8223 | # | Call 0x1,0x23
1553 00d1 | | Pop_Control Pop_Count_1
1554 c403 | | Store 0x2,0x3
1555 e403 | | Load 0x2,0x3
1556 e404 | | Load 0x2,0x4
1557 e5fa | | Load 0x2,-0x6
1558 e5fb | | Load 0x2,-0x5
1559 8222 | " | Call 0x1,0x22
155a 00d1 | | Pop_Control Pop_Count_1
155b c403 | | Store 0x2,0x3
155c e403 | | Load 0x2,0x3
155d e404 | | Load 0x2,0x4
155e 01dc | | Execute Vector,Last
155f 0a01 | | Execute_Immediate Plus,0x1
1560 027f | | Execute Discrete,Equal
1561 7001 |p | Jump_Nonzero 0x1563
1562 0887 | | Execute_Immediate Raise,0x87
1563 00d8 | | Load_Top At_Offset_0
1564 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
1565 0000 0000 | | .XXX[0x3]
1567 0000 | |
1568 ; --------------------------------------------------------------------------------------
1568 ; SUBPROGRAM
1568 ; --------------------------------------------------------------------------------------
1568 158d | | .CONST 0x158d ; Address of begin
1569 0004 | | .CONST 0x0004 ; Address of exception handler
156a 0004 | | .CONST 0x0004 ; Number of locals
156b INIT_1568:
156b 4804 |H | Short_Literal 0x4
156c 8228 | ( | Call 0x1,0x28
156d e5ff | | Load 0x2,-0x1
156e 01db | | Execute Vector,Length
156f 0273 | s | Execute Discrete,Plus
1570 e5fe | | Load 0x2,-0x2
1571 01db | | Execute Vector,Length
1572 0273 | s | Execute Discrete,Plus
1573 e5fd | | Load 0x2,-0x3
1574 01db | | Execute Vector,Length
1575 0273 | s | Execute Discrete,Plus
1576 e5fc | | Load 0x2,-0x4
1577 01db | | Execute Vector,Length
1578 0273 | s | Execute Discrete,Plus
1579 e5fb | | Load 0x2,-0x5
157a 01db | | Execute Vector,Length
157b 0273 | s | Execute Discrete,Plus
157c e5fa | | Load 0x2,-0x6
157d 01db | | Execute Vector,Length
157e 0273 | s | Execute Discrete,Plus
157f e5f9 | | Load 0x2,-0x7
1580 01db | | Execute Vector,Length
1581 0273 | s | Execute Discrete,Plus
1582 e5f8 | | Load 0x2,-0x8
1583 01db | | Execute Vector,Length
1584 0273 | s | Execute Discrete,Plus
1585 00e2 | | Load_Encached Integer_Cache
1586 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1587 00e2 | | Load_Encached Integer_Cache
1588 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1589 4801 |H | Short_Literal 0x1
158a e402 | | Load 0x2,0x2
158b 00e9 | | Load_Encached String_Cache
158c 0334 | 4 | Declare_Variable Array,With_Constraint
158d BODY_1568:
158d e403 | | Load 0x2,0x3
158e e404 | | Load 0x2,0x4
158f e5fe | | Load 0x2,-0x2
1590 e5ff | | Load 0x2,-0x1
1591 8221 | ! | Call 0x1,0x21
1592 00d1 | | Pop_Control Pop_Count_1
1593 c403 | | Store 0x2,0x3
1594 e403 | | Load 0x2,0x3
1595 e404 | | Load 0x2,0x4
1596 e5fa | | Load 0x2,-0x6
1597 e5fb | | Load 0x2,-0x5
1598 e5fc | | Load 0x2,-0x4
1599 e5fd | | Load 0x2,-0x3
159a 8224 | $ | Call 0x1,0x24
159b 00d1 | | Pop_Control Pop_Count_1
159c c403 | | Store 0x2,0x3
159d e403 | | Load 0x2,0x3
159e e404 | | Load 0x2,0x4
159f e5f8 | | Load 0x2,-0x8
15a0 e5f9 | | Load 0x2,-0x7
15a1 8222 | " | Call 0x1,0x22
15a2 00d1 | | Pop_Control Pop_Count_1
15a3 c403 | | Store 0x2,0x3
15a4 e403 | | Load 0x2,0x3
15a5 e404 | | Load 0x2,0x4
15a6 01dc | | Execute Vector,Last
15a7 0a01 | | Execute_Immediate Plus,0x1
15a8 027f | | Execute Discrete,Equal
15a9 7001 |p | Jump_Nonzero 0x15ab
15aa 0887 | | Execute_Immediate Raise,0x87
15ab 00d8 | | Load_Top At_Offset_0
15ac 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
15ad 0000 0000 | | .XXX[0x3]
15af 0000 | |
15b0 ; --------------------------------------------------------------------------------------
15b0 ; SUBPROGRAM
15b0 ; --------------------------------------------------------------------------------------
15b0 15db | | .CONST 0x15db ; Address of begin
15b1 0004 | | .CONST 0x0004 ; Address of exception handler
15b2 0004 | | .CONST 0x0004 ; Number of locals
15b3 INIT_15b0:
15b3 4805 |H | Short_Literal 0x5
15b4 8228 | ( | Call 0x1,0x28
15b5 e5ff | | Load 0x2,-0x1
15b6 01db | | Execute Vector,Length
15b7 0273 | s | Execute Discrete,Plus
15b8 e5fe | | Load 0x2,-0x2
15b9 01db | | Execute Vector,Length
15ba 0273 | s | Execute Discrete,Plus
15bb e5fd | | Load 0x2,-0x3
15bc 01db | | Execute Vector,Length
15bd 0273 | s | Execute Discrete,Plus
15be e5fc | | Load 0x2,-0x4
15bf 01db | | Execute Vector,Length
15c0 0273 | s | Execute Discrete,Plus
15c1 e5fb | | Load 0x2,-0x5
15c2 01db | | Execute Vector,Length
15c3 0273 | s | Execute Discrete,Plus
15c4 e5fa | | Load 0x2,-0x6
15c5 01db | | Execute Vector,Length
15c6 0273 | s | Execute Discrete,Plus
15c7 e5f9 | | Load 0x2,-0x7
15c8 01db | | Execute Vector,Length
15c9 0273 | s | Execute Discrete,Plus
15ca e5f8 | | Load 0x2,-0x8
15cb 01db | | Execute Vector,Length
15cc 0273 | s | Execute Discrete,Plus
15cd e5f7 | | Load 0x2,-0x9
15ce 01db | | Execute Vector,Length
15cf 0273 | s | Execute Discrete,Plus
15d0 e5f6 | | Load 0x2,-0xa
15d1 01db | | Execute Vector,Length
15d2 0273 | s | Execute Discrete,Plus
15d3 00e2 | | Load_Encached Integer_Cache
15d4 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
15d5 00e2 | | Load_Encached Integer_Cache
15d6 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
15d7 4801 |H | Short_Literal 0x1
15d8 e402 | | Load 0x2,0x2
15d9 00e9 | | Load_Encached String_Cache
15da 0334 | 4 | Declare_Variable Array,With_Constraint
15db BODY_15b0:
15db e403 | | Load 0x2,0x3
15dc e404 | | Load 0x2,0x4
15dd e5fe | | Load 0x2,-0x2
15de e5ff | | Load 0x2,-0x1
15df 8221 | ! | Call 0x1,0x21
15e0 00d1 | | Pop_Control Pop_Count_1
15e1 c403 | | Store 0x2,0x3
15e2 e403 | | Load 0x2,0x3
15e3 e404 | | Load 0x2,0x4
15e4 e5f8 | | Load 0x2,-0x8
15e5 e5f9 | | Load 0x2,-0x7
15e6 e5fa | | Load 0x2,-0x6
15e7 e5fb | | Load 0x2,-0x5
15e8 e5fc | | Load 0x2,-0x4
15e9 e5fd | | Load 0x2,-0x3
15ea 8225 | % | Call 0x1,0x25
15eb 00d1 | | Pop_Control Pop_Count_1
15ec c403 | | Store 0x2,0x3
15ed e403 | | Load 0x2,0x3
15ee e404 | | Load 0x2,0x4
15ef e5f6 | | Load 0x2,-0xa
15f0 e5f7 | | Load 0x2,-0x9
15f1 8222 | " | Call 0x1,0x22
15f2 00d1 | | Pop_Control Pop_Count_1
15f3 c403 | | Store 0x2,0x3
15f4 e403 | | Load 0x2,0x3
15f5 e404 | | Load 0x2,0x4
15f6 01dc | | Execute Vector,Last
15f7 0a01 | | Execute_Immediate Plus,0x1
15f8 027f | | Execute Discrete,Equal
15f9 7001 |p | Jump_Nonzero 0x15fb
15fa 0887 | | Execute_Immediate Raise,0x87
15fb 00d8 | | Load_Top At_Offset_0
15fc 440a |D | Exit_Subprogram With_Value,New_Top_Offset 0xa
15fd 0000 0000 | | .XXX[0x3]
15ff 0000 | |
1600 ; --------------------------------------------------------------------------------------
1600 ; SUBPROGRAM
1600 ; --------------------------------------------------------------------------------------
1600 163a | : | .CONST 0x163a ; Address of begin
1601 0004 | | .CONST 0x0004 ; Address of exception handler
1602 0007 | | .CONST 0x0007 ; Number of locals
1603 INIT_1600:
1603 4806 |H | Short_Literal 0x6
1604 8228 | ( | Call 0x1,0x28
1605 e5ff | | Load 0x2,-0x1
1606 01db | | Execute Vector,Length
1607 0273 | s | Execute Discrete,Plus
1608 e5fe | | Load 0x2,-0x2
1609 01db | | Execute Vector,Length
160a 0273 | s | Execute Discrete,Plus
160b e5fd | | Load 0x2,-0x3
160c 01db | | Execute Vector,Length
160d 0273 | s | Execute Discrete,Plus
160e e5fc | | Load 0x2,-0x4
160f 01db | | Execute Vector,Length
1610 0273 | s | Execute Discrete,Plus
1611 e5fb | | Load 0x2,-0x5
1612 01db | | Execute Vector,Length
1613 0273 | s | Execute Discrete,Plus
1614 00e2 | | Load_Encached Integer_Cache
1615 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1616 e5fa | | Load 0x2,-0x6
1617 01db | | Execute Vector,Length
1618 e5f9 | | Load 0x2,-0x7
1619 01db | | Execute Vector,Length
161a 0273 | s | Execute Discrete,Plus
161b e5f8 | | Load 0x2,-0x8
161c 01db | | Execute Vector,Length
161d 0273 | s | Execute Discrete,Plus
161e e5f7 | | Load 0x2,-0x9
161f 01db | | Execute Vector,Length
1620 0273 | s | Execute Discrete,Plus
1621 e5f6 | | Load 0x2,-0xa
1622 01db | | Execute Vector,Length
1623 0273 | s | Execute Discrete,Plus
1624 00e2 | | Load_Encached Integer_Cache
1625 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1626 e5f5 | | Load 0x2,-0xb
1627 01db | | Execute Vector,Length
1628 e5f4 | | Load 0x2,-0xc
1629 01db | | Execute Vector,Length
162a 0273 | s | Execute Discrete,Plus
162b 00e2 | | Load_Encached Integer_Cache
162c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
162d e402 | | Load 0x2,0x2
162e e403 | | Load 0x2,0x3
162f 0273 | s | Execute Discrete,Plus
1630 e404 | | Load 0x2,0x4
1631 0273 | s | Execute Discrete,Plus
1632 00e2 | | Load_Encached Integer_Cache
1633 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1634 00e2 | | Load_Encached Integer_Cache
1635 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1636 4801 |H | Short_Literal 0x1
1637 e405 | | Load 0x2,0x5
1638 00e9 | | Load_Encached String_Cache
1639 0334 | 4 | Declare_Variable Array,With_Constraint
163a BODY_1600:
163a e406 | | Load 0x2,0x6
163b e407 | | Load 0x2,0x7
163c e5fe | | Load 0x2,-0x2
163d e5ff | | Load 0x2,-0x1
163e 8221 | ! | Call 0x1,0x21
163f 00d1 | | Pop_Control Pop_Count_1
1640 c406 | | Store 0x2,0x6
1641 e406 | | Load 0x2,0x6
1642 e407 | | Load 0x2,0x7
1643 e5f6 | | Load 0x2,-0xa
1644 e5f7 | | Load 0x2,-0x9
1645 e5f8 | | Load 0x2,-0x8
1646 e5f9 | | Load 0x2,-0x7
1647 e5fa | | Load 0x2,-0x6
1648 e5fb | | Load 0x2,-0x5
1649 e5fc | | Load 0x2,-0x4
164a e5fd | | Load 0x2,-0x3
164b 8226 | & | Call 0x1,0x26
164c 00d1 | | Pop_Control Pop_Count_1
164d c406 | | Store 0x2,0x6
164e e406 | | Load 0x2,0x6
164f e407 | | Load 0x2,0x7
1650 e5f4 | | Load 0x2,-0xc
1651 e5f5 | | Load 0x2,-0xb
1652 8222 | " | Call 0x1,0x22
1653 00d1 | | Pop_Control Pop_Count_1
1654 c406 | | Store 0x2,0x6
1655 e406 | | Load 0x2,0x6
1656 e407 | | Load 0x2,0x7
1657 01dc | | Execute Vector,Last
1658 0a01 | | Execute_Immediate Plus,0x1
1659 027f | | Execute Discrete,Equal
165a 7001 |p | Jump_Nonzero 0x165c
165b 0887 | | Execute_Immediate Raise,0x87
165c 00d8 | | Load_Top At_Offset_0
165d 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc
165e 0000 0000 | | .XXX[0x2]
1660 ; --------------------------------------------------------------------------------------
1660 ; SUBPROGRAM
1660 ; --------------------------------------------------------------------------------------
1660 16a0 | | .CONST 0x16a0 ; Address of begin
1661 0004 | | .CONST 0x0004 ; Address of exception handler
1662 0007 | | .CONST 0x0007 ; Number of locals
1663 INIT_1660:
1663 4807 |H | Short_Literal 0x7
1664 8228 | ( | Call 0x1,0x28
1665 e5ff | | Load 0x2,-0x1
1666 01db | | Execute Vector,Length
1667 0273 | s | Execute Discrete,Plus
1668 e5fe | | Load 0x2,-0x2
1669 01db | | Execute Vector,Length
166a 0273 | s | Execute Discrete,Plus
166b e5fd | | Load 0x2,-0x3
166c 01db | | Execute Vector,Length
166d 0273 | s | Execute Discrete,Plus
166e e5fc | | Load 0x2,-0x4
166f 01db | | Execute Vector,Length
1670 0273 | s | Execute Discrete,Plus
1671 e5fb | | Load 0x2,-0x5
1672 01db | | Execute Vector,Length
1673 0273 | s | Execute Discrete,Plus
1674 00e2 | | Load_Encached Integer_Cache
1675 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1676 e5fa | | Load 0x2,-0x6
1677 01db | | Execute Vector,Length
1678 e5f9 | | Load 0x2,-0x7
1679 01db | | Execute Vector,Length
167a 0273 | s | Execute Discrete,Plus
167b e5f8 | | Load 0x2,-0x8
167c 01db | | Execute Vector,Length
167d 0273 | s | Execute Discrete,Plus
167e e5f7 | | Load 0x2,-0x9
167f 01db | | Execute Vector,Length
1680 0273 | s | Execute Discrete,Plus
1681 e5f6 | | Load 0x2,-0xa
1682 01db | | Execute Vector,Length
1683 0273 | s | Execute Discrete,Plus
1684 e5f5 | | Load 0x2,-0xb
1685 01db | | Execute Vector,Length
1686 0273 | s | Execute Discrete,Plus
1687 00e2 | | Load_Encached Integer_Cache
1688 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1689 e5f4 | | Load 0x2,-0xc
168a 01db | | Execute Vector,Length
168b e5f3 | | Load 0x2,-0xd
168c 01db | | Execute Vector,Length
168d 0273 | s | Execute Discrete,Plus
168e e5f2 | | Load 0x2,-0xe
168f 01db | | Execute Vector,Length
1690 0273 | s | Execute Discrete,Plus
1691 00e2 | | Load_Encached Integer_Cache
1692 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1693 e402 | | Load 0x2,0x2
1694 e403 | | Load 0x2,0x3
1695 0273 | s | Execute Discrete,Plus
1696 e404 | | Load 0x2,0x4
1697 0273 | s | Execute Discrete,Plus
1698 00e2 | | Load_Encached Integer_Cache
1699 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
169a 00e2 | | Load_Encached Integer_Cache
169b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
169c 4801 |H | Short_Literal 0x1
169d e405 | | Load 0x2,0x5
169e 00e9 | | Load_Encached String_Cache
169f 0334 | 4 | Declare_Variable Array,With_Constraint
16a0 BODY_1660:
16a0 e406 | | Load 0x2,0x6
16a1 e407 | | Load 0x2,0x7
16a2 e5fe | | Load 0x2,-0x2
16a3 e5ff | | Load 0x2,-0x1
16a4 8221 | ! | Call 0x1,0x21
16a5 00d1 | | Pop_Control Pop_Count_1
16a6 c406 | | Store 0x2,0x6
16a7 e406 | | Load 0x2,0x6
16a8 e407 | | Load 0x2,0x7
16a9 e5f4 | | Load 0x2,-0xc
16aa e5f5 | | Load 0x2,-0xb
16ab e5f6 | | Load 0x2,-0xa
16ac e5f7 | | Load 0x2,-0x9
16ad e5f8 | | Load 0x2,-0x8
16ae e5f9 | | Load 0x2,-0x7
16af e5fa | | Load 0x2,-0x6
16b0 e5fb | | Load 0x2,-0x5
16b1 e5fc | | Load 0x2,-0x4
16b2 e5fd | | Load 0x2,-0x3
16b3 8227 | ' | Call 0x1,0x27
16b4 00d1 | | Pop_Control Pop_Count_1
16b5 c406 | | Store 0x2,0x6
16b6 e406 | | Load 0x2,0x6
16b7 e407 | | Load 0x2,0x7
16b8 e5f2 | | Load 0x2,-0xe
16b9 e5f3 | | Load 0x2,-0xd
16ba 8222 | " | Call 0x1,0x22
16bb 00d1 | | Pop_Control Pop_Count_1
16bc c406 | | Store 0x2,0x6
16bd e406 | | Load 0x2,0x6
16be e407 | | Load 0x2,0x7
16bf 01dc | | Execute Vector,Last
16c0 0a01 | | Execute_Immediate Plus,0x1
16c1 027f | | Execute Discrete,Equal
16c2 7001 |p | Jump_Nonzero 0x16c4
16c3 0887 | | Execute_Immediate Raise,0x87
16c4 00d8 | | Load_Top At_Offset_0
16c5 440e |D | Exit_Subprogram With_Value,New_Top_Offset 0xe
16c6 0000 0000 | | .XXX[0x2]
16c8 ; --------------------------------------------------------------------------------------
16c8 ; SUBPROGRAM
16c8 ; --------------------------------------------------------------------------------------
16c8 170e | | .CONST 0x170e ; Address of begin
16c9 0004 | | .CONST 0x0004 ; Address of exception handler
16ca 0007 | | .CONST 0x0007 ; Number of locals
16cb INIT_16c8:
16cb 4808 |H | Short_Literal 0x8
16cc 8228 | ( | Call 0x1,0x28
16cd e5ff | | Load 0x2,-0x1
16ce 01db | | Execute Vector,Length
16cf 0273 | s | Execute Discrete,Plus
16d0 e5fe | | Load 0x2,-0x2
16d1 01db | | Execute Vector,Length
16d2 0273 | s | Execute Discrete,Plus
16d3 e5fd | | Load 0x2,-0x3
16d4 01db | | Execute Vector,Length
16d5 0273 | s | Execute Discrete,Plus
16d6 e5fc | | Load 0x2,-0x4
16d7 01db | | Execute Vector,Length
16d8 0273 | s | Execute Discrete,Plus
16d9 e5fb | | Load 0x2,-0x5
16da 01db | | Execute Vector,Length
16db 0273 | s | Execute Discrete,Plus
16dc 00e2 | | Load_Encached Integer_Cache
16dd 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
16de e5fa | | Load 0x2,-0x6
16df 01db | | Execute Vector,Length
16e0 e5f9 | | Load 0x2,-0x7
16e1 01db | | Execute Vector,Length
16e2 0273 | s | Execute Discrete,Plus
16e3 e5f8 | | Load 0x2,-0x8
16e4 01db | | Execute Vector,Length
16e5 0273 | s | Execute Discrete,Plus
16e6 e5f7 | | Load 0x2,-0x9
16e7 01db | | Execute Vector,Length
16e8 0273 | s | Execute Discrete,Plus
16e9 e5f6 | | Load 0x2,-0xa
16ea 01db | | Execute Vector,Length
16eb 0273 | s | Execute Discrete,Plus
16ec e5f5 | | Load 0x2,-0xb
16ed 01db | | Execute Vector,Length
16ee 0273 | s | Execute Discrete,Plus
16ef 00e2 | | Load_Encached Integer_Cache
16f0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
16f1 e5f4 | | Load 0x2,-0xc
16f2 01db | | Execute Vector,Length
16f3 e5f3 | | Load 0x2,-0xd
16f4 01db | | Execute Vector,Length
16f5 0273 | s | Execute Discrete,Plus
16f6 e5f2 | | Load 0x2,-0xe
16f7 01db | | Execute Vector,Length
16f8 0273 | s | Execute Discrete,Plus
16f9 e5f1 | | Load 0x2,-0xf
16fa 01db | | Execute Vector,Length
16fb 0273 | s | Execute Discrete,Plus
16fc e5f0 | | Load 0x2,-0x10
16fd 01db | | Execute Vector,Length
16fe 0273 | s | Execute Discrete,Plus
16ff 00e2 | | Load_Encached Integer_Cache
1700 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1701 e402 | | Load 0x2,0x2
1702 e403 | | Load 0x2,0x3
1703 0273 | s | Execute Discrete,Plus
1704 e404 | | Load 0x2,0x4
1705 0273 | s | Execute Discrete,Plus
1706 00e2 | | Load_Encached Integer_Cache
1707 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1708 00e2 | | Load_Encached Integer_Cache
1709 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
170a 4801 |H | Short_Literal 0x1
170b e405 | | Load 0x2,0x5
170c 00e9 | | Load_Encached String_Cache
170d 0334 | 4 | Declare_Variable Array,With_Constraint
170e BODY_16c8:
170e e406 | | Load 0x2,0x6
170f e407 | | Load 0x2,0x7
1710 e5fe | | Load 0x2,-0x2
1711 e5ff | | Load 0x2,-0x1
1712 8221 | ! | Call 0x1,0x21
1713 00d1 | | Pop_Control Pop_Count_1
1714 c406 | | Store 0x2,0x6
1715 e406 | | Load 0x2,0x6
1716 e407 | | Load 0x2,0x7
1717 e5f4 | | Load 0x2,-0xc
1718 e5f5 | | Load 0x2,-0xb
1719 e5f6 | | Load 0x2,-0xa
171a e5f7 | | Load 0x2,-0x9
171b e5f8 | | Load 0x2,-0x8
171c e5f9 | | Load 0x2,-0x7
171d e5fa | | Load 0x2,-0x6
171e e5fb | | Load 0x2,-0x5
171f e5fc | | Load 0x2,-0x4
1720 e5fd | | Load 0x2,-0x3
1721 8227 | ' | Call 0x1,0x27
1722 00d1 | | Pop_Control Pop_Count_1
1723 c406 | | Store 0x2,0x6
1724 e406 | | Load 0x2,0x6
1725 e407 | | Load 0x2,0x7
1726 e5f2 | | Load 0x2,-0xe
1727 e5f3 | | Load 0x2,-0xd
1728 8223 | # | Call 0x1,0x23
1729 00d1 | | Pop_Control Pop_Count_1
172a c406 | | Store 0x2,0x6
172b e406 | | Load 0x2,0x6
172c e407 | | Load 0x2,0x7
172d e5f0 | | Load 0x2,-0x10
172e e5f1 | | Load 0x2,-0xf
172f 8222 | " | Call 0x1,0x22
1730 00d1 | | Pop_Control Pop_Count_1
1731 c406 | | Store 0x2,0x6
1732 e406 | | Load 0x2,0x6
1733 e407 | | Load 0x2,0x7
1734 01dc | | Execute Vector,Last
1735 0a01 | | Execute_Immediate Plus,0x1
1736 027f | | Execute Discrete,Equal
1737 7001 |p | Jump_Nonzero 0x1739
1738 0887 | | Execute_Immediate Raise,0x87
1739 00d8 | | Load_Top At_Offset_0
173a 4410 |D | Exit_Subprogram With_Value,New_Top_Offset 0x10
173b 0000 0000 | | .BLANK 0000[0x5]
1740 ; --------------------------------------------------------------------------------------
1740 ; SUBPROGRAM
1740 ; --------------------------------------------------------------------------------------
1740 1795 | | .CONST 0x1795 ; Address of begin
1741 0004 | | .CONST 0x0004 ; Address of exception handler
1742 0008 | | .CONST 0x0008 ; Number of locals
1743 INIT_1740:
1743 480a |H | Short_Literal 0xa
1744 8228 | ( | Call 0x1,0x28
1745 e5ff | | Load 0x2,-0x1
1746 01db | | Execute Vector,Length
1747 0273 | s | Execute Discrete,Plus
1748 e5fe | | Load 0x2,-0x2
1749 01db | | Execute Vector,Length
174a 0273 | s | Execute Discrete,Plus
174b e5fd | | Load 0x2,-0x3
174c 01db | | Execute Vector,Length
174d 0273 | s | Execute Discrete,Plus
174e e5fc | | Load 0x2,-0x4
174f 01db | | Execute Vector,Length
1750 0273 | s | Execute Discrete,Plus
1751 e5fb | | Load 0x2,-0x5
1752 01db | | Execute Vector,Length
1753 0273 | s | Execute Discrete,Plus
1754 00e2 | | Load_Encached Integer_Cache
1755 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1756 e5fa | | Load 0x2,-0x6
1757 01db | | Execute Vector,Length
1758 e5f9 | | Load 0x2,-0x7
1759 01db | | Execute Vector,Length
175a 0273 | s | Execute Discrete,Plus
175b e5f8 | | Load 0x2,-0x8
175c 01db | | Execute Vector,Length
175d 0273 | s | Execute Discrete,Plus
175e e5f7 | | Load 0x2,-0x9
175f 01db | | Execute Vector,Length
1760 0273 | s | Execute Discrete,Plus
1761 e5f6 | | Load 0x2,-0xa
1762 01db | | Execute Vector,Length
1763 0273 | s | Execute Discrete,Plus
1764 e5f5 | | Load 0x2,-0xb
1765 01db | | Execute Vector,Length
1766 0273 | s | Execute Discrete,Plus
1767 00e2 | | Load_Encached Integer_Cache
1768 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1769 e5f4 | | Load 0x2,-0xc
176a 01db | | Execute Vector,Length
176b e5f3 | | Load 0x2,-0xd
176c 01db | | Execute Vector,Length
176d 0273 | s | Execute Discrete,Plus
176e e5f2 | | Load 0x2,-0xe
176f 01db | | Execute Vector,Length
1770 0273 | s | Execute Discrete,Plus
1771 e5f1 | | Load 0x2,-0xf
1772 01db | | Execute Vector,Length
1773 0273 | s | Execute Discrete,Plus
1774 e5f0 | | Load 0x2,-0x10
1775 01db | | Execute Vector,Length
1776 0273 | s | Execute Discrete,Plus
1777 e5ef | | Load 0x2,-0x11
1778 01db | | Execute Vector,Length
1779 0273 | s | Execute Discrete,Plus
177a 00e2 | | Load_Encached Integer_Cache
177b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
177c e5ee | | Load 0x2,-0x12
177d 01db | | Execute Vector,Length
177e e5ed | | Load 0x2,-0x13
177f 01db | | Execute Vector,Length
1780 0273 | s | Execute Discrete,Plus
1781 e5ec | | Load 0x2,-0x14
1782 01db | | Execute Vector,Length
1783 0273 | s | Execute Discrete,Plus
1784 00e2 | | Load_Encached Integer_Cache
1785 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1786 e402 | | Load 0x2,0x2
1787 e403 | | Load 0x2,0x3
1788 0273 | s | Execute Discrete,Plus
1789 e404 | | Load 0x2,0x4
178a 0273 | s | Execute Discrete,Plus
178b e405 | | Load 0x2,0x5
178c 0273 | s | Execute Discrete,Plus
178d 00e2 | | Load_Encached Integer_Cache
178e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
178f 00e2 | | Load_Encached Integer_Cache
1790 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1791 4801 |H | Short_Literal 0x1
1792 e406 | | Load 0x2,0x6
1793 00e9 | | Load_Encached String_Cache
1794 0334 | 4 | Declare_Variable Array,With_Constraint
1795 BODY_1740:
1795 e407 | | Load 0x2,0x7
1796 e408 | | Load 0x2,0x8
1797 e5fe | | Load 0x2,-0x2
1798 e5ff | | Load 0x2,-0x1
1799 8221 | ! | Call 0x1,0x21
179a 00d1 | | Pop_Control Pop_Count_1
179b c407 | | Store 0x2,0x7
179c e407 | | Load 0x2,0x7
179d e408 | | Load 0x2,0x8
179e e5f4 | | Load 0x2,-0xc
179f e5f5 | | Load 0x2,-0xb
17a0 e5f6 | | Load 0x2,-0xa
17a1 e5f7 | | Load 0x2,-0x9
17a2 e5f8 | | Load 0x2,-0x8
17a3 e5f9 | | Load 0x2,-0x7
17a4 e5fa | | Load 0x2,-0x6
17a5 e5fb | | Load 0x2,-0x5
17a6 e5fc | | Load 0x2,-0x4
17a7 e5fd | | Load 0x2,-0x3
17a8 8227 | ' | Call 0x1,0x27
17a9 00d1 | | Pop_Control Pop_Count_1
17aa c407 | | Store 0x2,0x7
17ab e407 | | Load 0x2,0x7
17ac e408 | | Load 0x2,0x8
17ad e5ee | | Load 0x2,-0x12
17ae e5ef | | Load 0x2,-0x11
17af e5f0 | | Load 0x2,-0x10
17b0 e5f1 | | Load 0x2,-0xf
17b1 e5f2 | | Load 0x2,-0xe
17b2 e5f3 | | Load 0x2,-0xd
17b3 8225 | % | Call 0x1,0x25
17b4 00d1 | | Pop_Control Pop_Count_1
17b5 c407 | | Store 0x2,0x7
17b6 e407 | | Load 0x2,0x7
17b7 e408 | | Load 0x2,0x8
17b8 e5ec | | Load 0x2,-0x14
17b9 e5ed | | Load 0x2,-0x13
17ba 8222 | " | Call 0x1,0x22
17bb 00d1 | | Pop_Control Pop_Count_1
17bc c407 | | Store 0x2,0x7
17bd e407 | | Load 0x2,0x7
17be e408 | | Load 0x2,0x8
17bf 01dc | | Execute Vector,Last
17c0 0a01 | | Execute_Immediate Plus,0x1
17c1 027f | | Execute Discrete,Equal
17c2 7001 |p | Jump_Nonzero 0x17c4
17c3 0887 | | Execute_Immediate Raise,0x87
17c4 00d8 | | Load_Top At_Offset_0
17c5 4414 |D | Exit_Subprogram With_Value,New_Top_Offset 0x14
17c6 0000 0000 | | .XXX[0x2]
17c8 ; --------------------------------------------------------------------------------------
17c8 ; SUBPROGRAM
17c8 ; --------------------------------------------------------------------------------------
17c8 1823 | # | .CONST 0x1823 ; Address of begin
17c9 0004 | | .CONST 0x0004 ; Address of exception handler
17ca 0008 | | .CONST 0x0008 ; Number of locals
17cb INIT_17c8:
17cb 480b |H | Short_Literal 0xb
17cc 8228 | ( | Call 0x1,0x28
17cd e5ff | | Load 0x2,-0x1
17ce 01db | | Execute Vector,Length
17cf 0273 | s | Execute Discrete,Plus
17d0 e5fe | | Load 0x2,-0x2
17d1 01db | | Execute Vector,Length
17d2 0273 | s | Execute Discrete,Plus
17d3 e5fd | | Load 0x2,-0x3
17d4 01db | | Execute Vector,Length
17d5 0273 | s | Execute Discrete,Plus
17d6 e5fc | | Load 0x2,-0x4
17d7 01db | | Execute Vector,Length
17d8 0273 | s | Execute Discrete,Plus
17d9 e5fb | | Load 0x2,-0x5
17da 01db | | Execute Vector,Length
17db 0273 | s | Execute Discrete,Plus
17dc 00e2 | | Load_Encached Integer_Cache
17dd 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
17de e5fa | | Load 0x2,-0x6
17df 01db | | Execute Vector,Length
17e0 e5f9 | | Load 0x2,-0x7
17e1 01db | | Execute Vector,Length
17e2 0273 | s | Execute Discrete,Plus
17e3 e5f8 | | Load 0x2,-0x8
17e4 01db | | Execute Vector,Length
17e5 0273 | s | Execute Discrete,Plus
17e6 e5f7 | | Load 0x2,-0x9
17e7 01db | | Execute Vector,Length
17e8 0273 | s | Execute Discrete,Plus
17e9 e5f6 | | Load 0x2,-0xa
17ea 01db | | Execute Vector,Length
17eb 0273 | s | Execute Discrete,Plus
17ec e5f5 | | Load 0x2,-0xb
17ed 01db | | Execute Vector,Length
17ee 0273 | s | Execute Discrete,Plus
17ef 00e2 | | Load_Encached Integer_Cache
17f0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
17f1 e5f4 | | Load 0x2,-0xc
17f2 01db | | Execute Vector,Length
17f3 e5f3 | | Load 0x2,-0xd
17f4 01db | | Execute Vector,Length
17f5 0273 | s | Execute Discrete,Plus
17f6 e5f2 | | Load 0x2,-0xe
17f7 01db | | Execute Vector,Length
17f8 0273 | s | Execute Discrete,Plus
17f9 e5f1 | | Load 0x2,-0xf
17fa 01db | | Execute Vector,Length
17fb 0273 | s | Execute Discrete,Plus
17fc e5f0 | | Load 0x2,-0x10
17fd 01db | | Execute Vector,Length
17fe 0273 | s | Execute Discrete,Plus
17ff e5ef | | Load 0x2,-0x11
1800 01db | | Execute Vector,Length
1801 0273 | s | Execute Discrete,Plus
1802 00e2 | | Load_Encached Integer_Cache
1803 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1804 e5ee | | Load 0x2,-0x12
1805 01db | | Execute Vector,Length
1806 e5ed | | Load 0x2,-0x13
1807 01db | | Execute Vector,Length
1808 0273 | s | Execute Discrete,Plus
1809 e5ec | | Load 0x2,-0x14
180a 01db | | Execute Vector,Length
180b 0273 | s | Execute Discrete,Plus
180c e5eb | | Load 0x2,-0x15
180d 01db | | Execute Vector,Length
180e 0273 | s | Execute Discrete,Plus
180f e5ea | | Load 0x2,-0x16
1810 01db | | Execute Vector,Length
1811 0273 | s | Execute Discrete,Plus
1812 00e2 | | Load_Encached Integer_Cache
1813 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1814 e402 | | Load 0x2,0x2
1815 e403 | | Load 0x2,0x3
1816 0273 | s | Execute Discrete,Plus
1817 e404 | | Load 0x2,0x4
1818 0273 | s | Execute Discrete,Plus
1819 e405 | | Load 0x2,0x5
181a 0273 | s | Execute Discrete,Plus
181b 00e2 | | Load_Encached Integer_Cache
181c 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
181d 00e2 | | Load_Encached Integer_Cache
181e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
181f 4801 |H | Short_Literal 0x1
1820 e406 | | Load 0x2,0x6
1821 00e9 | | Load_Encached String_Cache
1822 0334 | 4 | Declare_Variable Array,With_Constraint
1823 BODY_17c8:
1823 e407 | | Load 0x2,0x7
1824 e408 | | Load 0x2,0x8
1825 e5fe | | Load 0x2,-0x2
1826 e5ff | | Load 0x2,-0x1
1827 8221 | ! | Call 0x1,0x21
1828 00d1 | | Pop_Control Pop_Count_1
1829 c407 | | Store 0x2,0x7
182a e407 | | Load 0x2,0x7
182b e408 | | Load 0x2,0x8
182c e5f4 | | Load 0x2,-0xc
182d e5f5 | | Load 0x2,-0xb
182e e5f6 | | Load 0x2,-0xa
182f e5f7 | | Load 0x2,-0x9
1830 e5f8 | | Load 0x2,-0x8
1831 e5f9 | | Load 0x2,-0x7
1832 e5fa | | Load 0x2,-0x6
1833 e5fb | | Load 0x2,-0x5
1834 e5fc | | Load 0x2,-0x4
1835 e5fd | | Load 0x2,-0x3
1836 8227 | ' | Call 0x1,0x27
1837 00d1 | | Pop_Control Pop_Count_1
1838 c407 | | Store 0x2,0x7
1839 e407 | | Load 0x2,0x7
183a e408 | | Load 0x2,0x8
183b e5ec | | Load 0x2,-0x14
183c e5ed | | Load 0x2,-0x13
183d e5ee | | Load 0x2,-0x12
183e e5ef | | Load 0x2,-0x11
183f e5f0 | | Load 0x2,-0x10
1840 e5f1 | | Load 0x2,-0xf
1841 e5f2 | | Load 0x2,-0xe
1842 e5f3 | | Load 0x2,-0xd
1843 8226 | & | Call 0x1,0x26
1844 00d1 | | Pop_Control Pop_Count_1
1845 c407 | | Store 0x2,0x7
1846 e407 | | Load 0x2,0x7
1847 e408 | | Load 0x2,0x8
1848 e5ea | | Load 0x2,-0x16
1849 e5eb | | Load 0x2,-0x15
184a 8222 | " | Call 0x1,0x22
184b 00d1 | | Pop_Control Pop_Count_1
184c c407 | | Store 0x2,0x7
184d e407 | | Load 0x2,0x7
184e e408 | | Load 0x2,0x8
184f 01dc | | Execute Vector,Last
1850 0a01 | | Execute_Immediate Plus,0x1
1851 027f | | Execute Discrete,Equal
1852 7001 |p | Jump_Nonzero 0x1854
1853 0887 | | Execute_Immediate Raise,0x87
1854 00d8 | | Load_Top At_Offset_0
1855 4416 |D | Exit_Subprogram With_Value,New_Top_Offset 0x16
1856 0000 0000 | | .XXX[0x2]
1858 ; --------------------------------------------------------------------------------------
1858 ; SUBPROGRAM
1858 ; --------------------------------------------------------------------------------------
1858 1884 | | .CONST 0x1884 ; Address of begin
1859 0004 | | .CONST 0x0004 ; Address of exception handler
185a 000d | | .CONST 0x000d ; Number of locals
185b INIT_1858:
185b e001 | | Load 0x0,0x1
185c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
185d 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
185e 00e5 | | Load_Encached Long_Integer_Cache
185f 02a0 | | Declare_Subprogram Null_Subprogram
1860 4801 |H | Short_Literal 0x1
1861 032d | - | Declare_Type Record,Defined
1862 00d8 | | Load_Top At_Offset_0
1863 0322 | " | Declare_Variable Record
1864 e5ff | | Load 0x2,-0x1
1865 e404 | | Load 0x2,0x4
1866 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1867 e402 | | Load 0x2,0x2
1868 e402 | | Load 0x2,0x2
1869 02a0 | | Declare_Subprogram Null_Subprogram
186a 4802 |H | Short_Literal 0x2
186b 032d | - | Declare_Type Record,Defined
186c e002 | | Load 0x0,0x2
186d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
186e 190f | | Execute Package,Field_Reference,Field_Number 0xf
186f 00c6 | | Action Check_Subprogram_Elaborated
1870 00d8 | | Load_Top At_Offset_0
1871 e003 | | Load 0x0,0x3
1872 e004 | | Load 0x0,0x4
1873 4809 |H | Short_Literal 0x9
1874 0007 | | Action Break_Optional
1875 e404 | | Load 0x2,0x4
1876 012d | - | Execute Any,Address
1877 e406 | | Load 0x2,0x6
1878 4807 |H | Short_Literal 0x7
1879 4802 |H | Short_Literal 0x2
187a 0099 | | Action Reference_Dynamic
187b e002 | | Load 0x0,0x2
187c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
187d 180f | | Execute Package,Field_Execute,Field_Number 0xf
187e 029f 1a23 | #| Declare_Subprogram INIT_1a20,For_Call
1880 029f 1a33 | 3| Declare_Subprogram INIT_1a30,For_Call
1882 029f 1a43 | C| Declare_Subprogram INIT_1a40,For_Call
1884 BODY_1858:
1884 840d | | Call 0x2,0xd
1885 e005 | | Load 0x0,0x5
1886 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1887 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1888 ; --------------------------------------------------------------------------------------
1888 ; SUBPROGRAM
1888 ; --------------------------------------------------------------------------------------
1888 188b | | .CONST 0x188b ; Address of begin
1889 0004 | | .CONST 0x0004 ; Address of exception handler
188a 0001 | | .CONST 0x0001 ; Number of locals
188b BODY_1888:
188b INIT_1888:
188b e5ff | | Load 0x2,-0x1
188c 6803 |h | Jump_Zero 0x1890
188d 0092 1c4c | L| Action Push_String_Extended,0x1c4c ; "T"
188f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1890 0092 1c4d | M| Action Push_String_Extended,0x1c4d ; "F"
1892 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1893 0000 0000 | | .BLANK 0000[0x5]
1898 ; --------------------------------------------------------------------------------------
1898 ; SUBPROGRAM
1898 ; --------------------------------------------------------------------------------------
1898 189b | | .CONST 0x189b ; Address of begin
1899 0004 | | .CONST 0x0004 ; Address of exception handler
189a 0001 | | .CONST 0x0001 ; Number of locals
189b BODY_1898:
189b INIT_1898:
189b e5ff | | Load 0x2,-0x1
189c 00e0 | | Load_Encached Standard_Cache
189d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
189e 8229 | ) | Call 0x1,0x29
189f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
18a0 ; --------------------------------------------------------------------------------------
18a0 ; SUBPROGRAM
18a0 ; --------------------------------------------------------------------------------------
18a0 18a3 | | .CONST 0x18a3 ; Address of begin
18a1 0004 | | .CONST 0x0004 ; Address of exception handler
18a2 0001 | | .CONST 0x0001 ; Number of locals
18a3 BODY_18a0:
18a3 INIT_18a0:
18a3 e5ff | | Load 0x2,-0x1
18a4 00e0 | | Load_Encached Standard_Cache
18a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
18a6 8229 | ) | Call 0x1,0x29
18a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
18a8 ; --------------------------------------------------------------------------------------
18a8 ; SUBPROGRAM
18a8 ; --------------------------------------------------------------------------------------
18a8 18b4 | | .CONST 0x18b4 ; Address of begin
18a9 0004 | | .CONST 0x0004 ; Address of exception handler
18aa 0005 | | .CONST 0x0005 ; Number of locals
18ab INIT_18a8:
18ab 029f 1a5b | [| Declare_Subprogram INIT_1a58,For_Call
18ad 029f 1a7b | {| Declare_Subprogram INIT_1a78,For_Call
18af 4900 |I | Short_Literal 0x100
18b0 00e3 | | Load_Encached Natural_Cache
18b1 03f1 | | Declare_Variable Discrete,With_Value
18b2 029f 1aeb | | Declare_Subprogram INIT_1ae8,For_Call
18b4 BODY_18a8:
18b4 e5f9 | | Load 0x2,-0x7
18b5 01db | | Execute Vector,Length
18b6 7003 |p | Jump_Nonzero 0x18ba
18b7 0092 1c4e | N| Action Push_String_Extended,0x1c4e ; "{}"
18b9 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18ba 00cf | | Action Mark_Auxiliary
18bb 480c |H | Short_Literal 0xc
18bc 4801 |H | Short_Literal 0x1
18bd 0007 | | Action Break_Optional
18be 8405 | | Call 0x2,0x5
18bf 00c8 | | Action Pop_Auxiliary_Range
18c0 3ffd |? | Loop_Increasing 0x18be
18c1 00ce | | Action Pop_Auxiliary
18c2 0092 1c4f | O| Action Push_String_Extended,0x1c4f ; "***too_big_to_print"
18c4 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
18c5 0000 0000 | | .XXX[0x3]
18c7 0000 | |
18c8 ; --------------------------------------------------------------------------------------
18c8 ; SUBPROGRAM
18c8 ; --------------------------------------------------------------------------------------
18c8 18d2 | | .CONST 0x18d2 ; Address of begin
18c9 0004 | | .CONST 0x0004 ; Address of exception handler
18ca 0002 | | .CONST 0x0002 ; Number of locals
18cb INIT_18c8:
18cb e5fd | | Load 0x2,-0x3
18cc e5ff | | Load 0x2,-0x1
18cd 01db | | Execute Vector,Length
18ce 0273 | s | Execute Discrete,Plus
18cf 0aff | | Execute_Immediate Plus,-0x1
18d0 00e2 | | Load_Encached Integer_Cache
18d1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
18d2 BODY_18c8:
18d2 e5ff | | Load 0x2,-0x1
18d3 e5fd | | Load 0x2,-0x3
18d4 e402 | | Load 0x2,0x2
18d5 e5fe | | Load 0x2,-0x2
18d6 01ce | | Execute Vector,Slice_Write
18d7 00d8 | | Load_Top At_Offset_0
18d8 0a01 | | Execute_Immediate Plus,0x1
18d9 c5fd | | Store 0x2,-0x3
18da 4502 |E | Exit_Suprogram New_Top_Offset 0x2
18db 0000 0000 | | .BLANK 0000[0x5]
18e0 ; --------------------------------------------------------------------------------------
18e0 ; SUBPROGRAM
18e0 ; --------------------------------------------------------------------------------------
18e0 18e3 | | .CONST 0x18e3 ; Address of begin
18e1 0004 | | .CONST 0x0004 ; Address of exception handler
18e2 0001 | | .CONST 0x0001 ; Number of locals
18e3 BODY_18e0:
18e3 INIT_18e0:
18e3 e5fc | | Load 0x2,-0x4
18e4 e5fd | | Load 0x2,-0x3
18e5 e21b | | Load 0x1,0x1b
18e6 8220 | | Call 0x1,0x20
18e7 00d1 | | Pop_Control Pop_Count_1
18e8 c5fc | | Store 0x2,-0x4
18e9 e5fc | | Load 0x2,-0x4
18ea e5fd | | Load 0x2,-0x3
18eb e5ff | | Load 0x2,-0x1
18ec 8220 | | Call 0x1,0x20
18ed 00d1 | | Pop_Control Pop_Count_1
18ee c5fc | | Store 0x2,-0x4
18ef e5fc | | Load 0x2,-0x4
18f0 e5fd | | Load 0x2,-0x3
18f1 e21f | | Load 0x1,0x1f
18f2 8220 | | Call 0x1,0x20
18f3 00d1 | | Pop_Control Pop_Count_1
18f4 c5fc | | Store 0x2,-0x4
18f5 e5fc | | Load 0x2,-0x4
18f6 e5fd | | Load 0x2,-0x3
18f7 e5fe | | Load 0x2,-0x2
18f8 8220 | | Call 0x1,0x20
18f9 00d1 | | Pop_Control Pop_Count_1
18fa c5fc | | Store 0x2,-0x4
18fb 4503 |E | Exit_Suprogram New_Top_Offset 0x3
18fc 0000 0000 | | .BLANK 0000[0x4]
1900 ; --------------------------------------------------------------------------------------
1900 ; SUBPROGRAM
1900 ; --------------------------------------------------------------------------------------
1900 1903 | | .CONST 0x1903 ; Address of begin
1901 0004 | | .CONST 0x0004 ; Address of exception handler
1902 0001 | | .CONST 0x0001 ; Number of locals
1903 BODY_1900:
1903 INIT_1900:
1903 e5fc | | Load 0x2,-0x4
1904 e5fd | | Load 0x2,-0x3
1905 e21d | | Load 0x1,0x1d
1906 8220 | | Call 0x1,0x20
1907 00d1 | | Pop_Control Pop_Count_1
1908 c5fc | | Store 0x2,-0x4
1909 e5fc | | Load 0x2,-0x4
190a e5fd | | Load 0x2,-0x3
190b e5ff | | Load 0x2,-0x1
190c 8220 | | Call 0x1,0x20
190d 00d1 | | Pop_Control Pop_Count_1
190e c5fc | | Store 0x2,-0x4
190f e5fc | | Load 0x2,-0x4
1910 e5fd | | Load 0x2,-0x3
1911 e21f | | Load 0x1,0x1f
1912 8220 | | Call 0x1,0x20
1913 00d1 | | Pop_Control Pop_Count_1
1914 c5fc | | Store 0x2,-0x4
1915 e5fc | | Load 0x2,-0x4
1916 e5fd | | Load 0x2,-0x3
1917 e5fe | | Load 0x2,-0x2
1918 8220 | | Call 0x1,0x20
1919 00d1 | | Pop_Control Pop_Count_1
191a c5fc | | Store 0x2,-0x4
191b e5fc | | Load 0x2,-0x4
191c e5fd | | Load 0x2,-0x3
191d e21c | | Load 0x1,0x1c
191e 8220 | | Call 0x1,0x20
191f 00d1 | | Pop_Control Pop_Count_1
1920 c5fc | | Store 0x2,-0x4
1921 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1922 0000 0000 | | .BLANK 0000[0x6]
1928 ; --------------------------------------------------------------------------------------
1928 ; SUBPROGRAM
1928 ; --------------------------------------------------------------------------------------
1928 192b | + | .CONST 0x192b ; Address of begin
1929 0004 | | .CONST 0x0004 ; Address of exception handler
192a 0001 | | .CONST 0x0001 ; Number of locals
192b BODY_1928:
192b INIT_1928:
192b e5fc | | Load 0x2,-0x4
192c e5fd | | Load 0x2,-0x3
192d e21d | | Load 0x1,0x1d
192e 8220 | | Call 0x1,0x20
192f 00d1 | | Pop_Control Pop_Count_1
1930 c5fc | | Store 0x2,-0x4
1931 e5fc | | Load 0x2,-0x4
1932 e5fd | | Load 0x2,-0x3
1933 e5ff | | Load 0x2,-0x1
1934 8220 | | Call 0x1,0x20
1935 00d1 | | Pop_Control Pop_Count_1
1936 c5fc | | Store 0x2,-0x4
1937 e5fc | | Load 0x2,-0x4
1938 e5fd | | Load 0x2,-0x3
1939 e21f | | Load 0x1,0x1f
193a 8220 | | Call 0x1,0x20
193b 00d1 | | Pop_Control Pop_Count_1
193c c5fc | | Store 0x2,-0x4
193d e5fc | | Load 0x2,-0x4
193e e5fd | | Load 0x2,-0x3
193f e5fe | | Load 0x2,-0x2
1940 8220 | | Call 0x1,0x20
1941 00d1 | | Pop_Control Pop_Count_1
1942 c5fc | | Store 0x2,-0x4
1943 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1944 0000 0000 | | .BLANK 0000[0x4]
1948 ; --------------------------------------------------------------------------------------
1948 ; SUBPROGRAM
1948 ; --------------------------------------------------------------------------------------
1948 194b | K | .CONST 0x194b ; Address of begin
1949 0004 | | .CONST 0x0004 ; Address of exception handler
194a 0001 | | .CONST 0x0001 ; Number of locals
194b BODY_1948:
194b INIT_1948:
194b e5fa | | Load 0x2,-0x6
194c e5fb | | Load 0x2,-0x5
194d e5fe | | Load 0x2,-0x2
194e e5ff | | Load 0x2,-0x1
194f 8223 | # | Call 0x1,0x23
1950 00d1 | | Pop_Control Pop_Count_1
1951 c5fa | | Store 0x2,-0x6
1952 e5fa | | Load 0x2,-0x6
1953 e5fb | | Load 0x2,-0x5
1954 e21d | | Load 0x1,0x1d
1955 8220 | | Call 0x1,0x20
1956 00d1 | | Pop_Control Pop_Count_1
1957 c5fa | | Store 0x2,-0x6
1958 e5fa | | Load 0x2,-0x6
1959 e5fb | | Load 0x2,-0x5
195a e5fd | | Load 0x2,-0x3
195b 8220 | | Call 0x1,0x20
195c 00d1 | | Pop_Control Pop_Count_1
195d c5fa | | Store 0x2,-0x6
195e e5fa | | Load 0x2,-0x6
195f e5fb | | Load 0x2,-0x5
1960 e21f | | Load 0x1,0x1f
1961 8220 | | Call 0x1,0x20
1962 00d1 | | Pop_Control Pop_Count_1
1963 c5fa | | Store 0x2,-0x6
1964 e5fa | | Load 0x2,-0x6
1965 e5fb | | Load 0x2,-0x5
1966 e5fc | | Load 0x2,-0x4
1967 8220 | | Call 0x1,0x20
1968 00d1 | | Pop_Control Pop_Count_1
1969 c5fa | | Store 0x2,-0x6
196a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
196b 0000 0000 | | .BLANK 0000[0x5]
1970 ; --------------------------------------------------------------------------------------
1970 ; SUBPROGRAM
1970 ; --------------------------------------------------------------------------------------
1970 1973 | s | .CONST 0x1973 ; Address of begin
1971 0004 | | .CONST 0x0004 ; Address of exception handler
1972 0001 | | .CONST 0x0001 ; Number of locals
1973 BODY_1970:
1973 INIT_1970:
1973 e5f8 | | Load 0x2,-0x8
1974 e5f9 | | Load 0x2,-0x7
1975 e5fc | | Load 0x2,-0x4
1976 e5fd | | Load 0x2,-0x3
1977 e5fe | | Load 0x2,-0x2
1978 e5ff | | Load 0x2,-0x1
1979 8224 | $ | Call 0x1,0x24
197a 00d1 | | Pop_Control Pop_Count_1
197b c5f8 | | Store 0x2,-0x8
197c e5f8 | | Load 0x2,-0x8
197d e5f9 | | Load 0x2,-0x7
197e e21d | | Load 0x1,0x1d
197f 8220 | | Call 0x1,0x20
1980 00d1 | | Pop_Control Pop_Count_1
1981 c5f8 | | Store 0x2,-0x8
1982 e5f8 | | Load 0x2,-0x8
1983 e5f9 | | Load 0x2,-0x7
1984 e5fb | | Load 0x2,-0x5
1985 8220 | | Call 0x1,0x20
1986 00d1 | | Pop_Control Pop_Count_1
1987 c5f8 | | Store 0x2,-0x8
1988 e5f8 | | Load 0x2,-0x8
1989 e5f9 | | Load 0x2,-0x7
198a e21f | | Load 0x1,0x1f
198b 8220 | | Call 0x1,0x20
198c 00d1 | | Pop_Control Pop_Count_1
198d c5f8 | | Store 0x2,-0x8
198e e5f8 | | Load 0x2,-0x8
198f e5f9 | | Load 0x2,-0x7
1990 e5fa | | Load 0x2,-0x6
1991 8220 | | Call 0x1,0x20
1992 00d1 | | Pop_Control Pop_Count_1
1993 c5f8 | | Store 0x2,-0x8
1994 4507 |E | Exit_Suprogram New_Top_Offset 0x7
1995 0000 0000 | | .XXX[0x3]
1997 0000 | |
1998 ; --------------------------------------------------------------------------------------
1998 ; SUBPROGRAM
1998 ; --------------------------------------------------------------------------------------
1998 199b | | .CONST 0x199b ; Address of begin
1999 0004 | | .CONST 0x0004 ; Address of exception handler
199a 0001 | | .CONST 0x0001 ; Number of locals
199b BODY_1998:
199b INIT_1998:
199b e5f6 | | Load 0x2,-0xa
199c e5f7 | | Load 0x2,-0x9
199d e5fa | | Load 0x2,-0x6
199e e5fb | | Load 0x2,-0x5
199f e5fc | | Load 0x2,-0x4
19a0 e5fd | | Load 0x2,-0x3
19a1 e5fe | | Load 0x2,-0x2
19a2 e5ff | | Load 0x2,-0x1
19a3 8225 | % | Call 0x1,0x25
19a4 00d1 | | Pop_Control Pop_Count_1
19a5 c5f6 | | Store 0x2,-0xa
19a6 e5f6 | | Load 0x2,-0xa
19a7 e5f7 | | Load 0x2,-0x9
19a8 e21d | | Load 0x1,0x1d
19a9 8220 | | Call 0x1,0x20
19aa 00d1 | | Pop_Control Pop_Count_1
19ab c5f6 | | Store 0x2,-0xa
19ac e5f6 | | Load 0x2,-0xa
19ad e5f7 | | Load 0x2,-0x9
19ae e5f9 | | Load 0x2,-0x7
19af 8220 | | Call 0x1,0x20
19b0 00d1 | | Pop_Control Pop_Count_1
19b1 c5f6 | | Store 0x2,-0xa
19b2 e5f6 | | Load 0x2,-0xa
19b3 e5f7 | | Load 0x2,-0x9
19b4 e21f | | Load 0x1,0x1f
19b5 8220 | | Call 0x1,0x20
19b6 00d1 | | Pop_Control Pop_Count_1
19b7 c5f6 | | Store 0x2,-0xa
19b8 e5f6 | | Load 0x2,-0xa
19b9 e5f7 | | Load 0x2,-0x9
19ba e5f8 | | Load 0x2,-0x8
19bb 8220 | | Call 0x1,0x20
19bc 00d1 | | Pop_Control Pop_Count_1
19bd c5f6 | | Store 0x2,-0xa
19be 4509 |E | Exit_Suprogram New_Top_Offset 0x9
19bf 0000 | | .XXX[0x1]
19c0 ; --------------------------------------------------------------------------------------
19c0 ; SUBPROGRAM
19c0 ; --------------------------------------------------------------------------------------
19c0 19c3 | | .CONST 0x19c3 ; Address of begin
19c1 0004 | | .CONST 0x0004 ; Address of exception handler
19c2 0001 | | .CONST 0x0001 ; Number of locals
19c3 BODY_19c0:
19c3 INIT_19c0:
19c3 e5f4 | | Load 0x2,-0xc
19c4 e5f5 | | Load 0x2,-0xb
19c5 e5f8 | | Load 0x2,-0x8
19c6 e5f9 | | Load 0x2,-0x7
19c7 e5fa | | Load 0x2,-0x6
19c8 e5fb | | Load 0x2,-0x5
19c9 e5fc | | Load 0x2,-0x4
19ca e5fd | | Load 0x2,-0x3
19cb e5fe | | Load 0x2,-0x2
19cc e5ff | | Load 0x2,-0x1
19cd 8226 | & | Call 0x1,0x26
19ce 00d1 | | Pop_Control Pop_Count_1
19cf c5f4 | | Store 0x2,-0xc
19d0 e5f4 | | Load 0x2,-0xc
19d1 e5f5 | | Load 0x2,-0xb
19d2 e21d | | Load 0x1,0x1d
19d3 8220 | | Call 0x1,0x20
19d4 00d1 | | Pop_Control Pop_Count_1
19d5 c5f4 | | Store 0x2,-0xc
19d6 e5f4 | | Load 0x2,-0xc
19d7 e5f5 | | Load 0x2,-0xb
19d8 e5f7 | | Load 0x2,-0x9
19d9 8220 | | Call 0x1,0x20
19da 00d1 | | Pop_Control Pop_Count_1
19db c5f4 | | Store 0x2,-0xc
19dc e5f4 | | Load 0x2,-0xc
19dd e5f5 | | Load 0x2,-0xb
19de e21f | | Load 0x1,0x1f
19df 8220 | | Call 0x1,0x20
19e0 00d1 | | Pop_Control Pop_Count_1
19e1 c5f4 | | Store 0x2,-0xc
19e2 e5f4 | | Load 0x2,-0xc
19e3 e5f5 | | Load 0x2,-0xb
19e4 e5f6 | | Load 0x2,-0xa
19e5 8220 | | Call 0x1,0x20
19e6 00d1 | | Pop_Control Pop_Count_1
19e7 c5f4 | | Store 0x2,-0xc
19e8 450b |E | Exit_Suprogram New_Top_Offset 0xb
19e9 0000 0000 | | .BLANK 0000[0x7]
19f0 ; --------------------------------------------------------------------------------------
19f0 ; SUBPROGRAM
19f0 ; --------------------------------------------------------------------------------------
19f0 19f3 | | .CONST 0x19f3 ; Address of begin
19f1 0004 | | .CONST 0x0004 ; Address of exception handler
19f2 0001 | | .CONST 0x0001 ; Number of locals
19f3 BODY_19f0:
19f3 INIT_19f0:
19f3 e5ff | | Load 0x2,-0x1
19f4 0902 | | Execute_Immediate Binary_Scale,0x2
19f5 0a01 | | Execute_Immediate Plus,0x1
19f6 e5ff | | Load 0x2,-0x1
19f7 0aff | | Execute_Immediate Plus,-0x1
19f8 0901 | | Execute_Immediate Binary_Scale,0x1
19f9 0273 | s | Execute Discrete,Plus
19fa 0a01 | | Execute_Immediate Plus,0x1
19fb 0248 | H | Execute Discrete,Check_In_Integer
19fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
19fd 0000 0000 | | .XXX[0x3]
19ff 0000 | |
1a00 ; --------------------------------------------------------------------------------------
1a00 ; SUBPROGRAM
1a00 ; --------------------------------------------------------------------------------------
1a00 1a03 | | .CONST 0x1a03 ; Address of begin
1a01 0004 | | .CONST 0x0004 ; Address of exception handler
1a02 0001 | | .CONST 0x0001 ; Number of locals
1a03 BODY_1a00:
1a03 INIT_1a00:
1a03 4820 |H | Short_Literal 0x20
1a04 e5ff | | Load 0x2,-0x1
1a05 e005 | | Load 0x0,0x5
1a06 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1a07 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1a08 ; --------------------------------------------------------------------------------------
1a08 ; SUBPROGRAM
1a08 ; --------------------------------------------------------------------------------------
1a08 1a0b | | .CONST 0x1a0b ; Address of begin
1a09 0004 | | .CONST 0x0004 ; Address of exception handler
1a0a 0001 | | .CONST 0x0001 ; Number of locals
1a0b BODY_1a08:
1a0b INIT_1a08:
1a0b e5fe | | Load 0x2,-0x2
1a0c e006 | | Load 0x0,0x6
1a0d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1a0e e5ff | | Load 0x2,-0x1
1a0f 01db | | Execute Vector,Length
1a10 0273 | s | Execute Discrete,Plus
1a11 e5fe | | Load 0x2,-0x2
1a12 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1a13 027d | } | Execute Discrete,Greater
1a14 6802 |h | Jump_Zero 0x1a17
1a15 e007 | | Load 0x0,0x7
1a16 0257 | W | Execute Discrete,Raise
1a17 e5fe | | Load 0x2,-0x2
1a18 e5ff | | Load 0x2,-0x1
1a19 e006 | | Load 0x0,0x6
1a1a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1a1b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1a1c 0000 0000 | | .BLANK 0000[0x4]
1a20 ; --------------------------------------------------------------------------------------
1a20 ; SUBPROGRAM
1a20 ; --------------------------------------------------------------------------------------
1a20 1a23 | # | .CONST 0x1a23 ; Address of begin
1a21 0004 | | .CONST 0x0004 ; Address of exception handler
1a22 0001 | | .CONST 0x0001 ; Number of locals
1a23 BODY_1a20:
1a23 INIT_1a20:
1a23 4820 |H | Short_Literal 0x20
1a24 4800 |H | Short_Literal 0x0
1a25 4810 |H | Short_Literal 0x10
1a26 e7ff | | Load 0x3,-0x1
1a27 e005 | | Load 0x0,0x5
1a28 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1a29 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1a2a 0000 0000 | | .BLANK 0000[0x6]
1a30 ; --------------------------------------------------------------------------------------
1a30 ; SUBPROGRAM
1a30 ; --------------------------------------------------------------------------------------
1a30 1a33 | 3 | .CONST 0x1a33 ; Address of begin
1a31 0004 | | .CONST 0x0004 ; Address of exception handler
1a32 0001 | | .CONST 0x0001 ; Number of locals
1a33 BODY_1a30:
1a33 INIT_1a30:
1a33 4830 |H0 | Short_Literal 0x30
1a34 4808 |H | Short_Literal 0x8
1a35 4810 |H | Short_Literal 0x10
1a36 e7ff | | Load 0x3,-0x1
1a37 e005 | | Load 0x0,0x5
1a38 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1a39 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1a3a 0000 0000 | | .BLANK 0000[0x6]
1a40 ; --------------------------------------------------------------------------------------
1a40 ; SUBPROGRAM
1a40 ; --------------------------------------------------------------------------------------
1a40 1a43 | C | .CONST 0x1a43 ; Address of begin
1a41 0004 | | .CONST 0x0004 ; Address of exception handler
1a42 0001 | | .CONST 0x0001 ; Number of locals
1a43 BODY_1a40:
1a43 INIT_1a40:
1a43 e40a | | Load 0x2,0xa
1a44 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1a45 7007 |p | Jump_Nonzero 0x1a4d
1a46 0092 1c50 | P| Action Push_String_Extended,0x1c50 ; "#"
1a48 e40a | | Load 0x2,0xa
1a49 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1a4a 840b | | Call 0x2,0xb
1a4b 01cc | | Execute Vector,Catenate
1a4c 00ca | | Action Exit_Nullary_Function
1a4d 0092 1c50 | P| Action Push_String_Extended,0x1c50 ; "#"
1a4f e40a | | Load 0x2,0xa
1a50 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1a51 840b | | Call 0x2,0xb
1a52 01cc | | Execute Vector,Catenate
1a53 e40a | | Load 0x2,0xa
1a54 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1a55 840c | | Call 0x2,0xc
1a56 01cc | | Execute Vector,Catenate
1a57 00ca | | Action Exit_Nullary_Function
1a58 ; --------------------------------------------------------------------------------------
1a58 ; SUBPROGRAM
1a58 ; --------------------------------------------------------------------------------------
1a58 1a5b | [ | .CONST 0x1a5b ; Address of begin
1a59 0004 | | .CONST 0x0004 ; Address of exception handler
1a5a 0001 | | .CONST 0x0001 ; Number of locals
1a5b BODY_1a58:
1a5b INIT_1a58:
1a5b e7ff | | Load 0x3,-0x1
1a5c e7fe | | Load 0x3,-0x2
1a5d 027f | | Execute Discrete,Equal
1a5e 6806 |h | Jump_Zero 0x1a65
1a5f e7ff | | Load 0x3,-0x1
1a60 e5fa | | Load 0x2,-0x6
1a61 025b | [ | Execute Discrete,Check_In_Type
1a62 85fe | | Call 0x2,-0x2
1a63 8229 | ) | Call 0x1,0x29
1a64 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a65 e7ff | | Load 0x3,-0x1
1a66 e5fa | | Load 0x2,-0x6
1a67 025b | [ | Execute Discrete,Check_In_Type
1a68 85fe | | Call 0x2,-0x2
1a69 8229 | ) | Call 0x1,0x29
1a6a 0092 1c51 | Q| Action Push_String_Extended,0x1c51 ; ".."
1a6c 01cc | | Execute Vector,Catenate
1a6d e7fe | | Load 0x3,-0x2
1a6e e5fa | | Load 0x2,-0x6
1a6f 025b | [ | Execute Discrete,Check_In_Type
1a70 85fe | | Call 0x2,-0x2
1a71 8229 | ) | Call 0x1,0x29
1a72 01cc | | Execute Vector,Catenate
1a73 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a74 0000 0000 | | .BLANK 0000[0x4]
1a78 ; --------------------------------------------------------------------------------------
1a78 ; SUBPROGRAM
1a78 ; --------------------------------------------------------------------------------------
1a78 1a83 | | .CONST 0x1a83 ; Address of begin
1a79 0004 | | .CONST 0x0004 ; Address of exception handler
1a7a 0004 | | .CONST 0x0004 ; Number of locals
1a7b INIT_1a78:
1a7b 00e1 | | Load_Encached Boolean_Cache
1a7c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1a7d e5f9 | | Load 0x2,-0x7
1a7e 01dd | | Execute Vector,First
1a7f e5fa | | Load 0x2,-0x6
1a80 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
1a81 e5fa | | Load 0x2,-0x6
1a82 0007 | | Action Break_Optional
1a83 BODY_1a78:
1a83 e7ff | | Load 0x3,-0x1
1a84 0092 1c52 | R| Action Push_String_Extended,0x1c52 ; "{"
1a86 822a | * | Call 0x1,0x2a
1a87 00d1 | | Pop_Control Pop_Count_1
1a88 00cf | | Action Mark_Auxiliary
1a89 00cf | | Action Mark_Auxiliary
1a8a e603 | | Load 0x3,0x3
1a8b e5f9 | | Load 0x2,-0x7
1a8c 01d7 | | Execute Vector,Field_Read
1a8d e5fb | | Load 0x2,-0x5
1a8e 0119 | | Execute Any,Check_In_Formal_Type
1a8f 85fd | | Call 0x2,-0x3
1a90 680d |h | Jump_Zero 0x1a9e
1a91 e603 | | Load 0x3,0x3
1a92 e5f9 | | Load 0x2,-0x7
1a93 01dc | | Execute Vector,Last
1a94 027b | { | Execute Discrete,Greater_Equal
1a95 6802 |h | Jump_Zero 0x1a98
1a96 00ce | | Action Pop_Auxiliary
1a97 7848 |xH | Jump 0x1ae0
1a98 e5fa | | Load 0x2,-0x6
1a99 e603 | | Load 0x3,0x3
1a9a 0268 | h | Execute Discrete,Successor
1a9b c603 | | Store 0x3,0x3
1a9c 00c9 | | Action Pop_Auxiliary_Loop
1a9d 7fec | | Jump 0x1a8a
1a9e 00ce | | Action Pop_Auxiliary
1a9f e603 | | Load 0x3,0x3
1aa0 c604 | | Store 0x3,0x4
1aa1 00cf | | Action Mark_Auxiliary
1aa2 e604 | | Load 0x3,0x4
1aa3 e5f9 | | Load 0x2,-0x7
1aa4 01dc | | Execute Vector,Last
1aa5 027f | | Execute Discrete,Equal
1aa6 700f |p | Jump_Nonzero 0x1ab6
1aa7 e5fa | | Load 0x2,-0x6
1aa8 e604 | | Load 0x3,0x4
1aa9 0268 | h | Execute Discrete,Successor
1aaa e5f9 | | Load 0x2,-0x7
1aab 01d7 | | Execute Vector,Field_Read
1aac e5fb | | Load 0x2,-0x5
1aad 0119 | | Execute Any,Check_In_Formal_Type
1aae 85fd | | Call 0x2,-0x3
1aaf 7006 |p | Jump_Nonzero 0x1ab6
1ab0 e5fa | | Load 0x2,-0x6
1ab1 e604 | | Load 0x3,0x4
1ab2 0268 | h | Execute Discrete,Successor
1ab3 c604 | | Store 0x3,0x4
1ab4 00c9 | | Action Pop_Auxiliary_Loop
1ab5 7fec | | Jump 0x1aa2
1ab6 00ce | | Action Pop_Auxiliary
1ab7 e604 | | Load 0x3,0x4
1ab8 e5f9 | | Load 0x2,-0x7
1ab9 01dc | | Execute Vector,Last
1aba 027f | | Execute Discrete,Equal
1abb e604 | | Load 0x3,0x4
1abc e5f9 | | Load 0x2,-0x7
1abd 01d7 | | Execute Vector,Field_Read
1abe e5fb | | Load 0x2,-0x5
1abf 0119 | | Execute Any,Check_In_Formal_Type
1ac0 85fd | | Call 0x2,-0x3
1ac1 0279 | y | Execute Discrete,And
1ac2 701d |p | Jump_Nonzero 0x1ae0
1ac3 e602 | | Load 0x3,0x2
1ac4 7004 |p | Jump_Nonzero 0x1ac9
1ac5 e7ff | | Load 0x3,-0x1
1ac6 e21e | | Load 0x1,0x1e
1ac7 822a | * | Call 0x1,0x2a
1ac8 00d1 | | Pop_Control Pop_Count_1
1ac9 4800 |H | Short_Literal 0x0
1aca a602 | | Store_Unchecked 0x3,0x2
1acb e7ff | | Load 0x3,-0x1
1acc e604 | | Load 0x3,0x4
1acd e5fa | | Load 0x2,-0x6
1ace 025b | [ | Execute Discrete,Check_In_Type
1acf e603 | | Load 0x3,0x3
1ad0 e5fa | | Load 0x2,-0x6
1ad1 025b | [ | Execute Discrete,Check_In_Type
1ad2 8402 | | Call 0x2,0x2
1ad3 822a | * | Call 0x1,0x2a
1ad4 00d1 | | Pop_Control Pop_Count_1
1ad5 e604 | | Load 0x3,0x4
1ad6 e5f9 | | Load 0x2,-0x7
1ad7 01dc | | Execute Vector,Last
1ad8 027f | | Execute Discrete,Equal
1ad9 7006 |p | Jump_Nonzero 0x1ae0
1ada e5fa | | Load 0x2,-0x6
1adb e604 | | Load 0x3,0x4
1adc 0268 | h | Execute Discrete,Successor
1add c603 | | Store 0x3,0x3
1ade 00c9 | | Action Pop_Auxiliary_Loop
1adf 7fa9 | | Jump 0x1a89
1ae0 00ce | | Action Pop_Auxiliary
1ae1 e7ff | | Load 0x3,-0x1
1ae2 0092 1c53 | S| Action Push_String_Extended,0x1c53 ; "}"
1ae4 822a | * | Call 0x1,0x2a
1ae5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1ae6 0000 0000 | | .XXX[0x2]
1ae8 ; --------------------------------------------------------------------------------------
1ae8 ; SUBPROGRAM
1ae8 ; --------------------------------------------------------------------------------------
1ae8 1af1 | | .CONST 0x1af1 ; Address of begin
1ae9 1af9 | | .CONST 0x1af9 ; Address of exception handler
1aea 0002 | | .CONST 0x0002 ; Number of locals
1aeb INIT_1ae8:
1aeb e404 | | Load 0x2,0x4
1aec e006 | | Load 0x0,0x6
1aed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1aee 1c08 | | Execute_Immediate Run_Utility,0x8
1aef 00d8 | | Load_Top At_Offset_0
1af0 1c00 | | Execute_Immediate Run_Utility,0x0
1af1 BODY_1ae8:
1af1 00d8 | | Load_Top At_Offset_0
1af2 8403 | | Call 0x2,0x3
1af3 00d1 | | Pop_Control Pop_Count_1
1af4 00d8 | | Load_Top At_Offset_0
1af5 e006 | | Load 0x0,0x6
1af6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1af7 00cb | | Action Pop_Block_With_Result
1af8 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
1af9 TRAP_1ae8:
1af9 e007 | | Load 0x0,0x7
1afa 010f | | Execute Exception,Equal
1afb 6804 |h | Jump_Zero 0x1b00
1afc e404 | | Load 0x2,0x4
1afd 0901 | | Execute_Immediate Binary_Scale,0x1
1afe c404 | | Store 0x2,0x4
1aff 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1b00 0100 | | Execute Exception,Raise
1b01 0000 0000 | | .BLANK 0000[0x7]
1b08 ; --------------------------------------------------------------------------------------
1b08 ; SUBPROGRAM
1b08 ; --------------------------------------------------------------------------------------
1b08 1b1a | | .CONST 0x1b1a ; Address of begin
1b09 0004 | | .CONST 0x0004 ; Address of exception handler
1b0a 0011 | | .CONST 0x0011 ; Number of locals
1b0b INIT_1b08:
1b0b 00e6 | | Load_Encached Float_Cache
1b0c 0129 | ) | Execute Any,Make_Visible
1b0d 029a 1b23 | #| Declare_Subprogram INIT_1b20,For_Outer_Call,Visible,Unelaborated
1b0f 029a 1b2b | +| Declare_Subprogram INIT_1b28,For_Outer_Call,Visible,Unelaborated
1b11 00bf | | Action Accept_Activation
1b12 029d 1b33 | 3| Declare_Subprogram INIT_1b30,For_Outer_Call
1b14 029d 1b43 | C| Declare_Subprogram INIT_1b40,For_Outer_Call
1b16 1d0e | | Execute_Immediate Reference_Lex_1,0xe
1b17 00c7 | | Action Elaborate_Subprogram
1b18 1d0f | | Execute_Immediate Reference_Lex_1,0xf
1b19 00c7 | | Action Elaborate_Subprogram
1b1a BODY_1b08:
1b1a 00bc | | Action Signal_Activated
1b1b 00bb | | Action Signal_Completion
1b1c 0000 0000 | | .BLANK 0000[0x4]
1b20 ; --------------------------------------------------------------------------------------
1b20 ; SUBPROGRAM
1b20 ; --------------------------------------------------------------------------------------
1b20 1b23 | # | .CONST 0x1b23 ; Address of begin
1b21 0004 | | .CONST 0x0004 ; Address of exception handler
1b22 0001 | | .CONST 0x0001 ; Number of locals
1b23 BODY_1b20:
1b23 INIT_1b20:
1b23 e5ff | | Load 0x2,-0x1
1b24 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b25 0000 0000 | | .XXX[0x3]
1b27 0000 | |
1b28 ; --------------------------------------------------------------------------------------
1b28 ; SUBPROGRAM
1b28 ; --------------------------------------------------------------------------------------
1b28 1b2b | + | .CONST 0x1b2b ; Address of begin
1b29 0004 | | .CONST 0x0004 ; Address of exception handler
1b2a 0001 | | .CONST 0x0001 ; Number of locals
1b2b BODY_1b28:
1b2b INIT_1b28:
1b2b e5ff | | Load 0x2,-0x1
1b2c 8211 | | Call 0x1,0x11
1b2d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b2e 0000 0000 | | .XXX[0x2]
1b30 ; --------------------------------------------------------------------------------------
1b30 ; SUBPROGRAM
1b30 ; --------------------------------------------------------------------------------------
1b30 1b33 | 3 | .CONST 0x1b33 ; Address of begin
1b31 0004 | | .CONST 0x0004 ; Address of exception handler
1b32 0001 | | .CONST 0x0001 ; Number of locals
1b33 BODY_1b30:
1b33 INIT_1b30:
1b33 e5ff | | Load 0x2,-0x1
1b34 014b | K | Execute Float,Less_Zero
1b35 6803 |h | Jump_Zero 0x1b39
1b36 0092 1c54 | T| Action Push_String_Extended,0x1c54 ; "-"
1b38 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b39 00ea | | Load_Encached Null_String_Cache
1b3a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b3b 0000 0000 | | .BLANK 0000[0x5]
1b40 ; --------------------------------------------------------------------------------------
1b40 ; SUBPROGRAM
1b40 ; --------------------------------------------------------------------------------------
1b40 1b60 | ` | .CONST 0x1b60 ; Address of begin
1b41 1b73 | s | .CONST 0x1b73 ; Address of exception handler
1b42 0006 | | .CONST 0x0006 ; Number of locals
1b43 INIT_1b40:
1b43 e5ff | | Load 0x2,-0x1
1b44 023e | > | Execute Float,Absolute_Value
1b45 e20d | | Load 0x1,0xd
1b46 03df | | Declare_Variable Float,With_Value
1b47 00d8 | | Load_Top At_Offset_0
1b48 5833 |X3 | Indirect_Literal Float,0x1b7c,0.5
1b49 023c | < | Execute Float,Minus
1b4a 0235 | 5 | Execute Float,Round_To_Discrete
1b4b 00e3 | | Load_Encached Natural_Cache
1b4c 025e | ^ | Execute Discrete,Convert
1b4d 00e3 | | Load_Encached Natural_Cache
1b4e 03f1 | | Declare_Variable Discrete,With_Value
1b4f e402 | | Load 0x2,0x2
1b50 e403 | | Load 0x2,0x3
1b51 0237 | 7 | Execute Float,Convert_From_Discrete
1b52 023c | < | Execute Float,Minus
1b53 e20d | | Load 0x1,0xd
1b54 03df | | Declare_Variable Float,With_Value
1b55 00d8 | | Load_Top At_Offset_0
1b56 5821 |X! | Indirect_Literal Float,0x1b78,10.0
1b57 023b | ; | Execute Float,Times
1b58 e20d | | Load 0x1,0xd
1b59 03df | | Declare_Variable Float,With_Value
1b5a 00d8 | | Load_Top At_Offset_0
1b5b 0235 | 5 | Execute Float,Round_To_Discrete
1b5c 00e3 | | Load_Encached Natural_Cache
1b5d 025e | ^ | Execute Discrete,Convert
1b5e 00e3 | | Load_Encached Natural_Cache
1b5f 03f1 | | Declare_Variable Discrete,With_Value
1b60 BODY_1b40:
1b60 482e |H. | Short_Literal 0x2e
1b61 e5ff | | Load 0x2,-0x1
1b62 8210 | | Call 0x1,0x10
1b63 4820 |H | Short_Literal 0x20
1b64 4800 |H | Short_Literal 0x0
1b65 480a |H | Short_Literal 0xa
1b66 e403 | | Load 0x2,0x3
1b67 e001 | | Load 0x0,0x1
1b68 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1b69 01cc | | Execute Vector,Catenate
1b6a 01cb | | Execute Vector,Append
1b6b 4820 |H | Short_Literal 0x20
1b6c 4800 |H | Short_Literal 0x0
1b6d 480a |H | Short_Literal 0xa
1b6e e406 | | Load 0x2,0x6
1b6f e001 | | Load 0x0,0x1
1b70 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1b71 01cc | | Execute Vector,Catenate
1b72 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b73 TRAP_1b40:
1b73 0007 | | Action Break_Optional
1b74 0092 1c55 | U| Action Push_String_Extended,0x1c55 ; "0.0"
1b76 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1b77 0000 | | .XXX[0x1]
1b78 4024 0000 |@$ | .DBL 10.0
1b7a 0000 0000 | |
1b7c 3fe0 0000 |? | .DBL 0.5
1b7e 0000 0000 | |
1b80 ; --------------------------------------------------------------------------------------
1b80 ; STRING TABLE
1b80 ; --------------------------------------------------------------------------------------
1b80 01ae | | .STRTAB 0x01ae->0x1c57 ; "Type_Offset"
1b81 01b7 | | .STRTAB 0x01b7->0x1c5c ; "To_Be_Aborted"
1b82 01c2 | | .STRTAB 0x01c2->0x1c63 ; "Abort_Protected"
1b83 01cf | | .STRTAB 0x01cf->0x1c6a ; "Stack"
1b84 01d2 | | .STRTAB 0x01d2->0x1c6d ; "Data_Offset"
1b85 01db | | .STRTAB 0x01db->0x1c72 ; "Bounds_With_Object"
1b86 01eb | | .STRTAB 0x01eb->0x1c7b ; "Derives_Privacy"
1b87 01f8 | | .STRTAB 0x01f8->0x1c83 ; "Is_Private"
1b88 0200 | | .STRTAB 0x0200->0x1c88 ; "Is_Constant"
1b89 0209 | | .STRTAB 0x0209->0x1c8d ; "Is_Visible"
1b8a 0211 | | .STRTAB 0x0211->0x1c92 ; "Path_Stack"
1b8b 0219 | | .STRTAB 0x0219->0x1c97 ; "Offset"
1b8c 021d | | .STRTAB 0x021d->0x1c9a ; "Segment"
1b8d 0222 | " | .STRTAB 0x0222->0x1c9e ; "Children_Start"
1b8e 022e | . | .STRTAB 0x022e->0x1ca5 ; "Control_Offset"
1b8f 023a | : | .STRTAB 0x023a->0x1cac ; "Subprog_Site"
1b90 0244 | D | .STRTAB 0x0244->0x1cb2 ; "Of_Kind"
1b91 0249 | I | .STRTAB 0x0249->0x1cb5 ; "Scope_For_Site"
1b92 0255 | U | .STRTAB 0x0255->0x1cbc ; "Lex_Level"
1b93 025c | \ | .STRTAB 0x025c->0x1cc1 ; "Subprog_Start"
1b94 0267 | g | .STRTAB 0x0267->0x1cc7 ; "Declare_Frame"
1b95 0272 | r | .STRTAB 0x0272->0x1cce ; "start pc = "
1b96 027b | { | .STRTAB 0x027b->0x1cd3 ; "; lex = "
1b97 0281 | | .STRTAB 0x0281->0x1cd7 ; "distributor"
1b98 028a | | .STRTAB 0x028a->0x1cdd ; "control extent"
1b99 0296 | | .STRTAB 0x0296->0x1ce4 ; "break mask"
1b9a 029e | | .STRTAB 0x029e->0x1ce9 ; "Is_Catalogued "
1b9b 02aa | | .STRTAB 0x02aa->0x1cf0 ; "Is_Wired "
1b9c 02b1 | | .STRTAB 0x02b1->0x1cf4 ; "Delay_Duration"
1b9d 02bd | | .STRTAB 0x02bd->0x1cfb ; "Timed_Choice"
1b9e 02c7 | | .STRTAB 0x02c7->0x1d01 ; "Member_Index"
1b9f 02d1 | | .STRTAB 0x02d1->0x1d07 ; "First_Member"
1ba0 02db | | .STRTAB 0x02db->0x1d0d ; "Member_Site"
1ba1 02e4 | | .STRTAB 0x02e4->0x1d13 ; "Entry_Params"
1ba2 02ee | | .STRTAB 0x02ee->0x1d19 ; "Entry_Name"
1ba3 02f6 | | .STRTAB 0x02f6->0x1d1e ; "Raise_Index"
1ba4 02ff | | .STRTAB 0x02ff->0x1d23 ; "Raise_Offset"
1ba5 0309 | | .STRTAB 0x0309->0x1d29 ; "Reraising"
1ba6 0310 | | .STRTAB 0x0310->0x1d2e ; "Exception_Name"
1ba7 031c | | .STRTAB 0x031c->0x1d35 ; "Raise_Segment"
1ba8 0327 | ' | .STRTAB 0x0327->0x1d3b ; "pc = "
1ba9 032a | * | .STRTAB 0x032a->0x1d3e ; "; "
1baa 032a | * | .STRTAB 0x032a->0x1d3f ; "Mantissa"
1bab 0330 | 0 | .STRTAB 0x0330->0x1d43 ; "Exponent"
1bac 0336 | 6 | .STRTAB 0x0336->0x1d47 ; "Is_Negative"
1bad 033f | ? | .STRTAB 0x033f->0x1d4c ; "Val_Part"
1bae 0345 | E | .STRTAB 0x0345->0x1d50 ; "Typ_Part"
1baf 034b | K | .STRTAB 0x034b->0x1d54 ; "Var_Site"
1bb0 0351 | Q | .STRTAB 0x0351->0x1d58 ; "Last_Bias"
1bb1 0358 | X | .STRTAB 0x0358->0x1d5d ; "Family_Site"
1bb2 0361 | a | .STRTAB 0x0361->0x1d62 ; "Pointer"
1bb3 0366 | f | .STRTAB 0x0366->0x1d66 ; "Declarer_Name"
1bb4 0371 | q | .STRTAB 0x0371->0x1d6c ; "Module_Imports"
1bb5 037d | } | .STRTAB 0x037d->0x1d73 ; "Module_Type"
1bb6 0386 | | .STRTAB 0x0386->0x1d79 ; "import space = "
1bb7 0393 | | .STRTAB 0x0393->0x1d80 ; "; declared by "
1bb8 039f | | .STRTAB 0x039f->0x1d87 ; "type frame = "
1bb9 03aa | | .STRTAB 0x03aa->0x1d8e ; "data frame = "
1bba 03b5 | | .STRTAB 0x03b5->0x1d94 ; " "
1bbb 03b4 | | .STRTAB 0x03b4->0x1d95 ; "In_Rendezvous "
1bbc 03c0 | | .STRTAB 0x03c0->0x1d9c ; "In_Utility "
1bbd 03c9 | | .STRTAB 0x03c9->0x1da1 ; "Has_Package "
1bbe 03d3 | | .STRTAB 0x03d3->0x1da7 ; "Has_Children "
1bbf 03de | | .STRTAB 0x03de->0x1dae ; "enclosing frame = "
1bc0 03ee | | .STRTAB 0x03ee->0x1db7 ; ", "
1bc1 03ee | | .STRTAB 0x03ee->0x1db8 ; "Auxiliary_Marked"
1bc2 03fc | | .STRTAB 0x03fc->0x1dc0 ; "Forcing_Instruction"
1bc3 040d | | .STRTAB 0x040d->0x1dc9 ; "Breakpoint_Mask"
1bc4 041a | | .STRTAB 0x041a->0x1dd1 ; "Control_Extent"
1bc5 0426 | & | .STRTAB 0x0426->0x1dd8 ; "Force_Breakpoint"
1bc6 0434 | 4 | .STRTAB 0x0434->0x1de0 ; "Is_Wired"
1bc7 043a | : | .STRTAB 0x043a->0x1de4 ; "Is_Catalogued"
1bc8 0445 | E | .STRTAB 0x0445->0x1dea ; "Queue_Not_Empty"
1bc9 0452 | R | .STRTAB 0x0452->0x1df2 ; "Queue_Allocated"
1bca 045f | _ | .STRTAB 0x045f->0x1df9 ; "Distributor"
1bcb 0468 | h | .STRTAB 0x0468->0x1dff ; "Break_Cause"
1bcc 0471 | q | .STRTAB 0x0471->0x1e04 ; "Break_Address"
1bcd 047c | | | .STRTAB 0x047c->0x1e0b ; "Restore_Enable"
1bce 0488 | | .STRTAB 0x0488->0x1e12 ; "Debugging_Scope"
1bcf 0495 | | .STRTAB 0x0495->0x1e19 ; "debugging scope = "
1bd0 04a5 | | .STRTAB 0x04a5->0x1e22 ; "; restore enable = "
1bd1 04b6 | | .STRTAB 0x04b6->0x1e2c ; "; break address = "
1bd2 04c6 | | .STRTAB 0x04c6->0x1e35 ; "; cause = "
1bd3 04ce | | .STRTAB 0x04ce->0x1e3a ; "Node"
1bd4 04d0 | | .STRTAB 0x04d0->0x1e3c ; "Name"
1bd5 04d2 | | .STRTAB 0x04d2->0x1e3e ; "Dependence_Site"
1bd6 04df | | .STRTAB 0x04df->0x1e45 ; "Select_Site"
1bd7 04e8 | | .STRTAB 0x04e8->0x1e4b ; "Field_Count"
1bd8 04f1 | | .STRTAB 0x04f1->0x1e50 ; "Select_Ref"
1bd9 04f9 | | .STRTAB 0x04f9->0x1e55 ; "Some_Choice_Open"
1bda 0507 | | .STRTAB 0x0507->0x1e5d ; "Terminate_Is_Open"
1bdb 0516 | | .STRTAB 0x0516->0x1e66 ; "Has_Terminate"
1bdc 0521 | ! | .STRTAB 0x0521->0x1e6c ; "Timed_Is_Open"
1bdd 052c | , | .STRTAB 0x052c->0x1e73 ; "Has_Timed_Clause"
1bde 053a | : | .STRTAB 0x053a->0x1e7b ; "Last_Choice"
1bdf 0543 | C | .STRTAB 0x0543->0x1e80 ; "(Of_Kind => "
1be0 054d | M | .STRTAB 0x054d->0x1e86 ; ")"
1be1 054c | L | .STRTAB 0x054c->0x1e87 ; "Ctl_Offset"
1be2 0554 | T | .STRTAB 0x0554->0x1e8c ; "Is_Open"
1be3 0559 | Y | .STRTAB 0x0559->0x1e8f ; "Is_Family"
1be4 0560 | ` | .STRTAB 0x0560->0x1e94 ; "Frame_Lex_Level"
1be5 056d | m | .STRTAB 0x056d->0x1e9b ; "Return_Address"
1be6 0579 | y | .STRTAB 0x0579->0x1ea2 ; "Enclosing_Frame"
1be7 0586 | | .STRTAB 0x0586->0x1eaa ; "Data_Frame"
1be8 058e | | .STRTAB 0x058e->0x1eaf ; "Block_Start"
1be9 0597 | | .STRTAB 0x0597->0x1eb4 ; "Dynamic_Link"
1bea 05a1 | | .STRTAB 0x05a1->0x1eba ; "Type_Frame"
1beb 05a9 | | .STRTAB 0x05a9->0x1ebf ; "Has_Children"
1bec 05b3 | | .STRTAB 0x05b3->0x1ec5 ; "Has_Package"
1bed 05bc | | .STRTAB 0x05bc->0x1ecb ; "In_Utility"
1bee 05c4 | | .STRTAB 0x05c4->0x1ed0 ; "In_Rendezvous"
1bef 05cf | | .STRTAB 0x05cf->0x1ed6 ; "Exports_Legal"
1bf0 05da | | .STRTAB 0x05da->0x1edd ; "Outer_Lex_Frame"
1bf1 05e7 | | .STRTAB 0x05e7->0x1ee4 ; "Partner_Charge_Vpid"
1bf2 05f8 | | .STRTAB 0x05f8->0x1eee ; "Partner_Name"
1bf3 0602 | | .STRTAB 0x0602->0x1ef4 ; "Total_Params"
1bf4 060c | | .STRTAB 0x060c->0x1efa ; "In_Select"
1bf5 0613 | | .STRTAB 0x0613->0x1efe ; "Return_Priority"
1bf6 0620 | | .STRTAB 0x0620->0x1f06 ; "Return_Charge_Vpid"
1bf7 0630 | 0 | .STRTAB 0x0630->0x1f0f ; "Select_Choice"
1bf8 063b | ; | .STRTAB 0x063b->0x1f15 ; "Data_Stack_Mark"
1bf9 0648 | H | .STRTAB 0x0648->0x1f1d ; "Type_Stack_Mark"
1bfa 0655 | U | .STRTAB 0x0655->0x1f24 ; "Appending_Fields"
1bfb 0663 | c | .STRTAB 0x0663->0x1f2c ; "Data_Mark_Used"
1bfc 066f | o | .STRTAB 0x066f->0x1f33 ; "Type_Mark_Used"
1bfd 067b | { | .STRTAB 0x067b->0x1f3a ; "Has_Prior_Mark"
1bfe 0687 | | .STRTAB 0x0687->0x1f41 ; "In_Export_Frame"
1bff 0694 | | .STRTAB 0x0694->0x1f49 ; "Constrained"
1c00 069d | | .STRTAB 0x069d->0x1f4e ; "Global_Only"
1c01 06a6 | | .STRTAB 0x06a6->0x1f54 ; "Database_Index"
1c02 06b2 | | .STRTAB 0x06b2->0x1f5b ; "database index = "
1c03 06c1 | | .STRTAB 0x06c1->0x1f63 ; "; mode = "
1c04 06c8 | | .STRTAB 0x06c8->0x1f68 ; " GLOBAL"
1c05 06cd | | .STRTAB 0x06cd->0x1f6b ; " LOCAL"
1c06 06d1 | | .STRTAB 0x06d1->0x1f6e ; " CONSTRAINED"
1c07 06db | | .STRTAB 0x06db->0x1f74 ; " UNCONSTRAINED"
1c08 06e7 | | .STRTAB 0x06e7->0x1f7b ; "In_Entry_Call "
1c09 06f3 | | .STRTAB 0x06f3->0x1f82 ; "debugging state = ("
1c0a 0704 | | .STRTAB 0x0704->0x1f8c ; " In_Critical_Region "
1c0b 0716 | | .STRTAB 0x0716->0x1f96 ; "and Aborted"
1c0c 071f | | .STRTAB 0x071f->0x1f9b ; " Aborted_Critical_Region"
1c0d 0735 | 5 | .STRTAB 0x0735->0x1fa7 ; "For_Module"
1c0e 073d | = | .STRTAB 0x073d->0x1fac ; "Permitted"
1c0f 0744 | D | .STRTAB 0x0744->0x1fb1 ; " @ "
1c10 0745 | E | .STRTAB 0x0745->0x1fb2 ; "Base_Priority"
1c11 0750 | P | .STRTAB 0x0750->0x1fb9 ; "Fixed_Priority"
1c12 075c | \ | .STRTAB 0x075c->0x1fc0 ; "Last_Job_Priority"
1c13 076b | k | .STRTAB 0x076b->0x1fc8 ; "Aborted_In_Critical_Region"
1c14 0783 | | .STRTAB 0x0783->0x1fd5 ; "Critical_Region_Count"
1c15 0796 | | .STRTAB 0x0796->0x1fe0 ; "Debugging_State"
1c16 07a3 | | .STRTAB 0x07a3->0x1fe7 ; "Associated_Heap"
1c17 07b0 | | .STRTAB 0x07b0->0x1fef ; "In_Entry_Call"
1c18 07bb | | .STRTAB 0x07bb->0x1ff5 ; "Mode"
1c19 07bd | | .STRTAB 0x07bd->0x1ff7 ; "Delay_Time"
1c1a 07c5 | | .STRTAB 0x07c5->0x1ffc ; "(Current_Slice => "
1c1b 07d5 | | .STRTAB 0x07d5->0x2005 ; "Caller_Is_Waiting"
1c1c 07e4 | | .STRTAB 0x07e4->0x200e ; "Has_Been_Rousted"
1c1d 07f2 | | .STRTAB 0x07f2->0x2016 ; "Held_By_Scheduler"
1c1e 0801 | | .STRTAB 0x0801->0x201e ; "Memory_Condition"
1c1f 080f | | .STRTAB 0x080f->0x2026 ; "Block_Condition"
1c20 081c | | .STRTAB 0x081c->0x202e ; "Current_Mode"
1c21 0826 | & | .STRTAB 0x0826->0x2034 ; "Current_Priority"
1c22 0834 | 4 | .STRTAB 0x0834->0x203c ; "Caller_Must_Wait"
1c23 0842 | B | .STRTAB 0x0842->0x2044 ; "Module_Is_Task"
1c24 084e | N | .STRTAB 0x084e->0x204b ; "Module_Aborted"
1c25 085a | Z | .STRTAB 0x085a->0x2052 ; "Breakpoint_On"
1c26 0865 | e | .STRTAB 0x0865->0x2058 ; "Intrainstruction"
1c27 0873 | s | .STRTAB 0x0873->0x2060 ; "Control_Tos"
1c28 087c | | | .STRTAB 0x087c->0x2066 ; "Job_For_Charging"
1c29 088a | | .STRTAB 0x088a->0x206e ; "Program_Counter"
1c2a 0897 | | .STRTAB 0x0897->0x2075 ; "Executing_Lex"
1c2b 08a2 | | .STRTAB 0x08a2->0x207c ; "(Queue_Successor => "
1c2c 08b4 | | .STRTAB 0x08b4->0x2086 ; "Has_Micro_Context"
1c2d 08c3 | | .STRTAB 0x08c3->0x208e ; "Type_Tos"
1c2e 08c9 | | .STRTAB 0x08c9->0x2092 ; "Current_Frame"
1c2f 08d4 | | .STRTAB 0x08d4->0x2099 ; "Data_Tos"
1c30 08da | | .STRTAB 0x08da->0x209d ; "Data_Extent"
1c31 08e3 | | .STRTAB 0x08e3->0x20a2 ; "Queue_Extent"
1c32 08ed | | .STRTAB 0x08ed->0x20a8 ; "Space_Mgr_Retries"
1c33 08fc | | .STRTAB 0x08fc->0x20b1 ; "Type_Extent"
1c34 0905 | | .STRTAB 0x0905->0x20b6 ; "Breakpoint_Scope"
1c35 0913 | | .STRTAB 0x0913->0x20be ; "value"
1c36 0916 | | .STRTAB 0x0916->0x20c1 ; "; type"
1c37 091a | | .STRTAB 0x091a->0x20c4 ; "; ctos = "
1c38 0921 | ! | .STRTAB 0x0921->0x20c8 ; "type tos = "
1c39 092a | * | .STRTAB 0x092a->0x20ce ; "; data tos = "
1c3a 0935 | 5 | .STRTAB 0x0935->0x20d4 ; "type extent = "
1c3b 0941 | A | .STRTAB 0x0941->0x20db ; "; queue extent = "
1c3c 0950 | P | .STRTAB 0x0950->0x20e4 ; "; data extent = "
1c3d 095e | ^ | .STRTAB 0x095e->0x20ec ; "subr @ "
1c3e 0963 | c | .STRTAB 0x0963->0x20ef ; "Ref_Item"
1c3f 0969 | i | .STRTAB 0x0969->0x20f3 ; ": "
1c40 0969 | i | .STRTAB 0x0969->0x20f4 ; "AUXILIARY_STATE: "
1c41 0978 | x | .STRTAB 0x0978->0x20fd ; "AUXILIARY_ALLOCATION: "
1c42 098c | | .STRTAB 0x098c->0x2108 ; " = "
1c43 098d | | .STRTAB 0x098d->0x2109 ; " => "
1c44 098f | | .STRTAB 0x098f->0x210b ; "; BWO"
1c45 0992 | | .STRTAB 0x0992->0x210e ; "collection + "
1c46 099d | | .STRTAB 0x099d->0x2114 ; " type mark "
1c47 09a6 | | .STRTAB 0x09a6->0x211a ; " data mark "
1c48 09af | | .STRTAB 0x09af->0x211f ; "partner = "
1c49 09b7 | | .STRTAB 0x09b7->0x2124 ; ";"
1c4a 09b6 | | .STRTAB 0x09b6->0x2125 ; "return pc = "
1c4b 09c0 | | .STRTAB 0x09c0->0x212b ; "("
1c4c 09bf | | .STRTAB 0x09bf->0x212b ; "T"
1c4d 09be | | .STRTAB 0x09be->0x212c ; "F"
1c4e 09bd | | .STRTAB 0x09bd->0x212c ; "{}"
1c4f 09bd | | .STRTAB 0x09bd->0x212d ; "***too_big_to_print"
1c50 09ce | | .STRTAB 0x09ce->0x2137 ; "#"
1c51 09cd | | .STRTAB 0x09cd->0x2137 ; ".."
1c52 09cd | | .STRTAB 0x09cd->0x2138 ; "{"
1c53 09cc | | .STRTAB 0x09cc->0x2139 ; "}"
1c54 09cb | | .STRTAB 0x09cb->0x2139 ; "-"
1c55 09ca | | .STRTAB 0x09ca->0x213a ; "0.0"
1c56 09cb | | .STREND 0x09cb->0x213b
1c57 5479 7065 |Type| .STRTAB_STRINGS
213c 0000 0000 | | .BLANK 0000[0x4]
2140 ; --------------------------------------------------------------------------------------
2140 ; Debug Table
2140 ; --------------------------------------------------------------------------------------
2140 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb4a,0x0000,0x0001,0x0000
2146 0dc4 0004 | | .XXX[0xba]
2148 0dd4 0005 | |
214a 0dd7 0006 | |
214c 0dda 0007 | |
214e 0ddd 0008 | |
2150 0de0 0009 | |
2152 0de4 000a | |
2154 0de6 000b | |
2156 0de7 000c | |
2158 0de9 000d | |
215a 0dea 000e | |
215c 0ded 000f | |
215e 0df0 0010 | |
2160 0df9 0011 | |
2162 0df9 0012 | |
2164 0dfe 0013 | |
2166 0e0e 0014 | |
2168 0e11 0015 | |
216a 0e14 0016 | |
216c 0e16 0017 | |
216e 0e17 0018 | |
2170 0e1a 0019 | |
2172 0e1c 001a | |
2174 0e21 001b | ! |
2176 0e23 001c | # |
2178 0e24 001d | $ |
217a 0e27 001e | ' |
217c 0e2a 001f | * |
217e 0e2d 0020 | - |
2180 0e30 0021 | 0 !|
2182 0e31 0022 | 1 "|
2184 0e35 0023 | 5 #|
2186 0e39 0024 | 9 $|
2188 0e44 0025 | D %|
218a 0e4f 0026 | O &|
218c 0e54 0027 | T '|
218e 0e57 0028 | W (|
2190 0e5c 0029 | \ )|
2192 0e62 002a | b *|
2194 0e65 002b | e +|
2196 0e74 002c | t ,|
2198 0e77 002d | w -|
219a 0e7d 002e | } .|
219c 0e82 002f | /|
219e 0e88 0030 | 0|
21a0 0e8d 0031 | 1|
21a2 0e93 0032 | 2|
21a4 0e98 0033 | 3|
21a6 0e9e 0034 | 4|
21a8 0ea3 0035 | 5|
21aa 0ea9 0036 | 6|
21ac 0eac 0037 | 7|
21ae 0002 0037 | 7|
21b0 0eb3 ffff | |
21b2 0eb5 fffe | |
21b4 0eb6 0001 | |
21b6 0eb8 0002 | |
21b8 0ec8 0003 | |
21ba 0ecb 0004 | |
21bc 0ed3 0005 | |
21be 0eda 0006 | |
21c0 0ee3 0007 | |
21c2 0ee6 0008 | |
21c4 0ee9 0009 | |
21c6 0eec 000a | |
21c8 0eee 000b | |
21ca 0ef5 000c | |
21cc 0efd 000d | |
21ce 0f04 000e | |
21d0 0f08 000f | |
21d2 0f0c 0010 | |
21d4 0f1c 0011 | |
21d6 0f1f 0012 | |
21d8 0f22 0013 | " |
21da 0f2a 0014 | * |
21dc 0f37 0015 | 7 |
21de 0f3b 0016 | ; |
21e0 0f4c 0017 | L |
21e2 0f4f 0018 | O |
21e4 0f57 0019 | W |
21e6 0f68 001a | h |
21e8 0f6e 001c | n |
21ea 0f70 001d | p |
21ec 0f7d 001e | } |
21ee 0f85 001f | |
21f0 0f8f 0020 | |
21f2 0f93 0021 | !|
21f4 0f96 0022 | "|
21f6 0fa0 0023 | #|
21f8 0fa4 0024 | $|
21fa 0fa7 0025 | %|
21fc 0fb1 0026 | &|
21fe 0fb4 0027 | '|