|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5120 (0x1400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_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 0830 | 0 | .CONST 0x0830 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0158 | X | .CONST 0x0158 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0047 | G | .CONST 0x0047 ; Number of locals
000b INIT_0008:
000b 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
000d 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
000f 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0011 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0013 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
0015 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
0017 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
0019 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
001b 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
001d 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
001f 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
0021 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
0023 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated
0025 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
0027 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated
0029 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated
002b 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated
002d 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
002f 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated
0031 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated
0033 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated
0035 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated
0037 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated
0039 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
003b 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
003d 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
003f 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0040 00d8 | | Load_Top At_Offset_0
0041 02a0 | | Declare_Subprogram Null_Subprogram
0042 03ae | | Declare_Type Heap_Access,Defined,Visible
0043 4802 |H | Short_Literal 0x2
0044 032b | + | Declare_Type Record,Incomplete,Visible
0045 00d8 | | Load_Top At_Offset_0
0046 02a0 | | Declare_Subprogram Null_Subprogram
0047 03ae | | Declare_Type Heap_Access,Defined,Visible
0048 4804 |H | Short_Literal 0x4
0049 032b | + | Declare_Type Record,Incomplete,Visible
004a 00d8 | | Load_Top At_Offset_0
004b 02a0 | | Declare_Subprogram Null_Subprogram
004c 03ae | | Declare_Type Heap_Access,Defined,Visible
004d 00bf | | Action Accept_Activation
004e 0093 0000 | | push_full_address 0x0
0050 614f |aO | Indirect_Literal Discrete,0x1a0,{0x80000000, 0x00020000}
0051 0273 | s | Execute Discrete,Plus
0052 e20d | | Load 0x1,0xd
0053 6148 |aH | Indirect_Literal Discrete,0x19c,{0x00000000, 0x0000ffff}
0054 0279 | y | Execute Discrete,And
0055 0273 | s | Execute Discrete,Plus
0056 e002 | | Load 0x0,0x2
0057 0273 | s | Execute Discrete,Plus
0058 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0059 e003 | | Load 0x0,0x3
005a 0387 | | Declare_Variable Package
005b 00d8 | | Load_Top At_Offset_0
005c 020f | | Execute Module,Activate
005d 4800 |H | Short_Literal 0x0
005e 4802 |H | Short_Literal 0x2
005f 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call
0061 03fd | | Declare_Type Discrete,Defined
0062 4801 |H | Short_Literal 0x1
0063 4802 |H | Short_Literal 0x2
0064 00da | | Load_Top At_Offset_2
0065 03f8 | | Declare_Type Discrete,Constrained
0066 e004 | | Load 0x0,0x4
0067 e005 | | Load 0x0,0x5
0068 02a0 | | Declare_Subprogram Null_Subprogram
0069 4802 |H | Short_Literal 0x2
006a 032d | - | Declare_Type Record,Defined
006b 00d8 | | Load_Top At_Offset_0
006c 0322 | " | Declare_Variable Record
006d 029b 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Unelaborated
006f 029b 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Unelaborated
0071 4800 |H | Short_Literal 0x0
0072 4800 |H | Short_Literal 0x0
0073 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call
0075 03fd | | Declare_Type Discrete,Defined
0076 00d8 | | Load_Top At_Offset_0
0077 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0078 029b 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Unelaborated
007a 029b 041b | | Declare_Subprogram INIT_0418,For_Outer_Call,Unelaborated
007c 4800 |H | Short_Literal 0x0
007d 4804 |H | Short_Literal 0x4
007e 029f 0423 | #| Declare_Subprogram INIT_0420,For_Call
0080 03fd | | Declare_Type Discrete,Defined
0081 4801 |H | Short_Literal 0x1
0082 4804 |H | Short_Literal 0x4
0083 00da | | Load_Top At_Offset_2
0084 03f8 | | Declare_Type Discrete,Constrained
0085 e230 | 0 | Load 0x1,0x30
0086 00da | | Load_Top At_Offset_2
0087 4801 |H | Short_Literal 0x1
0088 4800 |H | Short_Literal 0x0
0089 4801 |H | Short_Literal 0x1
008a e006 | | Load 0x0,0x6
008b 02a0 | | Declare_Subprogram Null_Subprogram
008c 4801 |H | Short_Literal 0x1
008d 4800 |H | Short_Literal 0x0
008e 4801 |H | Short_Literal 0x1
008f 4800 |H | Short_Literal 0x0
0090 4800 |H | Short_Literal 0x0
0091 031d | | Declare_Type Variant_Record,Defined
0092 4801 |H | Short_Literal 0x1
0093 4800 |H | Short_Literal 0x0
0094 4801 |H | Short_Literal 0x1
0095 00e7 | | Load_Encached Duration_Cache
0096 4801 |H | Short_Literal 0x1
0097 e007 | | Load 0x0,0x7
0098 4801 |H | Short_Literal 0x1
0099 e004 | | Load 0x0,0x4
009a 4801 |H | Short_Literal 0x1
009b e004 | | Load 0x0,0x4
009c 02a0 | | Declare_Subprogram Null_Subprogram
009d 4804 |H | Short_Literal 0x4
009e 4800 |H | Short_Literal 0x0
009f 4804 |H | Short_Literal 0x4
00a0 4800 |H | Short_Literal 0x0
00a1 4800 |H | Short_Literal 0x0
00a2 031d | | Declare_Type Variant_Record,Defined
00a3 029f 044b | K| Declare_Subprogram INIT_0448,For_Call
00a5 4802 |H | Short_Literal 0x2
00a6 4800 |H | Short_Literal 0x0
00a7 4800 |H | Short_Literal 0x0
00a8 4802 |H | Short_Literal 0x2
00a9 4802 |H | Short_Literal 0x2
00aa 4802 |H | Short_Literal 0x2
00ab 031d | | Declare_Type Variant_Record,Defined
00ac 4800 |H | Short_Literal 0x0
00ad 4800 |H | Short_Literal 0x0
00ae 00da | | Load_Top At_Offset_2
00af 1c08 | | Execute_Immediate Run_Utility,0x8
00b0 00d8 | | Load_Top At_Offset_0
00b1 1c00 | | Execute_Immediate Run_Utility,0x0
00b2 029b 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Unelaborated
00b4 029b 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Unelaborated
00b6 029b 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Unelaborated
00b8 0093 0000 | | push_full_address 0x0
00ba 60dd |` | Indirect_Literal Discrete,0x198,{0x80000000, 0x00010000}
00bb 0273 | s | Execute Discrete,Plus
00bc e20d | | Load 0x1,0xd
00bd 60de |` | Indirect_Literal Discrete,0x19c,{0x00000000, 0x0000ffff}
00be 0279 | y | Execute Discrete,And
00bf 0273 | s | Execute Discrete,Plus
00c0 e008 | | Load 0x0,0x8
00c1 0273 | s | Execute Discrete,Plus
00c2 e230 | 0 | Load 0x1,0x30
00c3 e232 | 2 | Load 0x1,0x32
00c4 e233 | 3 | Load 0x1,0x33
00c5 0320 | | Declare_Variable Record,Duplicate
00c6 00cd | | Action Spare6_Action
00c7 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00c8 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
00c9 e236 | 6 | Load 0x1,0x36
00ca e237 | 7 | Load 0x1,0x37
00cb 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
00cc 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
00cd e23c | < | Load 0x1,0x3c
00ce e23d | = | Load 0x1,0x3d
00cf 02fd | | Declare_Variable Variant_Record,Duplicate
00d0 00cd | | Action Spare6_Action
00d1 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
00d2 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
00d3 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
00d4 0092 076b | k| Action Push_String_Extended,0x76b ; " "
00d6 e009 | | Load 0x0,0x9
00d7 0387 | | Declare_Variable Package
00d8 00d8 | | Load_Top At_Offset_0
00d9 020f | | Execute Module,Activate
00da e00a | | Load 0x0,0xa
00db 00d9 | | Load_Top At_Offset_1
00dc 0098 | | Execute Package,Field_Read_Dynamic
00dd e229 | ) | Load 0x1,0x29
00de 03a2 | | Complete_Type Heap_Access,By_Renaming
00df e00b | | Load 0x0,0xb
00e0 00d9 | | Load_Top At_Offset_1
00e1 0098 | | Execute Package,Field_Read_Dynamic
00e2 e22b | + | Load 0x1,0x2b
00e3 0325 | % | Complete_Type Record,By_Renaming
00e4 e22c | , | Load 0x1,0x2c
00e5 03a0 | | Complete_Type Heap_Access,By_Component_Completion
00e6 e00c | | Load 0x0,0xc
00e7 00d9 | | Load_Top At_Offset_1
00e8 0098 | | Execute Package,Field_Read_Dynamic
00e9 e22d | - | Load 0x1,0x2d
00ea 0325 | % | Complete_Type Record,By_Renaming
00eb e22e | . | Load 0x1,0x2e
00ec 03a0 | | Complete_Type Heap_Access,By_Component_Completion
00ed e00d | | Load 0x0,0xd
00ee 00d9 | | Load_Top At_Offset_1
00ef 0098 | | Execute Package,Field_Read_Dynamic
00f0 0337 | 7 | Declare_Variable Array
00f1 00d8 | | Load_Top At_Offset_0
00f2 0335 | 5 | Declare_Variable Array,Duplicate
00f3 00cd | | Action Spare6_Action
00f4 4800 |H | Short_Literal 0x0
00f5 4800 |H | Short_Literal 0x0
00f6 00da | | Load_Top At_Offset_2
00f7 01d6 | | Execute Vector,Field_Write
00f8 4819 |H | Short_Literal 0x19
00f9 4801 |H | Short_Literal 0x1
00fa 00da | | Load_Top At_Offset_2
00fb 01d6 | | Execute Vector,Field_Write
00fc 4832 |H2 | Short_Literal 0x32
00fd 4802 |H | Short_Literal 0x2
00fe 00da | | Load_Top At_Offset_2
00ff 01d6 | | Execute Vector,Field_Write
0100 00d9 | | Load_Top At_Offset_1
0101 01d4 | | Execute Vector,Structure_Write
0102 0092 076c | l| Action Push_String_Extended,0x76c ; "TEST CASE RESULT FIELD"
0104 0092 076d | m| Action Push_String_Extended,0x76d ; "VALUE"
0106 4801 |H | Short_Literal 0x1
0107 4850 |HP | Short_Literal 0x50
0108 00e9 | | Load_Encached String_Cache
0109 035b | [ | Declare_Type Array,Constrained
010a 0337 | 7 | Declare_Variable Array
010b 4850 |HP | Short_Literal 0x50
010c 4801 |H | Short_Literal 0x1
010d 482d |H- | Short_Literal 0x2d
010e 00d9 | | Load_Top At_Offset_1
010f e245 | E | Load 0x1,0x45
0110 01d6 | | Execute Vector,Field_Write
0111 3ffb |? | Loop_Increasing 0x10d
0112 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0113 00c7 | | Action Elaborate_Subprogram
0114 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0115 00c7 | | Action Elaborate_Subprogram
0116 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0117 00c7 | | Action Elaborate_Subprogram
0118 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0119 00c7 | | Action Elaborate_Subprogram
011a 1d13 | | Execute_Immediate Reference_Lex_1,0x13
011b 00c7 | | Action Elaborate_Subprogram
011c 1d14 | | Execute_Immediate Reference_Lex_1,0x14
011d 00c7 | | Action Elaborate_Subprogram
011e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
011f 00c7 | | Action Elaborate_Subprogram
0120 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0121 00c7 | | Action Elaborate_Subprogram
0122 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0123 00c7 | | Action Elaborate_Subprogram
0124 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0125 00c7 | | Action Elaborate_Subprogram
0126 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0127 00c7 | | Action Elaborate_Subprogram
0128 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0129 00c7 | | Action Elaborate_Subprogram
012a 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
012b 00c7 | | Action Elaborate_Subprogram
012c 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
012d 00c7 | | Action Elaborate_Subprogram
012e 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
012f 00c7 | | Action Elaborate_Subprogram
0130 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0131 00c7 | | Action Elaborate_Subprogram
0132 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0133 00c7 | | Action Elaborate_Subprogram
0134 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0135 00c7 | | Action Elaborate_Subprogram
0136 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0137 00c7 | | Action Elaborate_Subprogram
0138 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0139 00c7 | | Action Elaborate_Subprogram
013a 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
013b 00c7 | | Action Elaborate_Subprogram
013c 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
013d 00c7 | | Action Elaborate_Subprogram
013e 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
013f 00c7 | | Action Elaborate_Subprogram
0140 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0141 00c7 | | Action Elaborate_Subprogram
0142 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0143 00c7 | | Action Elaborate_Subprogram
0144 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0145 00c7 | | Action Elaborate_Subprogram
0146 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
0147 00c7 | | Action Elaborate_Subprogram
0148 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0149 00c7 | | Action Elaborate_Subprogram
014a 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
014b 00c7 | | Action Elaborate_Subprogram
014c 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
014d 00c7 | | Action Elaborate_Subprogram
014e 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
014f 00c7 | | Action Elaborate_Subprogram
0150 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
0151 00c7 | | Action Elaborate_Subprogram
0152 029d 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call
0154 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call
0156 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
0157 00c7 | | Action Elaborate_Subprogram
0158 BODY_0008:
0158 00bc | | Action Signal_Activated
0159 00bb | | Action Signal_Completion
015a 0000 0000 | | .BLANK 0000[0x6]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 016c | l | .CONST 0x016c ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0006 | | .CONST 0x0006 ; Number of locals
0163 INIT_0160:
0163 e22a | * | Load 0x1,0x2a
0164 0007 | | Action Break_Optional
0165 e004 | | Load 0x0,0x4
0166 029f 059b | | Declare_Subprogram INIT_0598,For_Call
0168 029f 05ab | | Declare_Subprogram INIT_05a8,For_Call
016a 029f 05eb | | Declare_Subprogram INIT_05e8,For_Call
016c BODY_0160:
016c e5fc | | Load 0x2,-0x4
016d e00e | | Load 0x0,0xe
016e e241 | A | Load 0x1,0x41
016f 0096 | | Execute Package,Entry
0170 e22a | * | Load 0x1,0x2a
0171 e5fc | | Load 0x2,-0x4
0172 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0173 a402 | | Store_Unchecked 0x2,0x2
0174 e5fc | | Load 0x2,-0x4
0175 e5fe | | Load 0x2,-0x2
0176 800f | | Call 0x0,0xf
0177 8010 | | Call 0x0,0x10
0178 a403 | | Store_Unchecked 0x2,0x3
0179 e232 | 2 | Load 0x1,0x32
017a 0322 | " | Declare_Variable Record
017b e403 | | Load 0x2,0x3
017c 00d9 | | Load_Top At_Offset_1
017d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
017e e5ff | | Load 0x2,-0x1
017f 00d9 | | Load_Top At_Offset_1
0180 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0181 e402 | | Load 0x2,0x2
0182 0219 | | Execute Heap_Access,All_Read
0183 e011 | | Load 0x0,0x11
0184 e241 | A | Load 0x1,0x41
0185 0096 | | Execute Package,Entry
0186 8404 | | Call 0x2,0x4
0187 8405 | | Call 0x2,0x5
0188 00cf | | Action Mark_Auxiliary
0189 4804 |H | Short_Literal 0x4
018a 4801 |H | Short_Literal 0x1
018b 0007 | | Action Break_Optional
018c 8406 | | Call 0x2,0x6
018d 00c8 | | Action Pop_Auxiliary_Range
018e 3ffd |? | Loop_Increasing 0x18c
018f 00ce | | Action Pop_Auxiliary
0190 e242 | B | Load 0x1,0x42
0191 e402 | | Load 0x2,0x2
0192 0219 | | Execute Heap_Access,All_Read
0193 e012 | | Load 0x0,0x12
0194 e241 | A | Load 0x1,0x41
0195 0096 | | Execute Package,Entry
0196 e402 | | Load 0x2,0x2
0197 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0198 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
019c 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
01a0 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
01a4 0000 0000 | | .BLANK 0000[0x4]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ac 0000 0000 | | .BLANK 0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01c1 | | .CONST 0x01c1 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0003 | | .CONST 0x0003 ; Number of locals
01b3 INIT_01b0:
01b3 4803 |H | Short_Literal 0x3
01b4 e013 | | Load 0x0,0x13
01b5 1c08 | | Execute_Immediate Run_Utility,0x8
01b6 00d8 | | Load_Top At_Offset_0
01b7 1c00 | | Execute_Immediate Run_Utility,0x0
01b8 e232 | 2 | Load 0x1,0x32
01b9 0322 | " | Declare_Variable Record
01ba e5ff | | Load 0x2,-0x1
01bb 0219 | | Execute Heap_Access,All_Read
01bc e014 | | Load 0x0,0x14
01bd e241 | A | Load 0x1,0x41
01be 0096 | | Execute Package,Entry
01bf 00d9 | | Load_Top At_Offset_1
01c0 017d | } | Execute Record,Structure_Write
01c1 BODY_01b0:
01c1 00d8 | | Load_Top At_Offset_0
01c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c3 00da | | Load_Top At_Offset_2
01c4 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
01c5 00d8 | | Load_Top At_Offset_0
01c6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01c7 4801 |H | Short_Literal 0x1
01c8 8015 | | Call 0x0,0x15
01c9 00da | | Load_Top At_Offset_2
01ca 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
01cb 00d9 | | Load_Top At_Offset_1
01cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01dc | | .CONST 0x01dc ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0002 | | .CONST 0x0002 ; Number of locals
01d3 INIT_01d0:
01d3 e232 | 2 | Load 0x1,0x32
01d4 0322 | " | Declare_Variable Record
01d5 00db | | Load_Top At_Offset_3
01d6 0219 | | Execute Heap_Access,All_Read
01d7 e014 | | Load 0x0,0x14
01d8 e241 | A | Load 0x1,0x41
01d9 0096 | | Execute Package,Entry
01da 00d9 | | Load_Top At_Offset_1
01db 017d | } | Execute Record,Structure_Write
01dc BODY_01d0:
01dc 00d8 | | Load_Top At_Offset_0
01dd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01de 8016 | | Call 0x0,0x16
01df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e6 | | .CONST 0x01e6 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 e22a | * | Load 0x1,0x2a
01e4 e5fe | | Load 0x2,-0x2
01e5 039c | | Declare_Variable Heap_Access,By_Allocation
01e6 BODY_01e0:
01e6 00d8 | | Load_Top At_Offset_0
01e7 00d8 | | Load_Top At_Offset_0
01e8 0219 | | Execute Heap_Access,All_Read
01e9 e00a | | Load 0x0,0xa
01ea e241 | A | Load 0x1,0x41
01eb 0098 | | Execute Package,Field_Read_Dynamic
01ec 0216 | | Execute Heap_Access,Convert
01ed e5fe | | Load 0x2,-0x2
01ee e5ff | | Load 0x2,-0x1
01ef 0219 | | Execute Heap_Access,All_Read
01f0 e017 | | Load 0x0,0x17
01f1 e241 | A | Load 0x1,0x41
01f2 0096 | | Execute Package,Entry
01f3 00d9 | | Load_Top At_Offset_1
01f4 0218 | | Execute Heap_Access,All_Write
01f5 00d1 | | Pop_Control Pop_Count_1
01f6 00d8 | | Load_Top At_Offset_0
01f7 a5fd | | Store_Unchecked 0x2,-0x3
01f8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f9 0000 0000 | | .BLANK 0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 4801 |H | Short_Literal 0x1
0204 a5fc | | Store_Unchecked 0x2,-0x4
0205 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0206 0000 0000 | | .XXX[0x2]
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 00ea | | Load_Encached Null_String_Cache
020c 0092 076e | n| Action Push_String_Extended,0x76e ; "Explain"
020e e018 | | Load 0x0,0x18
020f e22f | / | Load 0x1,0x2f
0210 0096 | | Execute Package,Entry
0211 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0212 0000 0000 | | .BLANK 0000[0x6]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0238 | 8 | .CONST 0x0238 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0007 | | .CONST 0x0007 ; Number of locals
021b INIT_0218:
021b 00db | | Load_Top At_Offset_3
021c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021d 00d8 | | Load_Top At_Offset_0
021e 00e4 | | Load_Encached Positive_Cache
021f 0260 | ` | Execute Discrete,In_Type
0220 7001 |p | Jump_Nonzero 0x222
0221 0801 | | Execute_Immediate Raise,0x1
0222 00db | | Load_Top At_Offset_3
0223 0219 | | Execute Heap_Access,All_Read
0224 e019 | | Load 0x0,0x19
0225 e241 | A | Load 0x1,0x41
0226 0096 | | Execute Package,Entry
0227 e23c | < | Load 0x1,0x3c
0228 02ff | | Declare_Variable Variant_Record
0229 00d8 | | Load_Top At_Offset_0
022a 1c00 | | Execute_Immediate Run_Utility,0x0
022b e23c | < | Load 0x1,0x3c
022c 02ff | | Declare_Variable Variant_Record
022d 00d8 | | Load_Top At_Offset_0
022e 1c00 | | Execute_Immediate Run_Utility,0x0
022f e5ff | | Load 0x2,-0x1
0230 0219 | | Execute Heap_Access,All_Read
0231 e01a | | Load 0x0,0x1a
0232 e241 | A | Load 0x1,0x41
0233 0096 | | Execute Package,Entry
0234 029f 066b | k| Declare_Subprogram INIT_0668,For_Call
0236 029f 068b | | Declare_Subprogram INIT_0688,For_Call
0238 BODY_0218:
0238 e402 | | Load 0x2,0x2
0239 e01b | | Load 0x0,0x1b
023a e241 | A | Load 0x1,0x41
023b 0096 | | Execute Package,Entry
023c 0f02 | | Execute_Immediate Equal,0x2
023d 7006 |p | Jump_Nonzero 0x244
023e 7800 |x | Jump 0x23f
023f 4800 |H | Short_Literal 0x0
0240 0092 076f | o| Action Push_String_Extended,0x76f ; "Definition not defined for this selected line"
0242 820e | | Call 0x1,0xe
0243 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0244 4802 |H | Short_Literal 0x2
0245 e402 | | Load 0x2,0x2
0246 e01c | | Load 0x0,0x1c
0247 e241 | A | Load 0x1,0x41
0248 0096 | | Execute Package,Entry
0249 e403 | | Load 0x2,0x3
024a 016d | m | Execute Variant_Record,Structure_Write
024b e403 | | Load 0x2,0x3
024c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
024d 4604 |F | Jump_Case 0x5
024e 780f |x | Jump 0x25e ; case 0x0
024f 780c |x | Jump 0x25c ; case 0x1
0250 780d |x | Jump 0x25e ; case 0x2
0251 780c |x | Jump 0x25e ; case 0x3
0252 7800 |x | Jump 0x253 ; case 0x4
0253 4801 |H | Short_Literal 0x1
0254 e402 | | Load 0x2,0x2
0255 e01c | | Load 0x0,0x1c
0256 e241 | A | Load 0x1,0x41
0257 0096 | | Execute Package,Entry
0258 e404 | | Load 0x2,0x4
0259 016d | m | Execute Variant_Record,Structure_Write
025a 8407 | | Call 0x2,0x7
025b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
025c 8406 | | Call 0x2,0x6
025d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
025e 4800 |H | Short_Literal 0x0
025f 0092 0770 | p| Action Push_String_Extended,0x770 ; "Definition not defined for this line"
0261 820e | | Call 0x1,0xe
0262 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0263 0000 0000 | | .BLANK 0000[0x5]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0281 | | .CONST 0x0281 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0005 | | .CONST 0x0005 ; Number of locals
026b INIT_0268:
026b e232 | 2 | Load 0x1,0x32
026c 0322 | " | Declare_Variable Record
026d 00db | | Load_Top At_Offset_3
026e 0219 | | Execute Heap_Access,All_Read
026f e014 | | Load 0x0,0x14
0270 e241 | A | Load 0x1,0x41
0271 0096 | | Execute Package,Entry
0272 00d9 | | Load_Top At_Offset_1
0273 017d | } | Execute Record,Structure_Write
0274 e013 | | Load 0x0,0x13
0275 02ff | | Declare_Variable Variant_Record
0276 00d8 | | Load_Top At_Offset_0
0277 1c00 | | Execute_Immediate Run_Utility,0x0
0278 e01d | | Load 0x0,0x1d
0279 02ff | | Declare_Variable Variant_Record
027a 00d8 | | Load_Top At_Offset_0
027b 1c00 | | Execute_Immediate Run_Utility,0x0
027c e5ff | | Load 0x2,-0x1
027d 0219 | | Execute Heap_Access,All_Read
027e e01a | | Load 0x0,0x1a
027f e241 | A | Load 0x1,0x41
0280 0096 | | Execute Package,Entry
0281 BODY_0268:
0281 00d8 | | Load_Top At_Offset_0
0282 4802 |H | Short_Literal 0x2
0283 801e | | Call 0x0,0x1e
0284 00db | | Load_Top At_Offset_3
0285 016d | m | Execute Variant_Record,Structure_Write
0286 00d8 | | Load_Top At_Offset_0
0287 4801 |H | Short_Literal 0x1
0288 e402 | | Load 0x2,0x2
0289 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
028a 801f | | Call 0x0,0x1f
028b 00da | | Load_Top At_Offset_2
028c 016d | m | Execute Variant_Record,Structure_Write
028d 00d9 | | Load_Top At_Offset_1
028e 00db | | Load_Top At_Offset_3
028f 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0290 00da | | Load_Top At_Offset_2
0291 e5fe | | Load 0x2,-0x2
0292 016d | m | Execute Variant_Record,Structure_Write
0293 4800 |H | Short_Literal 0x0
0294 a5fd | | Store_Unchecked 0x2,-0x3
0295 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0296 0000 0000 | | .XXX[0x2]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 00ea | | Load_Encached Null_String_Cache
029c 0092 0771 | q| Action Push_String_Extended,0x771 ; "Elide"
029e e018 | | Load 0x0,0x18
029f e22f | / | Load 0x1,0x2f
02a0 0096 | | Execute Package,Entry
02a1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02a2 0000 0000 | | .BLANK 0000[0x6]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab 00ea | | Load_Encached Null_String_Cache
02ac 0092 0772 | r| Action Push_String_Extended,0x772 ; "Expand"
02ae e018 | | Load 0x0,0x18
02af e22f | / | Load 0x1,0x2f
02b0 0096 | | Execute Package,Entry
02b1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02b2 0000 0000 | | .BLANK 0000[0x6]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 0833 | 3 | Execute_Immediate Raise,0x33
02bc 0000 0000 | | .BLANK 0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 0833 | 3 | Execute_Immediate Raise,0x33
02c4 0000 0000 | | .BLANK 0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 00ea | | Load_Encached Null_String_Cache
02cc 0092 0773 | s| Action Push_String_Extended,0x773 ; "Promote"
02ce e018 | | Load 0x0,0x18
02cf e22f | / | Load 0x1,0x2f
02d0 0096 | | Execute Package,Entry
02d1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02d2 0000 0000 | | .BLANK 0000[0x6]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 00ea | | Load_Encached Null_String_Cache
02dc 0092 0774 | t| Action Push_String_Extended,0x774 ; "Demote"
02de e018 | | Load 0x0,0x18
02df e22f | / | Load 0x1,0x2f
02e0 0096 | | Execute Package,Entry
02e1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02e2 0000 0000 | | .BLANK 0000[0x6]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 00ea | | Load_Encached Null_String_Cache
02ec 0092 0775 | u| Action Push_String_Extended,0x775 ; "Delete"
02ee e018 | | Load 0x0,0x18
02ef e22f | / | Load 0x1,0x2f
02f0 0096 | | Execute Package,Entry
02f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02f2 0000 0000 | | .BLANK 0000[0x6]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb | | .CONST 0x02fb ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0001 | | .CONST 0x0001 ; Number of locals
02fb BODY_02f8:
02fb INIT_02f8:
02fb 00ea | | Load_Encached Null_String_Cache
02fc 0092 0776 | v| Action Push_String_Extended,0x776 ; "Sort"
02fe e018 | | Load 0x0,0x18
02ff e22f | / | Load 0x1,0x2f
0300 0096 | | Execute Package,Entry
0301 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0302 0000 0000 | | .BLANK 0000[0x6]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 00ea | | Load_Encached Null_String_Cache
030c 0092 0777 | w| Action Push_String_Extended,0x777 ; "Filter"
030e e018 | | Load 0x0,0x18
030f e22f | / | Load 0x1,0x2f
0310 0096 | | Execute Package,Entry
0311 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0312 0000 0000 | | .BLANK 0000[0x6]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b | | .CONST 0x031b ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0001 | | .CONST 0x0001 ; Number of locals
031b BODY_0318:
031b INIT_0318:
031b 00da | | Load_Top At_Offset_2
031c 0217 | | Execute Heap_Access,All_Reference
031d e020 | | Load 0x0,0x20
031e e241 | A | Load 0x1,0x41
031f 0096 | | Execute Package,Entry
0320 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0321 0000 0000 | | .BLANK 0000[0x7]
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 0092 0778 | x| Action Push_String_Extended,0x778 ; "TEST CASE RESULT"
032d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032e 0000 0000 | | .XXX[0x2]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 00da | | Load_Top At_Offset_2
0334 0219 | | Execute Heap_Access,All_Read
0335 e014 | | Load 0x0,0x14
0336 e241 | A | Load 0x1,0x41
0337 0096 | | Execute Package,Entry
0338 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0339 4801 |H | Short_Literal 0x1
033a 8015 | | Call 0x0,0x15
033b 8021 | ! | Call 0x0,0x21
033c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033d 0000 0000 | | .XXX[0x3]
033f 0000 | |
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343 | C | .CONST 0x0343 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0001 | | .CONST 0x0001 ; Number of locals
0343 BODY_0340:
0343 INIT_0340:
0343 00da | | Load_Top At_Offset_2
0344 8223 | # | Call 0x1,0x23
0345 e5fe | | Load 0x2,-0x2
0346 8223 | # | Call 0x1,0x23
0347 01df | | Execute Vector,Equal
0348 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0349 0000 0000 | | .BLANK 0000[0x7]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0358 | X | .CONST 0x0358 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0002 | | .CONST 0x0002 ; Number of locals
0353 INIT_0350:
0353 00da | | Load_Top At_Offset_2
0354 0219 | | Execute Heap_Access,All_Read
0355 e01a | | Load 0x0,0x1a
0356 e241 | A | Load 0x1,0x41
0357 0096 | | Execute Package,Entry
0358 BODY_0350:
0358 4801 |H | Short_Literal 0x1
0359 e5ff | | Load 0x2,-0x1
035a 0219 | | Execute Heap_Access,All_Read
035b e022 | " | Load 0x0,0x22
035c e241 | A | Load 0x1,0x41
035d 0096 | | Execute Package,Entry
035e e22e | . | Load 0x1,0x2e
035f 00da | | Load_Top At_Offset_2
0360 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0361 a5fe | | Store_Unchecked 0x2,-0x2
0362 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0363 0000 0000 | | .BLANK 0000[0x5]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b 00da | | Load_Top At_Offset_2
036c 0217 | | Execute Heap_Access,All_Reference
036d e023 | # | Load 0x0,0x23
036e e241 | A | Load 0x1,0x41
036f 0096 | | Execute Package,Entry
0370 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0371 0000 0000 | | .BLANK 0000[0x7]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0383 | | .CONST 0x0383 ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0002 | | .CONST 0x0002 ; Number of locals
037b INIT_0378:
037b 00da | | Load_Top At_Offset_2
037c 0217 | | Execute Heap_Access,All_Reference
037d e024 | $ | Load 0x0,0x24
037e e241 | A | Load 0x1,0x41
037f 0096 | | Execute Package,Entry
0380 e01a | | Load 0x0,0x1a
0381 e241 | A | Load 0x1,0x41
0382 0096 | | Execute Package,Entry
0383 BODY_0378:
0383 00db | | Load_Top At_Offset_3
0384 0217 | | Execute Heap_Access,All_Reference
0385 e025 | % | Load 0x0,0x25
0386 e241 | A | Load 0x1,0x41
0387 0096 | | Execute Package,Entry
0388 e22c | , | Load 0x1,0x2c
0389 00da | | Load_Top At_Offset_2
038a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
038b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
038c 0000 0000 | | .BLANK 0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2
0394 0219 | | Execute Heap_Access,All_Read
0395 00d8 | | Load_Top At_Offset_0
0396 e026 | & | Load 0x0,0x26
0397 e241 | A | Load 0x1,0x41
0398 0096 | | Execute Package,Entry
0399 4501 |E | Exit_Suprogram New_Top_Offset 0x1
039a 0000 0000 | | .BLANK 0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 4607 |F | Jump_Case 0x8
03a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
03a5 7807 |x | Jump 0x3ad ; case 0x1
03a6 780a |x | Jump 0x3b1 ; case 0x2
03a7 780e |x | Jump 0x3b6 ; case 0x3
03a8 7811 |x | Jump 0x3ba ; case 0x4
03a9 7812 |x | Jump 0x3bc ; case 0x5
03aa 7813 |x | Jump 0x3be ; case 0x6
03ab 7816 |x | Jump 0x3c2 ; case 0x7
03ac 4302 |C | .XXX[0x1]
03ad 00da | | Load_Top At_Offset_2
03ae 0091 0762 | b| Action Push_String_Extended_Indexed,0x762 ; "NIL_COL"
03b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03b1 00db | | Load_Top At_Offset_3
03b2 00db | | Load_Top At_Offset_3
03b3 00e0 | | Load_Encached Standard_Cache
03b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03b6 00da | | Load_Top At_Offset_2
03b7 00e0 | | Load_Encached Standard_Cache
03b8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03b9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03ba 00db | | Load_Top At_Offset_3
03bb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03bc 00db | | Load_Top At_Offset_3
03bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03be e230 | 0 | Load 0x1,0x30
03bf 00dc | | Load_Top At_Offset_4
03c0 0267 | g | Execute Discrete,Predecessor
03c1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03c2 e230 | 0 | Load 0x1,0x30
03c3 00dc | | Load_Top At_Offset_4
03c4 0268 | h | Execute Discrete,Successor
03c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03c6 0000 0000 | | .XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03cc 0000 0000 | | .BLANK 0000[0x4]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3 | | .CONST 0x03d3 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0001 | | .CONST 0x0001 ; Number of locals
03d3 BODY_03d0:
03d3 INIT_03d0:
03d3 e5fd | | Load 0x2,-0x3
03d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d5 e5fe | | Load 0x2,-0x2
03d6 e5ff | | Load 0x2,-0x1
03d7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03d8 8027 | ' | Call 0x0,0x27
03d9 e5fd | | Load 0x2,-0x3
03da 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03db e5fd | | Load 0x2,-0x3
03dc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03dd e5fe | | Load 0x2,-0x2
03de e5ff | | Load 0x2,-0x1
03df 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03e0 8028 | ( | Call 0x0,0x28
03e1 e5fd | | Load 0x2,-0x3
03e2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03e3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03e4 0000 0000 | | .BLANK 0000[0x4]
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 4607 |F | Jump_Case 0x8
03ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
03ed 7807 |x | Jump 0x3f5 ; case 0x1
03ee 780a |x | Jump 0x3f9 ; case 0x2
03ef 780e |x | Jump 0x3fe ; case 0x3
03f0 7811 |x | Jump 0x402 ; case 0x4
03f1 7812 |x | Jump 0x404 ; case 0x5
03f2 7813 |x | Jump 0x406 ; case 0x6
03f3 7816 |x | Jump 0x40a ; case 0x7
03f4 4302 |C | .XXX[0x1]
03f5 00da | | Load_Top At_Offset_2
03f6 0091 0765 | e| Action Push_String_Extended_Indexed,0x765 ; "NONE"
03f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03f9 00db | | Load_Top At_Offset_3
03fa 00db | | Load_Top At_Offset_3
03fb 00e0 | | Load_Encached Standard_Cache
03fc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03fe 00da | | Load_Top At_Offset_2
03ff 00e0 | | Load_Encached Standard_Cache
0400 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0401 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0402 00db | | Load_Top At_Offset_3
0403 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0404 00db | | Load_Top At_Offset_3
0405 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0406 e236 | 6 | Load 0x1,0x36
0407 00dc | | Load_Top At_Offset_4
0408 0267 | g | Execute Discrete,Predecessor
0409 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
040a e236 | 6 | Load 0x1,0x36
040b 00dc | | Load_Top At_Offset_4
040c 0268 | h | Execute Discrete,Successor
040d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
040e 0000 0000 | | .XXX[0x2]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0414 0000 0000 | | .BLANK 0000[0x4]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b | | .CONST 0x041b ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 0001 | | .CONST 0x0001 ; Number of locals
041b BODY_0418:
041b INIT_0418:
041b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
041c 0000 0000 | | .BLANK 0000[0x4]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 4607 |F | Jump_Case 0x8
0424 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0425 7807 |x | Jump 0x42d ; case 0x1
0426 780a |x | Jump 0x431 ; case 0x2
0427 780e |x | Jump 0x436 ; case 0x3
0428 7811 |x | Jump 0x43a ; case 0x4
0429 7812 |x | Jump 0x43c ; case 0x5
042a 7813 |x | Jump 0x43e ; case 0x6
042b 7816 |x | Jump 0x442 ; case 0x7
042c 4302 |C | .XXX[0x1]
042d 00da | | Load_Top At_Offset_2
042e 0091 0766 | f| Action Push_String_Extended_Indexed,0x766 ; "NIL_FIELD"
0430 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0431 00db | | Load_Top At_Offset_3
0432 00db | | Load_Top At_Offset_3
0433 00e0 | | Load_Encached Standard_Cache
0434 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0435 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0436 00da | | Load_Top At_Offset_2
0437 00e0 | | Load_Encached Standard_Cache
0438 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0439 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
043a 00db | | Load_Top At_Offset_3
043b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
043c 00db | | Load_Top At_Offset_3
043d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
043e e23a | : | Load 0x1,0x3a
043f 00dc | | Load_Top At_Offset_4
0440 0267 | g | Execute Discrete,Predecessor
0441 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0442 e23a | : | Load 0x1,0x3a
0443 00dc | | Load_Top At_Offset_4
0444 0268 | h | Execute Discrete,Successor
0445 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0446 0000 0000 | | .XXX[0x2]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b 4609 |F | Jump_Case 0xa
044c 7809 |x | Jump 0x456 ; case 0x0
044d 7835 |x5 | Jump 0x483 ; case 0x1
044e 7841 |xA | Jump 0x490 ; case 0x2
044f 7844 |xD | Jump 0x494 ; case 0x3
0450 78b6 |x | Jump 0x507 ; case 0x4
0451 78b5 |x | Jump 0x507 ; case 0x5
0452 7848 |xH | Jump 0x49b ; case 0x6
0453 7852 |xR | Jump 0x4a6 ; case 0x7
0454 787f |x | Jump 0x4d4 ; case 0x8
0455 78ac |x | Jump 0x502 ; case 0x9
0456 00da | | Load_Top At_Offset_2
0457 016c | l | Execute Variant_Record,Is_Constrained
0458 700a |p | Jump_Nonzero 0x463
0459 00cf | | Action Mark_Auxiliary
045a 4800 |H | Short_Literal 0x0
045b 4800 |H | Short_Literal 0x0
045c e5ff | | Load 0x2,-0x1
045d 1c08 | | Execute_Immediate Run_Utility,0x8
045e 00d8 | | Load_Top At_Offset_0
045f 1c00 | | Execute_Immediate Run_Utility,0x0
0460 c5ff | | Store 0x2,-0x1
0461 00ce | | Action Pop_Auxiliary
0462 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0463 00da | | Load_Top At_Offset_2
0464 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0465 4602 |F | Jump_Case 0x3
0466 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0467 7810 |x | Jump 0x478 ; case 0x1
0468 7800 |x | Jump 0x469 ; case 0x2
0469 00da | | Load_Top At_Offset_2
046a 2204 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x4
046b 00da | | Load_Top At_Offset_2
046c 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
046d 00db | | Load_Top At_Offset_3
046e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
046f 4604 |F | Jump_Case 0x5
0470 7804 |x | Jump 0x475 ; case 0x0
0471 7803 |x | Jump 0x475 ; case 0x1
0472 7802 |x | Jump 0x475 ; case 0x2
0473 7801 |x | Jump 0x475 ; case 0x3
0474 7800 |x | Jump 0x475 ; case 0x4
0475 00db | | Load_Top At_Offset_3
0476 2b04 |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0x4
0477 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0478 00da | | Load_Top At_Offset_2
0479 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3
047a 00da | | Load_Top At_Offset_2
047b 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
047c 00db | | Load_Top At_Offset_3
047d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
047e 0f04 | | Execute_Immediate Equal,0x4
047f 7000 |p | Jump_Nonzero 0x480
0480 00db | | Load_Top At_Offset_3
0481 2b03 |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0x3
0482 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0483 00da | | Load_Top At_Offset_2
0484 016b | k | Execute Variant_Record,Read_Variant
0485 00d8 | | Load_Top At_Offset_0
0486 0f01 | | Execute_Immediate Equal,0x1
0487 6802 |h | Jump_Zero 0x48a
0488 00db | | Load_Top At_Offset_3
0489 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3
048a 00d8 | | Load_Top At_Offset_0
048b 0f02 | | Execute_Immediate Equal,0x2
048c 6802 |h | Jump_Zero 0x48f
048d 00db | | Load_Top At_Offset_3
048e 2204 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x4
048f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0490 4802 |H | Short_Literal 0x2
0491 4804 |H | Short_Literal 0x4
0492 0311 | | Declare_Type Variant_Record,Constrained_Incomplete
0493 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0494 e5fc | | Load 0x2,-0x4
0495 e5fd | | Load 0x2,-0x3
0496 e5ff | | Load 0x2,-0x1
0497 1c07 | | Execute_Immediate Run_Utility,0x7
0498 e5fe | | Load 0x2,-0x2
0499 0306 | | Complete_Type Variant_Record,By_Renaming
049a 4305 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x5
049b e5fd | | Load 0x2,-0x3
049c 4602 |F | Jump_Case 0x3
049d 7806 |x | Jump 0x4a4 ; case 0x0
049e 7803 |x | Jump 0x4a2 ; case 0x1
049f 7800 |x | Jump 0x4a0 ; case 0x2
04a0 4802 |H | Short_Literal 0x2
04a1 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
04a2 4801 |H | Short_Literal 0x1
04a3 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
04a4 48ff |H | Short_Literal 0xff
04a5 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
04a6 e5fd | | Load 0x2,-0x3
04a7 e5fe | | Load 0x2,-0x2
04a8 e5fd | | Load 0x2,-0x3
04a9 4602 |F | Jump_Case 0x3
04aa 7824 |x$ | Jump 0x4cf ; case 0x0
04ab 7817 |x | Jump 0x4c3 ; case 0x1
04ac 7800 |x | Jump 0x4ad ; case 0x2
04ad e5fe | | Load 0x2,-0x2
04ae 4604 |F | Jump_Case 0x5
04af 780c |x | Jump 0x4bc ; case 0x0
04b0 7809 |x | Jump 0x4ba ; case 0x1
04b1 7806 |x | Jump 0x4b8 ; case 0x2
04b2 7803 |x | Jump 0x4b6 ; case 0x3
04b3 7800 |x | Jump 0x4b4 ; case 0x4
04b4 4804 |H | Short_Literal 0x4
04b5 7807 |x | Jump 0x4bd
04b6 4801 |H | Short_Literal 0x1
04b7 7805 |x | Jump 0x4bd
04b8 4802 |H | Short_Literal 0x2
04b9 7803 |x | Jump 0x4bd
04ba 4803 |H | Short_Literal 0x3
04bb 7801 |x | Jump 0x4bd
04bc 48ff |H | Short_Literal 0xff
04bd e23c | < | Load 0x1,0x3c
04be 2304 |# | Execute Variant_Record,Field_Type,Field_Number 0x4
04bf 031b | | Declare_Type Variant_Record,Constrained
04c0 4801 |H | Short_Literal 0x1
04c1 4802 |H | Short_Literal 0x2
04c2 780e |x | Jump 0x4d1
04c3 e5fe | | Load 0x2,-0x2
04c4 0f04 | | Execute_Immediate Equal,0x4
04c5 7002 |p | Jump_Nonzero 0x4c8
04c6 48ff |H | Short_Literal 0xff
04c7 7801 |x | Jump 0x4c9
04c8 4801 |H | Short_Literal 0x1
04c9 e23c | < | Load 0x1,0x3c
04ca 2303 |# | Execute Variant_Record,Field_Type,Field_Number 0x3
04cb 031b | | Declare_Type Variant_Record,Constrained
04cc 4801 |H | Short_Literal 0x1
04cd 4801 |H | Short_Literal 0x1
04ce 7802 |x | Jump 0x4d1
04cf 4800 |H | Short_Literal 0x0
04d0 48ff |H | Short_Literal 0xff
04d1 e5ff | | Load 0x2,-0x1
04d2 031b | | Declare_Type Variant_Record,Constrained
04d3 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
04d4 e5fd | | Load 0x2,-0x3
04d5 e5fe | | Load 0x2,-0x2
04d6 e5fd | | Load 0x2,-0x3
04d7 e5fe | | Load 0x2,-0x2
04d8 e5ff | | Load 0x2,-0x1
04d9 1c06 | | Execute_Immediate Run_Utility,0x6
04da e5ff | | Load 0x2,-0x1
04db 02fc | | Declare_Variable Variant_Record,With_Constraint
04dc e5fd | | Load 0x2,-0x3
04dd 4602 |F | Jump_Case 0x3
04de 7821 |x! | Jump 0x500 ; case 0x0
04df 7816 |x | Jump 0x4f6 ; case 0x1
04e0 7800 |x | Jump 0x4e1 ; case 0x2
04e1 e5fe | | Load 0x2,-0x2
04e2 4604 |F | Jump_Case 0x5
04e3 780c |x | Jump 0x4f0 ; case 0x0
04e4 7809 |x | Jump 0x4ee ; case 0x1
04e5 7806 |x | Jump 0x4ec ; case 0x2
04e6 7803 |x | Jump 0x4ea ; case 0x3
04e7 7800 |x | Jump 0x4e8 ; case 0x4
04e8 4804 |H | Short_Literal 0x4
04e9 7807 |x | Jump 0x4f1
04ea 4801 |H | Short_Literal 0x1
04eb 7805 |x | Jump 0x4f1
04ec 4802 |H | Short_Literal 0x2
04ed 7803 |x | Jump 0x4f1
04ee 4803 |H | Short_Literal 0x3
04ef 7801 |x | Jump 0x4f1
04f0 48ff |H | Short_Literal 0xff
04f1 e23c | < | Load 0x1,0x3c
04f2 2304 |# | Execute Variant_Record,Field_Type,Field_Number 0x4
04f3 02fc | | Declare_Variable Variant_Record,With_Constraint
04f4 2f04 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x4
04f5 780a |x | Jump 0x500
04f6 e5fe | | Load 0x2,-0x2
04f7 0f04 | | Execute_Immediate Equal,0x4
04f8 7002 |p | Jump_Nonzero 0x4fb
04f9 48ff |H | Short_Literal 0xff
04fa 7801 |x | Jump 0x4fc
04fb 4801 |H | Short_Literal 0x1
04fc e23c | < | Load 0x1,0x3c
04fd 2303 |# | Execute Variant_Record,Field_Type,Field_Number 0x3
04fe 02fc | | Declare_Variable Variant_Record,With_Constraint
04ff 2f03 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x3
0500 016a | j | QQ_execute Variant_Record,XXX
0501 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
0502 4800 |H | Short_Literal 0x0
0503 4800 |H | Short_Literal 0x0
0504 e5ff | | Load 0x2,-0x1
0505 1c07 | | Execute_Immediate Run_Utility,0x7
0506 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0507 0869 | i | Execute_Immediate Raise,0x69
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
050c 0000 0000 | | .BLANK 0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0517 | | .CONST 0x0517 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0003 | | .CONST 0x0003 ; Number of locals
0513 INIT_0510:
0513 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call
0515 029f 06d3 | | Declare_Subprogram INIT_06d0,For_Call
0517 BODY_0510:
0517 e5ff | | Load 0x2,-0x1
0518 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0519 0f02 | | Execute_Immediate Equal,0x2
051a 6810 |h | Jump_Zero 0x52b
051b e5ff | | Load 0x2,-0x1
051c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
051d 4604 |F | Jump_Case 0x5
051e 7808 |x | Jump 0x527 ; case 0x0
051f 7805 |x | Jump 0x525 ; case 0x1
0520 7806 |x | Jump 0x527 ; case 0x2
0521 7805 |x | Jump 0x527 ; case 0x3
0522 7800 |x | Jump 0x523 ; case 0x4
0523 8402 | | Call 0x2,0x2
0524 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0525 8403 | | Call 0x2,0x3
0526 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0527 e5ff | | Load 0x2,-0x1
0528 e5fd | | Load 0x2,-0x3
0529 016d | m | Execute Variant_Record,Structure_Write
052a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
052b e5ff | | Load 0x2,-0x1
052c e5fd | | Load 0x2,-0x3
052d 016d | m | Execute Variant_Record,Structure_Write
052e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
052f 0000 | | .XXX[0x1]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533 | 3 | .CONST 0x0533 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0001 | | .CONST 0x0001 ; Number of locals
0533 BODY_0530:
0533 INIT_0530:
0533 00da | | Load_Top At_Offset_2
0534 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0535 4602 |F | Jump_Case 0x3
0536 7823 |x# | Jump 0x55a ; case 0x0
0537 7824 |x$ | Jump 0x55c ; case 0x1
0538 7800 |x | Jump 0x539 ; case 0x2
0539 00da | | Load_Top At_Offset_2
053a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
053b 4604 |F | Jump_Case 0x5
053c 781b |x | Jump 0x558 ; case 0x0
053d 7815 |x | Jump 0x553 ; case 0x1
053e 780d |x | Jump 0x54c ; case 0x2
053f 7806 |x | Jump 0x546 ; case 0x3
0540 7800 |x | Jump 0x541 ; case 0x4
0541 00da | | Load_Top At_Offset_2
0542 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0543 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0544 8021 | ! | Call 0x0,0x21
0545 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0546 00da | | Load_Top At_Offset_2
0547 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0548 2e01 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1
0549 e029 | ) | Load 0x0,0x29
054a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
054b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
054c 00da | | Load_Top At_Offset_2
054d 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
054e 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
054f e007 | | Load 0x0,0x7
0550 011c | | Execute Any,Convert_Unchecked
0551 1c01 | | Execute_Immediate Run_Utility,0x1
0552 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0553 00da | | Load_Top At_Offset_2
0554 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0555 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0556 8021 | ! | Call 0x0,0x21
0557 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0558 00ea | | Load_Encached Null_String_Cache
0559 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
055a 00ea | | Load_Encached Null_String_Cache
055b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
055c 00da | | Load_Top At_Offset_2
055d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
055e 4604 |F | Jump_Case 0x5
055f 7807 |x | Jump 0x567 ; case 0x0
0560 780e |x | Jump 0x56f ; case 0x1
0561 780a |x | Jump 0x56c ; case 0x2
0562 7806 |x | Jump 0x569 ; case 0x3
0563 7800 |x | Jump 0x564 ; case 0x4
0564 00da | | Load_Top At_Offset_2
0565 8247 | G | Call 0x1,0x47
0566 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0567 00ea | | Load_Encached Null_String_Cache
0568 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0569 0092 0779 | y| Action Push_String_Extended,0x779 ; "EXECUTION TIME"
056b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
056c 0092 077a | z| Action Push_String_Extended,0x77a ; "P/F STATUS"
056e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
056f 0092 077b | {| Action Push_String_Extended,0x77b ; "NAME"
0571 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0572 0000 0000 | | .BLANK 0000[0x6]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b 00da | | Load_Top At_Offset_2
057c 01dd | | Execute Vector,First
057d 00db | | Load_Top At_Offset_3
057e 01dc | | Execute Vector,Last
057f 0af9 | | Execute_Immediate Plus,-0x7
0580 00d8 | | Load_Top At_Offset_0
0581 00e2 | | Load_Encached Integer_Cache
0582 0260 | ` | Execute Discrete,In_Type
0583 7001 |p | Jump_Nonzero 0x585
0584 0801 | | Execute_Immediate Raise,0x1
0585 e5ff | | Load 0x2,-0x1
0586 01cf | | Execute Vector,Slice_Read
0587 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
058d 2e01 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1
058e e006 | | Load 0x0,0x6
058f 011c | | Execute Any,Convert_Unchecked
0590 1c01 | | Execute_Immediate Run_Utility,0x1
0591 8246 | F | Call 0x1,0x46
0592 e02a | * | Load 0x0,0x2a
0593 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0594 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0595 0000 0000 | | .XXX[0x3]
0597 0000 | |
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059d | | .CONST 0x059d ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0002 | | .CONST 0x0002 ; Number of locals
059b INIT_0598:
059b e5fe | | Load 0x2,-0x2
059c 0007 | | Action Break_Optional
059d BODY_0598:
059d 00d8 | | Load_Top At_Offset_0
059e 4800 |H | Short_Literal 0x0
059f 802b | + | Call 0x0,0x2b
05a0 0031 | 1 | Store_Top Heap_Access,At_Offset_1
05a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05a2 0000 0000 | | .BLANK 0000[0x6]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05af | | .CONST 0x05af ; Address of begin
05a9 0004 | | .CONST 0x0004 ; Address of exception handler
05aa 0002 | | .CONST 0x0002 ; Number of locals
05ab INIT_05a8:
05ab e00b | | Load 0x0,0xb
05ac e241 | A | Load 0x1,0x41
05ad 0098 | | Execute Package,Field_Read_Dynamic
05ae 0322 | " | Declare_Variable Record
05af BODY_05a8:
05af 00d8 | | Load_Top At_Offset_0
05b0 4801 |H | Short_Literal 0x1
05b1 e402 | | Load 0x2,0x2
05b2 0219 | | Execute Heap_Access,All_Read
05b3 e02c | , | Load 0x0,0x2c
05b4 e241 | A | Load 0x1,0x41
05b5 0096 | | Execute Package,Entry
05b6 00d1 | | Pop_Control Pop_Count_1
05b7 4801 |H | Short_Literal 0x1
05b8 e243 | C | Load 0x1,0x43
05b9 00da | | Load_Top At_Offset_2
05ba e02d | - | Load 0x0,0x2d
05bb e241 | A | Load 0x1,0x41
05bc 0096 | | Execute Package,Entry
05bd 4802 |H | Short_Literal 0x2
05be e244 | D | Load 0x1,0x44
05bf 00da | | Load_Top At_Offset_2
05c0 e02d | - | Load 0x0,0x2d
05c1 e241 | A | Load 0x1,0x41
05c2 0096 | | Execute Package,Entry
05c3 00d8 | | Load_Top At_Offset_0
05c4 4801 |H | Short_Literal 0x1
05c5 e402 | | Load 0x2,0x2
05c6 0219 | | Execute Heap_Access,All_Read
05c7 e02c | , | Load 0x0,0x2c
05c8 e241 | A | Load 0x1,0x41
05c9 0096 | | Execute Package,Entry
05ca 00d1 | | Pop_Control Pop_Count_1
05cb 4801 |H | Short_Literal 0x1
05cc 4801 |H | Short_Literal 0x1
05cd 4801 |H | Short_Literal 0x1
05ce e242 | B | Load 0x1,0x42
05cf 01d7 | | Execute Vector,Field_Read
05d0 e245 | E | Load 0x1,0x45
05d1 01cf | | Execute Vector,Slice_Read
05d2 00da | | Load_Top At_Offset_2
05d3 e02d | - | Load 0x0,0x2d
05d4 e241 | A | Load 0x1,0x41
05d5 0096 | | Execute Package,Entry
05d6 4802 |H | Short_Literal 0x2
05d7 4801 |H | Short_Literal 0x1
05d8 4802 |H | Short_Literal 0x2
05d9 e242 | B | Load 0x1,0x42
05da 01d7 | | Execute Vector,Field_Read
05db e245 | E | Load 0x1,0x45
05dc 01cf | | Execute Vector,Slice_Read
05dd 00da | | Load_Top At_Offset_2
05de e02d | - | Load 0x0,0x2d
05df e241 | A | Load 0x1,0x41
05e0 0096 | | Execute Package,Entry
05e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05e2 0000 0000 | | .BLANK 0000[0x6]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f2 | | .CONST 0x05f2 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0004 | | .CONST 0x0004 ; Number of locals
05eb INIT_05e8:
05eb e00b | | Load 0x0,0xb
05ec e241 | A | Load 0x1,0x41
05ed 0098 | | Execute Package,Field_Read_Dynamic
05ee 0322 | " | Declare_Variable Record
05ef e236 | 6 | Load 0x1,0x36
05f0 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call
05f2 BODY_05e8:
05f2 e409 | | Load 0x2,0x9
05f3 0f04 | | Execute_Immediate Equal,0x4
05f4 7065 |pe | Jump_Nonzero 0x65a
05f5 00da | | Load_Top At_Offset_2
05f6 4802 |H | Short_Literal 0x2
05f7 e402 | | Load 0x2,0x2
05f8 0219 | | Execute Heap_Access,All_Read
05f9 e02c | , | Load 0x0,0x2c
05fa e241 | A | Load 0x1,0x41
05fb 0096 | | Execute Package,Entry
05fc 00d1 | | Pop_Control Pop_Count_1
05fd e409 | | Load 0x2,0x9
05fe 0aff | | Execute_Immediate Plus,-0x1
05ff 4603 |F | Jump_Case 0x4
0600 7820 |x | Jump 0x621 ; case 0x0
0601 7803 |x | Jump 0x605 ; case 0x1
0602 783b |x; | Jump 0x63e ; case 0x2
0603 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x3
0604 4501 |E | .XXX[0x1]
0605 4801 |H | Short_Literal 0x1
0606 4802 |H | Short_Literal 0x2
0607 e23c | < | Load 0x1,0x3c
0608 1c08 | | Execute_Immediate Run_Utility,0x8
0609 00d8 | | Load_Top At_Offset_0
060a 1c01 | | Execute_Immediate Run_Utility,0x1
060b 4801 |H | Short_Literal 0x1
060c e602 | | Load 0x3,0x2
060d e02e | . | Load 0x0,0x2e
060e e241 | A | Load 0x1,0x41
060f 0096 | | Execute Package,Entry
0610 4802 |H | Short_Literal 0x2
0611 4802 |H | Short_Literal 0x2
0612 e23c | < | Load 0x1,0x3c
0613 1c08 | | Execute_Immediate Run_Utility,0x8
0614 00d8 | | Load_Top At_Offset_0
0615 1c01 | | Execute_Immediate Run_Utility,0x1
0616 e5ff | | Load 0x2,-0x1
0617 802f | / | Call 0x0,0x2f
0618 00d9 | | Load_Top At_Offset_1
0619 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
061a 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
061b 4802 |H | Short_Literal 0x2
061c e602 | | Load 0x3,0x2
061d e02e | . | Load 0x0,0x2e
061e e241 | A | Load 0x1,0x41
061f 0096 | | Execute Package,Entry
0620 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0621 4801 |H | Short_Literal 0x1
0622 4801 |H | Short_Literal 0x1
0623 e23c | < | Load 0x1,0x3c
0624 1c08 | | Execute_Immediate Run_Utility,0x8
0625 00d8 | | Load_Top At_Offset_0
0626 1c01 | | Execute_Immediate Run_Utility,0x1
0627 4801 |H | Short_Literal 0x1
0628 e602 | | Load 0x3,0x2
0629 e02e | . | Load 0x0,0x2e
062a e241 | A | Load 0x1,0x41
062b 0096 | | Execute Package,Entry
062c 4802 |H | Short_Literal 0x2
062d 4801 |H | Short_Literal 0x1
062e e23c | < | Load 0x1,0x3c
062f 1c08 | | Execute_Immediate Run_Utility,0x8
0630 00d8 | | Load_Top At_Offset_0
0631 1c01 | | Execute_Immediate Run_Utility,0x1
0632 e5ff | | Load 0x2,-0x1
0633 4801 |H | Short_Literal 0x1
0634 8015 | | Call 0x0,0x15
0635 00d9 | | Load_Top At_Offset_1
0636 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0637 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0638 4802 |H | Short_Literal 0x2
0639 e602 | | Load 0x3,0x2
063a e02e | . | Load 0x0,0x2e
063b e241 | A | Load 0x1,0x41
063c 0096 | | Execute Package,Entry
063d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
063e 4801 |H | Short_Literal 0x1
063f 4803 |H | Short_Literal 0x3
0640 e23c | < | Load 0x1,0x3c
0641 1c08 | | Execute_Immediate Run_Utility,0x8
0642 00d8 | | Load_Top At_Offset_0
0643 1c01 | | Execute_Immediate Run_Utility,0x1
0644 4801 |H | Short_Literal 0x1
0645 e602 | | Load 0x3,0x2
0646 e02e | . | Load 0x0,0x2e
0647 e241 | A | Load 0x1,0x41
0648 0096 | | Execute Package,Entry
0649 4802 |H | Short_Literal 0x2
064a 4803 |H | Short_Literal 0x3
064b e23c | < | Load 0x1,0x3c
064c 1c08 | | Execute_Immediate Run_Utility,0x8
064d 00d8 | | Load_Top At_Offset_0
064e 1c01 | | Execute_Immediate Run_Utility,0x1
064f e5ff | | Load 0x2,-0x1
0650 8030 | 0 | Call 0x0,0x30
0651 00d9 | | Load_Top At_Offset_1
0652 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0653 2a01 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x1
0654 4802 |H | Short_Literal 0x2
0655 e602 | | Load 0x3,0x2
0656 e02e | . | Load 0x0,0x2e
0657 e241 | A | Load 0x1,0x41
0658 0096 | | Execute Package,Entry
0659 4501 |E | Exit_Suprogram New_Top_Offset 0x1
065a 00cf | | Action Mark_Auxiliary
065b 4807 |H | Short_Literal 0x7
065c 4802 |H | Short_Literal 0x2
065d 0007 | | Action Break_Optional
065e 8604 | | Call 0x3,0x4
065f 00c8 | | Action Pop_Auxiliary_Range
0660 3ffd |? | Loop_Increasing 0x65e
0661 00ce | | Action Pop_Auxiliary
0662 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0663 0000 0000 | | .BLANK 0000[0x5]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0672 | r | .CONST 0x0672 ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0002 | | .CONST 0x0002 ; Number of locals
066b INIT_0668:
066b e013 | | Load 0x0,0x13
066c 02ff | | Declare_Variable Variant_Record
066d e405 | | Load 0x2,0x5
066e 4805 |H | Short_Literal 0x5
066f 801e | | Call 0x0,0x1e
0670 00d9 | | Load_Top At_Offset_1
0671 016d | m | Execute Variant_Record,Structure_Write
0672 BODY_0668:
0672 00d8 | | Load_Top At_Offset_0
0673 00d8 | | Load_Top At_Offset_0
0674 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0675 00d8 | | Load_Top At_Offset_0
0676 e403 | | Load 0x2,0x3
0677 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0678 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0679 00d9 | | Load_Top At_Offset_1
067a 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
067b 00d1 | | Pop_Control Pop_Count_1
067c 00d0 | | Action Swap_Control
067d 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
067e 00d8 | | Load_Top At_Offset_0
067f e5fd | | Load 0x2,-0x3
0680 016d | m | Execute Variant_Record,Structure_Write
0681 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0682 0000 0000 | | .BLANK 0000[0x6]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 0693 | | .CONST 0x0693 ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0004 | | .CONST 0x0004 ; Number of locals
068b INIT_0688:
068b e403 | | Load 0x2,0x3
068c 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
068d 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
068e 8016 | | Call 0x0,0x16
068f 029f 072b | +| Declare_Subprogram INIT_0728,For_Call
0691 029f 074b | K| Declare_Subprogram INIT_0748,For_Call
0693 BODY_0688:
0693 00da | | Load_Top At_Offset_2
0694 01db | | Execute Vector,Length
0695 7006 |p | Jump_Nonzero 0x69c
0696 4800 |H | Short_Literal 0x0
0697 0092 077c | || Action Push_String_Extended,0x77c ; "No Field value is available for Definition"
0699 820e | | Call 0x1,0xe
069a 00cc | | Action Pop_Block
069b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
069c e404 | | Load 0x2,0x4
069d 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
069e 2e01 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x1
069f 4607 |F | Jump_Case 0x8
06a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x0
06a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; case 0x1
06a2 7807 |x | Jump 0x6aa ; case 0x2
06a3 7806 |x | Jump 0x6aa ; case 0x3
06a4 7803 |x | Jump 0x6a8 ; case 0x4
06a5 7802 |x | Jump 0x6a8 ; case 0x5
06a6 7801 |x | Jump 0x6a8 ; case 0x6
06a7 7800 |x | Jump 0x6a8 ; case 0x7
06a8 8604 | | Call 0x3,0x4
06a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06aa 8603 | | Call 0x3,0x3
06ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06ac 0000 0000 | | .BLANK 0000[0x4]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06bb | | .CONST 0x06bb ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 0002 | | .CONST 0x0002 ; Number of locals
06b3 INIT_06b0:
06b3 e5ff | | Load 0x2,-0x1
06b4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06b5 e5ff | | Load 0x2,-0x1
06b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b7 e23c | < | Load 0x1,0x3c
06b8 1c08 | | Execute_Immediate Run_Utility,0x8
06b9 00d8 | | Load_Top At_Offset_0
06ba 1c00 | | Execute_Immediate Run_Utility,0x0
06bb BODY_06b0:
06bb 00d8 | | Load_Top At_Offset_0
06bc 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06bd 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
06be e5fe | | Load 0x2,-0x2
06bf e5ff | | Load 0x2,-0x1
06c0 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06c1 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
06c2 8027 | ' | Call 0x0,0x27
06c3 00d9 | | Load_Top At_Offset_1
06c4 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06c5 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
06c6 00d8 | | Load_Top At_Offset_0
06c7 e5fd | | Load 0x2,-0x3
06c8 016d | m | Execute Variant_Record,Structure_Write
06c9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06ca 0000 0000 | | .BLANK 0000[0x6]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06db | | .CONST 0x06db ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0002 | | .CONST 0x0002 ; Number of locals
06d3 INIT_06d0:
06d3 e5ff | | Load 0x2,-0x1
06d4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06d5 e5ff | | Load 0x2,-0x1
06d6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06d7 e23c | < | Load 0x1,0x3c
06d8 1c08 | | Execute_Immediate Run_Utility,0x8
06d9 00d8 | | Load_Top At_Offset_0
06da 1c00 | | Execute_Immediate Run_Utility,0x0
06db BODY_06d0:
06db 00d8 | | Load_Top At_Offset_0
06dc 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06dd 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
06de e5fe | | Load 0x2,-0x2
06df e5ff | | Load 0x2,-0x1
06e0 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06e1 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
06e2 8027 | ' | Call 0x0,0x27
06e3 00d9 | | Load_Top At_Offset_1
06e4 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
06e5 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
06e6 00d8 | | Load_Top At_Offset_0
06e7 e5fd | | Load 0x2,-0x3
06e8 016d | m | Execute Variant_Record,Structure_Write
06e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06ea 0000 0000 | | .BLANK 0000[0x6]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f6 | | .CONST 0x06f6 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0002 | | .CONST 0x0002 ; Number of locals
06f3 INIT_06f0:
06f3 e5ff | | Load 0x2,-0x1
06f4 e607 | | Load 0x3,0x7
06f5 8015 | | Call 0x0,0x15
06f6 BODY_06f0:
06f6 00d8 | | Load_Top At_Offset_0
06f7 8016 | | Call 0x0,0x16
06f8 01db | | Execute Vector,Length
06f9 6826 |h& | Jump_Zero 0x720
06fa e602 | | Load 0x3,0x2
06fb 4802 |H | Short_Literal 0x2
06fc e402 | | Load 0x2,0x2
06fd 0219 | | Execute Heap_Access,All_Read
06fe e02c | , | Load 0x0,0x2c
06ff e241 | A | Load 0x1,0x41
0700 0096 | | Execute Package,Entry
0701 00d1 | | Pop_Control Pop_Count_1
0702 4801 |H | Short_Literal 0x1
0703 4804 |H | Short_Literal 0x4
0704 e23c | < | Load 0x1,0x3c
0705 1c08 | | Execute_Immediate Run_Utility,0x8
0706 00d8 | | Load_Top At_Offset_0
0707 1c01 | | Execute_Immediate Run_Utility,0x1
0708 e607 | | Load 0x3,0x7
0709 00d9 | | Load_Top At_Offset_1
070a 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3
070b 2a01 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x1
070c 4801 |H | Short_Literal 0x1
070d e602 | | Load 0x3,0x2
070e e02e | . | Load 0x0,0x2e
070f e241 | A | Load 0x1,0x41
0710 0096 | | Execute Package,Entry
0711 4802 |H | Short_Literal 0x2
0712 4804 |H | Short_Literal 0x4
0713 e23c | < | Load 0x1,0x3c
0714 1c08 | | Execute_Immediate Run_Utility,0x8
0715 00d8 | | Load_Top At_Offset_0
0716 1c01 | | Execute_Immediate Run_Utility,0x1
0717 00d9 | | Load_Top At_Offset_1
0718 00d9 | | Load_Top At_Offset_1
0719 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
071a 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
071b 4802 |H | Short_Literal 0x2
071c e602 | | Load 0x3,0x2
071d e02e | . | Load 0x0,0x2e
071e e241 | A | Load 0x1,0x41
071f 0096 | | Execute Package,Entry
0720 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0721 0000 0000 | | .BLANK 0000[0x7]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 0732 | 2 | .CONST 0x0732 ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0002 | | .CONST 0x0002 ; Number of locals
072b INIT_0728:
072b e013 | | Load 0x0,0x13
072c 02ff | | Declare_Variable Variant_Record
072d e405 | | Load 0x2,0x5
072e 4811 |H | Short_Literal 0x11
072f 801e | | Call 0x0,0x1e
0730 00d9 | | Load_Top At_Offset_1
0731 016d | m | Execute Variant_Record,Structure_Write
0732 BODY_0728:
0732 00d8 | | Load_Top At_Offset_0
0733 00d8 | | Load_Top At_Offset_0
0734 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0735 00d8 | | Load_Top At_Offset_0
0736 e403 | | Load 0x2,0x3
0737 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0738 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0739 00d9 | | Load_Top At_Offset_1
073a 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
073b 00d1 | | Pop_Control Pop_Count_1
073c 00d0 | | Action Swap_Control
073d 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
073e 00d8 | | Load_Top At_Offset_0
073f e5fd | | Load 0x2,-0x3
0740 016d | m | Execute Variant_Record,Structure_Write
0741 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0742 0000 0000 | | .BLANK 0000[0x6]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 0752 | R | .CONST 0x0752 ; Address of begin
0749 0004 | | .CONST 0x0004 ; Address of exception handler
074a 0002 | | .CONST 0x0002 ; Number of locals
074b INIT_0748:
074b e013 | | Load 0x0,0x13
074c 02ff | | Declare_Variable Variant_Record
074d e405 | | Load 0x2,0x5
074e 4810 |H | Short_Literal 0x10
074f 801e | | Call 0x0,0x1e
0750 00d9 | | Load_Top At_Offset_1
0751 016d | m | Execute Variant_Record,Structure_Write
0752 BODY_0748:
0752 00d8 | | Load_Top At_Offset_0
0753 00d8 | | Load_Top At_Offset_0
0754 270a |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0xa
0755 00d8 | | Load_Top At_Offset_0
0756 e403 | | Load 0x2,0x3
0757 2704 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x4
0758 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0759 00d9 | | Load_Top At_Offset_1
075a 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1
075b 00d1 | | Pop_Control Pop_Count_1
075c 00d0 | | Action Swap_Control
075d 2b0a |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0xa
075e 00d8 | | Load_Top At_Offset_0
075f e5fd | | Load 0x2,-0x3
0760 016d | m | Execute Variant_Record,Structure_Write
0761 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0762 ; --------------------------------------------------------------------------------------
0762 ; STRING TABLE
0762 ; --------------------------------------------------------------------------------------
0762 0038 | 8 | .STRTAB 0x0038->0x077e ; "NIL_COL"
0763 003d | = | .STRTAB 0x003d->0x0781 ; "TCR_FIELD_NAME_COL"
0764 004d | M | .STRTAB 0x004d->0x078a ; "TCR_FIELD_DATA_COL"
0765 005d | ] | .STRTAB 0x005d->0x0793 ; "NONE"
0766 005f | _ | .STRTAB 0x005f->0x0795 ; "NIL_FIELD"
0767 0066 | f | .STRTAB 0x0066->0x079a ; "TEST_CASE_FIELD"
0768 0073 | s | .STRTAB 0x0073->0x07a1 ; "EVAL_STATUS"
0769 007c | | | .STRTAB 0x007c->0x07a7 ; "EXECUTION_TIME"
076a 0088 | | .STRTAB 0x0088->0x07ae ; "HANDLES_FIELD"
076b 0093 | | .STRTAB 0x0093->0x07b4 ; " "
076c 0093 | | .STRTAB 0x0093->0x07b5 ; "TEST CASE RESULT FIELD"
076d 00a7 | | .STRTAB 0x00a7->0x07c0 ; "VALUE"
076e 00aa | | .STRTAB 0x00aa->0x07c3 ; "Explain"
076f 00af | | .STRTAB 0x00af->0x07c6 ; "Definition not defined for this selected line"
0770 00da | | .STRTAB 0x00da->0x07dd ; "Definition not defined for this line"
0771 00fc | | .STRTAB 0x00fc->0x07ef ; "Elide"
0772 00ff | | .STRTAB 0x00ff->0x07f1 ; "Expand"
0773 0103 | | .STRTAB 0x0103->0x07f4 ; "Promote"
0774 0108 | | .STRTAB 0x0108->0x07f8 ; "Demote"
0775 010c | | .STRTAB 0x010c->0x07fb ; "Delete"
0776 0110 | | .STRTAB 0x0110->0x07fe ; "Sort"
0777 0112 | | .STRTAB 0x0112->0x0800 ; "Filter"
0778 0116 | | .STRTAB 0x0116->0x0803 ; "TEST CASE RESULT"
0779 0124 | $ | .STRTAB 0x0124->0x080b ; "EXECUTION TIME"
077a 0130 | 0 | .STRTAB 0x0130->0x0812 ; "P/F STATUS"
077b 0138 | 8 | .STRTAB 0x0138->0x0817 ; "NAME"
077c 013a | : | .STRTAB 0x013a->0x0819 ; "No Field value is available for Definition"
077d 0162 | b | .STREND 0x0162->0x082e
077e 4e49 4c5f |NIL_| .STRTAB_STRINGS
082e 0000 0000 | | .XXX[0x2]
0830 ; --------------------------------------------------------------------------------------
0830 ; Debug Table
0830 ; --------------------------------------------------------------------------------------
0830 0004 000a | | .DEBUG4 0x0004,0x000a,0x3c24,0x0000,0x0001,0x0000
0836 0000 0000 | | .BLANK 0000[0x1ca]