|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 8192 (0x2000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0e78 | x | .CONST 0x0e78 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0196 | | .CONST 0x0196 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 005b | [ | .CONST 0x005b ; Number of locals
000b INIT_0008:
000b 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198
000d 029a 020b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0208
000f 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
0011 029a 023b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0238
0013 029a 024b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0248
0015 029a 026b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0268
0017 029a 0283 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0280
0019 029a 0293 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0290
001b 029a 0303 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0300
001d 029a 032b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0328
001f 029a 033b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0338
0021 029a 034b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0348
0023 029a 0363 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0360
0025 029a 037b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0378
0027 029a 03bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03b8
0029 029a 03c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03c0
002b 029a 03db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03d8
002d 029a 03eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03e8
002f 029a 03fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03f8
0031 029a 047b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0478
0033 029a 04cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04c8
0035 029a 04db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04d8
0037 029a 050b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0508
0039 029a 0563 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0560
003b 029a 058b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0588
003d 029a 059b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0598
003f 029a 05cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05c8
0041 029a 05db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05d8
0043 029a 05eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05e8
0045 029a 05fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_05f8
0047 029a 060b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0608
0049 029a 061b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0618
004b 029a 062b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0628
004d 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
004e 00d8 | | Load_Top At_Offset_0
004f 02a0 | | Declare_Subprogram Null_Subprogram
0050 03ae | | Declare_Type Heap_Access,Defined,Visible
0051 4802 |H | Short_Literal 0x2
0052 032b | + | Declare_Type Record,Incomplete,Visible
0053 00d8 | | Load_Top At_Offset_0
0054 02a0 | | Declare_Subprogram Null_Subprogram
0055 4818 |H | Short_Literal 0x18
0056 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
0057 4804 |H | Short_Literal 0x4
0058 032b | + | Declare_Type Record,Incomplete,Visible
0059 00d8 | | Load_Top At_Offset_0
005a 02a0 | | Declare_Subprogram Null_Subprogram
005b 4818 |H | Short_Literal 0x18
005c 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
005d 00bf | | Action Accept_Activation
005e 0093 0000 | | PushFullAddress InMicrocode
0060 61a3 |a | Indirect_Literal Discrete,0x204,{0x80000000, 0x00050000}
0061 0273 | s | Execute Discrete,Plus
0062 e20d | | Load 0x1,0xd
0063 619c |a | Indirect_Literal Discrete,0x200,{0x00000000, 0x0000ffff}
0064 0279 | y | Execute Discrete,And
0065 0273 | s | Execute Discrete,Plus
0066 e002 | | Load 0x0,0x2
0067 0273 | s | Execute Discrete,Plus
0068 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0069 e003 | | Load 0x0,0x3
006a 0387 | | Declare_Variable Package
006b 00d8 | | Load_Top At_Offset_0
006c 020f | | Execute Module,Activate
006d 4800 |H | Short_Literal 0x0
006e 4804 |H | Short_Literal 0x4
006f 029f 063b | ;| Declare_Subprogram For_Call,INIT_0638
0071 03fd | | Declare_Type Discrete,Defined
0072 4801 |H | Short_Literal 0x1
0073 4804 |H | Short_Literal 0x4
0074 00da | | Load_Top At_Offset_2
0075 03f8 | | Declare_Type Discrete,Constrained
0076 4800 |H | Short_Literal 0x0
0077 4802 |H | Short_Literal 0x2
0078 029f 0663 | c| Declare_Subprogram For_Call,INIT_0660
007a 03fd | | Declare_Type Discrete,Defined
007b 4800 |H | Short_Literal 0x0
007c 4803 |H | Short_Literal 0x3
007d 029f 068b | | Declare_Subprogram For_Call,INIT_0688
007f 03fd | | Declare_Type Discrete,Defined
0080 e004 | | Load 0x0,0x4
0081 e005 | | Load 0x0,0x5
0082 00db | | Load_Top At_Offset_3
0083 00db | | Load_Top At_Offset_3
0084 00e1 | | Load_Encached Boolean_Cache
0085 e006 | | Load 0x0,0x6
0086 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0087 029f 06b3 | | Declare_Subprogram For_Call,INIT_06b0
0089 4806 |H | Short_Literal 0x6
008a 032d | - | Declare_Type Record,Defined
008b 00d8 | | Load_Top At_Offset_0
008c 02a0 | | Declare_Subprogram Null_Subprogram
008d 03ad | | Declare_Type Heap_Access,Defined
008e 00d8 | | Load_Top At_Offset_0
008f 0007 | | Action Break_Optional
0090 00e1 | | Load_Encached Boolean_Cache
0091 029f 06c3 | | Declare_Subprogram For_Call,INIT_06c0
0093 4801 |H | Short_Literal 0x1
0094 032d | - | Declare_Type Record,Defined
0095 00d8 | | Load_Top At_Offset_0
0096 0322 | " | Declare_Variable Record
0097 00d8 | | Load_Top At_Offset_0
0098 1c00 | | Execute_Immediate Run_Utility,0x0
0099 e237 | 7 | Load 0x1,0x37
009a 4801 |H | Short_Literal 0x1
009b 00e1 | | Load_Encached Boolean_Cache
009c 4801 |H | Short_Literal 0x1
009d e005 | | Load 0x0,0x5
009e 4802 |H | Short_Literal 0x2
009f e007 | | Load 0x0,0x7
00a0 e005 | | Load 0x0,0x5
00a1 4801 |H | Short_Literal 0x1
00a2 e005 | | Load 0x0,0x5
00a3 029f 06d3 | | Declare_Subprogram For_Call,INIT_06d0
00a5 4805 |H | Short_Literal 0x5
00a6 4800 |H | Short_Literal 0x0
00a7 4804 |H | Short_Literal 0x4
00a8 4800 |H | Short_Literal 0x0
00a9 4801 |H | Short_Literal 0x1
00aa 031d | | Declare_Type Variant_Record,Defined
00ab 00d8 | | Load_Top At_Offset_0
00ac 02a0 | | Declare_Subprogram Null_Subprogram
00ad 03ad | | Declare_Type Heap_Access,Defined
00ae 00d8 | | Load_Top At_Offset_0
00af 0007 | | Action Break_Optional
00b0 029b 073b | ;| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0738
00b2 029b 076b | k| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0768
00b4 029b 0773 | s| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0770
00b6 029b 07a3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07a0
00b8 029b 07ab | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07a8
00ba 029b 07b3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07b0
00bc 029b 07bb | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07b8
00be 0093 0000 | | PushFullAddress InMicrocode
00c0 613b |a; | Indirect_Literal Discrete,0x1fc,{0x80000000, 0x00040000}
00c1 0273 | s | Execute Discrete,Plus
00c2 e20d | | Load 0x1,0xd
00c3 613c |a< | Indirect_Literal Discrete,0x200,{0x00000000, 0x0000ffff}
00c4 0279 | y | Execute Discrete,And
00c5 0273 | s | Execute Discrete,Plus
00c6 e008 | | Load 0x0,0x8
00c7 0273 | s | Execute Discrete,Plus
00c8 e237 | 7 | Load 0x1,0x37
00c9 e23c | < | Load 0x1,0x3c
00ca e23d | = | Load 0x1,0x3d
00cb 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
00cc 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
00cd e23e | > | Load 0x1,0x3e
00ce e23f | ? | Load 0x1,0x3f
00cf 0320 | | Declare_Variable Record,Duplicate
00d0 00cd | | Action Spare6_Action
00d1 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
00d2 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
00d3 e241 | A | Load 0x1,0x41
00d4 e242 | B | Load 0x1,0x42
00d5 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
00d6 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
00d7 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
00d8 0092 0d0c | | Action Push_String_Extended,0xd0c ; " "
00da e009 | | Load 0x0,0x9
00db 0387 | | Declare_Variable Package
00dc 00d8 | | Load_Top At_Offset_0
00dd 020f | | Execute Module,Activate
00de e00a | | Load 0x0,0xa
00df 00d9 | | Load_Top At_Offset_1
00e0 0098 | | Execute Package,Field_Read_Dynamic
00e1 e230 | 0 | Load 0x1,0x30
00e2 03a2 | | Complete_Type Heap_Access,By_Renaming
00e3 e00b | | Load 0x0,0xb
00e4 00d9 | | Load_Top At_Offset_1
00e5 0098 | | Execute Package,Field_Read_Dynamic
00e6 e232 | 2 | Load 0x1,0x32
00e7 0325 | % | Complete_Type Record,By_Renaming
00e8 e233 | 3 | Load 0x1,0x33
00e9 03c4 | | Complete_Type Access,By_Component_Completion
00ea e00c | | Load 0x0,0xc
00eb 00d9 | | Load_Top At_Offset_1
00ec 0098 | | Execute Package,Field_Read_Dynamic
00ed e234 | 4 | Load 0x1,0x34
00ee 0325 | % | Complete_Type Record,By_Renaming
00ef e235 | 5 | Load 0x1,0x35
00f0 03c4 | | Complete_Type Access,By_Component_Completion
00f1 e00d | | Load 0x0,0xd
00f2 00d9 | | Load_Top At_Offset_1
00f3 0098 | | Execute Package,Field_Read_Dynamic
00f4 0337 | 7 | Declare_Variable Array
00f5 00d8 | | Load_Top At_Offset_0
00f6 0335 | 5 | Declare_Variable Array,Duplicate
00f7 00cd | | Action Spare6_Action
00f8 4800 |H | Short_Literal 0x0
00f9 4800 |H | Short_Literal 0x0
00fa 00da | | Load_Top At_Offset_2
00fb 01d6 | | Execute Vector,Field_Write
00fc 4801 |H | Short_Literal 0x1
00fd 4801 |H | Short_Literal 0x1
00fe 00da | | Load_Top At_Offset_2
00ff 01d6 | | Execute Vector,Field_Write
0100 481e |H | Short_Literal 0x1e
0101 4802 |H | Short_Literal 0x2
0102 00da | | Load_Top At_Offset_2
0103 01d6 | | Execute Vector,Field_Write
0104 481e |H | Short_Literal 0x1e
0105 4803 |H | Short_Literal 0x3
0106 00da | | Load_Top At_Offset_2
0107 01d6 | | Execute Vector,Field_Write
0108 4814 |H | Short_Literal 0x14
0109 4804 |H | Short_Literal 0x4
010a 00da | | Load_Top At_Offset_2
010b 01d6 | | Execute Vector,Field_Write
010c 00d9 | | Load_Top At_Offset_1
010d 01d4 | | Execute Vector,Structure_Write
010e 0092 0d0d | | Action Push_String_Extended,0xd0d ; " TEST CASES"
0110 0092 0d0e | | Action Push_String_Extended,0xd0e ; "SUBJECT PROGRAM"
0112 0092 0d0f | | Action Push_String_Extended,0xd0f ; "KEYWORDS"
0114 4801 |H | Short_Literal 0x1
0115 4850 |HP | Short_Literal 0x50
0116 00e9 | | Load_Encached String_Cache
0117 035b | [ | Declare_Type Array,Constrained
0118 0337 | 7 | Declare_Variable Array
0119 4850 |HP | Short_Literal 0x50
011a 4801 |H | Short_Literal 0x1
011b 482d |H- | Short_Literal 0x2d
011c 00d9 | | Load_Top At_Offset_1
011d e24f | O | Load 0x1,0x4f
011e 01d6 | | Execute Vector,Field_Write
011f 3ffb |? | Loop_Increasing 0x11b
0120 e00e | | Load 0x0,0xe
0121 e00f | | Load 0x0,0xf
0122 e23a | : | Load 0x1,0x3a
0123 4800 |H | Short_Literal 0x0
0124 4801 |H | Short_Literal 0x1
0125 4803 |H | Short_Literal 0x3
0126 0092 0d10 | | Action Push_String_Extended,0xd10 ; "others => Unspecified"
0128 00ea | | Load_Encached Null_String_Cache
0129 00ea | | Load_Encached Null_String_Cache
012a 4801 |H | Short_Literal 0x1
012b 4803 |H | Short_Literal 0x3
012c e010 | | Load 0x0,0x10
012d 0387 | | Declare_Variable Package
012e 00d8 | | Load_Top At_Offset_0
012f 020f | | Execute Module,Activate
0130 029d 07f3 | | Declare_Subprogram For_Outer_Call,INIT_07f0
0132 029d 082b | +| Declare_Subprogram For_Outer_Call,INIT_0828
0134 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0135 00c7 | | Action Elaborate_Subprogram
0136 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0137 00c7 | | Action Elaborate_Subprogram
0138 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0139 00c7 | | Action Elaborate_Subprogram
013a 1d12 | | Execute_Immediate Reference_Lex_1,0x12
013b 00c7 | | Action Elaborate_Subprogram
013c 1d13 | | Execute_Immediate Reference_Lex_1,0x13
013d 00c7 | | Action Elaborate_Subprogram
013e 029d 086b | k| Declare_Subprogram For_Outer_Call,INIT_0868
0140 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0141 00c7 | | Action Elaborate_Subprogram
0142 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0143 00c7 | | Action Elaborate_Subprogram
0144 029d 08ab | | Declare_Subprogram For_Outer_Call,INIT_08a8
0146 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0147 00c7 | | Action Elaborate_Subprogram
0148 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0149 00c7 | | Action Elaborate_Subprogram
014a 1d18 | | Execute_Immediate Reference_Lex_1,0x18
014b 00c7 | | Action Elaborate_Subprogram
014c 1d19 | | Execute_Immediate Reference_Lex_1,0x19
014d 00c7 | | Action Elaborate_Subprogram
014e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
014f 00c7 | | Action Elaborate_Subprogram
0150 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0151 00c7 | | Action Elaborate_Subprogram
0152 029d 08cb | | Declare_Subprogram For_Outer_Call,INIT_08c8
0154 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0155 00c7 | | Action Elaborate_Subprogram
0156 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0157 00c7 | | Action Elaborate_Subprogram
0158 029d 08db | | Declare_Subprogram For_Outer_Call,INIT_08d8
015a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
015b 00c7 | | Action Elaborate_Subprogram
015c 029d 08fb | | Declare_Subprogram For_Outer_Call,INIT_08f8
015e 029d 0933 | 3| Declare_Subprogram For_Outer_Call,INIT_0930
0160 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0161 00c7 | | Action Elaborate_Subprogram
0162 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0163 00c7 | | Action Elaborate_Subprogram
0164 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0165 00c7 | | Action Elaborate_Subprogram
0166 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0167 00c7 | | Action Elaborate_Subprogram
0168 029d 093b | ;| Declare_Subprogram For_Outer_Call,INIT_0938
016a 029d 095b | [| Declare_Subprogram For_Outer_Call,INIT_0958
016c 029d 0963 | c| Declare_Subprogram For_Outer_Call,INIT_0960
016e 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
016f 00c7 | | Action Elaborate_Subprogram
0170 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0171 00c7 | | Action Elaborate_Subprogram
0172 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0173 00c7 | | Action Elaborate_Subprogram
0174 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0175 00c7 | | Action Elaborate_Subprogram
0176 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0177 00c7 | | Action Elaborate_Subprogram
0178 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0179 00c7 | | Action Elaborate_Subprogram
017a 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
017b 00c7 | | Action Elaborate_Subprogram
017c 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
017d 00c7 | | Action Elaborate_Subprogram
017e 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
017f 00c7 | | Action Elaborate_Subprogram
0180 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0181 00c7 | | Action Elaborate_Subprogram
0182 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
0183 00c7 | | Action Elaborate_Subprogram
0184 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0185 00c7 | | Action Elaborate_Subprogram
0186 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0187 00c7 | | Action Elaborate_Subprogram
0188 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
0189 00c7 | | Action Elaborate_Subprogram
018a 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
018b 00c7 | | Action Elaborate_Subprogram
018c 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
018d 00c7 | | Action Elaborate_Subprogram
018e 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
018f 00c7 | | Action Elaborate_Subprogram
0190 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
0191 00c7 | | Action Elaborate_Subprogram
0192 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0193 00c7 | | Action Elaborate_Subprogram
0194 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
0195 00c7 | | Action Elaborate_Subprogram
0196 BODY_0008:
0196 00bc | | Action Signal_Activated
0197 00bb | | Action Signal_Completion
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01ad | | .CONST 0x01ad ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0007 | | .CONST 0x0007 ; Number of locals
019b INIT_0198:
019b e231 | 1 | Load 0x1,0x31
019c 0007 | | Action Break_Optional
019d e011 | | Load 0x0,0x11
019e 0322 | " | Declare_Variable Record
019f e007 | | Load 0x0,0x7
01a0 0322 | " | Declare_Variable Record
01a1 00d8 | | Load_Top At_Offset_0
01a2 1c00 | | Execute_Immediate Run_Utility,0x0
01a3 e005 | | Load 0x0,0x5
01a4 0007 | | Action Break_Optional
01a5 e23c | < | Load 0x1,0x3c
01a6 e5fd | | Load 0x2,-0x3
01a7 039c | | Declare_Variable Heap_Access,By_Allocation
01a8 00d8 | | Load_Top At_Offset_0
01a9 0217 | | Execute Heap_Access,All_Reference
01aa 1c00 | | Execute_Immediate Run_Utility,0x0
01ab 029f 096b | k| Declare_Subprogram For_Call,INIT_0968
01ad BODY_0198:
01ad e5fd | | Load 0x2,-0x3
01ae e012 | | Load 0x0,0x12
01af e24a | J | Load 0x1,0x4a
01b0 0096 | | Execute Package,Field_Execute_Dynamic
01b1 e231 | 1 | Load 0x1,0x31
01b2 e5fd | | Load 0x2,-0x3
01b3 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
01b4 a402 | | Store_Unchecked 0x2,0x2
01b5 e5fd | | Load 0x2,-0x3
01b6 e5ff | | Load 0x2,-0x1
01b7 8013 | | Call 0x0,0x13
01b8 8014 | | Call 0x0,0x14
01b9 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01ba e5ff | | Load 0x2,-0x1
01bb 00da | | Load_Top At_Offset_2
01bc 0217 | | Execute Heap_Access,All_Reference
01bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01be 00da | | Load_Top At_Offset_2
01bf 00da | | Load_Top At_Offset_2
01c0 0217 | | Execute Heap_Access,All_Reference
01c1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01c2 4800 |H | Short_Literal 0x0
01c3 00da | | Load_Top At_Offset_2
01c4 0217 | | Execute Heap_Access,All_Reference
01c5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01c6 4800 |H | Short_Literal 0x0
01c7 00da | | Load_Top At_Offset_2
01c8 0217 | | Execute Heap_Access,All_Reference
01c9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01ca e5fd | | Load 0x2,-0x3
01cb 00da | | Load_Top At_Offset_2
01cc 0217 | | Execute Heap_Access,All_Reference
01cd 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01ce 4800 |H | Short_Literal 0x0
01cf 00da | | Load_Top At_Offset_2
01d0 0217 | | Execute Heap_Access,All_Reference
01d1 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01d2 00d9 | | Load_Top At_Offset_1
01d3 e402 | | Load 0x2,0x2
01d4 0219 | | Execute Heap_Access,All_Read
01d5 e015 | | Load 0x0,0x15
01d6 e24a | J | Load 0x1,0x4a
01d7 0096 | | Execute Package,Field_Execute_Dynamic
01d8 8407 | | Call 0x2,0x7
01d9 e5ff | | Load 0x2,-0x1
01da 8016 | | Call 0x0,0x16
01db e403 | | Load 0x2,0x3
01dc 017d | } | Execute Record,Structure_Write
01dd 00cf | | Action Mark_Auxiliary
01de 780e |x | Jump 0x1ed
01df e403 | | Load 0x2,0x3
01e0 8017 | | Call 0x0,0x17
01e1 e404 | | Load 0x2,0x4
01e2 017d | } | Execute Record,Structure_Write
01e3 4801 |H | Short_Literal 0x1
01e4 e5fd | | Load 0x2,-0x3
01e5 4fff |O | Short_Literal 0x7ff
01e6 e404 | | Load 0x2,0x4
01e7 e402 | | Load 0x2,0x2
01e8 8252 | R | Call 0x1,0x52
01e9 e403 | | Load 0x2,0x3
01ea 8018 | | Call 0x0,0x18
01eb 00d1 | | Pop_Control Pop_Count_1
01ec 00c9 | | Action Pop_Auxiliary_Loop
01ed e403 | | Load 0x2,0x3
01ee 8019 | | Call 0x0,0x19
01ef 6fef |o | Jump_Zero 0x1df
01f0 00ce | | Action Pop_Auxiliary
01f1 e24b | K | Load 0x1,0x4b
01f2 e402 | | Load 0x2,0x2
01f3 0219 | | Execute Heap_Access,All_Read
01f4 e01a | | Load 0x0,0x1a
01f5 e24a | J | Load 0x1,0x4a
01f6 0096 | | Execute Package,Field_Execute_Dynamic
01f7 e402 | | Load 0x2,0x2
01f8 4403 |D | Exit_Subprogram With_Result,0x3
01f9 0000 0000 | | .XXX[0x3]
01fb 0000 | |
01fc 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
0200 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0204 8000 0000 | | .LITERAL {0x80000000, 0x00050000}
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 4501 |E | Exit_Subprogram 0x1
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0222 | " | .CONST 0x0222 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0004 | | .CONST 0x0004 ; Number of locals
0213 INIT_0210:
0213 4806 |H | Short_Literal 0x6
0214 e01b | | Load 0x0,0x1b
0215 1c08 | | Execute_Immediate Run_Utility,0x8
0216 00d8 | | Load_Top At_Offset_0
0217 1c00 | | Execute_Immediate Run_Utility,0x0
0218 00db | | Load_Top At_Offset_3
0219 0219 | | Execute Heap_Access,All_Read
021a e01c | | Load 0x0,0x1c
021b e24a | J | Load 0x1,0x4a
021c 0096 | | Execute Package,Field_Execute_Dynamic
021d 0217 | | Execute Heap_Access,All_Reference
021e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021f 801d | | Call 0x0,0x1d
0220 e005 | | Load 0x0,0x5
0221 0007 | | Action Break_Optional
0222 BODY_0210:
0222 e5fe | | Load 0x2,-0x2
0223 00da | | Load_Top At_Offset_2
0224 8014 | | Call 0x0,0x14
0225 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0226 00da | | Load_Top At_Offset_2
0227 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0228 00d9 | | Load_Top At_Offset_1
0229 00d9 | | Load_Top At_Offset_1
022a 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
022b 00d1 | | Pop_Control Pop_Count_1
022c e5fe | | Load 0x2,-0x2
022d 00db | | Load_Top At_Offset_3
022e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
022f 00da | | Load_Top At_Offset_2
0230 4402 |D | Exit_Subprogram With_Result,0x2
0231 0000 0000 | | .BLANK 0000[0x7]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0240 | @ | .CONST 0x0240 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c 0219 | | Execute Heap_Access,All_Read
023d e01c | | Load 0x0,0x1c
023e e24a | J | Load 0x1,0x4a
023f 0096 | | Execute Package,Field_Execute_Dynamic
0240 BODY_0238:
0240 00d8 | | Load_Top At_Offset_0
0241 0217 | | Execute Heap_Access,All_Reference
0242 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0243 801d | | Call 0x0,0x1d
0244 4401 |D | Exit_Subprogram With_Result,0x1
0245 0000 0000 | | .XXX[0x3]
0247 0000 | |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024e | N | .CONST 0x024e ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0002 | | .CONST 0x0002 ; Number of locals
024b INIT_0248:
024b e231 | 1 | Load 0x1,0x31
024c e5fe | | Load 0x2,-0x2
024d 039c | | Declare_Variable Heap_Access,By_Allocation
024e BODY_0248:
024e 00d8 | | Load_Top At_Offset_0
024f 00d8 | | Load_Top At_Offset_0
0250 0219 | | Execute Heap_Access,All_Read
0251 e00a | | Load 0x0,0xa
0252 e24a | J | Load 0x1,0x4a
0253 0098 | | Execute Package,Field_Read_Dynamic
0254 0216 | | Execute Heap_Access,Convert
0255 e5fe | | Load 0x2,-0x2
0256 e5ff | | Load 0x2,-0x1
0257 0219 | | Execute Heap_Access,All_Read
0258 e01e | | Load 0x0,0x1e
0259 e24a | J | Load 0x1,0x4a
025a 0096 | | Execute Package,Field_Execute_Dynamic
025b 00d9 | | Load_Top At_Offset_1
025c 0218 | | Execute Heap_Access,All_Write
025d 00d1 | | Pop_Control Pop_Count_1
025e 00d8 | | Load_Top At_Offset_0
025f a5fd | | Store_Unchecked 0x2,-0x3
0260 4503 |E | Exit_Subprogram 0x3
0261 0000 0000 | | .BLANK 0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0274 | t | .CONST 0x0274 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0003 | | .CONST 0x0003 ; Number of locals
026b INIT_0268:
026b 00da | | Load_Top At_Offset_2
026c 0219 | | Execute Heap_Access,All_Read
026d e01c | | Load 0x0,0x1c
026e e24a | J | Load 0x1,0x4a
026f 0096 | | Execute Package,Field_Execute_Dynamic
0270 0217 | | Execute Heap_Access,All_Reference
0271 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0272 029f 09bb | | Declare_Subprogram For_Call,INIT_09b8
0274 BODY_0268:
0274 e5fe | | Load 0x2,-0x2
0275 e5fd | | Load 0x2,-0x3
0276 0278 | x | Execute Discrete,Or
0277 6801 |h | Jump_Zero 0x279
0278 8403 | | Call 0x2,0x3
0279 4801 |H | Short_Literal 0x1
027a a5fc | | Store_Unchecked 0x2,-0x4
027b 4504 |E | Exit_Subprogram 0x4
027c 0000 0000 | | .BLANK 0000[0x4]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00ea | | Load_Encached Null_String_Cache
0284 0092 0d11 | | Action Push_String_Extended,0xd11 ; "Explain"
0286 e01f | | Load 0x0,0x1f
0287 e236 | 6 | Load 0x1,0x36
0288 0096 | | Execute Package,Field_Execute_Dynamic
0289 4503 |E | Exit_Subprogram 0x3
028a 0000 0000 | | .BLANK 0000[0x6]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 02ab | | .CONST 0x02ab ; Address of begin
0291 02f0 | | .CONST 0x02f0 ; Address of exception handler
0292 0007 | | .CONST 0x0007 ; Number of locals
0293 INIT_0290:
0293 00da | | Load_Top At_Offset_2
0294 0219 | | Execute Heap_Access,All_Read
0295 e020 | | Load 0x0,0x20
0296 e24a | J | Load 0x1,0x4a
0297 0096 | | Execute Package,Field_Execute_Dynamic
0298 e5fe | | Load 0x2,-0x2
0299 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
029a 00d8 | | Load_Top At_Offset_0
029b 00e4 | | Load_Encached Positive_Cache
029c 0260 | ` | Execute Discrete,In_Type
029d 7001 |p | Jump_Nonzero 0x29f
029e 0801 | | Execute_Immediate Raise,0x1
029f e5ff | | Load 0x2,-0x1
02a0 0219 | | Execute Heap_Access,All_Read
02a1 e021 | ! | Load 0x0,0x21
02a2 e24a | J | Load 0x1,0x4a
02a3 0096 | | Execute Package,Field_Execute_Dynamic
02a4 e5fe | | Load 0x2,-0x2
02a5 8022 | " | Call 0x0,0x22
02a6 e237 | 7 | Load 0x1,0x37
02a7 0007 | | Action Break_Optional
02a8 e005 | | Load 0x0,0x5
02a9 029f 09f3 | | Declare_Subprogram For_Call,INIT_09f0
02ab BODY_0290:
02ab 8407 | | Call 0x2,0x7
02ac e403 | | Load 0x2,0x3
02ad e023 | # | Load 0x0,0x23
02ae e24a | J | Load 0x1,0x4a
02af 0096 | | Execute Package,Field_Execute_Dynamic
02b0 0f02 | | Execute_Immediate Equal,0x2
02b1 7006 |p | Jump_Nonzero 0x2b8
02b2 7800 |x | Jump 0x2b3
02b3 4800 |H | Short_Literal 0x0
02b4 0092 0d12 | | Action Push_String_Extended,0xd12 ; "Definition not defined for this selected line"
02b6 820e | | Call 0x1,0xe
02b7 4503 |E | Exit_Subprogram 0x3
02b8 00db | | Load_Top At_Offset_3
02b9 680d |h | Jump_Zero 0x2c7
02ba e5fe | | Load 0x2,-0x2
02bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02bc e5fe | | Load 0x2,-0x2
02bd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02be 027f | | Execute Discrete,Equal
02bf 6807 |h | Jump_Zero 0x2c7
02c0 e402 | | Load 0x2,0x2
02c1 4802 |H | Short_Literal 0x2
02c2 e403 | | Load 0x2,0x3
02c3 8254 | T | Call 0x1,0x54
02c4 e5fd | | Load 0x2,-0x3
02c5 016d | m | Execute Variant_Record,Structure_Write
02c6 4503 |E | Exit_Subprogram 0x3
02c7 e5fe | | Load 0x2,-0x2
02c8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02c9 0d04 | | Execute_Immediate Less,0x4
02ca 6803 |h | Jump_Zero 0x2ce
02cb 4802 |H | Short_Literal 0x2
02cc 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
02cd 7808 |x | Jump 0x2d6
02ce e5fe | | Load 0x2,-0x2
02cf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02d0 e5ff | | Load 0x2,-0x1
02d1 0219 | | Execute Heap_Access,All_Read
02d2 e024 | $ | Load 0x0,0x24
02d3 e24a | J | Load 0x1,0x4a
02d4 0096 | | Execute Package,Field_Execute_Dynamic
02d5 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
02d6 00da | | Load_Top At_Offset_2
02d7 4604 |F | Jump_Case 0x4
02d8 7804 |x | Jump 0x2dd ; case 0x0
02d9 780f |x | Jump 0x2e9 ; case 0x1
02da 7807 |x | Jump 0x2e2 ; case 0x2
02db 7806 |x | Jump 0x2e2 ; case 0x3
02dc 7800 |x | Jump 0x2dd ; case 0x4
02dd 4800 |H | Short_Literal 0x0
02de 0092 0d13 | | Action Push_String_Extended,0xd13 ; "Definition not supported on this line for this column"
02e0 820e | | Call 0x1,0xe
02e1 4503 |E | Exit_Subprogram 0x3
02e2 e402 | | Load 0x2,0x2
02e3 00db | | Load_Top At_Offset_3
02e4 e403 | | Load 0x2,0x3
02e5 8254 | T | Call 0x1,0x54
02e6 e5fd | | Load 0x2,-0x3
02e7 016d | m | Execute Variant_Record,Structure_Write
02e8 4503 |E | Exit_Subprogram 0x3
02e9 e402 | | Load 0x2,0x2
02ea 4802 |H | Short_Literal 0x2
02eb e403 | | Load 0x2,0x3
02ec 8254 | T | Call 0x1,0x54
02ed e5fd | | Load 0x2,-0x3
02ee 016d | m | Execute Variant_Record,Structure_Write
02ef 4503 |E | Exit_Subprogram 0x3
02f0 TRAP_0290:
02f0 e025 | % | Load 0x0,0x25
02f1 e24a | J | Load 0x1,0x4a
02f2 0098 | | Execute Package,Field_Read_Dynamic
02f3 010f | | Execute Exception,Equal
02f4 6805 |h | Jump_Zero 0x2fa
02f5 4800 |H | Short_Literal 0x0
02f6 0092 0d14 | | Action Push_String_Extended,0xd14 ; "Definition not defined for this cursor position"
02f8 820e | | Call 0x1,0xe
02f9 4503 |E | Exit_Subprogram 0x3
02fa 0100 | | Execute Exception,Raise
02fb 0000 0000 | | .BLANK 0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 030e | | .CONST 0x030e ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 e01b | | Load 0x0,0x1b
0304 02ff | | Declare_Variable Variant_Record
0305 00db | | Load_Top At_Offset_3
0306 0219 | | Execute Heap_Access,All_Read
0307 e020 | | Load 0x0,0x20
0308 e24a | J | Load 0x1,0x4a
0309 0096 | | Execute Package,Field_Execute_Dynamic
030a 4810 |H | Short_Literal 0x10
030b 8026 | & | Call 0x0,0x26
030c 00d9 | | Load_Top At_Offset_1
030d 016d | m | Execute Variant_Record,Structure_Write
030e BODY_0300:
030e 00d8 | | Load_Top At_Offset_0
030f 00d8 | | Load_Top At_Offset_0
0310 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0311 00d8 | | Load_Top At_Offset_0
0312 e5ff | | Load 0x2,-0x1
0313 0219 | | Execute Heap_Access,All_Read
0314 e020 | | Load 0x0,0x20
0315 e24a | J | Load 0x1,0x4a
0316 0096 | | Execute Package,Field_Execute_Dynamic
0317 e5ff | | Load 0x2,-0x1
0318 8212 | | Call 0x1,0x12
0319 8027 | ' | Call 0x0,0x27
031a 8014 | | Call 0x0,0x14
031b 00d9 | | Load_Top At_Offset_1
031c 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
031d 00d1 | | Pop_Control Pop_Count_1
031e 00d0 | | Action Swap_Control
031f 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
0320 4800 |H | Short_Literal 0x0
0321 a5fd | | Store_Unchecked 0x2,-0x3
0322 00d8 | | Load_Top At_Offset_0
0323 e5fe | | Load 0x2,-0x2
0324 016d | m | Execute Variant_Record,Structure_Write
0325 4502 |E | Exit_Subprogram 0x2
0326 0000 0000 | | .XXX[0x2]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b 00ea | | Load_Encached Null_String_Cache
032c 0092 0d15 | | Action Push_String_Extended,0xd15 ; "Elide"
032e e01f | | Load 0x0,0x1f
032f e236 | 6 | Load 0x1,0x36
0330 0096 | | Execute Package,Field_Execute_Dynamic
0331 4504 |E | Exit_Subprogram 0x4
0332 0000 0000 | | .BLANK 0000[0x6]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b | ; | .CONST 0x033b ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0001 | | .CONST 0x0001 ; Number of locals
033b BODY_0338:
033b INIT_0338:
033b 00ea | | Load_Encached Null_String_Cache
033c 0092 0d16 | | Action Push_String_Extended,0xd16 ; "Expand"
033e e01f | | Load 0x0,0x1f
033f e236 | 6 | Load 0x1,0x36
0340 0096 | | Execute Package,Field_Execute_Dynamic
0341 4504 |E | Exit_Subprogram 0x4
0342 0000 0000 | | .BLANK 0000[0x6]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0350 | P | .CONST 0x0350 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0002 | | .CONST 0x0002 ; Number of locals
034b INIT_0348:
034b 00da | | Load_Top At_Offset_2
034c 0219 | | Execute Heap_Access,All_Read
034d e01c | | Load 0x0,0x1c
034e e24a | J | Load 0x1,0x4a
034f 0096 | | Execute Package,Field_Execute_Dynamic
0350 BODY_0348:
0350 4801 |H | Short_Literal 0x1
0351 00d9 | | Load_Top At_Offset_1
0352 0217 | | Execute Heap_Access,All_Reference
0353 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0354 00d8 | | Load_Top At_Offset_0
0355 e5ff | | Load 0x2,-0x1
0356 0219 | | Execute Heap_Access,All_Read
0357 e015 | | Load 0x0,0x15
0358 e24a | J | Load 0x1,0x4a
0359 0096 | | Execute Package,Field_Execute_Dynamic
035a 4503 |E | Exit_Subprogram 0x3
035b 0000 0000 | | .BLANK 0000[0x5]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0368 | h | .CONST 0x0368 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0002 | | .CONST 0x0002 ; Number of locals
0363 INIT_0360:
0363 00da | | Load_Top At_Offset_2
0364 0219 | | Execute Heap_Access,All_Read
0365 e01c | | Load 0x0,0x1c
0366 e24a | J | Load 0x1,0x4a
0367 0096 | | Execute Package,Field_Execute_Dynamic
0368 BODY_0360:
0368 4801 |H | Short_Literal 0x1
0369 00d9 | | Load_Top At_Offset_1
036a 0217 | | Execute Heap_Access,All_Reference
036b 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
036c 00d8 | | Load_Top At_Offset_0
036d e5ff | | Load 0x2,-0x1
036e 0219 | | Execute Heap_Access,All_Read
036f e015 | | Load 0x0,0x15
0370 e24a | J | Load 0x1,0x4a
0371 0096 | | Execute Package,Field_Execute_Dynamic
0372 4503 |E | Exit_Subprogram 0x3
0373 0000 0000 | | .BLANK 0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 038f | | .CONST 0x038f ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0006 | | .CONST 0x0006 ; Number of locals
037b INIT_0378:
037b 00db | | Load_Top At_Offset_3
037c 0219 | | Execute Heap_Access,All_Read
037d e01c | | Load 0x0,0x1c
037e e24a | J | Load 0x1,0x4a
037f 0096 | | Execute Package,Field_Execute_Dynamic
0380 0217 | | Execute Heap_Access,All_Reference
0381 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0382 0007 | | Action Break_Optional
0383 e00c | | Load 0x0,0xc
0384 e24a | J | Load 0x1,0x4a
0385 0098 | | Execute Package,Field_Read_Dynamic
0386 0322 | " | Declare_Variable Record
0387 00d8 | | Load_Top At_Offset_0
0388 1c00 | | Execute_Immediate Run_Utility,0x0
0389 00e1 | | Load_Encached Boolean_Cache
038a 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
038b 029f 0a13 | | Declare_Subprogram For_Call,INIT_0a10
038d 029f 0a33 | 3| Declare_Subprogram For_Call,INIT_0a30
038f BODY_0378:
038f 8405 | | Call 0x2,0x5
0390 4801 |H | Short_Literal 0x1
0391 e5fe | | Load 0x2,-0x2
0392 0219 | | Execute Heap_Access,All_Read
0393 e028 | ( | Load 0x0,0x28
0394 e24a | J | Load 0x1,0x4a
0395 0096 | | Execute Package,Field_Execute_Dynamic
0396 e403 | | Load 0x2,0x3
0397 017d | } | Execute Record,Structure_Write
0398 00cf | | Action Mark_Auxiliary
0399 7802 |x | Jump 0x39c
039a 8406 | | Call 0x2,0x6
039b 00c9 | | Action Pop_Auxiliary_Loop
039c e403 | | Load 0x2,0x3
039d e029 | ) | Load 0x0,0x29
039e e24a | J | Load 0x1,0x4a
039f 0096 | | Execute Package,Field_Execute_Dynamic
03a0 6ff9 |o | Jump_Zero 0x39a
03a1 00ce | | Action Pop_Auxiliary
03a2 00da | | Load_Top At_Offset_2
03a3 700e |p | Jump_Nonzero 0x3b2
03a4 e402 | | Load 0x2,0x2
03a5 802a | * | Call 0x0,0x2a
03a6 c402 | | Store 0x2,0x2
03a7 e5fe | | Load 0x2,-0x2
03a8 0219 | | Execute Heap_Access,All_Read
03a9 e01c | | Load 0x0,0x1c
03aa e24a | J | Load 0x1,0x4a
03ab 0096 | | Execute Package,Field_Execute_Dynamic
03ac 0217 | | Execute Heap_Access,All_Reference
03ad 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
03ae 802b | + | Call 0x0,0x2b
03af e402 | | Load 0x2,0x2
03b0 820f | | Call 0x1,0xf
03b1 a5fe | | Store_Unchecked 0x2,-0x2
03b2 4502 |E | Exit_Subprogram 0x2
03b3 0000 0000 | | .BLANK 0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 4503 |E | Exit_Subprogram 0x3
03bc 0000 0000 | | .BLANK 0000[0x4]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c7 | | .CONST 0x03c7 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0003 | | .CONST 0x0003 ; Number of locals
03c3 INIT_03c0:
03c3 00db | | Load_Top At_Offset_3
03c4 8022 | " | Call 0x0,0x22
03c5 029f 0a63 | c| Declare_Subprogram For_Call,INIT_0a60
03c7 BODY_03c0:
03c7 00d9 | | Load_Top At_Offset_1
03c8 6804 |h | Jump_Zero 0x3cd
03c9 e5ff | | Load 0x2,-0x1
03ca 8251 | Q | Call 0x1,0x51
03cb 8403 | | Call 0x2,0x3
03cc 4503 |E | Exit_Subprogram 0x3
03cd 4800 |H | Short_Literal 0x0
03ce 0092 0d17 | | Action Push_String_Extended,0xd17 ; "Delete requires a selected line"
03d0 820e | | Call 0x1,0xe
03d1 4503 |E | Exit_Subprogram 0x3
03d2 0000 0000 | | .BLANK 0000[0x6]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00da | | Load_Top At_Offset_2
03dc 8251 | Q | Call 0x1,0x51
03dd 0092 0d18 | | Action Push_String_Extended,0xd18 ; "Insert"
03df e5fe | | Load 0x2,-0x2
03e0 e5ff | | Load 0x2,-0x1
03e1 8258 | X | Call 0x1,0x58
03e2 4402 |D | Exit_Subprogram With_Result,0x2
03e3 0000 0000 | | .BLANK 0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00da | | Load_Top At_Offset_2
03ec 8251 | Q | Call 0x1,0x51
03ed 0092 0d19 | | Action Push_String_Extended,0xd19 ; "Edit"
03ef e5fe | | Load 0x2,-0x2
03f0 e5ff | | Load 0x2,-0x1
03f1 8258 | X | Call 0x1,0x58
03f2 4402 |D | Exit_Subprogram With_Result,0x2
03f3 0000 0000 | | .BLANK 0000[0x5]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0422 | " | .CONST 0x0422 ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0008 | | .CONST 0x0008 ; Number of locals
03fb INIT_03f8:
03fb 00da | | Load_Top At_Offset_2
03fc 0219 | | Execute Heap_Access,All_Read
03fd e01c | | Load 0x0,0x1c
03fe e24a | J | Load 0x1,0x4a
03ff 0096 | | Execute Package,Field_Execute_Dynamic
0400 e02c | , | Load 0x0,0x2c
0401 e24a | J | Load 0x1,0x4a
0402 0095 | | Execute Package,Field_Reference_Dynamic
0403 00c6 | | Action Check_Subprogram_Elaborated
0404 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0405 0093 0000 | | PushFullAddress InMicrocode
0407 6068 |`h | Indirect_Literal Discrete,0x470,{0x80000000, 0x00020000}
0408 0273 | s | Execute Discrete,Plus
0409 e20d | | Load 0x1,0xd
040a 6061 |`a | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000ffff}
040b 0279 | y | Execute Discrete,And
040c 0273 | s | Execute Discrete,Plus
040d e02d | - | Load 0x0,0x2d
040e 0273 | s | Execute Discrete,Plus
040f 4805 |H | Short_Literal 0x5
0410 0007 | | Action Break_Optional
0411 e02c | , | Load 0x0,0x2c
0412 e24a | J | Load 0x1,0x4a
0413 0095 | | Execute Package,Field_Reference_Dynamic
0414 00c6 | | Action Check_Subprogram_Elaborated
0415 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
0416 0093 0000 | | PushFullAddress InMicrocode
0418 604f |`O | Indirect_Literal Discrete,0x468,{0x80000000, 0x00010000}
0419 0273 | s | Execute Discrete,Plus
041a e20d | | Load 0x1,0xd
041b 6050 |`P | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000ffff}
041c 0279 | y | Execute Discrete,And
041d 0273 | s | Execute Discrete,Plus
041e e02e | . | Load 0x0,0x2e
041f 0273 | s | Execute Discrete,Plus
0420 4808 |H | Short_Literal 0x8
0421 0007 | | Action Break_Optional
0422 BODY_03f8:
0422 e5fe | | Load 0x2,-0x2
0423 0b01 | | Execute_Immediate Case_Compare,0x1
0424 700b |p | Jump_Nonzero 0x430
0425 0f02 | | Execute_Immediate Equal,0x2
0426 7022 |p" | Jump_Nonzero 0x449
0427 4800 |H | Short_Literal 0x0
0428 0092 0d1a | | Action Push_String_Extended,0xd1a ; "No operation defined for value "
042a e5fe | | Load 0x2,-0x2
042b 00e0 | | Load_Encached Standard_Cache
042c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
042d 01cc | | Execute Vector,Catenate
042e 820e | | Call 0x1,0xe
042f 4503 |E | Exit_Subprogram 0x3
0430 00d1 | | Pop_Control Pop_Count_1
0431 4801 |H | Short_Literal 0x1
0432 e402 | | Load 0x2,0x2
0433 0217 | | Execute Heap_Access,All_Reference
0434 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0435 602e |`. | Indirect_Literal Discrete,0x464,{0x00000000, 0x7fffffff}
0436 4801 |H | Short_Literal 0x1
0437 e5ff | | Load 0x2,-0x1
0438 0219 | | Execute Heap_Access,All_Read
0439 4803 |H | Short_Literal 0x3
043a 4802 |H | Short_Literal 0x2
043b 0099 | | Action Reference_Dynamic
043c 4804 |H | Short_Literal 0x4
043d 4802 |H | Short_Literal 0x2
043e 0099 | | Action Reference_Dynamic
043f e02c | , | Load 0x0,0x2c
0440 e24a | J | Load 0x1,0x4a
0441 0096 | | Execute Package,Field_Execute_Dynamic
0442 e402 | | Load 0x2,0x2
0443 e5ff | | Load 0x2,-0x1
0444 0219 | | Execute Heap_Access,All_Read
0445 e015 | | Load 0x0,0x15
0446 e24a | J | Load 0x1,0x4a
0447 0096 | | Execute Package,Field_Execute_Dynamic
0448 4503 |E | Exit_Subprogram 0x3
0449 4802 |H | Short_Literal 0x2
044a e402 | | Load 0x2,0x2
044b 0217 | | Execute Heap_Access,All_Reference
044c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
044d 6016 |` | Indirect_Literal Discrete,0x464,{0x00000000, 0x7fffffff}
044e 4801 |H | Short_Literal 0x1
044f e5ff | | Load 0x2,-0x1
0450 0219 | | Execute Heap_Access,All_Read
0451 4806 |H | Short_Literal 0x6
0452 4802 |H | Short_Literal 0x2
0453 0099 | | Action Reference_Dynamic
0454 4807 |H | Short_Literal 0x7
0455 4802 |H | Short_Literal 0x2
0456 0099 | | Action Reference_Dynamic
0457 e02c | , | Load 0x0,0x2c
0458 e24a | J | Load 0x1,0x4a
0459 0096 | | Execute Package,Field_Execute_Dynamic
045a e402 | | Load 0x2,0x2
045b e5ff | | Load 0x2,-0x1
045c 0219 | | Execute Heap_Access,All_Read
045d e015 | | Load 0x0,0x15
045e e24a | J | Load 0x1,0x4a
045f 0096 | | Execute Package,Field_Execute_Dynamic
0460 4503 |E | Exit_Subprogram 0x3
0461 0000 0000 | | .XXX[0x3]
0463 0000 | |
0464 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0468 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
046c 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0470 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0474 0000 0000 | | .BLANK 0000[0x4]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 048d | | .CONST 0x048d ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0006 | | .CONST 0x0006 ; Number of locals
047b INIT_0478:
047b 00db | | Load_Top At_Offset_3
047c e250 | P | Load 0x1,0x50
047d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
047e e00c | | Load 0x0,0xc
047f e24a | J | Load 0x1,0x4a
0480 0098 | | Execute Package,Field_Read_Dynamic
0481 0322 | " | Declare_Variable Record
0482 00d8 | | Load_Top At_Offset_0
0483 1c00 | | Execute_Immediate Run_Utility,0x0
0484 e23a | : | Load 0x1,0x3a
0485 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0486 e5ff | | Load 0x2,-0x1
0487 0219 | | Execute Heap_Access,All_Read
0488 e01c | | Load 0x0,0x1c
0489 e24a | J | Load 0x1,0x4a
048a 0096 | | Execute Package,Field_Execute_Dynamic
048b 029f 0a8b | | Declare_Subprogram For_Call,INIT_0a88
048d BODY_0478:
048d 4801 |H | Short_Literal 0x1
048e e402 | | Load 0x2,0x2
048f e250 | P | Load 0x1,0x50
0490 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0491 6807 |h | Jump_Zero 0x499
0492 4801 |H | Short_Literal 0x1
0493 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
0494 00da | | Load_Top At_Offset_2
0495 00da | | Load_Top At_Offset_2
0496 0217 | | Execute Heap_Access,All_Reference
0497 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0498 7822 |x" | Jump 0x4bb
0499 4802 |H | Short_Literal 0x2
049a e402 | | Load 0x2,0x2
049b e250 | P | Load 0x1,0x50
049c 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
049d 6807 |h | Jump_Zero 0x4a5
049e 4802 |H | Short_Literal 0x2
049f 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
04a0 00da | | Load_Top At_Offset_2
04a1 00da | | Load_Top At_Offset_2
04a2 0217 | | Execute Heap_Access,All_Reference
04a3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04a4 7816 |x | Jump 0x4bb
04a5 4803 |H | Short_Literal 0x3
04a6 e402 | | Load 0x2,0x2
04a7 e250 | P | Load 0x1,0x50
04a8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
04a9 6807 |h | Jump_Zero 0x4b1
04aa 4803 |H | Short_Literal 0x3
04ab 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
04ac 00da | | Load_Top At_Offset_2
04ad 00da | | Load_Top At_Offset_2
04ae 0217 | | Execute Heap_Access,All_Reference
04af 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04b0 780a |x | Jump 0x4bb
04b1 4800 |H | Short_Literal 0x0
04b2 0092 0d1b | | Action Push_String_Extended,0xd1b ; "Filter Command => "
04b4 e5fe | | Load 0x2,-0x2
04b5 01cc | | Execute Vector,Catenate
04b6 0092 0d1c | | Action Push_String_Extended,0xd1c ; " not supported"
04b8 01cc | | Execute Vector,Catenate
04b9 820e | | Call 0x1,0xe
04ba 4503 |E | Exit_Subprogram 0x3
04bb 8406 | | Call 0x2,0x6
04bc 00d9 | | Load_Top At_Offset_1
04bd e5ff | | Load 0x2,-0x1
04be 0219 | | Execute Heap_Access,All_Read
04bf e015 | | Load 0x0,0x15
04c0 e24a | J | Load 0x1,0x4a
04c1 0096 | | Execute Package,Field_Execute_Dynamic
04c2 4503 |E | Exit_Subprogram 0x3
04c3 0000 0000 | | .BLANK 0000[0x5]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 00ea | | Load_Encached Null_String_Cache
04cc 0092 0d1d | | Action Push_String_Extended,0xd1d ; "Show_Differential"
04ce e01f | | Load 0x0,0x1f
04cf e236 | 6 | Load 0x1,0x36
04d0 0096 | | Execute Package,Field_Execute_Dynamic
04d1 4503 |E | Exit_Subprogram 0x3
04d2 0000 0000 | | .BLANK 0000[0x6]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04ed | | .CONST 0x04ed ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0004 | | .CONST 0x0004 ; Number of locals
04db INIT_04d8:
04db 00da | | Load_Top At_Offset_2
04dc 0219 | | Execute Heap_Access,All_Read
04dd e01c | | Load 0x0,0x1c
04de e24a | J | Load 0x1,0x4a
04df 0096 | | Execute Package,Field_Execute_Dynamic
04e0 e005 | | Load 0x0,0x5
04e1 e02f | / | Load 0x0,0x2f
04e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04e3 e030 | 0 | Load 0x0,0x30
04e4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04e5 e5fe | | Load 0x2,-0x2
04e6 8014 | | Call 0x0,0x14
04e7 0031 | 1 | Store_Top Heap_Access,At_Offset_1
04e8 e031 | 1 | Load 0x0,0x31
04e9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ea 02c7 | | Declare_Variable Any
04eb 00d8 | | Load_Top At_Offset_0
04ec 1c00 | | Execute_Immediate Run_Utility,0x0
04ed BODY_04d8:
04ed e5ff | | Load 0x2,-0x1
04ee 8253 | S | Call 0x1,0x53
04ef 00da | | Load_Top At_Offset_2
04f0 0219 | | Execute Heap_Access,All_Read
04f1 00d8 | | Load_Top At_Offset_0
04f2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04f3 00db | | Load_Top At_Offset_3
04f4 8032 | 2 | Call 0x0,0x32
04f5 00d9 | | Load_Top At_Offset_1
04f6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04f7 00d1 | | Pop_Control Pop_Count_1
04f8 00d8 | | Load_Top At_Offset_0
04f9 00db | | Load_Top At_Offset_3
04fa 0217 | | Execute Heap_Access,All_Reference
04fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04fc 8033 | 3 | Call 0x0,0x33
04fd c404 | | Store 0x2,0x4
04fe 4802 |H | Short_Literal 0x2
04ff 00da | | Load_Top At_Offset_2
0500 00da | | Load_Top At_Offset_2
0501 8034 | 4 | Call 0x0,0x34
0502 4503 |E | Exit_Subprogram 0x3
0503 0000 0000 | | .BLANK 0000[0x5]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0529 | ) | .CONST 0x0529 ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0007 | | .CONST 0x0007 ; Number of locals
050b INIT_0508:
050b 00da | | Load_Top At_Offset_2
050c 0219 | | Execute Heap_Access,All_Read
050d e01c | | Load 0x0,0x1c
050e e24a | J | Load 0x1,0x4a
050f 0096 | | Execute Package,Field_Execute_Dynamic
0510 e031 | 1 | Load 0x0,0x31
0511 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0512 02c7 | | Declare_Variable Any
0513 00d8 | | Load_Top At_Offset_0
0514 1c00 | | Execute_Immediate Run_Utility,0x0
0515 00d9 | | Load_Top At_Offset_1
0516 0217 | | Execute Heap_Access,All_Reference
0517 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0518 8035 | 5 | Call 0x0,0x35
0519 e005 | | Load 0x0,0x5
051a 00db | | Load_Top At_Offset_3
051b 0217 | | Execute Heap_Access,All_Reference
051c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
051d e5fd | | Load 0x2,-0x3
051e 8014 | | Call 0x0,0x14
051f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0520 e007 | | Load 0x0,0x7
0521 0322 | " | Declare_Variable Record
0522 00d8 | | Load_Top At_Offset_0
0523 1c00 | | Execute_Immediate Run_Utility,0x0
0524 e5fe | | Load 0x2,-0x2
0525 e5ff | | Load 0x2,-0x1
0526 8257 | W | Call 0x1,0x57
0527 00e2 | | Load_Encached Integer_Cache
0528 03f1 | | Declare_Variable Discrete,With_Value
0529 BODY_0508:
0529 00d8 | | Load_Top At_Offset_0
052a 4fff |O | Short_Literal 0x7ff
052b 027f | | Execute Discrete,Equal
052c 6801 |h | Jump_Zero 0x52e
052d 4504 |E | Exit_Subprogram 0x4
052e 00db | | Load_Top At_Offset_3
052f 00db | | Load_Top At_Offset_3
0530 4800 |H | Short_Literal 0x0
0531 8036 | 6 | Call 0x0,0x36
0532 c404 | | Store 0x2,0x4
0533 e403 | | Load 0x2,0x3
0534 e404 | | Load 0x2,0x4
0535 8037 | 7 | Call 0x0,0x37
0536 c403 | | Store 0x2,0x3
0537 4802 |H | Short_Literal 0x2
0538 00db | | Load_Top At_Offset_3
0539 e403 | | Load 0x2,0x3
053a 8034 | 4 | Call 0x0,0x34
053b e402 | | Load 0x2,0x2
053c 0217 | | Execute Heap_Access,All_Reference
053d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
053e e404 | | Load 0x2,0x4
053f 8038 | 8 | Call 0x0,0x38
0540 00da | | Load_Top At_Offset_2
0541 017d | } | Execute Record,Structure_Write
0542 e402 | | Load 0x2,0x2
0543 0219 | | Execute Heap_Access,All_Read
0544 00d8 | | Load_Top At_Offset_0
0545 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0546 00da | | Load_Top At_Offset_2
0547 00d8 | | Load_Top At_Offset_0
0548 00e3 | | Load_Encached Natural_Cache
0549 0260 | ` | Execute Discrete,In_Type
054a 7001 |p | Jump_Nonzero 0x54c
054b 0801 | | Execute_Immediate Raise,0x1
054c e406 | | Load 0x2,0x6
054d 8039 | 9 | Call 0x0,0x39
054e 00d9 | | Load_Top At_Offset_1
054f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0550 00d1 | | Pop_Control Pop_Count_1
0551 4800 |H | Short_Literal 0x0
0552 e402 | | Load 0x2,0x2
0553 0217 | | Execute Heap_Access,All_Reference
0554 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0555 00da | | Load_Top At_Offset_2
0556 e406 | | Load 0x2,0x6
0557 e5ff | | Load 0x2,-0x1
0558 8252 | R | Call 0x1,0x52
0559 4504 |E | Exit_Subprogram 0x4
055a 0000 0000 | | .BLANK 0000[0x6]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 056e | n | .CONST 0x056e ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0005 | | .CONST 0x0005 ; Number of locals
0563 INIT_0560:
0563 e00c | | Load 0x0,0xc
0564 e24a | J | Load 0x1,0x4a
0565 0098 | | Execute Package,Field_Read_Dynamic
0566 0322 | " | Declare_Variable Record
0567 00d8 | | Load_Top At_Offset_0
0568 1c00 | | Execute_Immediate Run_Utility,0x0
0569 00e1 | | Load_Encached Boolean_Cache
056a 029f 0ab3 | | Declare_Subprogram For_Call,INIT_0ab0
056c 029f 0ad3 | | Declare_Subprogram For_Call,INIT_0ad0
056e BODY_0560:
056e 8404 | | Call 0x2,0x4
056f 4801 |H | Short_Literal 0x1
0570 e5ff | | Load 0x2,-0x1
0571 0219 | | Execute Heap_Access,All_Read
0572 e028 | ( | Load 0x0,0x28
0573 e24a | J | Load 0x1,0x4a
0574 0096 | | Execute Package,Field_Execute_Dynamic
0575 e402 | | Load 0x2,0x2
0576 017d | } | Execute Record,Structure_Write
0577 00cf | | Action Mark_Auxiliary
0578 7802 |x | Jump 0x57b
0579 8405 | | Call 0x2,0x5
057a 00c9 | | Action Pop_Auxiliary_Loop
057b e402 | | Load 0x2,0x2
057c e029 | ) | Load 0x0,0x29
057d e24a | J | Load 0x1,0x4a
057e 0096 | | Execute Package,Field_Execute_Dynamic
057f 6ff9 |o | Jump_Zero 0x579
0580 4502 |E | Exit_Subprogram 0x2
0581 0000 0000 | | .BLANK 0000[0x7]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b | | .CONST 0x058b ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0001 | | .CONST 0x0001 ; Number of locals
058b BODY_0588:
058b INIT_0588:
058b 00da | | Load_Top At_Offset_2
058c 0227 | ' | Execute Access,All_Reference
058d e03a | : | Load 0x0,0x3a
058e e24a | J | Load 0x1,0x4a
058f 0096 | | Execute Package,Field_Execute_Dynamic
0590 4401 |D | Exit_Subprogram With_Result,0x1
0591 0000 0000 | | .BLANK 0000[0x7]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a2 | | .CONST 0x05a2 ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0003 | | .CONST 0x0003 ; Number of locals
059b INIT_0598:
059b 00da | | Load_Top At_Offset_2
059c 0219 | | Execute Heap_Access,All_Read
059d e01c | | Load 0x0,0x1c
059e e24a | J | Load 0x1,0x4a
059f 0096 | | Execute Package,Field_Execute_Dynamic
05a0 0092 0d1e | | Action Push_String_Extended,0xd1e ; "TSET"
05a2 BODY_0598:
05a2 00d9 | | Load_Top At_Offset_1
05a3 0217 | | Execute Heap_Access,All_Reference
05a4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05a5 0f00 | | Execute_Immediate Equal,0x0
05a6 00da | | Load_Top At_Offset_2
05a7 0217 | | Execute Heap_Access,All_Reference
05a8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05a9 0f00 | | Execute_Immediate Equal,0x0
05aa 0279 | y | Execute Discrete,And
05ab 6802 |h | Jump_Zero 0x5ae
05ac 00d8 | | Load_Top At_Offset_0
05ad 4401 |D | Exit_Subprogram With_Result,0x1
05ae 4829 |H) | Short_Literal 0x29
05af 0092 0d1f | | Action Push_String_Extended,0xd1f ; "TSET by "
05b1 00db | | Load_Top At_Offset_3
05b2 0217 | | Execute Heap_Access,All_Reference
05b3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05b4 e239 | 9 | Load 0x1,0x39
05b5 011c | | Execute Any,Convert_Unchecked
05b6 1c01 | | Execute_Immediate Run_Utility,0x1
05b7 01cc | | Execute Vector,Catenate
05b8 0092 0d20 | | Action Push_String_Extended,0xd20 ; " ("
05ba 01cc | | Execute Vector,Catenate
05bb 00db | | Load_Top At_Offset_3
05bc 0217 | | Execute Heap_Access,All_Reference
05bd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
05be e23a | : | Load 0x1,0x3a
05bf 011c | | Execute Any,Convert_Unchecked
05c0 1c01 | | Execute_Immediate Run_Utility,0x1
05c1 01cc | | Execute Vector,Catenate
05c2 01cb | | Execute Vector,Append
05c3 4401 |D | Exit_Subprogram With_Result,0x1
05c4 0000 0000 | | .BLANK 0000[0x4]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb | | .CONST 0x05cb ; Address of begin
05c9 0004 | | .CONST 0x0004 ; Address of exception handler
05ca 0001 | | .CONST 0x0001 ; Number of locals
05cb BODY_05c8:
05cb INIT_05c8:
05cb 00da | | Load_Top At_Offset_2
05cc 0219 | | Execute Heap_Access,All_Read
05cd e01c | | Load 0x0,0x1c
05ce e24a | J | Load 0x1,0x4a
05cf 0096 | | Execute Package,Field_Execute_Dynamic
05d0 0217 | | Execute Heap_Access,All_Reference
05d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05d2 801d | | Call 0x0,0x1d
05d3 4401 |D | Exit_Subprogram With_Result,0x1
05d4 0000 0000 | | .BLANK 0000[0x4]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00da | | Load_Top At_Offset_2
05dc 8229 | ) | Call 0x1,0x29
05dd e5fe | | Load 0x2,-0x2
05de 8229 | ) | Call 0x1,0x29
05df 01df | | Execute Vector,Equal
05e0 4402 |D | Exit_Subprogram With_Result,0x2
05e1 0000 0000 | | .BLANK 0000[0x7]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f0 | | .CONST 0x05f0 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0002 | | .CONST 0x0002 ; Number of locals
05eb INIT_05e8:
05eb 00da | | Load_Top At_Offset_2
05ec 0219 | | Execute Heap_Access,All_Read
05ed e01c | | Load 0x0,0x1c
05ee e24a | J | Load 0x1,0x4a
05ef 0096 | | Execute Package,Field_Execute_Dynamic
05f0 BODY_05e8:
05f0 00d8 | | Load_Top At_Offset_0
05f1 0217 | | Execute Heap_Access,All_Reference
05f2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05f3 803b | ; | Call 0x0,0x3b
05f4 0f01 | | Execute_Immediate Equal,0x1
05f5 4401 |D | Exit_Subprogram With_Result,0x1
05f6 0000 0000 | | .XXX[0x2]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb 4801 |H | Short_Literal 0x1
05fc 00db | | Load_Top At_Offset_3
05fd 0219 | | Execute Heap_Access,All_Read
05fe e028 | ( | Load 0x0,0x28
05ff e24a | J | Load 0x1,0x4a
0600 0096 | | Execute Package,Field_Execute_Dynamic
0601 e235 | 5 | Load 0x1,0x35
0602 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0603 a5fe | | Store_Unchecked 0x2,-0x2
0604 4502 |E | Exit_Subprogram 0x2
0605 0000 0000 | | .XXX[0x3]
0607 0000 | |
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b | | .CONST 0x060b ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0001 | | .CONST 0x0001 ; Number of locals
060b BODY_0608:
060b INIT_0608:
060b 00da | | Load_Top At_Offset_2
060c 0227 | ' | Execute Access,All_Reference
060d e029 | ) | Load 0x0,0x29
060e e24a | J | Load 0x1,0x4a
060f 0096 | | Execute Package,Field_Execute_Dynamic
0610 4401 |D | Exit_Subprogram With_Result,0x1
0611 0000 0000 | | .BLANK 0000[0x7]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b | | .CONST 0x061b ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0001 | | .CONST 0x0001 ; Number of locals
061b BODY_0618:
061b INIT_0618:
061b 00da | | Load_Top At_Offset_2
061c 0227 | ' | Execute Access,All_Reference
061d e03c | < | Load 0x0,0x3c
061e e24a | J | Load 0x1,0x4a
061f 0096 | | Execute Package,Field_Execute_Dynamic
0620 e233 | 3 | Load 0x1,0x33
0621 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0622 4401 |D | Exit_Subprogram With_Result,0x1
0623 0000 0000 | | .BLANK 0000[0x5]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b | + | .CONST 0x062b ; Address of begin
0629 0004 | | .CONST 0x0004 ; Address of exception handler
062a 0001 | | .CONST 0x0001 ; Number of locals
062b BODY_0628:
062b INIT_0628:
062b 00da | | Load_Top At_Offset_2
062c 0229 | ) | Execute Access,All_Read
062d 00d8 | | Load_Top At_Offset_0
062e e03d | = | Load 0x0,0x3d
062f e24a | J | Load 0x1,0x4a
0630 0096 | | Execute Package,Field_Execute_Dynamic
0631 4501 |E | Exit_Subprogram 0x1
0632 0000 0000 | | .BLANK 0000[0x6]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b | ; | .CONST 0x063b ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0001 | | .CONST 0x0001 ; Number of locals
063b BODY_0638:
063b INIT_0638:
063b 4607 |F | Jump_Case 0x7
063c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
063d 7807 |x | Jump 0x645 ; case 0x1
063e 780a |x | Jump 0x649 ; case 0x2
063f 780e |x | Jump 0x64e ; case 0x3
0640 7811 |x | Jump 0x652 ; case 0x4
0641 7812 |x | Jump 0x654 ; case 0x5
0642 7813 |x | Jump 0x656 ; case 0x6
0643 7816 |x | Jump 0x65a ; case 0x7
0644 4302 |C | .XXX[0x1]
0645 00da | | Load_Top At_Offset_2
0646 0091 0d00 | | Action Push_String_Extended_Indexed,0xd00 ; "NIL_COL"
0648 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0649 00db | | Load_Top At_Offset_3
064a 00db | | Load_Top At_Offset_3
064b 00e0 | | Load_Encached Standard_Cache
064c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
064d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
064e 00da | | Load_Top At_Offset_2
064f 00e0 | | Load_Encached Standard_Cache
0650 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0651 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0652 00db | | Load_Top At_Offset_3
0653 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0654 00db | | Load_Top At_Offset_3
0655 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0656 e237 | 7 | Load 0x1,0x37
0657 00dc | | Load_Top At_Offset_4
0658 0267 | g | Execute Discrete,Predecessor
0659 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
065a e237 | 7 | Load 0x1,0x37
065b 00dc | | Load_Top At_Offset_4
065c 0268 | h | Execute Discrete,Successor
065d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
065e 0000 0000 | | .XXX[0x2]
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 4607 |F | Jump_Case 0x7
0664 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0665 7807 |x | Jump 0x66d ; case 0x1
0666 780a |x | Jump 0x671 ; case 0x2
0667 780e |x | Jump 0x676 ; case 0x3
0668 7811 |x | Jump 0x67a ; case 0x4
0669 7812 |x | Jump 0x67c ; case 0x5
066a 7813 |x | Jump 0x67e ; case 0x6
066b 7816 |x | Jump 0x682 ; case 0x7
066c 4302 |C | .XXX[0x1]
066d 00da | | Load_Top At_Offset_2
066e 0091 0d05 | | Action Push_String_Extended_Indexed,0xd05 ; "NONE"
0670 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0671 00db | | Load_Top At_Offset_3
0672 00db | | Load_Top At_Offset_3
0673 00e0 | | Load_Encached Standard_Cache
0674 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0675 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0676 00da | | Load_Top At_Offset_2
0677 00e0 | | Load_Encached Standard_Cache
0678 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0679 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
067a 00db | | Load_Top At_Offset_3
067b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
067c 00db | | Load_Top At_Offset_3
067d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
067e e239 | 9 | Load 0x1,0x39
067f 00dc | | Load_Top At_Offset_4
0680 0267 | g | Execute Discrete,Predecessor
0681 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0682 e239 | 9 | Load 0x1,0x39
0683 00dc | | Load_Top At_Offset_4
0684 0268 | h | Execute Discrete,Successor
0685 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0686 0000 0000 | | .XXX[0x2]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b 4607 |F | Jump_Case 0x7
068c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
068d 7807 |x | Jump 0x695 ; case 0x1
068e 780a |x | Jump 0x699 ; case 0x2
068f 780e |x | Jump 0x69e ; case 0x3
0690 7811 |x | Jump 0x6a2 ; case 0x4
0691 7812 |x | Jump 0x6a4 ; case 0x5
0692 7813 |x | Jump 0x6a6 ; case 0x6
0693 7816 |x | Jump 0x6aa ; case 0x7
0694 4302 |C | .XXX[0x1]
0695 00da | | Load_Top At_Offset_2
0696 0091 0d08 | | Action Push_String_Extended_Indexed,0xd08 ; "NONE"
0698 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0699 00db | | Load_Top At_Offset_3
069a 00db | | Load_Top At_Offset_3
069b 00e0 | | Load_Encached Standard_Cache
069c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
069d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
069e 00da | | Load_Top At_Offset_2
069f 00e0 | | Load_Encached Standard_Cache
06a0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06a1 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
06a2 00db | | Load_Top At_Offset_3
06a3 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
06a4 00db | | Load_Top At_Offset_3
06a5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
06a6 e23a | : | Load 0x1,0x3a
06a7 00dc | | Load_Top At_Offset_4
06a8 0267 | g | Execute Discrete,Predecessor
06a9 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
06aa e23a | : | Load 0x1,0x3a
06ab 00dc | | Load_Top At_Offset_4
06ac 0268 | h | Execute Discrete,Successor
06ad 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
06ae 0000 0000 | | .XXX[0x2]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3 | | .CONST 0x06b3 ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 0001 | | .CONST 0x0001 ; Number of locals
06b3 BODY_06b0:
06b3 INIT_06b0:
06b3 4601 |F | Jump_Case 0x1
06b4 7801 |x | Jump 0x6b6 ; case 0x0
06b5 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
06b6 4800 |H | Short_Literal 0x0
06b7 00db | | Load_Top At_Offset_3
06b8 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
06b9 4302 |C | Exit_Subprogram From_Utility,0x2
06ba 0000 0000 | | .BLANK 0000[0x6]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3 | | .CONST 0x06c3 ; Address of begin
06c1 0004 | | .CONST 0x0004 ; Address of exception handler
06c2 0001 | | .CONST 0x0001 ; Number of locals
06c3 BODY_06c0:
06c3 INIT_06c0:
06c3 4601 |F | Jump_Case 0x1
06c4 7801 |x | Jump 0x6c6 ; case 0x0
06c5 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
06c6 4800 |H | Short_Literal 0x0
06c7 00db | | Load_Top At_Offset_3
06c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06c9 4302 |C | Exit_Subprogram From_Utility,0x2
06ca 0000 0000 | | .BLANK 0000[0x6]
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 4609 |F | Jump_Case 0x9
06d4 7809 |x | Jump 0x6de ; case 0x0
06d5 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
06d6 7824 |x$ | Jump 0x6fb ; case 0x2
06d7 7827 |x' | Jump 0x6ff ; case 0x3
06d8 785c |x\ | Jump 0x735 ; case 0x4
06d9 785b |x[ | Jump 0x735 ; case 0x5
06da 782a |x* | Jump 0x705 ; case 0x6
06db 783a |x: | Jump 0x716 ; case 0x7
06dc 784d |xM | Jump 0x72a ; case 0x8
06dd 7853 |xS | Jump 0x731 ; case 0x9
06de 00da | | Load_Top At_Offset_2
06df 016c | l | Execute Variant_Record,Is_Constrained
06e0 7009 |p | Jump_Nonzero 0x6ea
06e1 00cf | | Action Mark_Auxiliary
06e2 4800 |H | Short_Literal 0x0
06e3 e5ff | | Load 0x2,-0x1
06e4 1c08 | | Execute_Immediate Run_Utility,0x8
06e5 00d8 | | Load_Top At_Offset_0
06e6 1c00 | | Execute_Immediate Run_Utility,0x0
06e7 c5ff | | Store 0x2,-0x1
06e8 00ce | | Action Pop_Auxiliary
06e9 4302 |C | Exit_Subprogram From_Utility,0x2
06ea 00da | | Load_Top At_Offset_2
06eb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06ec 4604 |F | Jump_Case 0x4
06ed 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
06ee 7804 |x | Jump 0x6f3 ; case 0x1
06ef 7807 |x | Jump 0x6f7 ; case 0x2
06f0 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
06f1 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
06f2 4302 |C | .XXX[0x1]
06f3 4800 |H | Short_Literal 0x0
06f4 00db | | Load_Top At_Offset_3
06f5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
06f6 4302 |C | Exit_Subprogram From_Utility,0x2
06f7 00da | | Load_Top At_Offset_2
06f8 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
06f9 1c00 | | Execute_Immediate Run_Utility,0x0
06fa 4302 |C | Exit_Subprogram From_Utility,0x2
06fb 4801 |H | Short_Literal 0x1
06fc 4806 |H | Short_Literal 0x6
06fd 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
06fe 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
06ff e5fd | | Load 0x2,-0x3
0700 00db | | Load_Top At_Offset_3
0701 1c07 | | Execute_Immediate Run_Utility,0x7
0702 e5fe | | Load 0x2,-0x2
0703 0306 | | Complete_Type Variant_Record,By_Renaming
0704 4304 |C | Exit_Subprogram From_Utility,0x4
0705 00db | | Load_Top At_Offset_3
0706 4604 |F | Jump_Case 0x4
0707 780c |x | Jump 0x714 ; case 0x0
0708 7805 |x | Jump 0x70e ; case 0x1
0709 7808 |x | Jump 0x712 ; case 0x2
070a 7805 |x | Jump 0x710 ; case 0x3
070b 7800 |x | Jump 0x70c ; case 0x4
070c 4804 |H | Short_Literal 0x4
070d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
070e 4801 |H | Short_Literal 0x1
070f 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0710 4802 |H | Short_Literal 0x2
0711 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0712 4803 |H | Short_Literal 0x3
0713 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0714 48ff |H | Short_Literal 0xff
0715 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0716 00db | | Load_Top At_Offset_3
0717 e5fe | | Load 0x2,-0x2
0718 4604 |F | Jump_Case 0x4
0719 780c |x | Jump 0x726 ; case 0x0
071a 7805 |x | Jump 0x720 ; case 0x1
071b 7808 |x | Jump 0x724 ; case 0x2
071c 7805 |x | Jump 0x722 ; case 0x3
071d 7800 |x | Jump 0x71e ; case 0x4
071e 4804 |H | Short_Literal 0x4
071f 7807 |x | Jump 0x727
0720 4801 |H | Short_Literal 0x1
0721 7805 |x | Jump 0x727
0722 4802 |H | Short_Literal 0x2
0723 7803 |x | Jump 0x727
0724 4803 |H | Short_Literal 0x3
0725 7801 |x | Jump 0x727
0726 48ff |H | Short_Literal 0xff
0727 e5ff | | Load 0x2,-0x1
0728 031b | | Declare_Type Variant_Record,Constrained
0729 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
072a 00db | | Load_Top At_Offset_3
072b e5fe | | Load 0x2,-0x2
072c e5ff | | Load 0x2,-0x1
072d 1c06 | | Execute_Immediate Run_Utility,0x6
072e e5ff | | Load 0x2,-0x1
072f 02fc | | Declare_Variable Variant_Record,With_Constraint
0730 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0731 4800 |H | Short_Literal 0x0
0732 00db | | Load_Top At_Offset_3
0733 1c07 | | Execute_Immediate Run_Utility,0x7
0734 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0735 0869 | i | Execute_Immediate Raise,0x69
0736 0000 0000 | | .XXX[0x2]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b | ; | .CONST 0x073b ; Address of begin
0739 0004 | | .CONST 0x0004 ; Address of exception handler
073a 0001 | | .CONST 0x0001 ; Number of locals
073b BODY_0738:
073b INIT_0738:
073b 00da | | Load_Top At_Offset_2
073c 7002 |p | Jump_Nonzero 0x73f
073d 00ea | | Load_Encached Null_String_Cache
073e 4401 |D | Exit_Subprogram With_Result,0x1
073f 00da | | Load_Top At_Offset_2
0740 0217 | | Execute Heap_Access,All_Reference
0741 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0742 4604 |F | Jump_Case 0x4
0743 7809 |x | Jump 0x74d ; case 0x0
0744 780a |x | Jump 0x74f ; case 0x1
0745 7812 |x | Jump 0x758 ; case 0x2
0746 7816 |x | Jump 0x75d ; case 0x3
0747 7800 |x | Jump 0x748 ; case 0x4
0748 00da | | Load_Top At_Offset_2
0749 0217 | | Execute Heap_Access,All_Reference
074a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
074b 803e | > | Call 0x0,0x3e
074c 4401 |D | Exit_Subprogram With_Result,0x1
074d 00ea | | Load_Encached Null_String_Cache
074e 4401 |D | Exit_Subprogram With_Result,0x1
074f 00da | | Load_Top At_Offset_2
0750 0217 | | Execute Heap_Access,All_Reference
0751 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0752 6803 |h | Jump_Zero 0x756
0753 0092 0d21 | !| Action Push_String_Extended,0xd21 ; "*"
0755 4401 |D | Exit_Subprogram With_Result,0x1
0756 00ea | | Load_Encached Null_String_Cache
0757 4401 |D | Exit_Subprogram With_Result,0x1
0758 00da | | Load_Top At_Offset_2
0759 0217 | | Execute Heap_Access,All_Reference
075a 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
075b 803f | ? | Call 0x0,0x3f
075c 4401 |D | Exit_Subprogram With_Result,0x1
075d 00da | | Load_Top At_Offset_2
075e 0217 | | Execute Heap_Access,All_Reference
075f 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0760 803f | ? | Call 0x0,0x3f
0761 4401 |D | Exit_Subprogram With_Result,0x1
0762 0000 0000 | | .BLANK 0000[0x6]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b | k | .CONST 0x076b ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0001 | | .CONST 0x0001 ; Number of locals
076b BODY_0768:
076b INIT_0768:
076b 4501 |E | Exit_Subprogram 0x1
076c 0000 0000 | | .BLANK 0000[0x4]
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773 | s | .CONST 0x0773 ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0001 | | .CONST 0x0001 ; Number of locals
0773 BODY_0770:
0773 INIT_0770:
0773 e23c | < | Load 0x1,0x3c
0774 e5fe | | Load 0x2,-0x2
0775 039c | | Declare_Variable Heap_Access,By_Allocation
0776 00d8 | | Load_Top At_Offset_0
0777 0217 | | Execute Heap_Access,All_Reference
0778 1c00 | | Execute_Immediate Run_Utility,0x0
0779 a5fd | | Store_Unchecked 0x2,-0x3
077a 00da | | Load_Top At_Offset_2
077b 0217 | | Execute Heap_Access,All_Reference
077c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
077d e5fd | | Load 0x2,-0x3
077e 0217 | | Execute Heap_Access,All_Reference
077f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0780 00da | | Load_Top At_Offset_2
0781 0217 | | Execute Heap_Access,All_Reference
0782 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0783 e5fd | | Load 0x2,-0x3
0784 0217 | | Execute Heap_Access,All_Reference
0785 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0786 00da | | Load_Top At_Offset_2
0787 0217 | | Execute Heap_Access,All_Reference
0788 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0789 e5fd | | Load 0x2,-0x3
078a 0217 | | Execute Heap_Access,All_Reference
078b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
078c 00da | | Load_Top At_Offset_2
078d 0217 | | Execute Heap_Access,All_Reference
078e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
078f e5fd | | Load 0x2,-0x3
0790 0217 | | Execute Heap_Access,All_Reference
0791 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0792 00da | | Load_Top At_Offset_2
0793 0217 | | Execute Heap_Access,All_Reference
0794 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0795 e5fd | | Load 0x2,-0x3
0796 0217 | | Execute Heap_Access,All_Reference
0797 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0798 00db | | Load_Top At_Offset_3
0799 e5fd | | Load 0x2,-0x3
079a 0217 | | Execute Heap_Access,All_Reference
079b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
079c 4503 |E | Exit_Subprogram 0x3
079d 0000 0000 | | .XXX[0x3]
079f 0000 | |
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3 | | .CONST 0x07a3 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0001 | | .CONST 0x0001 ; Number of locals
07a3 BODY_07a0:
07a3 INIT_07a0:
07a3 4501 |E | Exit_Subprogram 0x1
07a4 0000 0000 | | .BLANK 0000[0x4]
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 00da | | Load_Top At_Offset_2
07ac e5fd | | Load 0x2,-0x3
07ad 017d | } | Execute Record,Structure_Write
07ae 4503 |E | Exit_Subprogram 0x3
07af 0000 | | .XXX[0x1]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 4501 |E | Exit_Subprogram 0x1
07b4 0000 0000 | | .BLANK 0000[0x4]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07c1 | | .CONST 0x07c1 ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0004 | | .CONST 0x0004 ; Number of locals
07bb INIT_07b8:
07bb 029f 0b03 | | Declare_Subprogram For_Call,INIT_0b00
07bd 029f 0b23 | #| Declare_Subprogram For_Call,INIT_0b20
07bf 029f 0b33 | 3| Declare_Subprogram For_Call,INIT_0b30
07c1 BODY_07b8:
07c1 e5ff | | Load 0x2,-0x1
07c2 7003 |p | Jump_Nonzero 0x7c6
07c3 e241 | A | Load 0x1,0x41
07c4 a5fd | | Store_Unchecked 0x2,-0x3
07c5 4503 |E | Exit_Subprogram 0x3
07c6 e5ff | | Load 0x2,-0x1
07c7 0217 | | Execute Heap_Access,All_Reference
07c8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07c9 00d8 | | Load_Top At_Offset_0
07ca e240 | @ | Load 0x1,0x40
07cb 1c06 | | Execute_Immediate Run_Utility,0x6
07cc e241 | A | Load 0x1,0x41
07cd e5fe | | Load 0x2,-0x2
07ce 039a | | Declare_Variable Heap_Access,By_Allocation,With_Constraint
07cf 00d8 | | Load_Top At_Offset_0
07d0 0217 | | Execute Heap_Access,All_Reference
07d1 1c00 | | Execute_Immediate Run_Utility,0x0
07d2 a5fd | | Store_Unchecked 0x2,-0x3
07d3 e5ff | | Load 0x2,-0x1
07d4 0217 | | Execute Heap_Access,All_Reference
07d5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07d6 4604 |F | Jump_Case 0x4
07d7 4503 |E | Exit_Subprogram 0x3 ; case 0x0
07d8 7805 |x | Jump 0x7de ; case 0x1
07d9 780b |x | Jump 0x7e5 ; case 0x2
07da 780c |x | Jump 0x7e7 ; case 0x3
07db 7800 |x | Jump 0x7dc ; case 0x4
07dc 8404 | | Call 0x2,0x4
07dd 4503 |E | Exit_Subprogram 0x3
07de e5ff | | Load 0x2,-0x1
07df 0217 | | Execute Heap_Access,All_Reference
07e0 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
07e1 e5fd | | Load 0x2,-0x3
07e2 0217 | | Execute Heap_Access,All_Reference
07e3 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
07e4 4503 |E | Exit_Subprogram 0x3
07e5 8402 | | Call 0x2,0x2
07e6 4503 |E | Exit_Subprogram 0x3
07e7 8403 | | Call 0x2,0x3
07e8 4503 |E | Exit_Subprogram 0x3
07e9 0000 0000 | | .BLANK 0000[0x7]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07fd | | .CONST 0x07fd ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0003 | | .CONST 0x0003 ; Number of locals
07f3 INIT_07f0:
07f3 00da | | Load_Top At_Offset_2
07f4 0219 | | Execute Heap_Access,All_Read
07f5 e01c | | Load 0x0,0x1c
07f6 e24a | J | Load 0x1,0x4a
07f7 0096 | | Execute Package,Field_Execute_Dynamic
07f8 e031 | 1 | Load 0x0,0x31
07f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07fa 02c7 | | Declare_Variable Any
07fb 00d8 | | Load_Top At_Offset_0
07fc 1c00 | | Execute_Immediate Run_Utility,0x0
07fd BODY_07f0:
07fd 00d9 | | Load_Top At_Offset_1
07fe 0217 | | Execute Heap_Access,All_Reference
07ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0800 803b | ; | Call 0x0,0x3b
0801 7025 |p% | Jump_Nonzero 0x827
0802 00d9 | | Load_Top At_Offset_1
0803 0219 | | Execute Heap_Access,All_Read
0804 00d8 | | Load_Top At_Offset_0
0805 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0806 4801 |H | Short_Literal 0x1
0807 8040 | @ | Call 0x0,0x40
0808 00d9 | | Load_Top At_Offset_1
0809 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
080a 00d1 | | Pop_Control Pop_Count_1
080b 00d8 | | Load_Top At_Offset_0
080c 00da | | Load_Top At_Offset_2
080d 0217 | | Execute Heap_Access,All_Reference
080e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
080f 8033 | 3 | Call 0x0,0x33
0810 c403 | | Store 0x2,0x3
0811 4801 |H | Short_Literal 0x1
0812 00d9 | | Load_Top At_Offset_1
0813 e031 | 1 | Load 0x0,0x31
0814 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0815 680b |h | Jump_Zero 0x821
0816 4801 |H | Short_Literal 0x1
0817 4829 |H) | Short_Literal 0x29
0818 0092 0d22 | "| Action Push_String_Extended,0xd22 ; "Unable to access this object in read-write mode : ( "
081a 00db | | Load_Top At_Offset_3
081b e031 | 1 | Load 0x0,0x31
081c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
081d 01cc | | Execute Vector,Catenate
081e 01cb | | Execute Vector,Append
081f 820e | | Call 0x1,0xe
0820 4502 |E | Exit_Subprogram 0x2
0821 00d9 | | Load_Top At_Offset_1
0822 e5ff | | Load 0x2,-0x1
0823 0219 | | Execute Heap_Access,All_Read
0824 e015 | | Load 0x0,0x15
0825 e24a | J | Load 0x1,0x4a
0826 0096 | | Execute Package,Field_Execute_Dynamic
0827 4502 |E | Exit_Subprogram 0x2
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 0836 | 6 | .CONST 0x0836 ; Address of begin
0829 0004 | | .CONST 0x0004 ; Address of exception handler
082a 0005 | | .CONST 0x0005 ; Number of locals
082b INIT_0828:
082b e00b | | Load 0x0,0xb
082c e24a | J | Load 0x1,0x4a
082d 0098 | | Execute Package,Field_Read_Dynamic
082e 0322 | " | Declare_Variable Record
082f e041 | A | Load 0x0,0x41
0830 0322 | " | Declare_Variable Record
0831 00d8 | | Load_Top At_Offset_0
0832 1c00 | | Execute_Immediate Run_Utility,0x0
0833 00e1 | | Load_Encached Boolean_Cache
0834 029f 0b43 | C| Declare_Subprogram For_Call,INIT_0b40
0836 BODY_0828:
0836 e5fe | | Load 0x2,-0x2
0837 8042 | B | Call 0x0,0x42
0838 00db | | Load_Top At_Offset_3
0839 017d | } | Execute Record,Structure_Write
083a e5fd | | Load 0x2,-0x3
083b 0d00 | | Execute_Immediate Less,0x0
083c 6809 |h | Jump_Zero 0x846
083d 00db | | Load_Top At_Offset_3
083e 4802 |H | Short_Literal 0x2
083f e5ff | | Load 0x2,-0x1
0840 0219 | | Execute Heap_Access,All_Read
0841 e043 | C | Load 0x0,0x43
0842 e24a | J | Load 0x1,0x4a
0843 0096 | | Execute Package,Field_Execute_Dynamic
0844 00d1 | | Pop_Control Pop_Count_1
0845 780e |x | Jump 0x854
0846 00db | | Load_Top At_Offset_3
0847 e5fd | | Load 0x2,-0x3
0848 00d8 | | Load_Top At_Offset_0
0849 00e3 | | Load_Encached Natural_Cache
084a 0260 | ` | Execute Discrete,In_Type
084b 7001 |p | Jump_Nonzero 0x84d
084c 0801 | | Execute_Immediate Raise,0x1
084d 4802 |H | Short_Literal 0x2
084e e5ff | | Load 0x2,-0x1
084f 0219 | | Execute Heap_Access,All_Read
0850 e044 | D | Load 0x0,0x44
0851 e24a | J | Load 0x1,0x4a
0852 0096 | | Execute Package,Field_Execute_Dynamic
0853 00d1 | | Pop_Control Pop_Count_1
0854 e5fb | | Load 0x2,-0x5
0855 6805 |h | Jump_Zero 0x85b
0856 4800 |H | Short_Literal 0x0
0857 e5fe | | Load 0x2,-0x2
0858 8045 | E | Call 0x0,0x45
0859 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
085a 7802 |x | Jump 0x85d
085b 4801 |H | Short_Literal 0x1
085c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
085d 00cf | | Action Mark_Auxiliary
085e 4804 |H | Short_Literal 0x4
085f 4801 |H | Short_Literal 0x1
0860 0007 | | Action Break_Optional
0861 8405 | | Call 0x2,0x5
0862 00c8 | | Action Pop_Auxiliary_Range
0863 3ffd |? | Loop_Increasing 0x861
0864 4506 |E | Exit_Subprogram 0x6
0865 0000 0000 | | .XXX[0x3]
0867 0000 | |
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 087e | ~ | .CONST 0x087e ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 0007 | | .CONST 0x0007 ; Number of locals
086b INIT_0868:
086b 00da | | Load_Top At_Offset_2
086c 0219 | | Execute Heap_Access,All_Read
086d e01c | | Load 0x0,0x1c
086e e24a | J | Load 0x1,0x4a
086f 0096 | | Execute Package,Field_Execute_Dynamic
0870 00d8 | | Load_Top At_Offset_0
0871 0217 | | Execute Heap_Access,All_Reference
0872 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0873 0007 | | Action Break_Optional
0874 e235 | 5 | Load 0x1,0x35
0875 0007 | | Action Break_Optional
0876 e233 | 3 | Load 0x1,0x33
0877 0007 | | Action Break_Optional
0878 e00b | | Load 0x0,0xb
0879 e24a | J | Load 0x1,0x4a
087a 0098 | | Execute Package,Field_Read_Dynamic
087b 0322 | " | Declare_Variable Record
087c 029f 0b83 | | Declare_Subprogram For_Call,INIT_0b80
087e BODY_0868:
087e e402 | | Load 0x2,0x2
087f 0217 | | Execute Heap_Access,All_Reference
0880 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0881 6823 |h# | Jump_Zero 0x8a5
0882 e403 | | Load 0x2,0x3
0883 803b | ; | Call 0x0,0x3b
0884 0f01 | | Execute_Immediate Equal,0x1
0885 681f |h | Jump_Zero 0x8a5
0886 e403 | | Load 0x2,0x3
0887 8046 | F | Call 0x0,0x46
0888 c403 | | Store 0x2,0x3
0889 00db | | Load_Top At_Offset_3
088a e5ff | | Load 0x2,-0x1
088b 822c | , | Call 0x1,0x2c
088c c404 | | Store 0x2,0x4
088d 00cf | | Action Mark_Auxiliary
088e 7812 |x | Jump 0x8a1
088f e404 | | Load 0x2,0x4
0890 822e | . | Call 0x1,0x2e
0891 a405 | | Store_Unchecked 0x2,0x5
0892 00db | | Load_Top At_Offset_3
0893 0227 | ' | Execute Access,All_Reference
0894 00db | | Load_Top At_Offset_3
0895 017d | } | Execute Record,Structure_Write
0896 00da | | Load_Top At_Offset_2
0897 e023 | # | Load 0x0,0x23
0898 e24a | J | Load 0x1,0x4a
0899 0096 | | Execute Package,Field_Execute_Dynamic
089a 0f02 | | Execute_Immediate Equal,0x2
089b 6801 |h | Jump_Zero 0x89d
089c 8407 | | Call 0x2,0x7
089d e404 | | Load 0x2,0x4
089e 822f | / | Call 0x1,0x2f
089f c404 | | Store 0x2,0x4
08a0 00c9 | | Action Pop_Auxiliary_Loop
08a1 e404 | | Load 0x2,0x4
08a2 822d | - | Call 0x1,0x2d
08a3 6feb |o | Jump_Zero 0x88f
08a4 00ce | | Action Pop_Auxiliary
08a5 4502 |E | Exit_Subprogram 0x2
08a6 0000 0000 | | .XXX[0x2]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08b5 | | .CONST 0x08b5 ; Address of begin
08a9 0004 | | .CONST 0x0004 ; Address of exception handler
08aa 0004 | | .CONST 0x0004 ; Number of locals
08ab INIT_08a8:
08ab e241 | A | Load 0x1,0x41
08ac e5fe | | Load 0x2,-0x2
08ad e5ff | | Load 0x2,-0x1
08ae e047 | G | Load 0x0,0x47
08af e24a | J | Load 0x1,0x4a
08b0 0096 | | Execute Package,Field_Execute_Dynamic
08b1 0031 | 1 | Store_Top Heap_Access,At_Offset_1
08b2 e048 | H | Load 0x0,0x48
08b3 029f 0b9b | | Declare_Subprogram For_Call,INIT_0b98
08b5 BODY_08a8:
08b5 e5fe | | Load 0x2,-0x2
08b6 0f02 | | Execute_Immediate Equal,0x2
08b7 6803 |h | Jump_Zero 0x8bb
08b8 4805 |H | Short_Literal 0x5
08b9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
08ba 7805 |x | Jump 0x8c0
08bb e5fe | | Load 0x2,-0x2
08bc 0f03 | | Execute_Immediate Equal,0x3
08bd 6802 |h | Jump_Zero 0x8c0
08be 4811 |H | Short_Literal 0x11
08bf 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
08c0 8404 | | Call 0x2,0x4
08c1 0831 | 1 | Execute_Immediate Raise,0x31
08c2 0000 0000 | | .BLANK 0000[0x6]
08c8 ; --------------------------------------------------------------------------------------
08c8 ; SUBPROGRAM
08c8 ; --------------------------------------------------------------------------------------
08c8 08cd | | .CONST 0x08cd ; Address of begin
08c9 0004 | | .CONST 0x0004 ; Address of exception handler
08ca 0002 | | .CONST 0x0002 ; Number of locals
08cb INIT_08c8:
08cb 029f 0bdb | | Declare_Subprogram For_Call,INIT_0bd8
08cd BODY_08c8:
08cd e5fe | | Load 0x2,-0x2
08ce e023 | # | Load 0x0,0x23
08cf e24a | J | Load 0x1,0x4a
08d0 0096 | | Execute Package,Field_Execute_Dynamic
08d1 0f02 | | Execute_Immediate Equal,0x2
08d2 6801 |h | Jump_Zero 0x8d4
08d3 8402 | | Call 0x2,0x2
08d4 4504 |E | Exit_Subprogram 0x4
08d5 0000 0000 | | .XXX[0x3]
08d7 0000 | |
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08e3 | | .CONST 0x08e3 ; Address of begin
08d9 0004 | | .CONST 0x0004 ; Address of exception handler
08da 0002 | | .CONST 0x0002 ; Number of locals
08db INIT_08d8:
08db e23e | > | Load 0x1,0x3e
08dc 0322 | " | Declare_Variable Record
08dd 00db | | Load_Top At_Offset_3
08de e049 | I | Load 0x0,0x49
08df e24a | J | Load 0x1,0x4a
08e0 0096 | | Execute Package,Field_Execute_Dynamic
08e1 00d9 | | Load_Top At_Offset_1
08e2 017d | } | Execute Record,Structure_Write
08e3 BODY_08d8:
08e3 4801 |H | Short_Literal 0x1
08e4 00d9 | | Load_Top At_Offset_1
08e5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
08e6 00d8 | | Load_Top At_Offset_0
08e7 e5ff | | Load 0x2,-0x1
08e8 e04a | J | Load 0x0,0x4a
08e9 e24a | J | Load 0x1,0x4a
08ea 0096 | | Execute Package,Field_Execute_Dynamic
08eb 4800 |H | Short_Literal 0x0
08ec e5ff | | Load 0x2,-0x1
08ed e04b | K | Load 0x0,0x4b
08ee e24a | J | Load 0x1,0x4a
08ef 0096 | | Execute Package,Field_Execute_Dynamic
08f0 4502 |E | Exit_Subprogram 0x2
08f1 0000 0000 | | .BLANK 0000[0x7]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 0905 | | .CONST 0x0905 ; Address of begin
08f9 0004 | | .CONST 0x0004 ; Address of exception handler
08fa 0006 | | .CONST 0x0006 ; Number of locals
08fb INIT_08f8:
08fb e00b | | Load 0x0,0xb
08fc e24a | J | Load 0x1,0x4a
08fd 0098 | | Execute Package,Field_Read_Dynamic
08fe 0322 | " | Declare_Variable Record
08ff 00e3 | | Load_Encached Natural_Cache
0900 00e1 | | Load_Encached Boolean_Cache
0901 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0902 e23c | < | Load 0x1,0x3c
0903 029f 0bfb | | Declare_Subprogram For_Call,INIT_0bf8
0905 BODY_08f8:
0905 e5fe | | Load 0x2,-0x2
0906 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0907 00d8 | | Load_Top At_Offset_0
0908 00e4 | | Load_Encached Positive_Cache
0909 0260 | ` | Execute Discrete,In_Type
090a 7001 |p | Jump_Nonzero 0x90c
090b 0801 | | Execute_Immediate Raise,0x1
090c e5ff | | Load 0x2,-0x1
090d 0219 | | Execute Heap_Access,All_Read
090e e021 | ! | Load 0x0,0x21
090f e24a | J | Load 0x1,0x4a
0910 0096 | | Execute Package,Field_Execute_Dynamic
0911 e402 | | Load 0x2,0x2
0912 017d | } | Execute Record,Structure_Write
0913 e402 | | Load 0x2,0x2
0914 e023 | # | Load 0x0,0x23
0915 e24a | J | Load 0x1,0x4a
0916 0096 | | Execute Package,Field_Execute_Dynamic
0917 4800 |H | Short_Literal 0x0
0918 4801 |H | Short_Literal 0x1
0919 0262 | b | Execute Discrete,In_Range
091a 7003 |p | Jump_Nonzero 0x91e
091b 4800 |H | Short_Literal 0x0
091c 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
091d 7802 |x | Jump 0x920
091e 4801 |H | Short_Literal 0x1
091f 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
0920 e5ff | | Load 0x2,-0x1
0921 0219 | | Execute Heap_Access,All_Read
0922 e01c | | Load 0x0,0x1c
0923 e24a | J | Load 0x1,0x4a
0924 0096 | | Execute Package,Field_Execute_Dynamic
0925 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0926 00da | | Load_Top At_Offset_2
0927 6802 |h | Jump_Zero 0x92a
0928 4800 |H | Short_Literal 0x0
0929 4402 |D | Exit_Subprogram With_Result,0x2
092a 8406 | | Call 0x2,0x6
092b 0831 | 1 | Execute_Immediate Raise,0x31
092c 0000 0000 | | .BLANK 0000[0x4]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 0935 | 5 | .CONST 0x0935 ; Address of begin
0931 0004 | | .CONST 0x0004 ; Address of exception handler
0932 0002 | | .CONST 0x0002 ; Number of locals
0933 INIT_0930:
0933 0092 0d23 | #| Action Push_String_Extended,0xd23 ; "Test_Set_Ops.Insert (Test_Case => \x22<REGION>\x22);"
0935 BODY_0930:
0935 00d8 | | Load_Top At_Offset_0
0936 4403 |D | Exit_Subprogram With_Result,0x3
0937 0000 | | .XXX[0x1]
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 094d | M | .CONST 0x094d ; Address of begin
0939 0004 | | .CONST 0x0004 ; Address of exception handler
093a 0003 | | .CONST 0x0003 ; Number of locals
093b INIT_0938:
093b e005 | | Load 0x0,0x5
093c e5fd | | Load 0x2,-0x3
093d e5ff | | Load 0x2,-0x1
093e e047 | G | Load 0x0,0x47
093f e24a | J | Load 0x1,0x4a
0940 0096 | | Execute Package,Field_Execute_Dynamic
0941 0217 | | Execute Heap_Access,All_Reference
0942 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0943 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0944 e005 | | Load 0x0,0x5
0945 e5fd | | Load 0x2,-0x3
0946 e5fe | | Load 0x2,-0x2
0947 e047 | G | Load 0x0,0x47
0948 e24a | J | Load 0x1,0x4a
0949 0096 | | Execute Package,Field_Execute_Dynamic
094a 0217 | | Execute Heap_Access,All_Reference
094b 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
094c 0031 | 1 | Store_Top Heap_Access,At_Offset_1
094d BODY_0938:
094d 00d9 | | Load_Top At_Offset_1
094e 803f | ? | Call 0x0,0x3f
094f 00d9 | | Load_Top At_Offset_1
0950 803f | ? | Call 0x0,0x3f
0951 01c1 | | Execute Vector,Less
0952 4403 |D | Exit_Subprogram With_Result,0x3
0953 0000 0000 | | .BLANK 0000[0x5]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 095b | [ | .CONST 0x095b ; Address of begin
0959 0004 | | .CONST 0x0004 ; Address of exception handler
095a 0001 | | .CONST 0x0001 ; Number of locals
095b BODY_0958:
095b INIT_0958:
095b 4802 |H | Short_Literal 0x2
095c e5fe | | Load 0x2,-0x2
095d e5ff | | Load 0x2,-0x1
095e 8259 | Y | Call 0x1,0x59
095f 4402 |D | Exit_Subprogram With_Result,0x2
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0963 | c | .CONST 0x0963 ; Address of begin
0961 0004 | | .CONST 0x0004 ; Address of exception handler
0962 0001 | | .CONST 0x0001 ; Number of locals
0963 BODY_0960:
0963 INIT_0960:
0963 4803 |H | Short_Literal 0x3
0964 e5fe | | Load 0x2,-0x2
0965 e5ff | | Load 0x2,-0x1
0966 8259 | Y | Call 0x1,0x59
0967 4402 |D | Exit_Subprogram With_Result,0x2
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096f | o | .CONST 0x096f ; Address of begin
0969 0004 | | .CONST 0x0004 ; Address of exception handler
096a 0002 | | .CONST 0x0002 ; Number of locals
096b INIT_0968:
096b e00b | | Load 0x0,0xb
096c e24a | J | Load 0x1,0x4a
096d 0098 | | Execute Package,Field_Read_Dynamic
096e 0322 | " | Declare_Variable Record
096f BODY_0968:
096f 00d8 | | Load_Top At_Offset_0
0970 4801 |H | Short_Literal 0x1
0971 e402 | | Load 0x2,0x2
0972 0219 | | Execute Heap_Access,All_Read
0973 e043 | C | Load 0x0,0x43
0974 e24a | J | Load 0x1,0x4a
0975 0096 | | Execute Package,Field_Execute_Dynamic
0976 00d1 | | Pop_Control Pop_Count_1
0977 4802 |H | Short_Literal 0x2
0978 e24c | L | Load 0x1,0x4c
0979 00da | | Load_Top At_Offset_2
097a e04c | L | Load 0x0,0x4c
097b e24a | J | Load 0x1,0x4a
097c 0096 | | Execute Package,Field_Execute_Dynamic
097d 4803 |H | Short_Literal 0x3
097e e24d | M | Load 0x1,0x4d
097f 00da | | Load_Top At_Offset_2
0980 e04c | L | Load 0x0,0x4c
0981 e24a | J | Load 0x1,0x4a
0982 0096 | | Execute Package,Field_Execute_Dynamic
0983 4804 |H | Short_Literal 0x4
0984 e24e | N | Load 0x1,0x4e
0985 00da | | Load_Top At_Offset_2
0986 e04c | L | Load 0x0,0x4c
0987 e24a | J | Load 0x1,0x4a
0988 0096 | | Execute Package,Field_Execute_Dynamic
0989 00d8 | | Load_Top At_Offset_0
098a 4801 |H | Short_Literal 0x1
098b e402 | | Load 0x2,0x2
098c 0219 | | Execute Heap_Access,All_Read
098d e043 | C | Load 0x0,0x43
098e e24a | J | Load 0x1,0x4a
098f 0096 | | Execute Package,Field_Execute_Dynamic
0990 00d1 | | Pop_Control Pop_Count_1
0991 4802 |H | Short_Literal 0x2
0992 4801 |H | Short_Literal 0x1
0993 4802 |H | Short_Literal 0x2
0994 e24b | K | Load 0x1,0x4b
0995 01d7 | | Execute Vector,Field_Read
0996 e24f | O | Load 0x1,0x4f
0997 01cf | | Execute Vector,Slice_Read
0998 00da | | Load_Top At_Offset_2
0999 e04c | L | Load 0x0,0x4c
099a e24a | J | Load 0x1,0x4a
099b 0096 | | Execute Package,Field_Execute_Dynamic
099c 4803 |H | Short_Literal 0x3
099d 4801 |H | Short_Literal 0x1
099e 4803 |H | Short_Literal 0x3
099f e24b | K | Load 0x1,0x4b
09a0 01d7 | | Execute Vector,Field_Read
09a1 e24f | O | Load 0x1,0x4f
09a2 01cf | | Execute Vector,Slice_Read
09a3 00da | | Load_Top At_Offset_2
09a4 e04c | L | Load 0x0,0x4c
09a5 e24a | J | Load 0x1,0x4a
09a6 0096 | | Execute Package,Field_Execute_Dynamic
09a7 4804 |H | Short_Literal 0x4
09a8 4801 |H | Short_Literal 0x1
09a9 4804 |H | Short_Literal 0x4
09aa e24b | K | Load 0x1,0x4b
09ab 01d7 | | Execute Vector,Field_Read
09ac e24f | O | Load 0x1,0x4f
09ad 01cf | | Execute Vector,Slice_Read
09ae 00da | | Load_Top At_Offset_2
09af e04c | L | Load 0x0,0x4c
09b0 e24a | J | Load 0x1,0x4a
09b1 0096 | | Execute Package,Field_Execute_Dynamic
09b2 4501 |E | Exit_Subprogram 0x1
09b3 0000 0000 | | .BLANK 0000[0x5]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09ca | | .CONST 0x09ca ; Address of begin
09b9 0004 | | .CONST 0x0004 ; Address of exception handler
09ba 0003 | | .CONST 0x0003 ; Number of locals
09bb INIT_09b8:
09bb e005 | | Load 0x0,0x5
09bc e5ff | | Load 0x2,-0x1
09bd 0219 | | Execute Heap_Access,All_Read
09be e020 | | Load 0x0,0x20
09bf e24a | J | Load 0x1,0x4a
09c0 0096 | | Execute Package,Field_Execute_Dynamic
09c1 e402 | | Load 0x2,0x2
09c2 801d | | Call 0x0,0x1d
09c3 8014 | | Call 0x0,0x14
09c4 0031 | 1 | Store_Top Heap_Access,At_Offset_1
09c5 e031 | 1 | Load 0x0,0x31
09c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09c7 02c7 | | Declare_Variable Any
09c8 00d8 | | Load_Top At_Offset_0
09c9 1c00 | | Execute_Immediate Run_Utility,0x0
09ca BODY_09b8:
09ca e5fe | | Load 0x2,-0x2
09cb 680f |h | Jump_Zero 0x9db
09cc e5ff | | Load 0x2,-0x1
09cd 8251 | Q | Call 0x1,0x51
09ce e5ff | | Load 0x2,-0x1
09cf 8253 | S | Call 0x1,0x53
09d0 e402 | | Load 0x2,0x2
09d1 804d | M | Call 0x0,0x4d
09d2 c402 | | Store 0x2,0x2
09d3 00d8 | | Load_Top At_Offset_0
09d4 e402 | | Load 0x2,0x2
09d5 8033 | 3 | Call 0x0,0x33
09d6 c603 | | Store 0x3,0x3
09d7 4802 |H | Short_Literal 0x2
09d8 00da | | Load_Top At_Offset_2
09d9 00da | | Load_Top At_Offset_2
09da 8034 | 4 | Call 0x0,0x34
09db e5fd | | Load 0x2,-0x3
09dc 680c |h | Jump_Zero 0x9e9
09dd e402 | | Load 0x2,0x2
09de 4801 |H | Short_Literal 0x1
09df 804e | N | Call 0x0,0x4e
09e0 c402 | | Store 0x2,0x2
09e1 00d8 | | Load_Top At_Offset_0
09e2 e402 | | Load 0x2,0x2
09e3 8033 | 3 | Call 0x0,0x33
09e4 c603 | | Store 0x3,0x3
09e5 4802 |H | Short_Literal 0x2
09e6 00da | | Load_Top At_Offset_2
09e7 00da | | Load_Top At_Offset_2
09e8 8034 | 4 | Call 0x0,0x34
09e9 4501 |E | Exit_Subprogram 0x1
09ea 0000 0000 | | .BLANK 0000[0x6]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f9 | | .CONST 0x09f9 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0002 | | .CONST 0x0002 ; Number of locals
09f3 INIT_09f0:
09f3 e04f | O | Load 0x0,0x4f
09f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f5 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
09f6 02c7 | | Declare_Variable Any
09f7 00d8 | | Load_Top At_Offset_0
09f8 1c00 | | Execute_Immediate Run_Utility,0x0
09f9 BODY_09f0:
09f9 00d8 | | Load_Top At_Offset_0
09fa 0120 | | Execute Any,Is_Value
09fb 6804 |h | Jump_Zero 0xa00
09fc e04f | O | Load 0x0,0x4f
09fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09fe 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
09ff 7801 |x | Jump 0xa01
0a00 00d8 | | Load_Top At_Offset_0
0a01 e5ff | | Load 0x2,-0x1
0a02 8212 | | Call 0x1,0x12
0a03 8027 | ' | Call 0x0,0x27
0a04 e04f | O | Load 0x0,0x4f
0a05 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a06 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a07 c602 | | Store 0x3,0x2
0a08 4501 |E | Exit_Subprogram 0x1
0a09 0000 0000 | | .BLANK 0000[0x7]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a19 | | .CONST 0x0a19 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0002 | | .CONST 0x0002 ; Number of locals
0a13 INIT_0a10:
0a13 e04f | O | Load 0x0,0x4f
0a14 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a15 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0a16 02c7 | | Declare_Variable Any
0a17 00d8 | | Load_Top At_Offset_0
0a18 1c00 | | Execute_Immediate Run_Utility,0x0
0a19 BODY_0a10:
0a19 00d8 | | Load_Top At_Offset_0
0a1a 0120 | | Execute Any,Is_Value
0a1b 6804 |h | Jump_Zero 0xa20
0a1c e04f | O | Load 0x0,0x4f
0a1d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a1e 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0a1f 7801 |x | Jump 0xa21
0a20 00d8 | | Load_Top At_Offset_0
0a21 e5fe | | Load 0x2,-0x2
0a22 8212 | | Call 0x1,0x12
0a23 8027 | ' | Call 0x0,0x27
0a24 e04f | O | Load 0x0,0x4f
0a25 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a26 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a27 c602 | | Store 0x3,0x2
0a28 4501 |E | Exit_Subprogram 0x1
0a29 0000 0000 | | .BLANK 0000[0x7]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a39 | 9 | .CONST 0x0a39 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0003 | | .CONST 0x0003 ; Number of locals
0a33 INIT_0a30:
0a33 e00b | | Load 0x0,0xb
0a34 e24a | J | Load 0x1,0x4a
0a35 0098 | | Execute Package,Field_Read_Dynamic
0a36 0322 | " | Declare_Variable Record
0a37 e241 | A | Load 0x1,0x41
0a38 0007 | | Action Break_Optional
0a39 BODY_0a30:
0a39 e403 | | Load 0x2,0x3
0a3a e03c | < | Load 0x0,0x3c
0a3b e24a | J | Load 0x1,0x4a
0a3c 0096 | | Execute Package,Field_Execute_Dynamic
0a3d 00da | | Load_Top At_Offset_2
0a3e 017d | } | Execute Record,Structure_Write
0a3f 00d9 | | Load_Top At_Offset_1
0a40 e023 | # | Load 0x0,0x23
0a41 e24a | J | Load 0x1,0x4a
0a42 0096 | | Execute Package,Field_Execute_Dynamic
0a43 0f02 | | Execute_Immediate Equal,0x2
0a44 6811 |h | Jump_Zero 0xa56
0a45 4802 |H | Short_Literal 0x2
0a46 00da | | Load_Top At_Offset_2
0a47 e047 | G | Load 0x0,0x47
0a48 e24a | J | Load 0x1,0x4a
0a49 0096 | | Execute Package,Field_Execute_Dynamic
0a4a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0a4b 4800 |H | Short_Literal 0x0
0a4c 00d9 | | Load_Top At_Offset_1
0a4d 0217 | | Execute Heap_Access,All_Reference
0a4e 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0a4f 8045 | E | Call 0x0,0x45
0a50 a404 | | Store_Unchecked 0x2,0x4
0a51 e404 | | Load 0x2,0x4
0a52 7003 |p | Jump_Nonzero 0xa56
0a53 00cc | | Action Pop_Block
0a54 00a7 03a1 | | Action Jump_Extended,0x3a1
0a56 e403 | | Load 0x2,0x3
0a57 e03d | = | Load 0x0,0x3d
0a58 e24a | J | Load 0x1,0x4a
0a59 0096 | | Execute Package,Field_Execute_Dynamic
0a5a 4501 |E | Exit_Subprogram 0x1
0a5b 0000 0000 | | .BLANK 0000[0x5]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a71 | q | .CONST 0x0a71 ; Address of begin
0a61 0004 | | .CONST 0x0004 ; Address of exception handler
0a62 0003 | | .CONST 0x0003 ; Number of locals
0a63 INIT_0a60:
0a63 e5fe | | Load 0x2,-0x2
0a64 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a65 00d8 | | Load_Top At_Offset_0
0a66 00e4 | | Load_Encached Positive_Cache
0a67 0260 | ` | Execute Discrete,In_Type
0a68 7001 |p | Jump_Nonzero 0xa6a
0a69 0801 | | Execute_Immediate Raise,0x1
0a6a e5ff | | Load 0x2,-0x1
0a6b 0219 | | Execute Heap_Access,All_Read
0a6c e021 | ! | Load 0x0,0x21
0a6d e24a | J | Load 0x1,0x4a
0a6e 0096 | | Execute Package,Field_Execute_Dynamic
0a6f 029f 0c13 | | Declare_Subprogram For_Call,INIT_0c10
0a71 BODY_0a60:
0a71 00d9 | | Load_Top At_Offset_1
0a72 e023 | # | Load 0x0,0x23
0a73 e24a | J | Load 0x1,0x4a
0a74 0096 | | Execute Package,Field_Execute_Dynamic
0a75 4800 |H | Short_Literal 0x0
0a76 4801 |H | Short_Literal 0x1
0a77 0262 | b | Execute Discrete,In_Range
0a78 7004 |p | Jump_Nonzero 0xa7d
0a79 8603 | | Call 0x3,0x3
0a7a 00d9 | | Load_Top At_Offset_1
0a7b 8256 | V | Call 0x1,0x56
0a7c 4501 |E | Exit_Subprogram 0x1
0a7d 4800 |H | Short_Literal 0x0
0a7e 0092 0d24 | $| Action Push_String_Extended,0xd24 ; "Delete not defined for this line"
0a80 820e | | Call 0x1,0xe
0a81 4501 |E | Exit_Subprogram 0x1
0a82 0000 0000 | | .BLANK 0000[0x6]
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a92 | | .CONST 0x0a92 ; Address of begin
0a89 0004 | | .CONST 0x0004 ; Address of exception handler
0a8a 0003 | | .CONST 0x0003 ; Number of locals
0a8b INIT_0a88:
0a8b 00ea | | Load_Encached Null_String_Cache
0a8c e404 | | Load 0x2,0x4
0a8d e402 | | Load 0x2,0x2
0a8e e250 | P | Load 0x1,0x50
0a8f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0a90 029f 0c3b | ;| Declare_Subprogram For_Call,INIT_0c38
0a92 BODY_0a88:
0a92 4801 |H | Short_Literal 0x1
0a93 e5ff | | Load 0x2,-0x1
0a94 0219 | | Execute Heap_Access,All_Read
0a95 e028 | ( | Load 0x0,0x28
0a96 e24a | J | Load 0x1,0x4a
0a97 0096 | | Execute Package,Field_Execute_Dynamic
0a98 e403 | | Load 0x2,0x3
0a99 017d | } | Execute Record,Structure_Write
0a9a 00cf | | Action Mark_Auxiliary
0a9b 7807 |x | Jump 0xaa3
0a9c 8603 | | Call 0x3,0x3
0a9d e403 | | Load 0x2,0x3
0a9e e03d | = | Load 0x0,0x3d
0a9f e24a | J | Load 0x1,0x4a
0aa0 0096 | | Execute Package,Field_Execute_Dynamic
0aa1 00d1 | | Pop_Control Pop_Count_1
0aa2 00c9 | | Action Pop_Auxiliary_Loop
0aa3 e403 | | Load 0x2,0x3
0aa4 e029 | ) | Load 0x0,0x29
0aa5 e24a | J | Load 0x1,0x4a
0aa6 0096 | | Execute Package,Field_Execute_Dynamic
0aa7 6ff4 |o | Jump_Zero 0xa9c
0aa8 4501 |E | Exit_Subprogram 0x1
0aa9 0000 0000 | | .BLANK 0000[0x7]
0ab0 ; --------------------------------------------------------------------------------------
0ab0 ; SUBPROGRAM
0ab0 ; --------------------------------------------------------------------------------------
0ab0 0ab9 | | .CONST 0x0ab9 ; Address of begin
0ab1 0004 | | .CONST 0x0004 ; Address of exception handler
0ab2 0002 | | .CONST 0x0002 ; Number of locals
0ab3 INIT_0ab0:
0ab3 e04f | O | Load 0x0,0x4f
0ab4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ab5 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0ab6 02c7 | | Declare_Variable Any
0ab7 00d8 | | Load_Top At_Offset_0
0ab8 1c00 | | Execute_Immediate Run_Utility,0x0
0ab9 BODY_0ab0:
0ab9 00d8 | | Load_Top At_Offset_0
0aba 0120 | | Execute Any,Is_Value
0abb 6804 |h | Jump_Zero 0xac0
0abc e04f | O | Load 0x0,0x4f
0abd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0abe 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0abf 7801 |x | Jump 0xac1
0ac0 00d8 | | Load_Top At_Offset_0
0ac1 e5ff | | Load 0x2,-0x1
0ac2 8212 | | Call 0x1,0x12
0ac3 8027 | ' | Call 0x0,0x27
0ac4 e04f | O | Load 0x0,0x4f
0ac5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ac6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ac7 c602 | | Store 0x3,0x2
0ac8 4501 |E | Exit_Subprogram 0x1
0ac9 0000 0000 | | .BLANK 0000[0x7]
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad9 | | .CONST 0x0ad9 ; Address of begin
0ad1 0004 | | .CONST 0x0004 ; Address of exception handler
0ad2 0003 | | .CONST 0x0003 ; Number of locals
0ad3 INIT_0ad0:
0ad3 e00b | | Load 0x0,0xb
0ad4 e24a | J | Load 0x1,0x4a
0ad5 0098 | | Execute Package,Field_Read_Dynamic
0ad6 0322 | " | Declare_Variable Record
0ad7 e241 | A | Load 0x1,0x41
0ad8 0007 | | Action Break_Optional
0ad9 BODY_0ad0:
0ad9 e402 | | Load 0x2,0x2
0ada e03c | < | Load 0x0,0x3c
0adb e24a | J | Load 0x1,0x4a
0adc 0096 | | Execute Package,Field_Execute_Dynamic
0add 00da | | Load_Top At_Offset_2
0ade 017d | } | Execute Record,Structure_Write
0adf 00d9 | | Load_Top At_Offset_1
0ae0 e023 | # | Load 0x0,0x23
0ae1 e24a | J | Load 0x1,0x4a
0ae2 0096 | | Execute Package,Field_Execute_Dynamic
0ae3 0f02 | | Execute_Immediate Equal,0x2
0ae4 6811 |h | Jump_Zero 0xaf6
0ae5 4802 |H | Short_Literal 0x2
0ae6 00da | | Load_Top At_Offset_2
0ae7 e047 | G | Load 0x0,0x47
0ae8 e24a | J | Load 0x1,0x4a
0ae9 0096 | | Execute Package,Field_Execute_Dynamic
0aea 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0aeb 4801 |H | Short_Literal 0x1
0aec 00d9 | | Load_Top At_Offset_1
0aed 0217 | | Execute Heap_Access,All_Reference
0aee 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0aef 8045 | E | Call 0x0,0x45
0af0 a403 | | Store_Unchecked 0x2,0x3
0af1 e403 | | Load 0x2,0x3
0af2 0f00 | | Execute_Immediate Equal,0x0
0af3 00da | | Load_Top At_Offset_2
0af4 e5ff | | Load 0x2,-0x1
0af5 8255 | U | Call 0x1,0x55
0af6 e402 | | Load 0x2,0x2
0af7 e03d | = | Load 0x0,0x3d
0af8 e24a | J | Load 0x1,0x4a
0af9 0096 | | Execute Package,Field_Execute_Dynamic
0afa 4501 |E | Exit_Subprogram 0x1
0afb 0000 0000 | | .BLANK 0000[0x5]
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b03 | | .CONST 0x0b03 ; Address of begin
0b01 0004 | | .CONST 0x0004 ; Address of exception handler
0b02 0001 | | .CONST 0x0001 ; Number of locals
0b03 BODY_0b00:
0b03 INIT_0b00:
0b03 e5fd | | Load 0x2,-0x3
0b04 0219 | | Execute Heap_Access,All_Read
0b05 00d8 | | Load_Top At_Offset_0
0b06 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0b07 e5fe | | Load 0x2,-0x2
0b08 e5ff | | Load 0x2,-0x1
0b09 0217 | | Execute Heap_Access,All_Reference
0b0a 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0b0b 8050 | P | Call 0x0,0x50
0b0c 00d9 | | Load_Top At_Offset_1
0b0d 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0b0e 00d1 | | Pop_Control Pop_Count_1
0b0f e5fd | | Load 0x2,-0x3
0b10 0219 | | Execute Heap_Access,All_Read
0b11 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0b12 00d8 | | Load_Top At_Offset_0
0b13 e5fe | | Load 0x2,-0x2
0b14 e5ff | | Load 0x2,-0x1
0b15 0217 | | Execute Heap_Access,All_Reference
0b16 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0b17 8051 | Q | Call 0x0,0x51
0b18 4501 |E | Exit_Subprogram 0x1
0b19 0000 0000 | | .BLANK 0000[0x7]
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 e5fd | | Load 0x2,-0x3
0b24 0219 | | Execute Heap_Access,All_Read
0b25 00d8 | | Load_Top At_Offset_0
0b26 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0b27 e5fe | | Load 0x2,-0x2
0b28 e5ff | | Load 0x2,-0x1
0b29 0217 | | Execute Heap_Access,All_Reference
0b2a 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0b2b 8050 | P | Call 0x0,0x50
0b2c 00d9 | | Load_Top At_Offset_1
0b2d 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0b2e 4501 |E | Exit_Subprogram 0x1
0b2f 0000 | | .XXX[0x1]
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; --------------------------------------------------------------------------------------
0b30 0b33 | 3 | .CONST 0x0b33 ; Address of begin
0b31 0004 | | .CONST 0x0004 ; Address of exception handler
0b32 0001 | | .CONST 0x0001 ; Number of locals
0b33 BODY_0b30:
0b33 INIT_0b30:
0b33 e5fd | | Load 0x2,-0x3
0b34 0219 | | Execute Heap_Access,All_Read
0b35 00d8 | | Load_Top At_Offset_0
0b36 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0b37 e5fe | | Load 0x2,-0x2
0b38 e5ff | | Load 0x2,-0x1
0b39 0217 | | Execute Heap_Access,All_Reference
0b3a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0b3b 8050 | P | Call 0x0,0x50
0b3c 00d9 | | Load_Top At_Offset_1
0b3d 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0b3e 4501 |E | Exit_Subprogram 0x1
0b3f 0000 | | .XXX[0x1]
0b40 ; --------------------------------------------------------------------------------------
0b40 ; SUBPROGRAM
0b40 ; --------------------------------------------------------------------------------------
0b40 0b4d | M | .CONST 0x0b4d ; Address of begin
0b41 0004 | | .CONST 0x0004 ; Address of exception handler
0b42 0002 | | .CONST 0x0002 ; Number of locals
0b43 INIT_0b40:
0b43 e408 | | Load 0x2,0x8
0b44 00d8 | | Load_Top At_Offset_0
0b45 e240 | @ | Load 0x1,0x40
0b46 1c06 | | Execute_Immediate Run_Utility,0x6
0b47 e241 | A | Load 0x1,0x41
0b48 e5fc | | Load 0x2,-0x4
0b49 039a | | Declare_Variable Heap_Access,By_Allocation,With_Constraint
0b4a 00d8 | | Load_Top At_Offset_0
0b4b 0217 | | Execute Heap_Access,All_Reference
0b4c 1c00 | | Execute_Immediate Run_Utility,0x0
0b4d BODY_0b40:
0b4d e408 | | Load 0x2,0x8
0b4e 0aff | | Execute_Immediate Plus,-0x1
0b4f 4603 |F | Jump_Case 0x3
0b50 780b |x | Jump 0xb5c ; case 0x0
0b51 7810 |x | Jump 0xb62 ; case 0x1
0b52 781b |x | Jump 0xb6e ; case 0x2
0b53 7800 |x | Jump 0xb54 ; case 0x3
0b54 e5fc | | Load 0x2,-0x4
0b55 e403 | | Load 0x2,0x3
0b56 8052 | R | Call 0x0,0x52
0b57 8014 | | Call 0x0,0x14
0b58 00d9 | | Load_Top At_Offset_1
0b59 0217 | | Execute Heap_Access,All_Reference
0b5a 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0b5b 781a |x | Jump 0xb76
0b5c e404 | | Load 0x2,0x4
0b5d 0f00 | | Execute_Immediate Equal,0x0
0b5e 00d9 | | Load_Top At_Offset_1
0b5f 0217 | | Execute Heap_Access,All_Reference
0b60 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0b61 7814 |x | Jump 0xb76
0b62 e5fe | | Load 0x2,-0x2
0b63 00d9 | | Load_Top At_Offset_1
0b64 0217 | | Execute Heap_Access,All_Reference
0b65 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0b66 e5fc | | Load 0x2,-0x4
0b67 e5fe | | Load 0x2,-0x2
0b68 8053 | S | Call 0x0,0x53
0b69 8014 | | Call 0x0,0x14
0b6a 00d9 | | Load_Top At_Offset_1
0b6b 0217 | | Execute Heap_Access,All_Reference
0b6c 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0b6d 7808 |x | Jump 0xb76
0b6e 4800 |H | Short_Literal 0x0
0b6f 4800 |H | Short_Literal 0x0
0b70 e403 | | Load 0x2,0x3
0b71 4801 |H | Short_Literal 0x1
0b72 8054 | T | Call 0x0,0x54
0b73 00d9 | | Load_Top At_Offset_1
0b74 0217 | | Execute Heap_Access,All_Reference
0b75 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0b76 00d8 | | Load_Top At_Offset_0
0b77 e408 | | Load 0x2,0x8
0b78 e402 | | Load 0x2,0x2
0b79 e055 | U | Load 0x0,0x55
0b7a e24a | J | Load 0x1,0x4a
0b7b 0096 | | Execute Package,Field_Execute_Dynamic
0b7c 4501 |E | Exit_Subprogram 0x1
0b7d 0000 0000 | | .XXX[0x3]
0b7f 0000 | |
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b8a | | .CONST 0x0b8a ; Address of begin
0b81 0004 | | .CONST 0x0004 ; Address of exception handler
0b82 0002 | | .CONST 0x0002 ; Number of locals
0b83 INIT_0b80:
0b83 e241 | A | Load 0x1,0x41
0b84 4802 |H | Short_Literal 0x2
0b85 e406 | | Load 0x2,0x6
0b86 e047 | G | Load 0x0,0x47
0b87 e24a | J | Load 0x1,0x4a
0b88 0096 | | Execute Package,Field_Execute_Dynamic
0b89 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0b8a BODY_0b80:
0b8a e403 | | Load 0x2,0x3
0b8b 00d9 | | Load_Top At_Offset_1
0b8c 0217 | | Execute Heap_Access,All_Reference
0b8d 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0b8e 8056 | V | Call 0x0,0x56
0b8f c403 | | Store 0x2,0x3
0b90 4501 |E | Exit_Subprogram 0x1
0b91 0000 0000 | | .BLANK 0000[0x7]
0b98 ; --------------------------------------------------------------------------------------
0b98 ; SUBPROGRAM
0b98 ; --------------------------------------------------------------------------------------
0b98 0ba2 | | .CONST 0x0ba2 ; Address of begin
0b99 0004 | | .CONST 0x0004 ; Address of exception handler
0b9a 0002 | | .CONST 0x0002 ; Number of locals
0b9b INIT_0b98:
0b9b e01b | | Load 0x0,0x1b
0b9c 02ff | | Declare_Variable Variant_Record
0b9d e5fd | | Load 0x2,-0x3
0b9e e403 | | Load 0x2,0x3
0b9f 8026 | & | Call 0x0,0x26
0ba0 00d9 | | Load_Top At_Offset_1
0ba1 016d | m | Execute Variant_Record,Structure_Write
0ba2 BODY_0b98:
0ba2 e5fe | | Load 0x2,-0x2
0ba3 0f03 | | Execute_Immediate Equal,0x3
0ba4 681b |h | Jump_Zero 0xbc0
0ba5 00d8 | | Load_Top At_Offset_0
0ba6 00d8 | | Load_Top At_Offset_0
0ba7 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0ba8 00d8 | | Load_Top At_Offset_0
0ba9 e5fd | | Load 0x2,-0x3
0baa e402 | | Load 0x2,0x2
0bab 0217 | | Execute Heap_Access,All_Reference
0bac 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0bad 803f | ? | Call 0x0,0x3f
0bae 8057 | W | Call 0x0,0x57
0baf 8014 | | Call 0x0,0x14
0bb0 00d9 | | Load_Top At_Offset_1
0bb1 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
0bb2 00d1 | | Pop_Control Pop_Count_1
0bb3 00d0 | | Action Swap_Control
0bb4 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
0bb5 00d8 | | Load_Top At_Offset_0
0bb6 00d8 | | Load_Top At_Offset_0
0bb7 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0bb8 00d8 | | Load_Top At_Offset_0
0bb9 4804 |H | Short_Literal 0x4
0bba 00d9 | | Load_Top At_Offset_1
0bbb 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0bbc 00d1 | | Pop_Control Pop_Count_1
0bbd 00d0 | | Action Swap_Control
0bbe 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
0bbf 7812 |x | Jump 0xbd2
0bc0 00d8 | | Load_Top At_Offset_0
0bc1 00d8 | | Load_Top At_Offset_0
0bc2 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0bc3 00d8 | | Load_Top At_Offset_0
0bc4 e5fd | | Load 0x2,-0x3
0bc5 00d8 | | Load_Top At_Offset_0
0bc6 4802 |H | Short_Literal 0x2
0bc7 e402 | | Load 0x2,0x2
0bc8 0217 | | Execute Heap_Access,All_Reference
0bc9 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0bca 8053 | S | Call 0x0,0x53
0bcb 8058 | X | Call 0x0,0x58
0bcc 8014 | | Call 0x0,0x14
0bcd 00d9 | | Load_Top At_Offset_1
0bce 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
0bcf 00d1 | | Pop_Control Pop_Count_1
0bd0 00d0 | | Action Swap_Control
0bd1 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
0bd2 00d8 | | Load_Top At_Offset_0
0bd3 00cb | | Action Pop_Block_With_Result
0bd4 4403 |D | Exit_Subprogram With_Result,0x3
0bd5 0000 0000 | | .XXX[0x3]
0bd7 0000 | |
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; SUBPROGRAM
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0be2 | | .CONST 0x0be2 ; Address of begin
0bd9 0004 | | .CONST 0x0004 ; Address of exception handler
0bda 0002 | | .CONST 0x0002 ; Number of locals
0bdb INIT_0bd8:
0bdb e241 | A | Load 0x1,0x41
0bdc 4801 |H | Short_Literal 0x1
0bdd e5fe | | Load 0x2,-0x2
0bde e047 | G | Load 0x0,0x47
0bdf e24a | J | Load 0x1,0x4a
0be0 0096 | | Execute Package,Field_Execute_Dynamic
0be1 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0be2 BODY_0bd8:
0be2 00d8 | | Load_Top At_Offset_0
0be3 0217 | | Execute Heap_Access,All_Reference
0be4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0be5 0f01 | | Execute_Immediate Equal,0x1
0be6 680a |h | Jump_Zero 0xbf1
0be7 e5fd | | Load 0x2,-0x3
0be8 00d9 | | Load_Top At_Offset_1
0be9 0217 | | Execute Heap_Access,All_Reference
0bea 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0beb 00d8 | | Load_Top At_Offset_0
0bec 4801 |H | Short_Literal 0x1
0bed e5fe | | Load 0x2,-0x2
0bee e055 | U | Load 0x0,0x55
0bef e24a | J | Load 0x1,0x4a
0bf0 0096 | | Execute Package,Field_Execute_Dynamic
0bf1 4501 |E | Exit_Subprogram 0x1
0bf2 0000 0000 | | .BLANK 0000[0x6]
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; SUBPROGRAM
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0bfb | | .CONST 0x0bfb ; Address of begin
0bf9 0c05 | | .CONST 0x0c05 ; Address of exception handler
0bfa 0001 | | .CONST 0x0001 ; Number of locals
0bfb BODY_0bf8:
0bfb INIT_0bf8:
0bfb 00e3 | | Load_Encached Natural_Cache
0bfc e402 | | Load 0x2,0x2
0bfd e059 | Y | Load 0x0,0x59
0bfe e24a | J | Load 0x1,0x4a
0bff 0096 | | Execute Package,Field_Execute_Dynamic
0c00 c403 | | Store 0x2,0x3
0c01 e403 | | Load 0x2,0x3
0c02 0afd | | Execute_Immediate Plus,-0x3
0c03 00cb | | Action Pop_Block_With_Result
0c04 4402 |D | Exit_Subprogram With_Result,0x2
0c05 TRAP_0bf8:
0c05 e05a | Z | Load 0x0,0x5a
0c06 010f | | Execute Exception,Equal
0c07 6807 |h | Jump_Zero 0xc0f
0c08 4800 |H | Short_Literal 0x0
0c09 0092 0d25 | %| Action Push_String_Extended,0xd25 ; "Insertion not defined for this position"
0c0b 820e | | Call 0x1,0xe
0c0c 4fff |O | Short_Literal 0x7ff
0c0d 00cb | | Action Pop_Block_With_Result
0c0e 4402 |D | Exit_Subprogram With_Result,0x2
0c0f 0100 | | Execute Exception,Raise
0c10 ; --------------------------------------------------------------------------------------
0c10 ; SUBPROGRAM
0c10 ; --------------------------------------------------------------------------------------
0c10 0c18 | | .CONST 0x0c18 ; Address of begin
0c11 0004 | | .CONST 0x0004 ; Address of exception handler
0c12 0004 | | .CONST 0x0004 ; Number of locals
0c13 INIT_0c10:
0c13 e23c | < | Load 0x1,0x3c
0c14 0007 | | Action Break_Optional
0c15 00e3 | | Load_Encached Natural_Cache
0c16 029f 0c6b | k| Declare_Subprogram For_Call,INIT_0c68
0c18 BODY_0c10:
0c18 e5ff | | Load 0x2,-0x1
0c19 0219 | | Execute Heap_Access,All_Read
0c1a e01c | | Load 0x0,0x1c
0c1b e24a | J | Load 0x1,0x4a
0c1c 0096 | | Execute Package,Field_Execute_Dynamic
0c1d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0c1e 8804 | | Call 0x4,0x4
0c1f 00da | | Load_Top At_Offset_2
0c20 0219 | | Execute Heap_Access,All_Read
0c21 00d8 | | Load_Top At_Offset_0
0c22 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c23 00db | | Load_Top At_Offset_3
0c24 00d8 | | Load_Top At_Offset_0
0c25 00e4 | | Load_Encached Positive_Cache
0c26 0260 | ` | Execute Discrete,In_Type
0c27 7001 |p | Jump_Nonzero 0xc29
0c28 0801 | | Execute_Immediate Raise,0x1
0c29 805b | [ | Call 0x0,0x5b
0c2a 00d9 | | Load_Top At_Offset_1
0c2b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0c2c 00d1 | | Pop_Control Pop_Count_1
0c2d 00da | | Load_Top At_Offset_2
0c2e e5ff | | Load 0x2,-0x1
0c2f 0219 | | Execute Heap_Access,All_Read
0c30 e015 | | Load 0x0,0x15
0c31 e24a | J | Load 0x1,0x4a
0c32 0096 | | Execute Package,Field_Execute_Dynamic
0c33 4501 |E | Exit_Subprogram 0x1
0c34 0000 0000 | | .BLANK 0000[0x4]
0c38 ; --------------------------------------------------------------------------------------
0c38 ; SUBPROGRAM
0c38 ; --------------------------------------------------------------------------------------
0c38 0c44 | D | .CONST 0x0c44 ; Address of begin
0c39 0004 | | .CONST 0x0004 ; Address of exception handler
0c3a 0005 | | .CONST 0x0005 ; Number of locals
0c3b INIT_0c38:
0c3b e00b | | Load 0x0,0xb
0c3c e24a | J | Load 0x1,0x4a
0c3d 0098 | | Execute Package,Field_Read_Dynamic
0c3e 0322 | " | Declare_Variable Record
0c3f e241 | A | Load 0x1,0x41
0c40 029f 0c83 | | Declare_Subprogram For_Call,INIT_0c80
0c42 029f 0cab | | Declare_Subprogram For_Call,INIT_0ca8
0c44 BODY_0c38:
0c44 e403 | | Load 0x2,0x3
0c45 e03c | < | Load 0x0,0x3c
0c46 e24a | J | Load 0x1,0x4a
0c47 0096 | | Execute Package,Field_Execute_Dynamic
0c48 e802 | | Load 0x4,0x2
0c49 017d | } | Execute Record,Structure_Write
0c4a 00db | | Load_Top At_Offset_3
0c4b e023 | # | Load 0x0,0x23
0c4c e24a | J | Load 0x1,0x4a
0c4d 0096 | | Execute Package,Field_Execute_Dynamic
0c4e 0f02 | | Execute_Immediate Equal,0x2
0c4f 6815 |h | Jump_Zero 0xc65
0c50 e404 | | Load 0x2,0x4
0c51 4603 |F | Jump_Case 0x3
0c52 4501 |E | Exit_Subprogram 0x1 ; case 0x0
0c53 780a |x | Jump 0xc5e ; case 0x1
0c54 7809 |x | Jump 0xc5e ; case 0x2
0c55 7800 |x | Jump 0xc56 ; case 0x3
0c56 4804 |H | Short_Literal 0x4
0c57 e802 | | Load 0x4,0x2
0c58 e047 | G | Load 0x0,0x47
0c59 e24a | J | Load 0x1,0x4a
0c5a 0096 | | Execute Package,Field_Execute_Dynamic
0c5b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0c5c 8805 | | Call 0x4,0x5
0c5d 4501 |E | Exit_Subprogram 0x1
0c5e 4803 |H | Short_Literal 0x3
0c5f e802 | | Load 0x4,0x2
0c60 e047 | G | Load 0x0,0x47
0c61 e24a | J | Load 0x1,0x4a
0c62 0096 | | Execute Package,Field_Execute_Dynamic
0c63 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0c64 8804 | | Call 0x4,0x4
0c65 4501 |E | Exit_Subprogram 0x1
0c66 0000 0000 | | .XXX[0x2]
0c68 ; --------------------------------------------------------------------------------------
0c68 ; SUBPROGRAM
0c68 ; --------------------------------------------------------------------------------------
0c68 0c6b | k | .CONST 0x0c6b ; Address of begin
0c69 0c75 | u | .CONST 0x0c75 ; Address of exception handler
0c6a 0001 | | .CONST 0x0001 ; Number of locals
0c6b BODY_0c68:
0c6b INIT_0c68:
0c6b 00e3 | | Load_Encached Natural_Cache
0c6c e602 | | Load 0x3,0x2
0c6d e059 | Y | Load 0x0,0x59
0c6e e24a | J | Load 0x1,0x4a
0c6f 0096 | | Execute Package,Field_Execute_Dynamic
0c70 c803 | | Store 0x4,0x3
0c71 e803 | | Load 0x4,0x3
0c72 0afd | | Execute_Immediate Plus,-0x3
0c73 c803 | | Store 0x4,0x3
0c74 4501 |E | Exit_Subprogram 0x1
0c75 TRAP_0c68:
0c75 e05a | Z | Load 0x0,0x5a
0c76 010f | | Execute Exception,Equal
0c77 6803 |h | Jump_Zero 0xc7b
0c78 4800 |H | Short_Literal 0x0
0c79 a803 | | Store_Unchecked 0x4,0x3
0c7a 4501 |E | Exit_Subprogram 0x1
0c7b 0100 | | Execute Exception,Raise
0c7c 0000 0000 | | .BLANK 0000[0x4]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c95 | | .CONST 0x0c95 ; Address of begin
0c81 0004 | | .CONST 0x0004 ; Address of exception handler
0c82 0004 | | .CONST 0x0004 ; Number of locals
0c83 INIT_0c80:
0c83 e803 | | Load 0x4,0x3
0c84 0217 | | Execute Heap_Access,All_Reference
0c85 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0c86 803f | ? | Call 0x0,0x3f
0c87 00d8 | | Load_Top At_Offset_0
0c88 e04f | O | Load 0x0,0x4f
0c89 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c8a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c8b 00d9 | | Load_Top At_Offset_1
0c8c e602 | | Load 0x3,0x2
0c8d 01df | | Execute Vector,Equal
0c8e 7004 |p | Jump_Nonzero 0xc93
0c8f 00d8 | | Load_Top At_Offset_0
0c90 e602 | | Load 0x3,0x2
0c91 01df | | Execute Vector,Equal
0c92 7802 |x | Jump BODY_0c80
0c93 4801 |H | Short_Literal 0x1
0c94 0007 | | Action Break_Optional
0c95 BODY_0c80:
0c95 e404 | | Load 0x2,0x4
0c96 0f01 | | Execute_Immediate Equal,0x1
0c97 00d9 | | Load_Top At_Offset_1
0c98 0f00 | | Execute_Immediate Equal,0x0
0c99 0279 | y | Execute Discrete,And
0c9a 7005 |p | Jump_Nonzero 0xca0
0c9b e404 | | Load 0x2,0x4
0c9c 0f02 | | Execute_Immediate Equal,0x2
0c9d 00d9 | | Load_Top At_Offset_1
0c9e 0279 | y | Execute Discrete,And
0c9f 6802 |h | Jump_Zero 0xca2
0ca0 e802 | | Load 0x4,0x2
0ca1 8256 | V | Call 0x1,0x56
0ca2 4501 |E | Exit_Subprogram 0x1
0ca3 0000 0000 | | .BLANK 0000[0x5]
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; SUBPROGRAM
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0cb9 | | .CONST 0x0cb9 ; Address of begin
0ca9 0004 | | .CONST 0x0004 ; Address of exception handler
0caa 0006 | | .CONST 0x0006 ; Number of locals
0cab INIT_0ca8:
0cab e803 | | Load 0x4,0x3
0cac 0217 | | Execute Heap_Access,All_Reference
0cad 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0cae 803e | > | Call 0x0,0x3e
0caf 00e1 | | Load_Encached Boolean_Cache
0cb0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cb1 00d9 | | Load_Top At_Offset_1
0cb2 01dd | | Execute Vector,First
0cb3 00e3 | | Load_Encached Natural_Cache
0cb4 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0cb5 00e3 | | Load_Encached Natural_Cache
0cb6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cb7 029f 0ce3 | | Declare_Subprogram For_Call,INIT_0ce0
0cb9 BODY_0ca8:
0cb9 ea02 | | Load 0x5,0x2
0cba 01db | | Execute Vector,Length
0cbb 681c |h | Jump_Zero 0xcd8
0cbc 00cf | | Action Mark_Auxiliary
0cbd 8a06 | | Call 0x5,0x6
0cbe 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
0cbf e602 | | Load 0x3,0x2
0cc0 e05c | \ | Load 0x0,0x5c
0cc1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cc2 ea04 | | Load 0x5,0x4
0cc3 ea05 | | Load 0x5,0x5
0cc4 ea02 | | Load 0x5,0x2
0cc5 01cf | | Execute Vector,Slice_Read
0cc6 e05c | \ | Load 0x0,0x5c
0cc7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cc8 01df | | Execute Vector,Equal
0cc9 6803 |h | Jump_Zero 0xccd
0cca 4801 |H | Short_Literal 0x1
0ccb aa03 | | Store_Unchecked 0x5,0x3
0ccc 780a |x | Jump 0xcd7
0ccd 00da | | Load_Top At_Offset_2
0cce ea02 | | Load 0x5,0x2
0ccf 01dc | | Execute Vector,Last
0cd0 027f | | Execute Discrete,Equal
0cd1 7005 |p | Jump_Nonzero 0xcd7
0cd2 00da | | Load_Top At_Offset_2
0cd3 0a02 | | Execute_Immediate Plus,0x2
0cd4 ca04 | | Store 0x5,0x4
0cd5 00c9 | | Action Pop_Auxiliary_Loop
0cd6 7fe6 | | Jump 0xcbd
0cd7 00ce | | Action Pop_Auxiliary
0cd8 00db | | Load_Top At_Offset_3
0cd9 7002 |p | Jump_Nonzero 0xcdc
0cda e802 | | Load 0x4,0x2
0cdb 8256 | V | Call 0x1,0x56
0cdc 4501 |E | Exit_Subprogram 0x1
0cdd 0000 0000 | | .XXX[0x3]
0cdf 0000 | |
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0cee | | .CONST 0x0cee ; Address of begin
0ce1 0004 | | .CONST 0x0004 ; Address of exception handler
0ce2 0002 | | .CONST 0x0002 ; Number of locals
0ce3 INIT_0ce0:
0ce3 4800 |H | Short_Literal 0x0
0ce4 ea04 | | Load 0x5,0x4
0ce5 ea02 | | Load 0x5,0x2
0ce6 01dc | | Execute Vector,Last
0ce7 ea02 | | Load 0x5,0x2
0ce8 01cf | | Execute Vector,Slice_Read
0ce9 482c |H, | Short_Literal 0x2c
0cea e05c | \ | Load 0x0,0x5c
0ceb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0cec 00e3 | | Load_Encached Natural_Cache
0ced 03f1 | | Declare_Variable Discrete,With_Value
0cee BODY_0ce0:
0cee 00d8 | | Load_Top At_Offset_0
0cef 7008 |p | Jump_Nonzero 0xcf8
0cf0 ea02 | | Load 0x5,0x2
0cf1 01dc | | Execute Vector,Last
0cf2 00d8 | | Load_Top At_Offset_0
0cf3 00e3 | | Load_Encached Natural_Cache
0cf4 0260 | ` | Execute Discrete,In_Type
0cf5 7001 |p | Jump_Nonzero 0xcf7
0cf6 0801 | | Execute_Immediate Raise,0x1
0cf7 00ca | | Action Exit_Nullary_Function
0cf8 00d8 | | Load_Top At_Offset_0
0cf9 0aff | | Execute_Immediate Plus,-0x1
0cfa 00d8 | | Load_Top At_Offset_0
0cfb 00e3 | | Load_Encached Natural_Cache
0cfc 0260 | ` | Execute Discrete,In_Type
0cfd 7001 |p | Jump_Nonzero 0xcff
0cfe 0801 | | Execute_Immediate Raise,0x1
0cff 00ca | | Action Exit_Nullary_Function
0d00 ; --------------------------------------------------------------------------------------
0d00 ; STRING TABLE
0d00 ; --------------------------------------------------------------------------------------
0d00 004e | N | .STRTAB 0x004e->0x0d27 ; "NIL_COL"
0d01 0053 | S | .STRTAB 0x0053->0x0d2a ; "MARK_COL"
0d02 0059 | Y | .STRTAB 0x0059->0x0d2e ; "TEST_CASE_COL"
0d03 0064 | d | .STRTAB 0x0064->0x0d35 ; "SUBJECT_PROGRAM_COL"
0d04 0075 | u | .STRTAB 0x0075->0x0d3e ; "KEYWORDS_COL"
0d05 007f | | .STRTAB 0x007f->0x0d44 ; "NONE"
0d06 0081 | | .STRTAB 0x0081->0x0d46 ; "ALPHABETIC"
0d07 0089 | | .STRTAB 0x0089->0x0d4b ; "SUBJECT_PROGRAM"
0d08 0096 | | .STRTAB 0x0096->0x0d53 ; "NONE"
0d09 0098 | | .STRTAB 0x0098->0x0d55 ; "INCLUDE_SUBJECT_PROGRAM"
0d0a 00ad | | .STRTAB 0x00ad->0x0d60 ; "EXCLUDE_SUBJECT_PROGRAM"
0d0b 00c2 | | .STRTAB 0x00c2->0x0d6c ; "KEYWORD"
0d0c 00c7 | | .STRTAB 0x00c7->0x0d6f ; " "
0d0d 00c7 | | .STRTAB 0x00c7->0x0d70 ; " TEST CASES"
0d0e 00d4 | | .STRTAB 0x00d4->0x0d78 ; "SUBJECT PROGRAM"
0d0f 00e1 | | .STRTAB 0x00e1->0x0d7f ; "KEYWORDS"
0d10 00e7 | | .STRTAB 0x00e7->0x0d83 ; "others => Unspecified"
0d11 00fa | | .STRTAB 0x00fa->0x0d8e ; "Explain"
0d12 00ff | | .STRTAB 0x00ff->0x0d91 ; "Definition not defined for this selected line"
0d13 012a | * | .STRTAB 0x012a->0x0da8 ; "Definition not supported on this line for this column"
0d14 015d | ] | .STRTAB 0x015d->0x0dc2 ; "Definition not defined for this cursor position"
0d15 018a | | .STRTAB 0x018a->0x0dda ; "Elide"
0d16 018d | | .STRTAB 0x018d->0x0ddc ; "Expand"
0d17 0191 | | .STRTAB 0x0191->0x0ddf ; "Delete requires a selected line"
0d18 01ae | | .STRTAB 0x01ae->0x0def ; "Insert"
0d19 01b2 | | .STRTAB 0x01b2->0x0df2 ; "Edit"
0d1a 01b4 | | .STRTAB 0x01b4->0x0df4 ; "No operation defined for value "
0d1b 01d1 | | .STRTAB 0x01d1->0x0e03 ; "Filter Command => "
0d1c 01e1 | | .STRTAB 0x01e1->0x0e0c ; " not supported"
0d1d 01ed | | .STRTAB 0x01ed->0x0e13 ; "Show_Differential"
0d1e 01fc | | .STRTAB 0x01fc->0x0e1c ; "TSET"
0d1f 01fe | | .STRTAB 0x01fe->0x0e1e ; "TSET by "
0d20 0204 | | .STRTAB 0x0204->0x0e22 ; " ("
0d21 0204 | | .STRTAB 0x0204->0x0e23 ; "*"
0d22 0203 | | .STRTAB 0x0203->0x0e23 ; "Unable to access this object in read-write mode : ( "
0d23 0235 | 5 | .STRTAB 0x0235->0x0e3d ; "Test_Set_Ops.Insert (Test_Case => \x22<REGION>\x22);"
0d24 0261 | a | .STRTAB 0x0261->0x0e54 ; "Delete not defined for this line"
0d25 027f | | .STRTAB 0x027f->0x0e64 ; "Insertion not defined for this position"
0d26 02a4 | | .STREND 0x02a4->0x0e78
0d27 4e49 4c5f |NIL_| .STRTAB_STRINGS
0e78 ; --------------------------------------------------------------------------------------
0e78 ; Debug Table
0e78 ; --------------------------------------------------------------------------------------
0e78 0004 000a | | .DEBUG4 0x0004,0x000a,0x7073,0x0000,0x0001,0x0000
0e7e 0000 0000 | | .BLANK 0000[0x182]