|
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: 3072 (0xc00)
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 0478 | x | .CONST 0x0478 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00ec | | .CONST 0x00ec ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002d | - | .CONST 0x002d ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 480a |H | Short_Literal 0xa
000d 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0012 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0014 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
0016 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
0018 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated
001a 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
001c 4800 |H | Short_Literal 0x0
001d 0093 033b | ;| push_full_address INIT_0338
001f 02a0 | | Declare_Subprogram Null_Subprogram
0020 038f | | Declare_Type Package,Defined,Visible
0021 0386 | | Declare_Variable Package,Visible
0022 e20d | | Load 0x1,0xd
0023 0266 | f | Execute Discrete,Bounds
0024 e003 | | Load 0x0,0x3
0025 02a0 | | Declare_Subprogram Null_Subprogram
0026 4801 |H | Short_Literal 0x1
0027 035e | ^ | Declare_Type Array,Defined,Visible
0028 00d8 | | Load_Top At_Offset_0
0029 e004 | | Load 0x0,0x4
002a 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
002b 029f 0313 | | Declare_Subprogram INIT_0310,For_Call
002d 4802 |H | Short_Literal 0x2
002e 032e | . | Declare_Type Record,Defined,Visible
002f 00d8 | | Load_Top At_Offset_0
0030 00e1 | | Load_Encached Boolean_Cache
0031 e20d | | Load 0x1,0xd
0032 029f 032b | +| Declare_Subprogram INIT_0328,For_Call
0034 4803 |H | Short_Literal 0x3
0035 032e | . | Declare_Type Record,Defined,Visible
0036 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
0038 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
003a 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
003c 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
003e 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
0040 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated
0042 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
0044 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
0046 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
0048 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
004a 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
004c 0093 0000 | | push_full_address 0x0
004e 60c9 |` | Indirect_Literal Discrete,0x118,{0x80000000, 0x00010000}
004f 0273 | s | Execute Discrete,Plus
0050 e005 | | Load 0x0,0x5
0051 0273 | s | Execute Discrete,Plus
0052 e006 | | Load 0x0,0x6
0053 0273 | s | Execute Discrete,Plus
0054 e216 | | Load 0x1,0x16
0055 e217 | | Load 0x1,0x17
0056 4801 |H | Short_Literal 0x1
0057 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0058 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0059 1d19 | | Execute_Immediate Reference_Lex_1,0x19
005a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
005b 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
005c 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
005d 1d20 | | Execute_Immediate Reference_Lex_1,0x20
005e 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
005f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0060 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0061 e007 | | Load 0x0,0x7
0062 4809 |H | Short_Literal 0x9
0063 e008 | | Load 0x0,0x8
0064 0386 | | Declare_Variable Package,Visible
0065 00d8 | | Load_Top At_Offset_0
0066 020f | | Execute Module,Activate
0067 e009 | | Load 0x0,0x9
0068 00d9 | | Load_Top At_Offset_1
0069 0098 | | Execute Package,Field_Read_Dynamic
006a 0129 | ) | Execute Any,Make_Visible
006b 00bf | | Action Accept_Activation
006c e00a | | Load 0x0,0xa
006d e00b | | Load 0x0,0xb
006e e20d | | Load 0x1,0xd
006f 4800 |H | Short_Literal 0x0
0070 4801 |H | Short_Literal 0x1
0071 480a |H | Short_Literal 0xa
0072 0092 0408 | | Action Push_String_Extended,0x408 ; "others => Unspecified"
0074 00ea | | Load_Encached Null_String_Cache
0075 00ea | | Load_Encached Null_String_Cache
0076 4801 |H | Short_Literal 0x1
0077 480a |H | Short_Literal 0xa
0078 e00c | | Load 0x0,0xc
0079 0387 | | Declare_Variable Package
007a 00d8 | | Load_Top At_Offset_0
007b 020f | | Execute Module,Activate
007c 4801 |H | Short_Literal 0x1
007d 480a |H | Short_Literal 0xa
007e e20d | | Load 0x1,0xd
007f 03f8 | | Declare_Type Discrete,Constrained
0080 00da | | Load_Top At_Offset_2
0081 0007 | | Action Break_Optional
0082 00e1 | | Load_Encached Boolean_Cache
0083 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0084 029b 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Unelaborated
0086 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call
0088 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0089 00c7 | | Action Elaborate_Subprogram
008a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
008b 00c7 | | Action Elaborate_Subprogram
008c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
008d 00c7 | | Action Elaborate_Subprogram
008e 1d18 | | Execute_Immediate Reference_Lex_1,0x18
008f 00c7 | | Action Elaborate_Subprogram
0090 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0091 00c7 | | Action Elaborate_Subprogram
0092 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0093 00c7 | | Action Elaborate_Subprogram
0094 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0095 00c7 | | Action Elaborate_Subprogram
0096 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0097 00c7 | | Action Elaborate_Subprogram
0098 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0099 00c7 | | Action Elaborate_Subprogram
009a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
009b 00c7 | | Action Elaborate_Subprogram
009c 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call
009e 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call
00a0 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00a3 00c7 | | Action Elaborate_Subprogram
00a4 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call
00a6 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00ad 00c7 | | Action Elaborate_Subprogram
00ae 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00b1 e00d | | Load 0x0,0xd
00b2 e00e | | Load 0x0,0xe
00b3 e223 | # | Load 0x1,0x23
00b4 0098 | | Execute Package,Field_Read_Dynamic
00b5 0095 | | Execute Package,Field_Reference_Dynamic
00b6 a00f | | Store_Unchecked 0x0,0xf
00b7 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00b8 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00b9 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00ba e009 | | Load 0x0,0x9
00bb e223 | # | Load 0x1,0x23
00bc 0098 | | Execute Package,Field_Read_Dynamic
00bd e010 | | Load 0x0,0x10
00be e00e | | Load 0x0,0xe
00bf e223 | # | Load 0x1,0x23
00c0 0098 | | Execute Package,Field_Read_Dynamic
00c1 0095 | | Execute Package,Field_Reference_Dynamic
00c2 e011 | | Load 0x0,0x11
00c3 e00e | | Load 0x0,0xe
00c4 e223 | # | Load 0x1,0x23
00c5 0098 | | Execute Package,Field_Read_Dynamic
00c6 0095 | | Execute Package,Field_Reference_Dynamic
00c7 e012 | | Load 0x0,0x12
00c8 e00e | | Load 0x0,0xe
00c9 e223 | # | Load 0x1,0x23
00ca 0098 | | Execute Package,Field_Read_Dynamic
00cb 0095 | | Execute Package,Field_Reference_Dynamic
00cc e013 | | Load 0x0,0x13
00cd e00e | | Load 0x0,0xe
00ce e223 | # | Load 0x1,0x23
00cf 0098 | | Execute Package,Field_Read_Dynamic
00d0 0095 | | Execute Package,Field_Reference_Dynamic
00d1 e014 | | Load 0x0,0x14
00d2 e00e | | Load 0x0,0xe
00d3 e223 | # | Load 0x1,0x23
00d4 0098 | | Execute Package,Field_Read_Dynamic
00d5 0095 | | Execute Package,Field_Reference_Dynamic
00d6 e015 | | Load 0x0,0x15
00d7 e00e | | Load 0x0,0xe
00d8 e223 | # | Load 0x1,0x23
00d9 0098 | | Execute Package,Field_Read_Dynamic
00da 0095 | | Execute Package,Field_Reference_Dynamic
00db e016 | | Load 0x0,0x16
00dc e00e | | Load 0x0,0xe
00dd e223 | # | Load 0x1,0x23
00de 0098 | | Execute Package,Field_Read_Dynamic
00df 0095 | | Execute Package,Field_Reference_Dynamic
00e0 e017 | | Load 0x0,0x17
00e1 e00e | | Load 0x0,0xe
00e2 e223 | # | Load 0x1,0x23
00e3 0098 | | Execute Package,Field_Read_Dynamic
00e4 0095 | | Execute Package,Field_Reference_Dynamic
00e5 480f |H | Short_Literal 0xf
00e6 e214 | | Load 0x1,0x14
00e7 020e | | Execute Module,Augment_Imports
00e8 e214 | | Load 0x1,0x14
00e9 020f | | Execute Module,Activate
00ea 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00eb 00c7 | | Action Elaborate_Subprogram
00ec BODY_0008:
00ec 00bc | | Action Signal_Activated
00ed 00bb | | Action Signal_Completion
00ee 0000 0000 | | .XXX[0x2]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 4607 |F | Jump_Case 0x8
00f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00f5 7807 |x | Jump 0xfd ; case 0x1
00f6 780a |x | Jump 0x101 ; case 0x2
00f7 780e |x | Jump 0x106 ; case 0x3
00f8 7811 |x | Jump 0x10a ; case 0x4
00f9 7812 |x | Jump 0x10c ; case 0x5
00fa 7813 |x | Jump 0x10e ; case 0x6
00fb 7816 |x | Jump 0x112 ; case 0x7
00fc 4302 |C | .XXX[0x1]
00fd 00da | | Load_Top At_Offset_2
00fe 0091 03fd | | Action Push_String_Extended_Indexed,0x3fd ; "NONE"
0100 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0101 00db | | Load_Top At_Offset_3
0102 00db | | Load_Top At_Offset_3
0103 00e0 | | Load_Encached Standard_Cache
0104 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0105 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0106 00da | | Load_Top At_Offset_2
0107 00e0 | | Load_Encached Standard_Cache
0108 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0109 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
010a 00db | | Load_Top At_Offset_3
010b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010c 00db | | Load_Top At_Offset_3
010d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010e e20d | | Load 0x1,0xd
010f 00dc | | Load_Top At_Offset_4
0110 0267 | g | Execute Discrete,Predecessor
0111 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0112 e20d | | Load 0x1,0xd
0113 00dc | | Load_Top At_Offset_4
0114 0268 | h | Execute Discrete,Successor
0115 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0116 0000 0000 | | .XXX[0x2]
0118 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0129 | ) | .CONST 0x0129 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0003 | | .CONST 0x0003 ; Number of locals
0123 INIT_0120:
0123 e224 | $ | Load 0x1,0x24
0124 0007 | | Action Break_Optional
0125 e216 | | Load 0x1,0x16
0126 0322 | " | Declare_Variable Record
0127 00d8 | | Load_Top At_Offset_0
0128 1c00 | | Execute_Immediate Run_Utility,0x0
0129 BODY_0120:
0129 e5ff | | Load 0x2,-0x1
012a 00d9 | | Load_Top At_Offset_1
012b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
012c e5ff | | Load 0x2,-0x1
012d e018 | | Load 0x0,0x18
012e e223 | # | Load 0x1,0x23
012f 0096 | | Execute Package,Entry
0130 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0131 00d9 | | Load_Top At_Offset_1
0132 e009 | | Load 0x0,0x9
0133 e223 | # | Load 0x1,0x23
0134 0098 | | Execute Package,Field_Read_Dynamic
0135 0216 | | Execute Heap_Access,Convert
0136 00d9 | | Load_Top At_Offset_1
0137 e019 | | Load 0x0,0x19
0138 e223 | # | Load 0x1,0x23
0139 0096 | | Execute Package,Entry
013a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
013b 00d9 | | Load_Top At_Offset_1
013c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
013d 0000 0000 | | .XXX[0x3]
013f 0000 | |
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 00da | | Load_Top At_Offset_2
0144 e009 | | Load 0x0,0x9
0145 e223 | # | Load 0x1,0x23
0146 0098 | | Execute Package,Field_Read_Dynamic
0147 0216 | | Execute Heap_Access,Convert
0148 e01a | | Load 0x0,0x1a
0149 e223 | # | Load 0x1,0x23
014a 0096 | | Execute Package,Entry
014b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
014c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
014d 0000 0000 | | .XXX[0x3]
014f 0000 | |
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 0833 | 3 | Execute_Immediate Raise,0x33
0154 0000 0000 | | .BLANK 0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0163 | c | .CONST 0x0163 ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b e216 | | Load 0x1,0x16
015c 0322 | " | Declare_Variable Record
015d e5fd | | Load 0x2,-0x3
015e e01b | | Load 0x0,0x1b
015f e223 | # | Load 0x1,0x23
0160 0096 | | Execute Package,Entry
0161 00d9 | | Load_Top At_Offset_1
0162 017d | } | Execute Record,Structure_Write
0163 BODY_0158:
0163 e5fd | | Load 0x2,-0x3
0164 822a | * | Call 0x1,0x2a
0165 6801 |h | Jump_Zero 0x167
0166 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0167 00d8 | | Load_Top At_Offset_0
0168 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0169 e5fe | | Load 0x2,-0x2
016a 801c | | Call 0x0,0x1c
016b e5ff | | Load 0x2,-0x1
016c 00da | | Load_Top At_Offset_2
016d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
016e 01d6 | | Execute Vector,Field_Write
016f e5fd | | Load 0x2,-0x3
0170 e009 | | Load 0x0,0x9
0171 e223 | # | Load 0x1,0x23
0172 0098 | | Execute Package,Field_Read_Dynamic
0173 0216 | | Execute Heap_Access,Convert
0174 00d9 | | Load_Top At_Offset_1
0175 e019 | | Load 0x0,0x19
0176 e223 | # | Load 0x1,0x23
0177 0096 | | Execute Package,Entry
0178 c5fd | | Store 0x2,-0x3
0179 4503 |E | Exit_Suprogram New_Top_Offset 0x3
017a 0000 0000 | | .BLANK 0000[0x6]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 00da | | Load_Top At_Offset_2
0184 e5fe | | Load 0x2,-0x2
0185 e5ff | | Load 0x2,-0x1
0186 822b | + | Call 0x1,0x2b
0187 801d | | Call 0x0,0x1d
0188 822c | , | Call 0x1,0x2c
0189 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
018a 0000 0000 | | .BLANK 0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0197 | | .CONST 0x0197 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0002 | | .CONST 0x0002 ; Number of locals
0193 INIT_0190:
0193 e5fd | | Load 0x2,-0x3
0194 e5fe | | Load 0x2,-0x2
0195 822b | + | Call 0x1,0x2b
0196 801d | | Call 0x0,0x1d
0197 BODY_0190:
0197 00db | | Load_Top At_Offset_3
0198 01db | | Execute Vector,Length
0199 7002 |p | Jump_Nonzero 0x19c
019a 00ea | | Load_Encached Null_String_Cache
019b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
019c 00db | | Load_Top At_Offset_3
019d 01dd | | Execute Vector,First
019e e5ff | | Load 0x2,-0x1
019f 01d7 | | Execute Vector,Field_Read
01a0 0f21 | ! | Execute_Immediate Equal,0x21
01a1 6804 |h | Jump_Zero 0x1a6
01a2 00db | | Load_Top At_Offset_3
01a3 0335 | 5 | Declare_Variable Array,Duplicate
01a4 00cd | | Action Spare6_Action
01a5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01a6 00d8 | | Load_Top At_Offset_0
01a7 01db | | Execute Vector,Length
01a8 7009 |p | Jump_Nonzero 0x1b2
01a9 482e |H. | Short_Literal 0x2e
01aa e01e | | Load 0x0,0x1e
01ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ac 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ad 01cb | | Execute Vector,Append
01ae e5ff | | Load 0x2,-0x1
01af 822d | - | Call 0x1,0x2d
01b0 01cc | | Execute Vector,Catenate
01b1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01b2 482e |H. | Short_Literal 0x2e
01b3 e5fe | | Load 0x2,-0x2
01b4 00da | | Load_Top At_Offset_2
01b5 822c | , | Call 0x1,0x2c
01b6 01cb | | Execute Vector,Append
01b7 e5ff | | Load 0x2,-0x1
01b8 822d | - | Call 0x1,0x2d
01b9 01cc | | Execute Vector,Catenate
01ba 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01bb 0000 0000 | | .BLANK 0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01cc | | .CONST 0x01cc ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0004 | | .CONST 0x0004 ; Number of locals
01c3 INIT_01c0:
01c3 e216 | | Load 0x1,0x16
01c4 0322 | " | Declare_Variable Record
01c5 00d8 | | Load_Top At_Offset_0
01c6 1c00 | | Execute_Immediate Run_Utility,0x0
01c7 00db | | Load_Top At_Offset_3
01c8 e225 | % | Load 0x1,0x25
01c9 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01ca 029f 0303 | | Declare_Subprogram INIT_0300,For_Call
01cc BODY_01c0:
01cc 00d9 | | Load_Top At_Offset_1
01cd e225 | % | Load 0x1,0x25
01ce 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01cf 7002 |p | Jump_Nonzero 0x1d2
01d0 e01f | | Load 0x0,0x1f
01d1 0257 | W | Execute Discrete,Raise
01d2 00cf | | Action Mark_Auxiliary
01d3 480a |H | Short_Literal 0xa
01d4 4801 |H | Short_Literal 0x1
01d5 0007 | | Action Break_Optional
01d6 00d8 | | Load_Top At_Offset_0
01d7 e403 | | Load 0x2,0x3
01d8 e225 | % | Load 0x1,0x25
01d9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
01da 6801 |h | Jump_Zero 0x1dc
01db 8404 | | Call 0x2,0x4
01dc 00c8 | | Action Pop_Auxiliary_Range
01dd 3ff8 |? | Loop_Increasing 0x1d6
01de 00ce | | Action Pop_Auxiliary
01df e5fe | | Load 0x2,-0x2
01e0 00db | | Load_Top At_Offset_3
01e1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01e2 00da | | Load_Top At_Offset_2
01e3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01e4 0000 0000 | | .BLANK 0000[0x4]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01ec 0000 0000 | | .BLANK 0000[0x4]
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 0833 | 3 | Execute_Immediate Raise,0x33
01f4 0000 0000 | | .BLANK 0000[0x4]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff | | .CONST 0x01ff ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0002 | | .CONST 0x0002 ; Number of locals
01fb INIT_01f8:
01fb e216 | | Load 0x1,0x16
01fc 0322 | " | Declare_Variable Record
01fd 00d8 | | Load_Top At_Offset_0
01fe 1c00 | | Execute_Immediate Run_Utility,0x0
01ff BODY_01f8:
01ff 00d8 | | Load_Top At_Offset_0
0200 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0201 0000 0000 | | .BLANK 0000[0x7]
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 0833 | 3 | Execute_Immediate Raise,0x33
020c 0000 0000 | | .BLANK 0000[0x4]
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 0833 | 3 | Execute_Immediate Raise,0x33
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2
021c 0335 | 5 | Declare_Variable Array,Duplicate
021d 00cd | | Action Spare6_Action
021e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
021f 0000 | | .XXX[0x1]
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 e217 | | Load 0x1,0x17
0224 0322 | " | Declare_Variable Record
0225 00db | | Load_Top At_Offset_3
0226 00d9 | | Load_Top At_Offset_1
0227 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0228 4800 |H | Short_Literal 0x0
0229 00d9 | | Load_Top At_Offset_1
022a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
022b 4801 |H | Short_Literal 0x1
022c 00d9 | | Load_Top At_Offset_1
022d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
022e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0235 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0247 | G | .CONST 0x0247 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0003 | | .CONST 0x0003 ; Number of locals
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
023d e20d | | Load 0x1,0xd
023e 011c | | Execute Any,Convert_Unchecked
023f 1c01 | | Execute_Immediate Run_Utility,0x1
0240 0092 0409 | | Action Push_String_Extended,0x409 ; "=>"
0242 01cc | | Execute Vector,Catenate
0243 0007 | | Action Break_Optional
0244 00db | | Load_Top At_Offset_3
0245 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0246 0007 | | Action Break_Optional
0247 BODY_0238:
0247 00d9 | | Load_Top At_Offset_1
0248 e5ff | | Load 0x2,-0x1
0249 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
024a 00da | | Load_Top At_Offset_2
024b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
024c 01d7 | | Execute Vector,Field_Read
024d 801d | | Call 0x0,0x1d
024e 01cc | | Execute Vector,Catenate
024f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 00da | | Load_Top At_Offset_2
0254 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0255 700e |p | Jump_Nonzero 0x264
0256 00da | | Load_Top At_Offset_2
0257 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0258 0f0a | | Execute_Immediate Equal,0xa
0259 6804 |h | Jump_Zero 0x25e
025a 4801 |H | Short_Literal 0x1
025b 00db | | Load_Top At_Offset_3
025c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
025d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
025e e20d | | Load 0x1,0xd
025f 00db | | Load_Top At_Offset_3
0260 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0261 0268 | h | Execute Discrete,Successor
0262 00db | | Load_Top At_Offset_3
0263 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0264 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0265 0000 0000 | | .XXX[0x3]
0267 0000 | |
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0271 | q | .CONST 0x0271 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0003 | | .CONST 0x0003 ; Number of locals
026b INIT_0268:
026b e004 | | Load 0x0,0x4
026c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
026d e216 | | Load 0x1,0x16
026e 0322 | " | Declare_Variable Record
026f 00d8 | | Load_Top At_Offset_0
0270 1c00 | | Execute_Immediate Run_Utility,0x0
0271 BODY_0268:
0271 e004 | | Load 0x0,0x4
0272 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0273 4907 |I | Short_Literal 0x107
0274 e020 | | Load 0x0,0x20
0275 180d | | Execute Package,Field_Execute,Field_Number 0xd
0276 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0277 e004 | | Load 0x0,0x4
0278 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0279 00d9 | | Load_Top At_Offset_1
027a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
027b 00d9 | | Load_Top At_Offset_1
027c 820e | | Call 0x1,0xe
027d a227 | ' | Store_Unchecked 0x1,0x27
027e e227 | ' | Load 0x1,0x27
027f e009 | | Load 0x0,0x9
0280 e223 | # | Load 0x1,0x23
0281 0098 | | Execute Package,Field_Read_Dynamic
0282 0216 | | Execute Heap_Access,Convert
0283 00d9 | | Load_Top At_Offset_1
0284 e019 | | Load 0x0,0x19
0285 e223 | # | Load 0x1,0x23
0286 0096 | | Execute Package,Entry
0287 c227 | ' | Store 0x1,0x27
0288 4801 |H | Short_Literal 0x1
0289 a228 | ( | Store_Unchecked 0x1,0x28
028a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
028b 0000 0000 | | .BLANK 0000[0x5]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00da | | Load_Top At_Offset_2
0294 e01b | | Load 0x0,0x1b
0295 e223 | # | Load 0x1,0x23
0296 0096 | | Execute Package,Entry
0297 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0298 e004 | | Load 0x0,0x4
0299 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
029a 021f | | Execute Heap_Access,Equal
029b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
029c 0000 0000 | | .BLANK 0000[0x4]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 00da | | Load_Top At_Offset_2
02a4 e5fe | | Load 0x2,-0x2
02a5 e01b | | Load 0x0,0x1b
02a6 e223 | # | Load 0x1,0x23
02a7 0096 | | Execute Package,Entry
02a8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02a9 01d7 | | Execute Vector,Field_Read
02aa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ab 0000 0000 | | .BLANK 0000[0x5]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c0 | | .CONST 0x02c0 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0002 | | .CONST 0x0002 ; Number of locals
02b3 INIT_02b0:
02b3 e01e | | Load 0x0,0x1e
02b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b6 02c7 | | Declare_Variable Any
02b7 4801 |H | Short_Literal 0x1
02b8 e01e | | Load 0x0,0x1e
02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02bb e5ff | | Load 0x2,-0x1
02bc e01e | | Load 0x0,0x1e
02bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02be 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02bf a402 | | Store_Unchecked 0x2,0x2
02c0 BODY_02b0:
02c0 00d8 | | Load_Top At_Offset_0
02c1 e01e | | Load 0x0,0x1e
02c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c3 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
02c4 681b |h | Jump_Zero 0x2e0
02c5 e021 | ! | Load 0x0,0x21
02c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c7 4802 |H | Short_Literal 0x2
02c8 0092 040a | | Action Push_String_Extended,0x40a ; "Unable to resolve Context Location "
02ca e5fe | | Load 0x2,-0x2
02cb e20d | | Load 0x1,0xd
02cc 011c | | Execute Any,Convert_Unchecked
02cd 1c01 | | Execute_Immediate Run_Utility,0x1
02ce 01cc | | Execute Vector,Catenate
02cf 0092 040b | | Action Push_String_Extended,0x40b ; " "
02d1 01cc | | Execute Vector,Catenate
02d2 e5ff | | Load 0x2,-0x1
02d3 01cc | | Execute Vector,Catenate
02d4 0092 040b | | Action Push_String_Extended,0x40b ; " "
02d6 01cc | | Execute Vector,Catenate
02d7 00db | | Load_Top At_Offset_3
02d8 e01e | | Load 0x0,0x1e
02d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02da 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
02db 01cc | | Execute Vector,Catenate
02dc e022 | " | Load 0x0,0x22
02dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02de 00db | | Load_Top At_Offset_3
02df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02e0 00d8 | | Load_Top At_Offset_0
02e1 e01e | | Load 0x0,0x1e
02e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02e5 0000 0000 | | .XXX[0x3]
02e7 0000 | |
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f2 | | .CONST 0x02f2 ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0002 | | .CONST 0x0002 ; Number of locals
02eb INIT_02e8:
02eb 4801 |H | Short_Literal 0x1
02ec 00db | | Load_Top At_Offset_3
02ed 482c |H, | Short_Literal 0x2c
02ee e023 | # | Load 0x0,0x23
02ef 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02f0 00e3 | | Load_Encached Natural_Cache
02f1 03f1 | | Declare_Variable Discrete,With_Value
02f2 BODY_02e8:
02f2 00d8 | | Load_Top At_Offset_0
02f3 7002 |p | Jump_Nonzero 0x2f6
02f4 00db | | Load_Top At_Offset_3
02f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f6 485d |H] | Short_Literal 0x5d
02f7 485b |H[ | Short_Literal 0x5b
02f8 e5ff | | Load 0x2,-0x1
02f9 01ca | | Execute Vector,Prepend
02fa 01cb | | Execute Vector,Append
02fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02fc 0000 0000 | | .BLANK 0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0308 | | .CONST 0x0308 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 00ea | | Load_Encached Null_String_Cache
0304 e407 | | Load 0x2,0x7
0305 e403 | | Load 0x2,0x3
0306 e225 | % | Load 0x1,0x25
0307 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0308 BODY_0300:
0308 e5fe | | Load 0x2,-0x2
0309 00d9 | | Load_Top At_Offset_1
030a 801c | | Call 0x0,0x1c
030b e407 | | Load 0x2,0x7
030c e402 | | Load 0x2,0x2
030d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
030e 01d6 | | Execute Vector,Field_Write
030f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313 | | .CONST 0x0313 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0001 | | .CONST 0x0001 ; Number of locals
0313 BODY_0310:
0313 INIT_0310:
0313 4601 |F | Jump_Case 0x2
0314 7801 |x | Jump 0x316 ; case 0x0
0315 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0316 e216 | | Load 0x1,0x16
0317 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0318 0337 | 7 | Declare_Variable Array
0319 480a |H | Short_Literal 0xa
031a 4800 |H | Short_Literal 0x0
031b 8002 | | Call 0x0,0x2
031c 00d9 | | Load_Top At_Offset_1
031d e402 | | Load 0x2,0x2
031e 01d6 | | Execute Vector,Field_Write
031f 3ffb |? | Loop_Increasing 0x31b
0320 00db | | Load_Top At_Offset_3
0321 00d9 | | Load_Top At_Offset_1
0322 00d9 | | Load_Top At_Offset_1
0323 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0324 0119 | | Execute Any,Check_In_Formal_Type
0325 00d1 | | Pop_Control Pop_Count_1
0326 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0327 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b 4601 |F | Jump_Case 0x2
032c 7801 |x | Jump 0x32e ; case 0x0
032d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
032e 00da | | Load_Top At_Offset_2
032f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0330 1c00 | | Execute_Immediate Run_Utility,0x0
0331 4800 |H | Short_Literal 0x0
0332 00db | | Load_Top At_Offset_3
0333 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0334 4800 |H | Short_Literal 0x0
0335 00db | | Load_Top At_Offset_3
0336 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0337 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0360 | ` | .CONST 0x0360 ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0015 | | .CONST 0x0015 ; Number of locals
033b INIT_0338:
033b 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
033d 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
033f 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
0341 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated
0343 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated
0345 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated
0347 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
0349 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
034b 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
034d 00bf | | Action Accept_Activation
034e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
034f 00c7 | | Action Elaborate_Subprogram
0350 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0351 00c7 | | Action Elaborate_Subprogram
0352 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0353 00c7 | | Action Elaborate_Subprogram
0354 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0355 00c7 | | Action Elaborate_Subprogram
0356 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0357 00c7 | | Action Elaborate_Subprogram
0358 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0359 00c7 | | Action Elaborate_Subprogram
035a 1d13 | | Execute_Immediate Reference_Lex_1,0x13
035b 00c7 | | Action Elaborate_Subprogram
035c 1d14 | | Execute_Immediate Reference_Lex_1,0x14
035d 00c7 | | Action Elaborate_Subprogram
035e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
035f 00c7 | | Action Elaborate_Subprogram
0360 BODY_0338:
0360 00bc | | Action Signal_Activated
0361 00bb | | Action Signal_Completion
0362 0000 0000 | | .BLANK 0000[0x6]
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 8001 | | Call 0x0,0x1
036d 7004 |p | Jump_Nonzero 0x372
036e 00db | | Load_Top At_Offset_3
036f 00db | | Load_Top At_Offset_3
0370 8002 | | Call 0x0,0x2
0371 c5fe | | Store 0x2,-0x2
0372 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0373 0000 0000 | | .BLANK 0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b 00db | | Load_Top At_Offset_3
037c 8003 | | Call 0x0,0x3
037d 01db | | Execute Vector,Length
037e 7006 |p | Jump_Nonzero 0x385
037f e004 | | Load 0x0,0x4
0380 7001 |p | Jump_Nonzero 0x382
0381 8005 | | Call 0x0,0x5
0382 e006 | | Load 0x0,0x6
0383 a5fd | | Store_Unchecked 0x2,-0x3
0384 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0385 e5fd | | Load 0x2,-0x3
0386 e007 | | Load 0x0,0x7
0387 0216 | | Execute Heap_Access,Convert
0388 e5fe | | Load 0x2,-0x2
0389 e5ff | | Load 0x2,-0x1
038a 8008 | | Call 0x0,0x8
038b c5fd | | Store 0x2,-0x3
038c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
038d 0000 0000 | | .XXX[0x3]
038f 0000 | |
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 00db | | Load_Top At_Offset_3
0394 e007 | | Load 0x0,0x7
0395 0216 | | Execute Heap_Access,Convert
0396 00db | | Load_Top At_Offset_3
0397 8009 | | Call 0x0,0x9
0398 c5fe | | Store 0x2,-0x2
0399 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 00da | | Load_Top At_Offset_2
03a4 8001 | | Call 0x0,0x1
03a5 6802 |h | Jump_Zero 0x3a8
03a6 00ea | | Load_Encached Null_String_Cache
03a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a8 00da | | Load_Top At_Offset_2
03a9 800a | | Call 0x0,0xa
03aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ab 0000 0000 | | .BLANK 0000[0x5]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3 | | .CONST 0x03b3 ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0001 | | .CONST 0x0001 ; Number of locals
03b3 BODY_03b0:
03b3 INIT_03b0:
03b3 00da | | Load_Top At_Offset_2
03b4 8001 | | Call 0x0,0x1
03b5 7005 |p | Jump_Nonzero 0x3bb
03b6 00da | | Load_Top At_Offset_2
03b7 e007 | | Load 0x0,0x7
03b8 0216 | | Execute Heap_Access,Convert
03b9 800b | | Call 0x0,0xb
03ba 0033 | 3 | Store_Top Heap_Access,At_Offset_3
03bb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03bc 0000 0000 | | .BLANK 0000[0x4]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 00db | | Load_Top At_Offset_3
03c4 8001 | | Call 0x0,0x1
03c5 7006 |p | Jump_Nonzero 0x3cc
03c6 00db | | Load_Top At_Offset_3
03c7 e007 | | Load 0x0,0x7
03c8 0216 | | Execute Heap_Access,Convert
03c9 00db | | Load_Top At_Offset_3
03ca 800c | | Call 0x0,0xc
03cb c5fe | | Store 0x2,-0x2
03cc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03cd 0000 0000 | | .XXX[0x3]
03cf 0000 | |
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 00db | | Load_Top At_Offset_3
03d4 8001 | | Call 0x0,0x1
03d5 7006 |p | Jump_Nonzero 0x3dc
03d6 00db | | Load_Top At_Offset_3
03d7 e007 | | Load 0x0,0x7
03d8 0216 | | Execute Heap_Access,Convert
03d9 00db | | Load_Top At_Offset_3
03da 800d | | Call 0x0,0xd
03db c5fe | | Store 0x2,-0x2
03dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03dd 0000 0000 | | .XXX[0x3]
03df 0000 | |
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 8001 | | Call 0x0,0x1
03e5 6802 |h | Jump_Zero 0x3e8
03e6 4800 |H | Short_Literal 0x0
03e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e8 00da | | Load_Top At_Offset_2
03e9 800e | | Call 0x0,0xe
03ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03eb 0000 0000 | | .BLANK 0000[0x5]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 00db | | Load_Top At_Offset_3
03f4 8001 | | Call 0x0,0x1
03f5 7006 |p | Jump_Nonzero 0x3fc
03f6 00db | | Load_Top At_Offset_3
03f7 e007 | | Load 0x0,0x7
03f8 0216 | | Execute Heap_Access,Convert
03f9 00db | | Load_Top At_Offset_3
03fa 800f | | Call 0x0,0xf
03fb c5fe | | Store 0x2,-0x2
03fc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03fd ; --------------------------------------------------------------------------------------
03fd ; STRING TABLE
03fd ; --------------------------------------------------------------------------------------
03fd 0020 | | .STRTAB 0x0020->0x040d ; "NONE"
03fe 0022 | " | .STRTAB 0x0022->0x040f ; "TEST_RUN_LOC"
03ff 002c | , | .STRTAB 0x002c->0x0415 ; "TEST_CASE_LOC"
0400 0037 | 7 | .STRTAB 0x0037->0x041b ; "TEST_SET_LOC"
0401 0041 | A | .STRTAB 0x0041->0x0421 ; "SUBJECT_PROGRAM_LOC"
0402 0052 | R | .STRTAB 0x0052->0x042b ; "TEST_DRIVER_LOC"
0403 005f | _ | .STRTAB 0x005f->0x0432 ; "INPUT_DATA_LOC"
0404 006b | k | .STRTAB 0x006b->0x0439 ; "EXPECTED_OUTPUT_LOC"
0405 007c | | | .STRTAB 0x007c->0x0443 ; "TEST_OUTPUT_LOC"
0406 0089 | | .STRTAB 0x0089->0x044a ; "TEST_LOG_LOC"
0407 0093 | | .STRTAB 0x0093->0x0450 ; "TEST_SCRIPT_LOC"
0408 00a0 | | .STRTAB 0x00a0->0x0458 ; "others => Unspecified"
0409 00b3 | | .STRTAB 0x00b3->0x0462 ; "=>"
040a 00b3 | | .STRTAB 0x00b3->0x0463 ; "Unable to resolve Context Location "
040b 00d4 | | .STRTAB 0x00d4->0x0475 ; " "
040c 00d3 | | .STREND 0x00d3->0x0475
040d 4e4f 4e45 |NONE| .STRTAB_STRINGS
0476 0000 0000 | | .XXX[0x2]
0478 ; --------------------------------------------------------------------------------------
0478 ; Debug Table
0478 ; --------------------------------------------------------------------------------------
0478 0004 000a | | .DEBUG4 0x0004,0x000a,0x47c7,0x0000,0x0001,0x0000
047e 0000 0000 | | .BLANK 0000[0x182]