|
|
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: 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 08f8 | | .CONST 0x08f8 ; 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 00f4 | | .CONST 0x00f4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0038 | 8 | .CONST 0x0038 ; Number of locals
000b INIT_0008:
000b 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8
000d 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110
000f 4800 |H | Short_Literal 0x0
0010 480e |H | Short_Literal 0xe
0011 029f 011b | | Declare_Subprogram For_Call,INIT_0118
0013 03fe | | Declare_Type Discrete,Defined,Visible
0014 4800 |H | Short_Literal 0x0
0015 4802 |H | Short_Literal 0x2
0016 029f 0143 | C| Declare_Subprogram For_Call,INIT_0140
0018 03fe | | Declare_Type Discrete,Defined,Visible
0019 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168
001b 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198
001d 029a 01ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01a8
001f 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
0021 029a 01bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b8
0023 029a 01c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c0
0025 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
0027 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0
0029 029a 01db | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d8
002b 029a 01f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f0
002d 029a 0203 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0200
002f 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
0031 029a 0223 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0220
0033 029a 022b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0228
0035 029a 0233 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0230
0037 029a 023b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0238
0039 029a 02bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02b8
003b 029a 02fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02f8
003d 029a 034b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0348
003f 029a 0363 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0360
0041 029a 036b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0368
0043 029a 0373 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0370
0045 029a 038b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0388
0047 e20f | | Load 0x1,0xf
0048 0266 | f | Execute Discrete,Bounds
0049 e002 | | Load 0x0,0x2
004a 02a0 | | Declare_Subprogram Null_Subprogram
004b 4801 |H | Short_Literal 0x1
004c 035e | ^ | Declare_Type Array,Defined,Visible
004d e20f | | Load 0x1,0xf
004e 0266 | f | Execute Discrete,Bounds
004f e002 | | Load 0x0,0x2
0050 02a0 | | Declare_Subprogram Null_Subprogram
0051 4801 |H | Short_Literal 0x1
0052 035e | ^ | Declare_Type Array,Defined,Visible
0053 00d9 | | Load_Top At_Offset_1
0054 00d9 | | Load_Top At_Offset_1
0055 e002 | | Load 0x0,0x2
0056 e003 | | Load 0x0,0x3
0057 e002 | | Load 0x0,0x2
0058 e210 | | Load 0x1,0x10
0059 00e1 | | Load_Encached Boolean_Cache
005a e004 | | Load 0x0,0x4
005b 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
005c 029f 06f3 | | Declare_Subprogram For_Call,INIT_06f0
005e 4808 |H | Short_Literal 0x8
005f 032e | . | Declare_Type Record,Defined,Visible
0060 4800 |H | Short_Literal 0x0
0061 4807 |H | Short_Literal 0x7
0062 029f 03bb | | Declare_Subprogram For_Call,INIT_03b8
0064 03fe | | Declare_Type Discrete,Defined,Visible
0065 00d9 | | Load_Top At_Offset_1
0066 00e1 | | Load_Encached Boolean_Cache
0067 00da | | Load_Top At_Offset_2
0068 00e1 | | Load_Encached Boolean_Cache
0069 e20f | | Load 0x1,0xf
006a 029f 0703 | | Declare_Subprogram For_Call,INIT_0700
006c 4805 |H | Short_Literal 0x5
006d 032e | . | Declare_Type Record,Defined,Visible
006e 00bf | | Action Accept_Activation
006f 00d9 | | Load_Top At_Offset_1
0070 0266 | f | Execute Discrete,Bounds
0071 00e1 | | Load_Encached Boolean_Cache
0072 02a0 | | Declare_Subprogram Null_Subprogram
0073 4801 |H | Short_Literal 0x1
0074 035d | ] | Declare_Type Array,Defined
0075 00d8 | | Load_Top At_Offset_0
0076 0337 | 7 | Declare_Variable Array
0077 00d8 | | Load_Top At_Offset_0
0078 0335 | 5 | Declare_Variable Array,Duplicate
0079 00cd | | Action Spare6_Action
007a 4801 |H | Short_Literal 0x1
007b 4801 |H | Short_Literal 0x1
007c 00da | | Load_Top At_Offset_2
007d 01d6 | | Execute Vector,Field_Write
007e 4801 |H | Short_Literal 0x1
007f 4802 |H | Short_Literal 0x2
0080 00da | | Load_Top At_Offset_2
0081 01d6 | | Execute Vector,Field_Write
0082 4800 |H | Short_Literal 0x0
0083 4800 |H | Short_Literal 0x0
0084 00da | | Load_Top At_Offset_2
0085 01d6 | | Execute Vector,Field_Write
0086 4800 |H | Short_Literal 0x0
0087 4803 |H | Short_Literal 0x3
0088 00da | | Load_Top At_Offset_2
0089 01d6 | | Execute Vector,Field_Write
008a 4800 |H | Short_Literal 0x0
008b 4804 |H | Short_Literal 0x4
008c 00da | | Load_Top At_Offset_2
008d 01d6 | | Execute Vector,Field_Write
008e 4800 |H | Short_Literal 0x0
008f 4805 |H | Short_Literal 0x5
0090 00da | | Load_Top At_Offset_2
0091 01d6 | | Execute Vector,Field_Write
0092 4800 |H | Short_Literal 0x0
0093 4806 |H | Short_Literal 0x6
0094 00da | | Load_Top At_Offset_2
0095 01d6 | | Execute Vector,Field_Write
0096 4800 |H | Short_Literal 0x0
0097 4807 |H | Short_Literal 0x7
0098 00da | | Load_Top At_Offset_2
0099 01d6 | | Execute Vector,Field_Write
009a 00d9 | | Load_Top At_Offset_1
009b 01d4 | | Execute Vector,Structure_Write
009c 029d 03e3 | | Declare_Subprogram For_Outer_Call,INIT_03e0
009e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
009f 00c7 | | Action Elaborate_Subprogram
00a0 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00a1 00c7 | | Action Elaborate_Subprogram
00a2 029d 0453 | S| Declare_Subprogram For_Outer_Call,INIT_0450
00a4 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00ad 00c7 | | Action Elaborate_Subprogram
00ae 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00b1 00c7 | | Action Elaborate_Subprogram
00b2 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00b3 00c7 | | Action Elaborate_Subprogram
00b4 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b5 00c7 | | Action Elaborate_Subprogram
00b6 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00b7 00c7 | | Action Elaborate_Subprogram
00b8 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00b9 00c7 | | Action Elaborate_Subprogram
00ba 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00bb 00c7 | | Action Elaborate_Subprogram
00bc 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00bd 00c7 | | Action Elaborate_Subprogram
00be 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00bf 00c7 | | Action Elaborate_Subprogram
00c0 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00c1 00c7 | | Action Elaborate_Subprogram
00c2 4800 |H | Short_Literal 0x0
00c3 0093 071b | | PushFullAddress InMicrocode,INIT_0718
00c5 02a0 | | Declare_Subprogram Null_Subprogram
00c6 038e | | Declare_Type Package,Defined
00c7 e20f | | Load 0x1,0xf
00c8 e22b | + | Load 0x1,0x2b
00c9 e005 | | Load 0x0,0x5
00ca e006 | | Load 0x0,0x6
00cb e007 | | Load 0x0,0x7
00cc e008 | | Load 0x0,0x8
00cd e009 | | Load 0x0,0x9
00ce e00a | | Load 0x0,0xa
00cf e00b | | Load 0x0,0xb
00d0 4809 |H | Short_Literal 0x9
00d1 e231 | 1 | Load 0x1,0x31
00d2 020e | | Execute Module,Augment_Imports
00d3 0387 | | Declare_Variable Package
00d4 029d 0463 | c| Declare_Subprogram For_Outer_Call,INIT_0460
00d6 029d 0483 | | Declare_Subprogram For_Outer_Call,INIT_0480
00d8 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00d9 00c7 | | Action Elaborate_Subprogram
00da 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00db 00c7 | | Action Elaborate_Subprogram
00dc 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00dd 00c7 | | Action Elaborate_Subprogram
00de 029d 04ab | | Declare_Subprogram For_Outer_Call,INIT_04a8
00e0 029d 04bb | | Declare_Subprogram For_Outer_Call,INIT_04b8
00e2 029d 04db | | Declare_Subprogram For_Outer_Call,INIT_04d8
00e4 029d 04eb | | Declare_Subprogram For_Outer_Call,INIT_04e8
00e6 029d 051b | | Declare_Subprogram For_Outer_Call,INIT_0518
00e8 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00e9 00c7 | | Action Elaborate_Subprogram
00ea 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00eb 00c7 | | Action Elaborate_Subprogram
00ec 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00ed 00c7 | | Action Elaborate_Subprogram
00ee 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00ef 00c7 | | Action Elaborate_Subprogram
00f0 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00f1 00c7 | | Action Elaborate_Subprogram
00f2 e231 | 1 | Load 0x1,0x31
00f3 020f | | Execute Module,Activate
00f4 BODY_0008:
00f4 00bc | | Action Signal_Activated
00f5 00bb | | Action Signal_Completion
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00ff | | .CONST 0x00ff ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0002 | | .CONST 0x0002 ; Number of locals
00fb INIT_00f8:
00fb e22a | * | Load 0x1,0x2a
00fc 0322 | " | Declare_Variable Record
00fd 00d8 | | Load_Top At_Offset_0
00fe 1c00 | | Execute_Immediate Run_Utility,0x0
00ff BODY_00f8:
00ff 00db | | Load_Top At_Offset_3
0100 00d9 | | Load_Top At_Offset_1
0101 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0102 00db | | Load_Top At_Offset_3
0103 0092 07a9 | | Action Push_String_Extended,0x7a9 ; "<default>"
0105 800c | | Call 0x0,0xc
0106 480b |H | Short_Literal 0xb
0107 00da | | Load_Top At_Offset_2
0108 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0109 01d6 | | Execute Vector,Field_Write
010a 00d8 | | Load_Top At_Offset_0
010b 4401 |D | Exit_Subprogram With_Result,0x1
010c 0000 0000 | | .BLANK 0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 4501 |E | Exit_Subprogram 0x1
0114 0000 0000 | | .BLANK 0000[0x4]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b 4607 |F | Jump_Case 0x7
011c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
011d 7807 |x | Jump 0x125 ; case 0x1
011e 780a |x | Jump 0x129 ; case 0x2
011f 780e |x | Jump 0x12e ; case 0x3
0120 7811 |x | Jump 0x132 ; case 0x4
0121 7812 |x | Jump 0x134 ; case 0x5
0122 7813 |x | Jump 0x136 ; case 0x6
0123 7816 |x | Jump 0x13a ; case 0x7
0124 4302 |C | .XXX[0x1]
0125 00da | | Load_Top At_Offset_2
0126 0091 0786 | | Action Push_String_Extended_Indexed,0x786 ; "NO_ELEMENT"
0128 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0129 00db | | Load_Top At_Offset_3
012a 00db | | Load_Top At_Offset_3
012b 00e0 | | Load_Encached Standard_Cache
012c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
012d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
012e 00da | | Load_Top At_Offset_2
012f 00e0 | | Load_Encached Standard_Cache
0130 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0131 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0132 00db | | Load_Top At_Offset_3
0133 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0134 00db | | Load_Top At_Offset_3
0135 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0136 e20f | | Load 0x1,0xf
0137 00dc | | Load_Top At_Offset_4
0138 0267 | g | Execute Discrete,Predecessor
0139 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
013a e20f | | Load 0x1,0xf
013b 00dc | | Load_Top At_Offset_4
013c 0268 | h | Execute Discrete,Successor
013d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
013e 0000 0000 | | .XXX[0x2]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 4607 |F | Jump_Case 0x7
0144 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0145 7807 |x | Jump 0x14d ; case 0x1
0146 780a |x | Jump 0x151 ; case 0x2
0147 780e |x | Jump 0x156 ; case 0x3
0148 7811 |x | Jump 0x15a ; case 0x4
0149 7812 |x | Jump 0x15c ; case 0x5
014a 7813 |x | Jump 0x15e ; case 0x6
014b 7816 |x | Jump 0x162 ; case 0x7
014c 4302 |C | .XXX[0x1]
014d 00da | | Load_Top At_Offset_2
014e 0091 0795 | | Action Push_String_Extended_Indexed,0x795 ; "DIRECT_CALL"
0150 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0151 00db | | Load_Top At_Offset_3
0152 00db | | Load_Top At_Offset_3
0153 00e0 | | Load_Encached Standard_Cache
0154 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0155 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0156 00da | | Load_Top At_Offset_2
0157 00e0 | | Load_Encached Standard_Cache
0158 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0159 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
015a 00db | | Load_Top At_Offset_3
015b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
015c 00db | | Load_Top At_Offset_3
015d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
015e e210 | | Load 0x1,0x10
015f 00dc | | Load_Top At_Offset_4
0160 0267 | g | Execute Discrete,Predecessor
0161 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0162 e210 | | Load 0x1,0x10
0163 00dc | | Load_Top At_Offset_4
0164 0268 | h | Execute Discrete,Successor
0165 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0166 0000 0000 | | .XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0188 | | .CONST 0x0188 ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 000b | | .CONST 0x000b ; Number of locals
016b INIT_0168:
016b 4800 |H | Short_Literal 0x0
016c 4801 |H | Short_Literal 0x1
016d 029f 053b | ;| Declare_Subprogram For_Call,INIT_0538
016f 03fd | | Declare_Type Discrete,Defined
0170 029f 0563 | c| Declare_Subprogram For_Call,INIT_0560
0172 029f 0573 | s| Declare_Subprogram For_Call,INIT_0570
0174 029f 0583 | | Declare_Subprogram For_Call,INIT_0580
0176 a00d | | Reference 0x0,0xd
0177 00c6 | | Action Check_Subprogram_Elaborated
0178 00db | | Load_Top At_Offset_3
0179 4803 |H | Short_Literal 0x3
017a 4802 |H | Short_Literal 0x2
017b 0099 | | Action Reference_Dynamic
017c 4800 |H | Short_Literal 0x0
017d 0093 0000 | | PushFullAddress InMicrocode
017f 6010 |` | Indirect_Literal Discrete,0x190,{0x80000000, 0x00040000}
0180 0273 | s | Execute Discrete,Plus
0181 e00e | | Load 0x0,0xe
0182 0273 | s | Execute Discrete,Plus
0183 e00f | | Load 0x0,0xf
0184 0273 | s | Execute Discrete,Plus
0185 480a |H | Short_Literal 0xa
0186 029f 0593 | | Declare_Subprogram For_Call,INIT_0590
0188 BODY_0168:
0188 e5ff | | Load 0x2,-0x1
0189 0f0a | | Execute_Immediate Equal,0xa
018a 6802 |h | Jump_Zero 0x18d
018b 8010 | | Call 0x0,0x10
018c 4404 |D | Exit_Subprogram With_Result,0x4
018d 840b | | Call 0x2,0xb
018e 0831 | 1 | Execute_Immediate Raise,0x31
018f 0000 | | .XXX[0x1]
0190 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
0194 0000 0000 | | .BLANK 0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00db | | Load_Top At_Offset_3
019c 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
019d 00db | | Load_Top At_Offset_3
019e e5fe | | Load 0x2,-0x2
019f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01a0 01d7 | | Execute Vector,Field_Read
01a1 8011 | | Call 0x0,0x11
01a2 800c | | Call 0x0,0xc
01a3 4402 |D | Exit_Subprogram With_Result,0x2
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 00da | | Load_Top At_Offset_2
01ac 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01ad 8011 | | Call 0x0,0x11
01ae 4401 |D | Exit_Subprogram With_Result,0x1
01af 0000 | | .XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
01b5 02fd | | Declare_Variable Variant_Record,Duplicate
01b6 00cd | | Action Spare6_Action
01b7 4401 |D | Exit_Subprogram With_Result,0x1
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 00da | | Load_Top At_Offset_2
01bc 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01bd 8011 | | Call 0x0,0x11
01be 4401 |D | Exit_Subprogram With_Result,0x1
01bf 0000 | | .XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 00da | | Load_Top At_Offset_2
01c4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
01c5 4401 |D | Exit_Subprogram With_Result,0x1
01c6 0000 0000 | | .XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2
01cc 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
01cd 4401 |D | Exit_Subprogram With_Result,0x1
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 480a |H | Short_Literal 0xa
01d4 00db | | Load_Top At_Offset_3
01d5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01d6 01d7 | | Execute Vector,Field_Read
01d7 4401 |D | Exit_Subprogram With_Result,0x1
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01dd | | .CONST 0x01dd ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db 029f 05b3 | | Declare_Subprogram For_Call,INIT_05b0
01dd BODY_01d8:
01dd 00db | | Load_Top At_Offset_3
01de 0f0a | | Execute_Immediate Equal,0xa
01df 6802 |h | Jump_Zero 0x1e2
01e0 8402 | | Call 0x2,0x2
01e1 4503 |E | Exit_Subprogram 0x3
01e2 e5fd | | Load 0x2,-0x3
01e3 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
01e4 e5fe | | Load 0x2,-0x2
01e5 8230 | 0 | Call 0x1,0x30
01e6 e5ff | | Load 0x2,-0x1
01e7 e5fd | | Load 0x2,-0x3
01e8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e9 01d6 | | Execute Vector,Field_Write
01ea 4503 |E | Exit_Subprogram 0x3
01eb 0000 0000 | | .BLANK 0000[0x5]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 e5fd | | Load 0x2,-0x3
01f4 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
01f5 e5fe | | Load 0x2,-0x2
01f6 8011 | | Call 0x0,0x11
01f7 800c | | Call 0x0,0xc
01f8 00db | | Load_Top At_Offset_3
01f9 e5fd | | Load 0x2,-0x3
01fa 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01fb 01d6 | | Execute Vector,Field_Write
01fc 4503 |E | Exit_Subprogram 0x3
01fd 0000 0000 | | .XXX[0x3]
01ff 0000 | |
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 00db | | Load_Top At_Offset_3
0204 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0205 00db | | Load_Top At_Offset_3
0206 800c | | Call 0x0,0xc
0207 e5fe | | Load 0x2,-0x2
0208 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0209 4502 |E | Exit_Subprogram 0x2
020a 0000 0000 | | .BLANK 0000[0x6]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213 | | .CONST 0x0213 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0001 | | .CONST 0x0001 ; Number of locals
0213 BODY_0210:
0213 INIT_0210:
0213 00db | | Load_Top At_Offset_3
0214 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0215 00db | | Load_Top At_Offset_3
0216 800c | | Call 0x0,0xc
0217 e5fe | | Load 0x2,-0x2
0218 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0219 4502 |E | Exit_Subprogram 0x2
021a 0000 0000 | | .BLANK 0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 00da | | Load_Top At_Offset_2
0224 e5fe | | Load 0x2,-0x2
0225 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0226 4502 |E | Exit_Subprogram 0x2
0227 0000 | | .XXX[0x1]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 00da | | Load_Top At_Offset_2
022c e5fe | | Load 0x2,-0x2
022d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
022e 4502 |E | Exit_Subprogram 0x2
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 e5fe | | Load 0x2,-0x2
0235 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0236 4502 |E | Exit_Subprogram 0x2
0237 0000 | | .XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 024a | J | .CONST 0x024a ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0006 | | .CONST 0x0006 ; Number of locals
023b INIT_0238:
023b e231 | 1 | Load 0x1,0x31
023c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
023d 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
023e e231 | 1 | Load 0x1,0x31
023f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0240 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0241 e231 | 1 | Load 0x1,0x31
0242 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0243 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0244 e22a | * | Load 0x1,0x2a
0245 0322 | " | Declare_Variable Record
0246 00d8 | | Load_Top At_Offset_0
0247 1c00 | | Execute_Immediate Run_Utility,0x0
0248 029f 05eb | | Declare_Subprogram For_Call,INIT_05e8
024a BODY_0238:
024a 480e |H | Short_Literal 0xe
024b 4800 |H | Short_Literal 0x0
024c 4800 |H | Short_Literal 0x0
024d e231 | 1 | Load 0x1,0x31
024e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
024f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0250 e5ff | | Load 0x2,-0x1
0251 e231 | 1 | Load 0x1,0x31
0252 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0253 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0254 a402 | | Store_Unchecked 0x2,0x2
0255 4807 |H | Short_Literal 0x7
0256 4800 |H | Short_Literal 0x0
0257 4800 |H | Short_Literal 0x0
0258 e231 | 1 | Load 0x1,0x31
0259 1b12 | | Execute Package,Field_Read,Field_Number 0x12
025a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
025b e5ff | | Load 0x2,-0x1
025c e231 | 1 | Load 0x1,0x31
025d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
025e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
025f a403 | | Store_Unchecked 0x2,0x3
0260 4806 |H | Short_Literal 0x6
0261 4800 |H | Short_Literal 0x0
0262 4800 |H | Short_Literal 0x0
0263 e231 | 1 | Load 0x1,0x31
0264 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0265 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0266 e5ff | | Load 0x2,-0x1
0267 e231 | 1 | Load 0x1,0x31
0268 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0269 1820 | | Execute Package,Field_Execute,Field_Number 0x20
026a 0033 | 3 | Store_Top Heap_Access,At_Offset_3
026b 00cf | | Action Mark_Auxiliary
026c 480e |H | Short_Literal 0xe
026d 4801 |H | Short_Literal 0x1
026e 0007 | | Action Break_Optional
026f 00d8 | | Load_Top At_Offset_0
0270 e402 | | Load 0x2,0x2
0271 e231 | 1 | Load 0x1,0x31
0272 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0273 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0274 6812 |h | Jump_Zero 0x287
0275 e405 | | Load 0x2,0x5
0276 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0277 00d9 | | Load_Top At_Offset_1
0278 00d8 | | Load_Top At_Offset_0
0279 00da | | Load_Top At_Offset_2
027a 01d7 | | Execute Vector,Field_Read
027b e5fe | | Load 0x2,-0x2
027c 00ea | | Load_Encached Null_String_Cache
027d e409 | | Load 0x2,0x9
027e e402 | | Load 0x2,0x2
027f e231 | 1 | Load 0x1,0x31
0280 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0281 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0282 8012 | | Call 0x0,0x12
0283 00d9 | | Load_Top At_Offset_1
0284 00db | | Load_Top At_Offset_3
0285 01d6 | | Execute Vector,Field_Write
0286 00d2 | | Pop_Control Pop_Count_2
0287 00c8 | | Action Pop_Auxiliary_Range
0288 3fe6 |? | Loop_Increasing 0x26f
0289 00c9 | | Action Pop_Auxiliary_Loop
028a 4806 |H | Short_Literal 0x6
028b 4801 |H | Short_Literal 0x1
028c 0007 | | Action Break_Optional
028d 00d8 | | Load_Top At_Offset_0
028e e404 | | Load 0x2,0x4
028f e231 | 1 | Load 0x1,0x31
0290 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0291 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0292 680d |h | Jump_Zero 0x2a0
0293 e5fe | | Load 0x2,-0x2
0294 00ea | | Load_Encached Null_String_Cache
0295 00da | | Load_Top At_Offset_2
0296 e404 | | Load 0x2,0x4
0297 e231 | 1 | Load 0x1,0x31
0298 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0299 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
029a 800c | | Call 0x0,0xc
029b 00d9 | | Load_Top At_Offset_1
029c 8232 | 2 | Call 0x1,0x32
029d e405 | | Load 0x2,0x5
029e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
029f 01d6 | | Execute Vector,Field_Write
02a0 00c8 | | Action Pop_Auxiliary_Range
02a1 3feb |? | Loop_Increasing 0x28d
02a2 00c9 | | Action Pop_Auxiliary_Loop
02a3 4807 |H | Short_Literal 0x7
02a4 4803 |H | Short_Literal 0x3
02a5 0007 | | Action Break_Optional
02a6 00d8 | | Load_Top At_Offset_0
02a7 e403 | | Load 0x2,0x3
02a8 e231 | 1 | Load 0x1,0x31
02a9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02aa 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02ab 6801 |h | Jump_Zero 0x2ad
02ac 8406 | | Call 0x2,0x6
02ad 00c8 | | Action Pop_Auxiliary_Range
02ae 3ff7 |? | Loop_Increasing 0x2a6
02af 00ce | | Action Pop_Auxiliary
02b0 e5fe | | Load 0x2,-0x2
02b1 00da | | Load_Top At_Offset_2
02b2 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02b3 00d9 | | Load_Top At_Offset_1
02b4 4402 |D | Exit_Subprogram With_Result,0x2
02b5 0000 0000 | | .XXX[0x3]
02b7 0000 | |
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bc | | .CONST 0x02bc ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0002 | | .CONST 0x0002 ; Number of locals
02bb INIT_02b8:
02bb 00e1 | | Load_Encached Boolean_Cache
02bc BODY_02b8:
02bc e5fe | | Load 0x2,-0x2
02bd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02be e5ff | | Load 0x2,-0x1
02bf 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02c0 8013 | | Call 0x0,0x13
02c1 681e |h | Jump_Zero 0x2e0
02c2 e5fe | | Load 0x2,-0x2
02c3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
02c4 e5ff | | Load 0x2,-0x1
02c5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
02c6 8014 | | Call 0x0,0x14
02c7 6816 |h | Jump_Zero 0x2de
02c8 e5fe | | Load 0x2,-0x2
02c9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02ca e5ff | | Load 0x2,-0x1
02cb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02cc 8013 | | Call 0x0,0x13
02cd 680e |h | Jump_Zero 0x2dc
02ce 00db | | Load_Top At_Offset_3
02cf 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
02d0 e5fe | | Load 0x2,-0x2
02d1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
02d2 027f | | Execute Discrete,Equal
02d3 6806 |h | Jump_Zero 0x2da
02d4 00db | | Load_Top At_Offset_3
02d5 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
02d6 e5fe | | Load 0x2,-0x2
02d7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
02d8 027f | | Execute Discrete,Equal
02d9 7807 |x | Jump 0x2e1
02da 4800 |H | Short_Literal 0x0
02db 7805 |x | Jump 0x2e1
02dc 4800 |H | Short_Literal 0x0
02dd 7803 |x | Jump 0x2e1
02de 4800 |H | Short_Literal 0x0
02df 7801 |x | Jump 0x2e1
02e0 4800 |H | Short_Literal 0x0
02e1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02e2 00d8 | | Load_Top At_Offset_0
02e3 680e |h | Jump_Zero 0x2f2
02e4 00db | | Load_Top At_Offset_3
02e5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02e6 e5fe | | Load 0x2,-0x2
02e7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02e8 01df | | Execute Vector,Equal
02e9 6806 |h | Jump_Zero 0x2f0
02ea 00db | | Load_Top At_Offset_3
02eb 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02ec e5fe | | Load 0x2,-0x2
02ed 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02ee 01df | | Execute Vector,Equal
02ef 7801 |x | Jump 0x2f1
02f0 4800 |H | Short_Literal 0x0
02f1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02f2 00d8 | | Load_Top At_Offset_0
02f3 4402 |D | Exit_Subprogram With_Result,0x2
02f4 0000 0000 | | .BLANK 0000[0x4]
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 00cf | | Action Mark_Auxiliary
02fc 480e |H | Short_Literal 0xe
02fd 4800 |H | Short_Literal 0x0
02fe 0007 | | Action Break_Optional
02ff e5fd | | Load 0x2,-0x3
0300 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0301 00d9 | | Load_Top At_Offset_1
0302 00d8 | | Load_Top At_Offset_0
0303 00da | | Load_Top At_Offset_2
0304 01d7 | | Execute Vector,Field_Read
0305 e5fe | | Load 0x2,-0x2
0306 e404 | | Load 0x2,0x4
0307 e5ff | | Load 0x2,-0x1
0308 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0309 01d7 | | Execute Vector,Field_Read
030a 8015 | | Call 0x0,0x15
030b 8012 | | Call 0x0,0x12
030c 00d9 | | Load_Top At_Offset_1
030d 00db | | Load_Top At_Offset_3
030e 01d6 | | Execute Vector,Field_Write
030f 00d2 | | Pop_Control Pop_Count_2
0310 00c8 | | Action Pop_Auxiliary_Range
0311 3fed |? | Loop_Increasing 0x2ff
0312 00c9 | | Action Pop_Auxiliary_Loop
0313 480e |H | Short_Literal 0xe
0314 4800 |H | Short_Literal 0x0
0315 0007 | | Action Break_Optional
0316 e5fe | | Load 0x2,-0x2
0317 00d9 | | Load_Top At_Offset_1
0318 e5ff | | Load 0x2,-0x1
0319 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
031a 01d7 | | Execute Vector,Field_Read
031b 8011 | | Call 0x0,0x11
031c 800c | | Call 0x0,0xc
031d 00d9 | | Load_Top At_Offset_1
031e e5fd | | Load 0x2,-0x3
031f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0320 01d6 | | Execute Vector,Field_Write
0321 00c8 | | Action Pop_Auxiliary_Range
0322 3ff3 |? | Loop_Increasing 0x316
0323 00ce | | Action Pop_Auxiliary
0324 00db | | Load_Top At_Offset_3
0325 00db | | Load_Top At_Offset_3
0326 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0327 8011 | | Call 0x0,0x11
0328 800c | | Call 0x0,0xc
0329 e5fd | | Load 0x2,-0x3
032a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
032b 00da | | Load_Top At_Offset_2
032c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
032d e5fd | | Load 0x2,-0x3
032e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
032f 00db | | Load_Top At_Offset_3
0330 00db | | Load_Top At_Offset_3
0331 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0332 8011 | | Call 0x0,0x11
0333 800c | | Call 0x0,0xc
0334 e5fd | | Load 0x2,-0x3
0335 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0336 00da | | Load_Top At_Offset_2
0337 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0338 e5fd | | Load 0x2,-0x3
0339 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
033a 00da | | Load_Top At_Offset_2
033b 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
033c e5fd | | Load 0x2,-0x3
033d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
033e 00db | | Load_Top At_Offset_3
033f e5fd | | Load 0x2,-0x3
0340 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0341 4503 |E | Exit_Subprogram 0x3
0342 0000 0000 | | .BLANK 0000[0x6]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034f | O | .CONST 0x034f ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0002 | | .CONST 0x0002 ; Number of locals
034b INIT_0348:
034b e22c | , | Load 0x1,0x2c
034c 0322 | " | Declare_Variable Record
034d 00d8 | | Load_Top At_Offset_0
034e 1c00 | | Execute_Immediate Run_Utility,0x0
034f BODY_0348:
034f 00db | | Load_Top At_Offset_3
0350 00d9 | | Load_Top At_Offset_1
0351 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0352 4801 |H | Short_Literal 0x1
0353 00d9 | | Load_Top At_Offset_1
0354 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0355 00d8 | | Load_Top At_Offset_0
0356 00d9 | | Load_Top At_Offset_1
0357 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0358 8234 | 4 | Call 0x1,0x34
0359 00d1 | | Pop_Control Pop_Count_1
035a 00d8 | | Load_Top At_Offset_0
035b 4401 |D | Exit_Subprogram With_Result,0x1
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 00da | | Load_Top At_Offset_2
0364 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0365 4401 |D | Exit_Subprogram With_Result,0x1
0366 0000 0000 | | .XXX[0x2]
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 4801 |H | Short_Literal 0x1
036c 00db | | Load_Top At_Offset_3
036d 8226 | & | Call 0x1,0x26
036e 4401 |D | Exit_Subprogram With_Result,0x1
036f 0000 | | .XXX[0x1]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 037f | | .CONST 0x037f ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0004 | | .CONST 0x0004 ; Number of locals
0373 INIT_0370:
0373 00da | | Load_Top At_Offset_2
0374 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0375 e22b | + | Load 0x1,0x2b
0376 011c | | Execute Any,Convert_Unchecked
0377 1c01 | | Execute_Immediate Run_Utility,0x1
0378 0092 07aa | | Action Push_String_Extended,0x7aa ; "=>"
037a 01cc | | Execute Vector,Catenate
037b 029f 061b | | Declare_Subprogram For_Call,INIT_0618
037d 029f 062b | +| Declare_Subprogram For_Call,INIT_0628
037f BODY_0370:
037f e5ff | | Load 0x2,-0x1
0380 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0381 e22e | . | Load 0x1,0x2e
0382 01d7 | | Execute Vector,Field_Read
0383 6802 |h | Jump_Zero 0x386
0384 8403 | | Call 0x2,0x3
0385 7801 |x | Jump 0x387
0386 8404 | | Call 0x2,0x4
0387 0831 | 1 | Execute_Immediate Raise,0x31
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2
038c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
038d 7023 |p# | Jump_Nonzero 0x3b1
038e 00da | | Load_Top At_Offset_2
038f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0390 e22e | . | Load 0x1,0x2e
0391 01d7 | | Execute Vector,Field_Read
0392 680b |h | Jump_Zero 0x39e
0393 00da | | Load_Top At_Offset_2
0394 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0395 00db | | Load_Top At_Offset_3
0396 8236 | 6 | Call 0x1,0x36
0397 7006 |p | Jump_Nonzero 0x39e
0398 00da | | Load_Top At_Offset_2
0399 00db | | Load_Top At_Offset_3
039a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
039b 8235 | 5 | Call 0x1,0x35
039c 00d1 | | Pop_Control Pop_Count_1
039d 4501 |E | Exit_Subprogram 0x1
039e 00da | | Load_Top At_Offset_2
039f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03a0 0f07 | | Execute_Immediate Equal,0x7
03a1 6804 |h | Jump_Zero 0x3a6
03a2 4801 |H | Short_Literal 0x1
03a3 00db | | Load_Top At_Offset_3
03a4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03a5 4501 |E | Exit_Subprogram 0x1
03a6 e22b | + | Load 0x1,0x2b
03a7 00db | | Load_Top At_Offset_3
03a8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03a9 0268 | h | Execute Discrete,Successor
03aa 00db | | Load_Top At_Offset_3
03ab 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03ac 00da | | Load_Top At_Offset_2
03ad 00db | | Load_Top At_Offset_3
03ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03af 8234 | 4 | Call 0x1,0x34
03b0 00d1 | | Pop_Control Pop_Count_1
03b1 4501 |E | Exit_Subprogram 0x1
03b2 0000 0000 | | .BLANK 0000[0x6]
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 4607 |F | Jump_Case 0x7
03bc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
03bd 7807 |x | Jump 0x3c5 ; case 0x1
03be 780a |x | Jump 0x3c9 ; case 0x2
03bf 780e |x | Jump 0x3ce ; case 0x3
03c0 7811 |x | Jump 0x3d2 ; case 0x4
03c1 7812 |x | Jump 0x3d4 ; case 0x5
03c2 7813 |x | Jump 0x3d6 ; case 0x6
03c3 7816 |x | Jump 0x3da ; case 0x7
03c4 4302 |C | .XXX[0x1]
03c5 00da | | Load_Top At_Offset_2
03c6 0091 0798 | | Action Push_String_Extended_Indexed,0x798 ; "NONE"
03c8 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
03c9 00db | | Load_Top At_Offset_3
03ca 00db | | Load_Top At_Offset_3
03cb 00e0 | | Load_Encached Standard_Cache
03cc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03cd 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03ce 00da | | Load_Top At_Offset_2
03cf 00e0 | | Load_Encached Standard_Cache
03d0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03d1 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
03d2 00db | | Load_Top At_Offset_3
03d3 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03d4 00db | | Load_Top At_Offset_3
03d5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03d6 e22b | + | Load 0x1,0x2b
03d7 00dc | | Load_Top At_Offset_4
03d8 0267 | g | Execute Discrete,Predecessor
03d9 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03da e22b | + | Load 0x1,0x2b
03db 00dc | | Load_Top At_Offset_4
03dc 0268 | h | Execute Discrete,Successor
03dd 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
03de 0000 0000 | | .XXX[0x2]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03f1 | | .CONST 0x03f1 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0003 | | .CONST 0x0003 ; Number of locals
03e3 INIT_03e0:
03e3 4801 |H | Short_Literal 0x1
03e4 00db | | Load_Top At_Offset_3
03e5 01db | | Execute Vector,Length
03e6 0901 | | Execute_Immediate Binary_Scale,0x1
03e7 00d8 | | Load_Top At_Offset_0
03e8 00e2 | | Load_Encached Integer_Cache
03e9 0260 | ` | Execute Discrete,In_Type
03ea 7001 |p | Jump_Nonzero 0x3ec
03eb 0801 | | Execute_Immediate Raise,0x1
03ec 00e9 | | Load_Encached String_Cache
03ed 035b | [ | Declare_Type Array,Constrained
03ee 0337 | 7 | Declare_Variable Array
03ef 00e3 | | Load_Encached Natural_Cache
03f0 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
03f1 BODY_03e0:
03f1 e5ff | | Load 0x2,-0x1
03f2 01db | | Execute Vector,Length
03f3 7002 |p | Jump_Nonzero 0x3f6
03f4 00ea | | Load_Encached Null_String_Cache
03f5 4402 |D | Exit_Subprogram With_Result,0x2
03f6 00cf | | Action Mark_Auxiliary
03f7 e5ff | | Load 0x2,-0x1
03f8 01dc | | Execute Vector,Last
03f9 e5ff | | Load 0x2,-0x1
03fa 01dd | | Execute Vector,First
03fb 0263 | c | Execute Discrete,Above_Bound
03fc 7041 |pA | Jump_Nonzero 0x43e
03fd 00d8 | | Load_Top At_Offset_0
03fe e5ff | | Load 0x2,-0x1
03ff 01d7 | | Execute Vector,Field_Read
0400 00d8 | | Load_Top At_Offset_0
0401 0d5b | [ | Execute_Immediate Less,0x5b
0402 700b |p | Jump_Nonzero 0x40e
0403 00d8 | | Load_Top At_Offset_0
0404 0c5e | ^ | Execute_Immediate Greater_Equal,0x5e
0405 7003 |p | Jump_Nonzero 0x409
0406 0f5c | \ | Execute_Immediate Equal,0x5c
0407 702b |p+ | Jump_Nonzero 0x433
0408 780b |x | Jump 0x414
0409 0b7b | { | Execute_Immediate Case_Compare,0x7b
040a 7008 |p | Jump_Nonzero 0x413
040b 0f7d | } | Execute_Immediate Equal,0x7d
040c 7007 |p | Jump_Nonzero 0x414
040d 7825 |x% | Jump 0x433
040e 4828 |H( | Short_Literal 0x28
040f 4829 |H) | Short_Literal 0x29
0410 0262 | b | Execute Discrete,In_Range
0411 7002 |p | Jump_Nonzero 0x414
0412 7820 |x | Jump 0x433
0413 00d1 | | Pop_Control Pop_Count_1
0414 00cf | | Action Mark_Auxiliary
0415 e5fe | | Load 0x2,-0x2
0416 0a01 | | Execute_Immediate Plus,0x1
0417 00d8 | | Load_Top At_Offset_0
0418 00e2 | | Load_Encached Integer_Cache
0419 0260 | ` | Execute Discrete,In_Type
041a 7001 |p | Jump_Nonzero 0x41c
041b 0801 | | Execute_Immediate Raise,0x1
041c 4801 |H | Short_Literal 0x1
041d 0263 | c | Execute Discrete,Above_Bound
041e 7009 |p | Jump_Nonzero 0x428
041f 485c |H\ | Short_Literal 0x5c
0420 e403 | | Load 0x2,0x3
0421 e402 | | Load 0x2,0x2
0422 01d6 | | Execute Vector,Field_Write
0423 e403 | | Load 0x2,0x3
0424 0a01 | | Execute_Immediate Plus,0x1
0425 c403 | | Store 0x2,0x3
0426 00c8 | | Action Pop_Auxiliary_Range
0427 3ff7 |? | Loop_Increasing 0x41f
0428 00ce | | Action Pop_Auxiliary
0429 00d8 | | Load_Top At_Offset_0
042a e5ff | | Load 0x2,-0x1
042b 01d7 | | Execute Vector,Field_Read
042c e403 | | Load 0x2,0x3
042d e402 | | Load 0x2,0x2
042e 01d6 | | Execute Vector,Field_Write
042f 00db | | Load_Top At_Offset_3
0430 0a01 | | Execute_Immediate Plus,0x1
0431 c403 | | Store 0x2,0x3
0432 7809 |x | Jump 0x43c
0433 00d8 | | Load_Top At_Offset_0
0434 e5ff | | Load 0x2,-0x1
0435 01d7 | | Execute Vector,Field_Read
0436 e403 | | Load 0x2,0x3
0437 e402 | | Load 0x2,0x2
0438 01d6 | | Execute Vector,Field_Write
0439 00db | | Load_Top At_Offset_3
043a 0a01 | | Execute_Immediate Plus,0x1
043b c403 | | Store 0x2,0x3
043c 00c8 | | Action Pop_Auxiliary_Range
043d 3fbf |? | Loop_Increasing 0x3fd
043e 00ce | | Action Pop_Auxiliary
043f 4829 |H) | Short_Literal 0x29
0440 4828 |H( | Short_Literal 0x28
0441 4801 |H | Short_Literal 0x1
0442 00db | | Load_Top At_Offset_3
0443 0aff | | Execute_Immediate Plus,-0x1
0444 e402 | | Load 0x2,0x2
0445 01cf | | Execute Vector,Slice_Read
0446 01ca | | Execute Vector,Prepend
0447 01cb | | Execute Vector,Append
0448 00e9 | | Load_Encached String_Cache
0449 01c6 | | Execute Vector,Convert_To_Formal
044a 4402 |D | Exit_Subprogram With_Result,0x2
044b 0000 0000 | | .BLANK 0000[0x5]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0455 | U | .CONST 0x0455 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0002 | | .CONST 0x0002 ; Number of locals
0453 INIT_0450:
0453 e002 | | Load 0x0,0x2
0454 0007 | | Action Break_Optional
0455 BODY_0450:
0455 00d8 | | Load_Top At_Offset_0
0456 e5fe | | Load 0x2,-0x2
0457 e5ff | | Load 0x2,-0x1
0458 8016 | | Call 0x0,0x16
0459 0031 | 1 | Store_Top Heap_Access,At_Offset_1
045a 00d8 | | Load_Top At_Offset_0
045b 4402 |D | Exit_Subprogram With_Result,0x2
045c 0000 0000 | | .BLANK 0000[0x4]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0470 | p | .CONST 0x0470 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0003 | | .CONST 0x0003 ; Number of locals
0463 INIT_0460:
0463 00da | | Load_Top At_Offset_2
0464 e231 | 1 | Load 0x1,0x31
0465 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0466 011c | | Execute Any,Convert_Unchecked
0467 1c01 | | Execute_Immediate Run_Utility,0x1
0468 4801 |H | Short_Literal 0x1
0469 00d9 | | Load_Top At_Offset_1
046a 0092 07ab | | Action Push_String_Extended,0x7ab ; "_params"
046c e017 | | Load 0x0,0x17
046d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
046e 00e3 | | Load_Encached Natural_Cache
046f 03f1 | | Declare_Variable Discrete,With_Value
0470 BODY_0460:
0470 00d9 | | Load_Top At_Offset_1
0471 01dd | | Execute Vector,First
0472 00d9 | | Load_Top At_Offset_1
0473 0aff | | Execute_Immediate Plus,-0x1
0474 00db | | Load_Top At_Offset_3
0475 01cf | | Execute Vector,Slice_Read
0476 0092 07ac | | Action Push_String_Extended,0x7ac ; "_handle"
0478 01cc | | Execute Vector,Catenate
0479 e20f | | Load 0x1,0xf
047a 1c02 | | Execute_Immediate Run_Utility,0x2
047b 4401 |D | Exit_Subprogram With_Result,0x1
047c 0000 0000 | | .BLANK 0000[0x4]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 048f | | .CONST 0x048f ; Address of begin
0481 049c | | .CONST 0x049c ; Address of exception handler
0482 0003 | | .CONST 0x0003 ; Number of locals
0483 INIT_0480:
0483 00da | | Load_Top At_Offset_2
0484 e20f | | Load 0x1,0xf
0485 011c | | Execute Any,Convert_Unchecked
0486 1c01 | | Execute_Immediate Run_Utility,0x1
0487 4801 |H | Short_Literal 0x1
0488 00d9 | | Load_Top At_Offset_1
0489 0092 07ac | | Action Push_String_Extended,0x7ac ; "_handle"
048b e017 | | Load 0x0,0x17
048c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
048d 00e3 | | Load_Encached Natural_Cache
048e 03f1 | | Declare_Variable Discrete,With_Value
048f BODY_0480:
048f 00d9 | | Load_Top At_Offset_1
0490 01dd | | Execute Vector,First
0491 00d9 | | Load_Top At_Offset_1
0492 0aff | | Execute_Immediate Plus,-0x1
0493 00db | | Load_Top At_Offset_3
0494 01cf | | Execute Vector,Slice_Read
0495 0092 07ab | | Action Push_String_Extended,0x7ab ; "_params"
0497 01cc | | Execute Vector,Catenate
0498 e231 | 1 | Load 0x1,0x31
0499 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049a 1c02 | | Execute_Immediate Run_Utility,0x2
049b 4401 |D | Exit_Subprogram With_Result,0x1
049c TRAP_0480:
049c 010e | | Execute Exception,Is_Constraint_Error
049d 6802 |h | Jump_Zero 0x4a0
049e 4800 |H | Short_Literal 0x0
049f 4401 |D | Exit_Subprogram With_Result,0x1
04a0 0100 | | Execute Exception,Raise
04a1 0000 0000 | | .BLANK 0000[0x7]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab 00da | | Load_Top At_Offset_2
04ac 4801 |H | Short_Literal 0x1
04ad 4802 |H | Short_Literal 0x2
04ae 0262 | b | Execute Discrete,In_Range
04af 7001 |p | Jump_Nonzero 0x4b1
04b0 7803 |x | Jump 0x4b4
04b1 4801 |H | Short_Literal 0x1
04b2 e5fe | | Load 0x2,-0x2
04b3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
04b4 4801 |H | Short_Literal 0x1
04b5 e5fe | | Load 0x2,-0x2
04b6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04b7 4502 |E | Exit_Subprogram 0x2
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb | | .CONST 0x04bb ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 0001 | | .CONST 0x0001 ; Number of locals
04bb BODY_04b8:
04bb INIT_04b8:
04bb 00da | | Load_Top At_Offset_2
04bc 4801 |H | Short_Literal 0x1
04bd 4802 |H | Short_Literal 0x2
04be 0262 | b | Execute Discrete,In_Range
04bf 7001 |p | Jump_Nonzero 0x4c1
04c0 780e |x | Jump 0x4cf
04c1 00db | | Load_Top At_Offset_3
04c2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04c3 0f0e | | Execute_Immediate Equal,0xe
04c4 6804 |h | Jump_Zero 0x4c9
04c5 4800 |H | Short_Literal 0x0
04c6 e5fe | | Load 0x2,-0x2
04c7 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
04c8 7806 |x | Jump 0x4cf
04c9 e20f | | Load 0x1,0xf
04ca e5fe | | Load 0x2,-0x2
04cb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04cc 0268 | h | Execute Discrete,Successor
04cd e5fe | | Load 0x2,-0x2
04ce 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
04cf 4800 |H | Short_Literal 0x0
04d0 e5fe | | Load 0x2,-0x2
04d1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04d2 4502 |E | Exit_Subprogram 0x2
04d3 0000 0000 | | .BLANK 0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db 00db | | Load_Top At_Offset_3
04dc 4801 |H | Short_Literal 0x1
04dd 4802 |H | Short_Literal 0x2
04de 0262 | b | Execute Discrete,In_Range
04df 7003 |p | Jump_Nonzero 0x4e3
04e0 7800 |x | Jump 0x4e1
04e1 4801 |H | Short_Literal 0x1
04e2 4402 |D | Exit_Subprogram With_Result,0x2
04e3 00da | | Load_Top At_Offset_2
04e4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04e5 0f00 | | Execute_Immediate Equal,0x0
04e6 4402 |D | Exit_Subprogram With_Result,0x2
04e7 0000 | | .XXX[0x1]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb | | .CONST 0x04eb ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0001 | | .CONST 0x0001 ; Number of locals
04eb BODY_04e8:
04eb INIT_04e8:
04eb 00db | | Load_Top At_Offset_3
04ec 4607 |F | Jump_Case 0x7
04ed 780e |x | Jump 0x4fc ; case 0x0
04ee 780d |x | Jump 0x4fc ; case 0x1
04ef 780c |x | Jump 0x4fc ; case 0x2
04f0 780d |x | Jump 0x4fe ; case 0x3
04f1 781a |x | Jump 0x50c ; case 0x4
04f2 7812 |x | Jump 0x505 ; case 0x5
04f3 781d |x | Jump 0x511 ; case 0x6
04f4 7800 |x | Jump 0x4f5 ; case 0x7
04f5 00da | | Load_Top At_Offset_2
04f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
04f7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
04f8 00e1 | | Load_Encached Boolean_Cache
04f9 011c | | Execute Any,Convert_Unchecked
04fa 1c01 | | Execute_Immediate Run_Utility,0x1
04fb 4403 |D | Exit_Subprogram With_Result,0x3
04fc 00ea | | Load_Encached Null_String_Cache
04fd 4403 |D | Exit_Subprogram With_Result,0x3
04fe e5fd | | Load 0x2,-0x3
04ff 00db | | Load_Top At_Offset_3
0500 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0501 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0502 8011 | | Call 0x0,0x11
0503 822f | / | Call 0x1,0x2f
0504 4403 |D | Exit_Subprogram With_Result,0x3
0505 e5fd | | Load 0x2,-0x3
0506 00db | | Load_Top At_Offset_3
0507 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0508 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0509 8011 | | Call 0x0,0x11
050a 822f | / | Call 0x1,0x2f
050b 4403 |D | Exit_Subprogram With_Result,0x3
050c 00da | | Load_Top At_Offset_2
050d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
050e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
050f 8018 | | Call 0x0,0x18
0510 4403 |D | Exit_Subprogram With_Result,0x3
0511 00da | | Load_Top At_Offset_2
0512 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0513 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0514 e210 | | Load 0x1,0x10
0515 011c | | Execute Any,Convert_Unchecked
0516 1c01 | | Execute_Immediate Run_Utility,0x1
0517 4403 |D | Exit_Subprogram With_Result,0x3
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051f | | .CONST 0x051f ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0003 | | .CONST 0x0003 ; Number of locals
051b INIT_0518:
051b 029f 0643 | C| Declare_Subprogram For_Call,INIT_0640
051d 029f 0663 | c| Declare_Subprogram For_Call,INIT_0660
051f BODY_0518:
051f e5fe | | Load 0x2,-0x2
0520 e5ff | | Load 0x2,-0x1
0521 8236 | 6 | Call 0x1,0x36
0522 6802 |h | Jump_Zero 0x525
0523 00ea | | Load_Encached Null_String_Cache
0524 4403 |D | Exit_Subprogram With_Result,0x3
0525 e5fe | | Load 0x2,-0x2
0526 4607 |F | Jump_Case 0x7
0527 7807 |x | Jump 0x52f ; case 0x0
0528 7808 |x | Jump 0x531 ; case 0x1
0529 7809 |x | Jump 0x533 ; case 0x2
052a 7804 |x | Jump 0x52f ; case 0x3
052b 7803 |x | Jump 0x52f ; case 0x4
052c 7802 |x | Jump 0x52f ; case 0x5
052d 7801 |x | Jump 0x52f ; case 0x6
052e 7800 |x | Jump 0x52f ; case 0x7
052f 00ea | | Load_Encached Null_String_Cache
0530 4403 |D | Exit_Subprogram With_Result,0x3
0531 8402 | | Call 0x2,0x2
0532 7801 |x | Jump 0x534
0533 8403 | | Call 0x2,0x3
0534 0831 | 1 | Execute_Immediate Raise,0x31
0535 0000 0000 | | .XXX[0x3]
0537 0000 | |
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b 4607 |F | Jump_Case 0x7
053c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
053d 7807 |x | Jump 0x545 ; case 0x1
053e 780a |x | Jump 0x549 ; case 0x2
053f 780e |x | Jump 0x54e ; case 0x3
0540 7811 |x | Jump 0x552 ; case 0x4
0541 7812 |x | Jump 0x554 ; case 0x5
0542 7813 |x | Jump 0x556 ; case 0x6
0543 7816 |x | Jump 0x55a ; case 0x7
0544 4302 |C | .XXX[0x1]
0545 00da | | Load_Top At_Offset_2
0546 0091 07a0 | | Action Push_String_Extended_Indexed,0x7a0 ; "PSIMPLE_TEST_CASE"
0548 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0549 00db | | Load_Top At_Offset_3
054a 00db | | Load_Top At_Offset_3
054b 00e0 | | Load_Encached Standard_Cache
054c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
054d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
054e 00da | | Load_Top At_Offset_2
054f 00e0 | | Load_Encached Standard_Cache
0550 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0551 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0552 00db | | Load_Top At_Offset_3
0553 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0554 00db | | Load_Top At_Offset_3
0555 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0556 e402 | | Load 0x2,0x2
0557 00dc | | Load_Top At_Offset_4
0558 0267 | g | Execute Discrete,Predecessor
0559 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
055a e402 | | Load 0x2,0x2
055b 00dc | | Load_Top At_Offset_4
055c 0268 | h | Execute Discrete,Successor
055d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
055e 0000 0000 | | .XXX[0x2]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 00da | | Load_Top At_Offset_2
0564 7006 |p | Jump_Nonzero 0x56b
0565 480a |H | Short_Literal 0xa
0566 e5fe | | Load 0x2,-0x2
0567 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0568 01d7 | | Execute Vector,Field_Read
0569 8015 | | Call 0x0,0x15
056a 4401 |D | Exit_Subprogram With_Result,0x1
056b 0092 07ad | | Action Push_String_Extended,0x7ad ; "<output_compare>"
056d 4401 |D | Exit_Subprogram With_Result,0x1
056e 0000 0000 | | .XXX[0x2]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 e5fc | | Load 0x2,-0x4
0574 6803 |h | Jump_Zero 0x578
0575 00da | | Load_Top At_Offset_2
0576 8019 | | Call 0x0,0x19
0577 4401 |D | Exit_Subprogram With_Result,0x1
0578 00da | | Load_Top At_Offset_2
0579 4401 |D | Exit_Subprogram With_Result,0x1
057a 0000 0000 | | .BLANK 0000[0x6]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0585 | | .CONST 0x0585 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0002 | | .CONST 0x0002 ; Number of locals
0583 INIT_0580:
0583 029f 067b | {| Declare_Subprogram For_Call,INIT_0678
0585 BODY_0580:
0585 e5fc | | Load 0x2,-0x4
0586 6802 |h | Jump_Zero 0x589
0587 8602 | | Call 0x3,0x2
0588 7802 |x | Jump 0x58b
0589 00db | | Load_Top At_Offset_3
058a 4401 |D | Exit_Subprogram With_Result,0x1
058b 0831 | 1 | Execute_Immediate Raise,0x31
058c 0000 0000 | | .BLANK 0000[0x4]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 059c | | .CONST 0x059c ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0004 | | .CONST 0x0004 ; Number of locals
0593 INIT_0590:
0593 e5ff | | Load 0x2,-0x1
0594 e5fe | | Load 0x2,-0x2
0595 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0596 01d7 | | Execute Vector,Field_Read
0597 0007 | | Action Break_Optional
0598 00d8 | | Load_Top At_Offset_0
0599 8015 | | Call 0x0,0x15
059a 029f 0693 | | Declare_Subprogram For_Call,INIT_0690
059c BODY_0590:
059c 00d9 | | Load_Top At_Offset_1
059d 01db | | Execute Vector,Length
059e 7003 |p | Jump_Nonzero 0x5a2
059f 8010 | | Call 0x0,0x10
05a0 00cb | | Action Pop_Block_With_Result
05a1 4404 |D | Exit_Subprogram With_Result,0x4
05a2 e5fd | | Load 0x2,-0x3
05a3 6802 |h | Jump_Zero 0x5a6
05a4 8604 | | Call 0x3,0x4
05a5 4501 |E | Exit_Subprogram 0x1
05a6 00da | | Load_Top At_Offset_2
05a7 8405 | | Call 0x2,0x5
05a8 00cb | | Action Pop_Block_With_Result
05a9 4404 |D | Exit_Subprogram With_Result,0x4
05aa 0000 0000 | | .BLANK 0000[0x6]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05c2 | | .CONST 0x05c2 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0004 | | .CONST 0x0004 ; Number of locals
05b3 INIT_05b0:
05b3 e01a | | Load 0x0,0x1a
05b4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05b5 e01b | | Load 0x0,0x1b
05b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05b7 4802 |H | Short_Literal 0x2
05b8 801c | | Call 0x0,0x1c
05b9 e5fe | | Load 0x2,-0x2
05ba 8015 | | Call 0x0,0x15
05bb 4801 |H | Short_Literal 0x1
05bc 00d9 | | Load_Top At_Offset_1
05bd 00db | | Load_Top At_Offset_3
05be e017 | | Load 0x0,0x17
05bf 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05c0 00e3 | | Load_Encached Natural_Cache
05c1 03f1 | | Declare_Variable Discrete,With_Value
05c2 BODY_05b0:
05c2 00d8 | | Load_Top At_Offset_0
05c3 7009 |p | Jump_Nonzero 0x5cd
05c4 e5fd | | Load 0x2,-0x3
05c5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
05c6 e5fe | | Load 0x2,-0x2
05c7 8230 | 0 | Call 0x1,0x30
05c8 e5ff | | Load 0x2,-0x1
05c9 e5fd | | Load 0x2,-0x3
05ca 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
05cb 01d6 | | Execute Vector,Field_Write
05cc 4501 |E | Exit_Subprogram 0x1
05cd e5fd | | Load 0x2,-0x3
05ce 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
05cf 00da | | Load_Top At_Offset_2
05d0 01dd | | Execute Vector,First
05d1 e602 | | Load 0x3,0x2
05d2 01db | | Execute Vector,Length
05d3 0273 | s | Execute Discrete,Plus
05d4 0a01 | | Execute_Immediate Plus,0x1
05d5 00d8 | | Load_Top At_Offset_0
05d6 00e2 | | Load_Encached Integer_Cache
05d7 0260 | ` | Execute Discrete,In_Type
05d8 7001 |p | Jump_Nonzero 0x5da
05d9 0801 | | Execute_Immediate Raise,0x1
05da 00db | | Load_Top At_Offset_3
05db 01dc | | Execute Vector,Last
05dc e603 | | Load 0x3,0x3
05dd 01cf | | Execute Vector,Slice_Read
05de 800c | | Call 0x0,0xc
05df e5ff | | Load 0x2,-0x1
05e0 e5fd | | Load 0x2,-0x3
05e1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
05e2 01d6 | | Execute Vector,Field_Write
05e3 4501 |E | Exit_Subprogram 0x1
05e4 0000 0000 | | .BLANK 0000[0x4]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f5 | | .CONST 0x05f5 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0004 | | .CONST 0x0004 ; Number of locals
05eb INIT_05e8:
05eb 00ea | | Load_Encached Null_String_Cache
05ec e409 | | Load 0x2,0x9
05ed e403 | | Load 0x2,0x3
05ee e231 | 1 | Load 0x1,0x31
05ef 1b12 | | Execute Package,Field_Read,Field_Number 0x12
05f0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05f1 029f 06b3 | | Declare_Subprogram For_Call,INIT_06b0
05f3 029f 06c3 | | Declare_Subprogram For_Call,INIT_06c0
05f5 BODY_05e8:
05f5 e409 | | Load 0x2,0x9
05f6 0afd | | Execute_Immediate Plus,-0x3
05f7 4604 |F | Jump_Case 0x4
05f8 7806 |x | Jump 0x5ff ; case 0x0
05f9 780b |x | Jump 0x605 ; case 0x1
05fa 7810 |x | Jump 0x60b ; case 0x2
05fb 7815 |x | Jump 0x611 ; case 0x3
05fc 7800 |x | Jump 0x5fd ; case 0x4
05fd 8604 | | Call 0x3,0x4
05fe 4501 |E | Exit_Subprogram 0x1
05ff e5fe | | Load 0x2,-0x2
0600 00db | | Load_Top At_Offset_3
0601 800c | | Call 0x0,0xc
0602 e405 | | Load 0x2,0x5
0603 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0604 4501 |E | Exit_Subprogram 0x1
0605 e5fe | | Load 0x2,-0x2
0606 00db | | Load_Top At_Offset_3
0607 801d | | Call 0x0,0x1d
0608 e405 | | Load 0x2,0x5
0609 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
060a 4501 |E | Exit_Subprogram 0x1
060b e5fe | | Load 0x2,-0x2
060c 00db | | Load_Top At_Offset_3
060d 800c | | Call 0x0,0xc
060e e405 | | Load 0x2,0x5
060f 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0610 4501 |E | Exit_Subprogram 0x1
0611 8603 | | Call 0x3,0x3
0612 4501 |E | Exit_Subprogram 0x1
0613 0000 0000 | | .BLANK 0000[0x5]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0620 | | .CONST 0x0620 ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0002 | | .CONST 0x0002 ; Number of locals
061b INIT_0618:
061b e5fe | | Load 0x2,-0x2
061c e5ff | | Load 0x2,-0x1
061d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
061e e5ff | | Load 0x2,-0x1
061f 8238 | 8 | Call 0x1,0x38
0620 BODY_0618:
0620 00d8 | | Load_Top At_Offset_0
0621 00cb | | Action Pop_Block_With_Result
0622 4402 |D | Exit_Subprogram With_Result,0x2
0623 0000 0000 | | .BLANK 0000[0x5]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 0630 | 0 | .CONST 0x0630 ; Address of begin
0629 0004 | | .CONST 0x0004 ; Address of exception handler
062a 0002 | | .CONST 0x0002 ; Number of locals
062b INIT_0628:
062b e5fe | | Load 0x2,-0x2
062c e5ff | | Load 0x2,-0x1
062d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
062e e5ff | | Load 0x2,-0x1
062f 8237 | 7 | Call 0x1,0x37
0630 BODY_0628:
0630 00d8 | | Load_Top At_Offset_0
0631 01db | | Execute Vector,Length
0632 6805 |h | Jump_Zero 0x638
0633 e402 | | Load 0x2,0x2
0634 00d9 | | Load_Top At_Offset_1
0635 01cc | | Execute Vector,Catenate
0636 00cb | | Action Pop_Block_With_Result
0637 4402 |D | Exit_Subprogram With_Result,0x2
0638 00ea | | Load_Encached Null_String_Cache
0639 00cb | | Action Pop_Block_With_Result
063a 4402 |D | Exit_Subprogram With_Result,0x2
063b 0000 0000 | | .BLANK 0000[0x5]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064a | J | .CONST 0x064a ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0002 | | .CONST 0x0002 ; Number of locals
0643 INIT_0640:
0643 e5ff | | Load 0x2,-0x1
0644 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0645 e5ff | | Load 0x2,-0x1
0646 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0647 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0648 01d7 | | Execute Vector,Field_Read
0649 8011 | | Call 0x0,0x11
064a BODY_0640:
064a 00d8 | | Load_Top At_Offset_0
064b 01db | | Execute Vector,Length
064c 680e |h | Jump_Zero 0x65b
064d e5ff | | Load 0x2,-0x1
064e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
064f e20f | | Load 0x1,0xf
0650 011c | | Execute Any,Convert_Unchecked
0651 1c01 | | Execute_Immediate Run_Utility,0x1
0652 0092 07aa | | Action Push_String_Extended,0x7aa ; "=>"
0654 01cc | | Execute Vector,Catenate
0655 e5fd | | Load 0x2,-0x3
0656 00da | | Load_Top At_Offset_2
0657 822f | / | Call 0x1,0x2f
0658 01cc | | Execute Vector,Catenate
0659 00cb | | Action Pop_Block_With_Result
065a 4403 |D | Exit_Subprogram With_Result,0x3
065b 00ea | | Load_Encached Null_String_Cache
065c 00cb | | Action Pop_Block_With_Result
065d 4403 |D | Exit_Subprogram With_Result,0x3
065e 0000 0000 | | .XXX[0x2]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0668 | h | .CONST 0x0668 ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0003 | | .CONST 0x0003 ; Number of locals
0663 INIT_0660:
0663 e5ff | | Load 0x2,-0x1
0664 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0665 8233 | 3 | Call 0x1,0x33
0666 029f 06d3 | | Declare_Subprogram For_Call,INIT_06d0
0668 BODY_0660:
0668 00d9 | | Load_Top At_Offset_1
0669 e231 | 1 | Load 0x1,0x31
066a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
066b 0260 | ` | Execute Discrete,In_Type
066c 6802 |h | Jump_Zero 0x66f
066d 8603 | | Call 0x3,0x3
066e 4501 |E | Exit_Subprogram 0x1
066f 00ea | | Load_Encached Null_String_Cache
0670 00cb | | Action Pop_Block_With_Result
0671 4403 |D | Exit_Subprogram With_Result,0x3
0672 0000 0000 | | .BLANK 0000[0x6]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067e | ~ | .CONST 0x067e ; Address of begin
0679 0004 | | .CONST 0x0004 ; Address of exception handler
067a 0002 | | .CONST 0x0002 ; Number of locals
067b INIT_0678:
067b e7ff | | Load 0x3,-0x1
067c 8015 | | Call 0x0,0x15
067d 8019 | | Call 0x0,0x19
067e BODY_0678:
067e 00d8 | | Load_Top At_Offset_0
067f e7ff | | Load 0x3,-0x1
0680 8015 | | Call 0x0,0x15
0681 01de | | Execute Vector,Not_Equal
0682 6806 |h | Jump_Zero 0x689
0683 e5fe | | Load 0x2,-0x2
0684 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0685 00d9 | | Load_Top At_Offset_1
0686 800c | | Call 0x0,0xc
0687 00cb | | Action Pop_Block_With_Result
0688 4401 |D | Exit_Subprogram With_Result,0x1
0689 e7ff | | Load 0x3,-0x1
068a 00cb | | Action Pop_Block_With_Result
068b 4401 |D | Exit_Subprogram With_Result,0x1
068c 0000 0000 | | .BLANK 0000[0x4]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 069d | | .CONST 0x069d ; Address of begin
0691 0004 | | .CONST 0x0004 ; Address of exception handler
0692 0002 | | .CONST 0x0002 ; Number of locals
0693 INIT_0690:
0693 e603 | | Load 0x3,0x3
0694 e406 | | Load 0x2,0x6
0695 4807 |H | Short_Literal 0x7
0696 4802 |H | Short_Literal 0x2
0697 0099 | | Action Reference_Dynamic
0698 e408 | | Load 0x2,0x8
0699 4809 |H | Short_Literal 0x9
069a 4802 |H | Short_Literal 0x2
069b 0099 | | Action Reference_Dynamic
069c 800d | | Call 0x0,0xd
069d BODY_0690:
069d 00d8 | | Load_Top At_Offset_0
069e e603 | | Load 0x3,0x3
069f 01de | | Execute Vector,Not_Equal
06a0 680a |h | Jump_Zero 0x6ab
06a1 e5fe | | Load 0x2,-0x2
06a2 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
06a3 00d9 | | Load_Top At_Offset_1
06a4 8404 | | Call 0x2,0x4
06a5 800c | | Call 0x0,0xc
06a6 e002 | | Load 0x0,0x2
06a7 0216 | | Execute Heap_Access,Convert
06a8 00cb | | Action Pop_Block_With_Result
06a9 00cb | | Action Pop_Block_With_Result
06aa 4404 |D | Exit_Subprogram With_Result,0x4
06ab e602 | | Load 0x3,0x2
06ac 8405 | | Call 0x2,0x5
06ad 00cb | | Action Pop_Block_With_Result
06ae 00cb | | Action Pop_Block_With_Result
06af 4404 |D | Exit_Subprogram With_Result,0x4
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3 | | .CONST 0x06b3 ; Address of begin
06b1 06b9 | | .CONST 0x06b9 ; Address of exception handler
06b2 0001 | | .CONST 0x0001 ; Number of locals
06b3 BODY_06b0:
06b3 INIT_06b0:
06b3 e602 | | Load 0x3,0x2
06b4 e210 | | Load 0x1,0x10
06b5 1c02 | | Execute_Immediate Run_Utility,0x2
06b6 e405 | | Load 0x2,0x5
06b7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
06b8 4501 |E | Exit_Subprogram 0x1
06b9 TRAP_06b0:
06b9 0007 | | Action Break_Optional
06ba 4800 |H | Short_Literal 0x0
06bb e405 | | Load 0x2,0x5
06bc 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
06bd 4501 |E | Exit_Subprogram 0x1
06be 0000 0000 | | .XXX[0x2]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3 | | .CONST 0x06c3 ; Address of begin
06c1 06c9 | | .CONST 0x06c9 ; Address of exception handler
06c2 0001 | | .CONST 0x0001 ; Number of locals
06c3 BODY_06c0:
06c3 INIT_06c0:
06c3 e602 | | Load 0x3,0x2
06c4 00e1 | | Load_Encached Boolean_Cache
06c5 1c02 | | Execute_Immediate Run_Utility,0x2
06c6 e405 | | Load 0x2,0x5
06c7 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
06c8 4501 |E | Exit_Subprogram 0x1
06c9 TRAP_06c0:
06c9 0007 | | Action Break_Optional
06ca 4801 |H | Short_Literal 0x1
06cb e405 | | Load 0x2,0x5
06cc 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
06cd 4501 |E | Exit_Subprogram 0x1
06ce 0000 0000 | | .XXX[0x2]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06da | | .CONST 0x06da ; 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 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06d5 e5ff | | Load 0x2,-0x1
06d6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06d7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
06d8 01d7 | | Execute Vector,Field_Read
06d9 8011 | | Call 0x0,0x11
06da BODY_06d0:
06da 00d8 | | Load_Top At_Offset_0
06db 01db | | Execute Vector,Length
06dc 680f |h | Jump_Zero 0x6ec
06dd e602 | | Load 0x3,0x2
06de e231 | 1 | Load 0x1,0x31
06df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e0 011c | | Execute Any,Convert_Unchecked
06e1 1c01 | | Execute_Immediate Run_Utility,0x1
06e2 0092 07aa | | Action Push_String_Extended,0x7aa ; "=>"
06e4 01cc | | Execute Vector,Catenate
06e5 e5fd | | Load 0x2,-0x3
06e6 00da | | Load_Top At_Offset_2
06e7 822f | / | Call 0x1,0x2f
06e8 01cc | | Execute Vector,Catenate
06e9 00cb | | Action Pop_Block_With_Result
06ea 00cb | | Action Pop_Block_With_Result
06eb 4403 |D | Exit_Subprogram With_Result,0x3
06ec 00ea | | Load_Encached Null_String_Cache
06ed 00cb | | Action Pop_Block_With_Result
06ee 00cb | | Action Pop_Block_With_Result
06ef 4403 |D | Exit_Subprogram With_Result,0x3
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3 | | .CONST 0x06f3 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0001 | | .CONST 0x0001 ; Number of locals
06f3 BODY_06f0:
06f3 INIT_06f0:
06f3 4601 |F | Jump_Case 0x1
06f4 7801 |x | Jump 0x6f6 ; case 0x0
06f5 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
06f6 00da | | Load_Top At_Offset_2
06f7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
06f8 1c00 | | Execute_Immediate Run_Utility,0x0
06f9 4800 |H | Short_Literal 0x0
06fa 00db | | Load_Top At_Offset_3
06fb 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
06fc 4801 |H | Short_Literal 0x1
06fd 00db | | Load_Top At_Offset_3
06fe 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
06ff 4302 |C | Exit_Subprogram From_Utility,0x2
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703 | | .CONST 0x0703 ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0001 | | .CONST 0x0001 ; Number of locals
0703 BODY_0700:
0703 INIT_0700:
0703 4601 |F | Jump_Case 0x1
0704 7801 |x | Jump 0x706 ; case 0x0
0705 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0706 00da | | Load_Top At_Offset_2
0707 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0708 1c00 | | Execute_Immediate Run_Utility,0x0
0709 4800 |H | Short_Literal 0x0
070a 00db | | Load_Top At_Offset_3
070b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
070c 4800 |H | Short_Literal 0x0
070d 00db | | Load_Top At_Offset_3
070e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
070f 4801 |H | Short_Literal 0x1
0710 00db | | Load_Top At_Offset_3
0711 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0712 4302 |C | Exit_Subprogram From_Utility,0x2
0713 0000 0000 | | .BLANK 0000[0x5]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 075d | ] | .CONST 0x075d ; Address of begin
0719 0004 | | .CONST 0x0004 ; Address of exception handler
071a 0013 | | .CONST 0x0013 ; Number of locals
071b INIT_0718:
071b 4800 |H | Short_Literal 0x0
071c 4806 |H | Short_Literal 0x6
071d 029f 0763 | c| Declare_Subprogram For_Call,INIT_0760
071f 03fe | | Declare_Type Discrete,Defined,Visible
0720 4801 |H | Short_Literal 0x1
0721 480e |H | Short_Literal 0xe
0722 e001 | | Load 0x0,0x1
0723 03f9 | | Declare_Type Discrete,Constrained,Visible
0724 4803 |H | Short_Literal 0x3
0725 4807 |H | Short_Literal 0x7
0726 e002 | | Load 0x0,0x2
0727 03f9 | | Declare_Type Discrete,Constrained,Visible
0728 4801 |H | Short_Literal 0x1
0729 4806 |H | Short_Literal 0x6
072a e20d | | Load 0x1,0xd
072b 03f9 | | Declare_Type Discrete,Constrained,Visible
072c e003 | | Load 0x0,0x3
072d e004 | | Load 0x0,0x4
072e e001 | | Load 0x0,0x1
072f 4800 |H | Short_Literal 0x0
0730 4801 |H | Short_Literal 0x1
0731 480e |H | Short_Literal 0xe
0732 0092 07ae | | Action Push_String_Extended,0x7ae ; "others => Unspecified"
0734 00ea | | Load_Encached Null_String_Cache
0735 00ea | | Load_Encached Null_String_Cache
0736 4801 |H | Short_Literal 0x1
0737 480e |H | Short_Literal 0xe
0738 e005 | | Load 0x0,0x5
0739 0386 | | Declare_Variable Package,Visible
073a 00d8 | | Load_Top At_Offset_0
073b 020f | | Execute Module,Activate
073c e006 | | Load 0x0,0x6
073d e007 | | Load 0x0,0x7
073e e002 | | Load 0x0,0x2
073f 4800 |H | Short_Literal 0x0
0740 4801 |H | Short_Literal 0x1
0741 4807 |H | Short_Literal 0x7
0742 0092 07ae | | Action Push_String_Extended,0x7ae ; "others => Unspecified"
0744 00ea | | Load_Encached Null_String_Cache
0745 00ea | | Load_Encached Null_String_Cache
0746 4801 |H | Short_Literal 0x1
0747 4807 |H | Short_Literal 0x7
0748 e005 | | Load 0x0,0x5
0749 0386 | | Declare_Variable Package,Visible
074a 00d8 | | Load_Top At_Offset_0
074b 020f | | Execute Module,Activate
074c e008 | | Load 0x0,0x8
074d e009 | | Load 0x0,0x9
074e e20d | | Load 0x1,0xd
074f 4800 |H | Short_Literal 0x0
0750 4801 |H | Short_Literal 0x1
0751 4806 |H | Short_Literal 0x6
0752 0092 07ae | | Action Push_String_Extended,0x7ae ; "others => Unspecified"
0754 00ea | | Load_Encached Null_String_Cache
0755 00ea | | Load_Encached Null_String_Cache
0756 4801 |H | Short_Literal 0x1
0757 4806 |H | Short_Literal 0x6
0758 e005 | | Load 0x0,0x5
0759 0386 | | Declare_Variable Package,Visible
075a 00d8 | | Load_Top At_Offset_0
075b 020f | | Execute Module,Activate
075c 00bf | | Action Accept_Activation
075d BODY_0718:
075d 00bc | | Action Signal_Activated
075e 00bb | | Action Signal_Completion
075f 0000 | | .XXX[0x1]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763 | c | .CONST 0x0763 ; Address of begin
0761 0004 | | .CONST 0x0004 ; Address of exception handler
0762 0001 | | .CONST 0x0001 ; Number of locals
0763 BODY_0760:
0763 INIT_0760:
0763 4607 |F | Jump_Case 0x7
0764 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0765 7807 |x | Jump 0x76d ; case 0x1
0766 780a |x | Jump 0x771 ; case 0x2
0767 780e |x | Jump 0x776 ; case 0x3
0768 7811 |x | Jump 0x77a ; case 0x4
0769 7812 |x | Jump 0x77c ; case 0x5
076a 7813 |x | Jump 0x77e ; case 0x6
076b 7816 |x | Jump 0x782 ; case 0x7
076c 4302 |C | .XXX[0x1]
076d 00da | | Load_Top At_Offset_2
076e 0091 07a2 | | Action Push_String_Extended_Indexed,0x7a2 ; "NO_PARAM_ELEMENT"
0770 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0771 00db | | Load_Top At_Offset_3
0772 00db | | Load_Top At_Offset_3
0773 00e0 | | Load_Encached Standard_Cache
0774 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0775 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0776 00da | | Load_Top At_Offset_2
0777 00e0 | | Load_Encached Standard_Cache
0778 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0779 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
077a 00db | | Load_Top At_Offset_3
077b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
077c 00db | | Load_Top At_Offset_3
077d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
077e e20d | | Load 0x1,0xd
077f 00dc | | Load_Top At_Offset_4
0780 0267 | g | Execute Discrete,Predecessor
0781 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0782 e20d | | Load 0x1,0xd
0783 00dc | | Load_Top At_Offset_4
0784 0268 | h | Execute Discrete,Successor
0785 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0786 ; --------------------------------------------------------------------------------------
0786 ; STRING TABLE
0786 ; --------------------------------------------------------------------------------------
0786 0054 | T | .STRTAB 0x0054->0x07b0 ; "NO_ELEMENT"
0787 005c | \ | .STRTAB 0x005c->0x07b5 ; "SUBJECT_PROGRAM_HANDLE"
0788 0070 | p | .STRTAB 0x0070->0x07c0 ; "TEST_DRIVER_HANDLE"
0789 0080 | | .STRTAB 0x0080->0x07c9 ; "EXECUTION_CONTEXT_HANDLE"
078a 0096 | | .STRTAB 0x0096->0x07d5 ; "EXECUTABLE_TEST_CODE_HANDLE"
078b 00af | | .STRTAB 0x00af->0x07e2 ; "EVALUATION_ACTION_HANDLE"
078c 00c5 | | .STRTAB 0x00c5->0x07ee ; "INPUT_DATA_HANDLE"
078d 00d4 | | .STRTAB 0x00d4->0x07f7 ; "OUTPUT_DATA_HANDLE"
078e 00e4 | | .STRTAB 0x00e4->0x0800 ; "EXPECTED_OUTPUT_HANDLE"
078f 00f8 | | .STRTAB 0x00f8->0x080b ; "ERROR_OUTPUT_HANDLE"
0790 0109 | | .STRTAB 0x0109->0x0814 ; "COVERAGE_ANALYZER_HANDLE"
0791 011f | | .STRTAB 0x011f->0x0820 ; "RCI_CMD_TEMPLATE_HANDLE"
0792 0134 | 4 | .STRTAB 0x0134->0x082c ; "PRE_CONDITION_HANDLE"
0793 0146 | F | .STRTAB 0x0146->0x0836 ; "PROLOG_HANDLE"
0794 0151 | Q | .STRTAB 0x0151->0x083c ; "EPILOG_HANDLE"
0795 015c | \ | .STRTAB 0x015c->0x0843 ; "DIRECT_CALL"
0796 0165 | e | .STRTAB 0x0165->0x0848 ; "SEPARATE_JOB"
0797 016f | o | .STRTAB 0x016f->0x084e ; "CONNECTED_JOB"
0798 017a | z | .STRTAB 0x017a->0x0855 ; "NONE"
0799 017c | | | .STRTAB 0x017c->0x0857 ; "THE_HANDLES"
079a 0185 | | .STRTAB 0x0185->0x085c ; "THE_PARAMS"
079b 018d | | .STRTAB 0x018d->0x0861 ; "DESCRIPTION"
079c 0196 | | .STRTAB 0x0196->0x0867 ; "TERM_CONTROL"
079d 01a0 | | .STRTAB 0x01a0->0x086d ; "KEYWORDS"
079e 01a6 | | .STRTAB 0x01a6->0x0871 ; "THE_RUN_MODE"
079f 01b0 | | .STRTAB 0x01b0->0x0877 ; "ALLOW_COVERAGE_ANALYSIS"
07a0 01c5 | | .STRTAB 0x01c5->0x0882 ; "PSIMPLE_TEST_CASE"
07a1 01d4 | | .STRTAB 0x01d4->0x088b ; "POUTPUT_COMPARE"
07a2 01e1 | | .STRTAB 0x01e1->0x0892 ; "NO_PARAM_ELEMENT"
07a3 01ef | | .STRTAB 0x01ef->0x089a ; "EXECUTABLE_TEST_CODE_PARAMS"
07a4 0208 | | .STRTAB 0x0208->0x08a8 ; "EVALUATION_ACTION_PARAMS"
07a5 021e | | .STRTAB 0x021e->0x08b4 ; "COVERAGE_ANALYZER_PARAMS"
07a6 0234 | 4 | .STRTAB 0x0234->0x08c0 ; "PRE_CONDITION_PARAMS"
07a7 0246 | F | .STRTAB 0x0246->0x08ca ; "PROLOG_PARAMS"
07a8 0251 | Q | .STRTAB 0x0251->0x08d0 ; "EPILOG_PARAMS"
07a9 025c | \ | .STRTAB 0x025c->0x08d7 ; "<default>"
07aa 0263 | c | .STRTAB 0x0263->0x08db ; "=>"
; "=>"
; "=>"
07ab 0263 | c | .STRTAB 0x0263->0x08dc ; "_params"
; "_params"
07ac 0268 | h | .STRTAB 0x0268->0x08e0 ; "_handle"
; "_handle"
07ad 026d | m | .STRTAB 0x026d->0x08e3 ; "<output_compare>"
07ae 027b | { | .STRTAB 0x027b->0x08eb ; "others => Unspecified"
; "others => Unspecified"
; "others => Unspecified"
07af 028e | | .STREND 0x028e->0x08f6
07b0 4e4f 5f45 |NO_E| .STRTAB_STRINGS
08f6 0000 0000 | | .XXX[0x2]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; Debug Table
08f8 ; --------------------------------------------------------------------------------------
08f8 0004 000a | | .DEBUG4 0x0004,0x000a,0x2315,0x0000,0x0001,0x0000
08fe 0000 0000 | | .BLANK 0000[0x102]