|
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: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_043cfb
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0b98 | | .CONST 0x0b98 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004f | O | .CONST 0x004f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b e003 | | Load 0x0,0x3
000c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
000d 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
000e 0007 | | Action Break_Optional
000f 00e1 | | Load_Encached Boolean_Cache
0010 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0011 00e1 | | Load_Encached Boolean_Cache
0012 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0013 00e1 | | Load_Encached Boolean_Cache
0014 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0015 00e1 | | Load_Encached Boolean_Cache
0016 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0017 00e3 | | Load_Encached Natural_Cache
0018 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0019 00e3 | | Load_Encached Natural_Cache
001a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
001b 00e3 | | Load_Encached Natural_Cache
001c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
001d 00e3 | | Load_Encached Natural_Cache
001e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
001f 029f 009b | | Declare_Subprogram For_Call,INIT_0098
0021 029f 00ab | | Declare_Subprogram For_Call,INIT_00a8
0023 029f 00bb | | Declare_Subprogram For_Call,INIT_00b8
0025 029f 00cb | | Declare_Subprogram For_Call,INIT_00c8
0027 029f 00db | | Declare_Subprogram For_Call,INIT_00d8
0029 029f 00f3 | | Declare_Subprogram For_Call,INIT_00f0
002b 029f 0103 | | Declare_Subprogram For_Call,INIT_0100
002d 029f 011b | | Declare_Subprogram For_Call,INIT_0118
002f 029f 012b | +| Declare_Subprogram For_Call,INIT_0128
0031 029f 0143 | C| Declare_Subprogram For_Call,INIT_0140
0033 029f 017b | {| Declare_Subprogram For_Call,INIT_0178
0035 029f 01a3 | | Declare_Subprogram For_Call,INIT_01a0
0037 029f 029b | | Declare_Subprogram For_Call,INIT_0298
0039 029f 02cb | | Declare_Subprogram For_Call,INIT_02c8
003b 029f 02db | | Declare_Subprogram For_Call,INIT_02d8
003d 029f 03c3 | | Declare_Subprogram For_Call,INIT_03c0
003f 029f 0453 | S| Declare_Subprogram For_Call,INIT_0450
0041 029f 04cb | | Declare_Subprogram For_Call,INIT_04c8
0043 029f 053b | ;| Declare_Subprogram For_Call,INIT_0538
0045 029f 054b | K| Declare_Subprogram For_Call,INIT_0548
0047 029f 05eb | | Declare_Subprogram For_Call,INIT_05e8
0049 029f 0673 | s| Declare_Subprogram For_Call,INIT_0670
004b 029f 0703 | | Declare_Subprogram For_Call,INIT_0700
004d 029f 077b | {| Declare_Subprogram For_Call,INIT_0778
004f BODY_0008:
004f e5fd | | Load 0x2,-0x3
0050 e5fe | | Load 0x2,-0x2
0051 e5ff | | Load 0x2,-0x1
0052 0092 07e3 | | Action Push_String_Extended,0x7e3 ; "Comparing CDB for secondary subsystem <2> against CDB for primary subsystem <1>"
0054 e220 | | Load 0x1,0x20
0055 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0056 4801 |H | Short_Literal 0x1
0057 a5fc | | Store_Unchecked 0x2,-0x4
0058 8417 | | Call 0x2,0x17
0059 e406 | | Load 0x2,0x6
005a 6802 |h | Jump_Zero 0x5d
005b 841c | | Call 0x2,0x1c
005c 8422 | " | Call 0x2,0x22
005d e406 | | Load 0x2,0x6
005e 680c |h | Jump_Zero 0x6b
005f e407 | | Load 0x2,0x7
0060 0c01 | | Execute_Immediate Greater_Equal,0x1
0061 7009 |p | Jump_Nonzero 0x6b
0062 e408 | | Load 0x2,0x8
0063 0c01 | | Execute_Immediate Greater_Equal,0x1
0064 7006 |p | Jump_Nonzero 0x6b
0065 e409 | | Load 0x2,0x9
0066 0c01 | | Execute_Immediate Greater_Equal,0x1
0067 7003 |p | Jump_Nonzero 0x6b
0068 e40a | | Load 0x2,0xa
0069 0c01 | | Execute_Immediate Greater_Equal,0x1
006a 6821 |h! | Jump_Zero 0x8c
006b e5fd | | Load 0x2,-0x3
006c e5fe | | Load 0x2,-0x2
006d e5ff | | Load 0x2,-0x1
006e 0092 07e4 | | Action Push_String_Extended,0x7e4 ; "CDB for secondary subsystem <2> is incompatible with CDB for primary subsystem <1>"
0070 e220 | | Load 0x1,0x20
0071 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0072 e5fd | | Load 0x2,-0x3
0073 e5fe | | Load 0x2,-0x2
0074 e220 | | Load 0x1,0x20
0075 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0076 0092 07e5 | | Action Push_String_Extended,0x7e5 ; "Incompatible unit maps"
0078 e403 | | Load 0x2,0x3
0079 00d8 | | Load_Top At_Offset_0
007a 00e3 | | Load_Encached Natural_Cache
007b 0260 | ` | Execute Discrete,In_Type
007c 7001 |p | Jump_Nonzero 0x7e
007d 0801 | | Execute_Immediate Raise,0x1
007e 840b | | Call 0x2,0xb
007f 0092 07e6 | | Action Push_String_Extended,0x7e6 ; "Incompatible declaration maps"
0081 e409 | | Load 0x2,0x9
0082 840b | | Call 0x2,0xb
0083 0092 07e7 | | Action Push_String_Extended,0x7e7 ; "Incompatible offset maps"
0085 e40a | | Load 0x2,0xa
0086 840b | | Call 0x2,0xb
0087 0092 07e8 | | Action Push_String_Extended,0x7e8 ; "Errors (prevented complete comparison)"
0089 e407 | | Load 0x2,0x7
008a 840b | | Call 0x2,0xb
008b 4504 |E | Exit_Subprogram 0x4
008c e5fd | | Load 0x2,-0x3
008d e5fe | | Load 0x2,-0x2
008e e5ff | | Load 0x2,-0x1
008f 0092 07e9 | | Action Push_String_Extended,0x7e9 ; "CDB for secondary subsystem <2> is compatible with CDB for primary subsystem <1>"
0091 e220 | | Load 0x1,0x20
0092 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0093 4504 |E | Exit_Subprogram 0x4
0094 0000 0000 | | .BLANK 0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 0c01 | | Execute_Immediate Greater_Equal,0x1
009d 6805 |h | Jump_Zero 0xa3
009e e5fd | | Load 0x2,-0x3
009f e7fe | | Load 0x3,-0x2
00a0 e7ff | | Load 0x3,-0x1
00a1 e220 | | Load 0x1,0x20
00a2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00a3 4503 |E | Exit_Subprogram 0x3
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab e5fd | | Load 0x2,-0x3
00ac 00db | | Load_Top At_Offset_3
00ad e220 | | Load 0x1,0x20
00ae 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00af e407 | | Load 0x2,0x7
00b0 0a01 | | Execute_Immediate Plus,0x1
00b1 c407 | | Store 0x2,0x7
00b2 4800 |H | Short_Literal 0x0
00b3 a5fc | | Store_Unchecked 0x2,-0x4
00b4 4502 |E | Exit_Subprogram 0x2
00b5 0000 0000 | | .XXX[0x3]
00b7 0000 | |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb e5fd | | Load 0x2,-0x3
00bc e7fe | | Load 0x3,-0x2
00bd e7ff | | Load 0x3,-0x1
00be e220 | | Load 0x1,0x20
00bf 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00c0 e407 | | Load 0x2,0x7
00c1 0a01 | | Execute_Immediate Plus,0x1
00c2 c407 | | Store 0x2,0x7
00c3 4800 |H | Short_Literal 0x0
00c4 a5fc | | Store_Unchecked 0x2,-0x4
00c5 4503 |E | Exit_Subprogram 0x3
00c6 0000 0000 | | .XXX[0x2]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb e5fd | | Load 0x2,-0x3
00cc e5ff | | Load 0x2,-0x1
00cd 0092 07ea | | Action Push_String_Extended,0x7ea ; "Unit map for <1> is incompatible: "
00cf e7ff | | Load 0x3,-0x1
00d0 01cc | | Execute Vector,Catenate
00d1 e220 | | Load 0x1,0x20
00d2 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
00d3 4801 |H | Short_Literal 0x1
00d4 a403 | | Store_Unchecked 0x2,0x3
00d5 4800 |H | Short_Literal 0x0
00d6 a5fc | | Store_Unchecked 0x2,-0x4
00d7 4502 |E | Exit_Subprogram 0x2
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db e5fd | | Load 0x2,-0x3
00dc e5ff | | Load 0x2,-0x1
00dd 0092 07eb | | Action Push_String_Extended,0x7eb ; "Unit map for <1> is incompatible"
00df e220 | | Load 0x1,0x20
00e0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00e1 e408 | | Load 0x2,0x8
00e2 0a01 | | Execute_Immediate Plus,0x1
00e3 c408 | | Store 0x2,0x8
00e4 4800 |H | Short_Literal 0x0
00e5 a403 | | Store_Unchecked 0x2,0x3
00e6 4800 |H | Short_Literal 0x0
00e7 a5fc | | Store_Unchecked 0x2,-0x4
00e8 4501 |E | Exit_Subprogram 0x1
00e9 0000 0000 | | .BLANK 0000[0x7]
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 e5fd | | Load 0x2,-0x3
00f4 e7fe | | Load 0x3,-0x2
00f5 0092 07ec | | Action Push_String_Extended,0x7ec ; "Declaration map <1> is incompatible: "
00f7 e7ff | | Load 0x3,-0x1
00f8 01cc | | Execute Vector,Catenate
00f9 e220 | | Load 0x1,0x20
00fa 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
00fb 4801 |H | Short_Literal 0x1
00fc a404 | | Store_Unchecked 0x2,0x4
00fd 4800 |H | Short_Literal 0x0
00fe a5fc | | Store_Unchecked 0x2,-0x4
00ff 4503 |E | Exit_Subprogram 0x3
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 e5fd | | Load 0x2,-0x3
0104 00db | | Load_Top At_Offset_3
0105 0092 07ed | | Action Push_String_Extended,0x7ed ; "Declaration map <1> is incompatible"
0107 e220 | | Load 0x1,0x20
0108 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0109 e409 | | Load 0x2,0x9
010a 0a01 | | Execute_Immediate Plus,0x1
010b c409 | | Store 0x2,0x9
010c 4800 |H | Short_Literal 0x0
010d a404 | | Store_Unchecked 0x2,0x4
010e 4800 |H | Short_Literal 0x0
010f a5fc | | Store_Unchecked 0x2,-0x4
0110 4502 |E | Exit_Subprogram 0x2
0111 0000 0000 | | .BLANK 0000[0x7]
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 e5fd | | Load 0x2,-0x3
011c e7fe | | Load 0x3,-0x2
011d 0092 07ee | | Action Push_String_Extended,0x7ee ; "Offset map <1> is incompatible: "
011f e7ff | | Load 0x3,-0x1
0120 01cc | | Execute Vector,Catenate
0121 e220 | | Load 0x1,0x20
0122 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0123 4801 |H | Short_Literal 0x1
0124 a405 | | Store_Unchecked 0x2,0x5
0125 4800 |H | Short_Literal 0x0
0126 a5fc | | Store_Unchecked 0x2,-0x4
0127 4503 |E | Exit_Subprogram 0x3
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b e5fd | | Load 0x2,-0x3
012c 00db | | Load_Top At_Offset_3
012d 0092 07ef | | Action Push_String_Extended,0x7ef ; "Offset map <1> is incompatible"
012f e220 | | Load 0x1,0x20
0130 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0131 e40a | | Load 0x2,0xa
0132 0a01 | | Execute_Immediate Plus,0x1
0133 c40a | | Store 0x2,0xa
0134 4800 |H | Short_Literal 0x0
0135 a405 | | Store_Unchecked 0x2,0x5
0136 4800 |H | Short_Literal 0x0
0137 a5fc | | Store_Unchecked 0x2,-0x4
0138 4502 |E | Exit_Subprogram 0x2
0139 0000 0000 | | .BLANK 0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0149 | I | .CONST 0x0149 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0002 | | .CONST 0x0002 ; Number of locals
0143 INIT_0140:
0143 e012 | | Load 0x0,0x12
0144 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0145 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0146 02c7 | | Declare_Variable Any
0147 00d8 | | Load_Top At_Offset_0
0148 1c00 | | Execute_Immediate Run_Utility,0x0
0149 BODY_0140:
0149 00d8 | | Load_Top At_Offset_0
014a 0120 | | Execute Any,Is_Value
014b 6804 |h | Jump_Zero 0x150
014c e012 | | Load 0x0,0x12
014d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
014e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014f 7801 |x | Jump 0x151
0150 00d8 | | Load_Top At_Offset_0
0151 e7fe | | Load 0x3,-0x2
0152 4800 |H | Short_Literal 0x0
0153 4800 |H | Short_Literal 0x0
0154 e00f | | Load 0x0,0xf
0155 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0156 e7ff | | Load 0x3,-0x1
0157 e012 | | Load 0x0,0x12
0158 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0159 181b | | Execute Package,Field_Execute,Field_Number 0x1b
015a c7fe | | Store 0x3,-0x2
015b c602 | | Store 0x3,0x2
015c 00d8 | | Load_Top At_Offset_0
015d e012 | | Load 0x0,0x12
015e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
015f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0160 0b00 | | Execute_Immediate Case_Compare,0x0
0161 700a |p | Jump_Nonzero 0x16c
0162 0f01 | | Execute_Immediate Equal,0x1
0163 700c |p | Jump_Nonzero 0x170
0164 00d8 | | Load_Top At_Offset_0
0165 e012 | | Load 0x0,0x12
0166 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0167 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0168 840c | | Call 0x2,0xc
0169 4800 |H | Short_Literal 0x0
016a a7fd | | Store_Unchecked 0x3,-0x3
016b 4502 |E | Exit_Subprogram 0x2
016c 00d1 | | Pop_Control Pop_Count_1
016d 4801 |H | Short_Literal 0x1
016e a7fd | | Store_Unchecked 0x3,-0x3
016f 4502 |E | Exit_Subprogram 0x2
0170 e5fd | | Load 0x2,-0x3
0171 e7ff | | Load 0x3,-0x1
0172 0092 07f0 | | Action Push_String_Extended,0x7f0 ; "Unit map not found for <1>"
0174 e220 | | Load 0x1,0x20
0175 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0176 840f | | Call 0x2,0xf
0177 4502 |E | Exit_Subprogram 0x2
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0181 | | .CONST 0x0181 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e012 | | Load 0x0,0x12
017c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
017d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
017e 02c7 | | Declare_Variable Any
017f 00d8 | | Load_Top At_Offset_0
0180 1c00 | | Execute_Immediate Run_Utility,0x0
0181 BODY_0178:
0181 00d8 | | Load_Top At_Offset_0
0182 0120 | | Execute Any,Is_Value
0183 6804 |h | Jump_Zero 0x188
0184 e012 | | Load 0x0,0x12
0185 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0186 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0187 7801 |x | Jump 0x189
0188 00d8 | | Load_Top At_Offset_0
0189 e7ff | | Load 0x3,-0x1
018a e012 | | Load 0x0,0x12
018b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
018c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
018d c7ff | | Store 0x3,-0x1
018e c602 | | Store 0x3,0x2
018f 00d8 | | Load_Top At_Offset_0
0190 e012 | | Load 0x0,0x12
0191 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0192 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0193 7005 |p | Jump_Nonzero 0x199
0194 00d8 | | Load_Top At_Offset_0
0195 e012 | | Load 0x0,0x12
0196 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0197 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0198 840c | | Call 0x2,0xc
0199 4501 |E | Exit_Subprogram 0x1
019a 0000 0000 | | .BLANK 0000[0x6]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01d7 | | .CONST 0x01d7 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 000d | | .CONST 0x000d ; Number of locals
01a3 INIT_01a0:
01a3 00db | | Load_Top At_Offset_3
01a4 e012 | | Load 0x0,0x12
01a5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01a6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01a7 00db | | Load_Top At_Offset_3
01a8 e012 | | Load 0x0,0x12
01a9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01aa 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01ab e7fe | | Load 0x3,-0x2
01ac e012 | | Load 0x0,0x12
01ad 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01ae 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01af e7ff | | Load 0x3,-0x1
01b0 e012 | | Load 0x0,0x12
01b1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01b2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01b3 e7fe | | Load 0x3,-0x2
01b4 e012 | | Load 0x0,0x12
01b5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01b6 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01b7 e7ff | | Load 0x3,-0x1
01b8 e012 | | Load 0x0,0x12
01b9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01ba 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
01bb e7fe | | Load 0x3,-0x2
01bc e012 | | Load 0x0,0x12
01bd 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01be 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
01bf e012 | | Load 0x0,0x12
01c0 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c2 e012 | | Load 0x0,0x12
01c3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c5 e012 | | Load 0x0,0x12
01c6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c7 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
01c8 02c7 | | Declare_Variable Any
01c9 00d8 | | Load_Top At_Offset_0
01ca 1c00 | | Execute_Immediate Run_Utility,0x0
01cb e012 | | Load 0x0,0x12
01cc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 02c7 | | Declare_Variable Any
01cf 00d8 | | Load_Top At_Offset_0
01d0 1c00 | | Execute_Immediate Run_Utility,0x0
01d1 e012 | | Load 0x0,0x12
01d2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01d3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d4 02c7 | | Declare_Variable Any
01d5 00d8 | | Load_Top At_Offset_0
01d6 1c00 | | Execute_Immediate Run_Utility,0x0
01d7 BODY_01a0:
01d7 00be | | Action Activate_Tasks
01d8 e602 | | Load 0x3,0x2
01d9 0e01 | | Execute_Immediate Not_Equal,0x1
01da 6805 |h | Jump_Zero 0x1e0
01db 0092 07f1 | | Action Push_String_Extended,0x7f1 ; "Subsystem is not a secondary copy"
01dd 840e | | Call 0x2,0xe
01de 840f | | Call 0x2,0xf
01df 4503 |E | Exit_Subprogram 0x3
01e0 e604 | | Load 0x3,0x4
01e1 e603 | | Load 0x3,0x3
01e2 027e | ~ | Execute Discrete,Not_Equal
01e3 6811 |h | Jump_Zero 0x1f5
01e4 0092 07f2 | | Action Push_String_Extended,0x7f2 ; "Subsystem ID "
01e6 e604 | | Load 0x3,0x4
01e7 821b | | Call 0x1,0x1b
01e8 01cc | | Execute Vector,Catenate
01e9 0092 07f3 | | Action Push_String_Extended,0x7f3 ; " does not match subsystem ID "
01eb 01cc | | Execute Vector,Catenate
01ec e603 | | Load 0x3,0x3
01ed 821b | | Call 0x1,0x1b
01ee 01cc | | Execute Vector,Catenate
01ef 0092 07f4 | | Action Push_String_Extended,0x7f4 ; " in unit map for the primary subsystem"
01f1 01cc | | Execute Vector,Catenate
01f2 840e | | Call 0x2,0xe
01f3 840f | | Call 0x2,0xf
01f4 4503 |E | Exit_Subprogram 0x3
01f5 4801 |H | Short_Literal 0x1
01f6 a406 | | Store_Unchecked 0x2,0x6
01f7 e606 | | Load 0x3,0x6
01f8 e605 | | Load 0x3,0x5
01f9 027d | } | Execute Discrete,Greater
01fa 680f |h | Jump_Zero 0x20a
01fb 0092 07f5 | | Action Push_String_Extended,0x7f5 ; "Generation number "
01fd e606 | | Load 0x3,0x6
01fe 821a | | Call 0x1,0x1a
01ff 01cc | | Execute Vector,Catenate
0200 0092 07f6 | | Action Push_String_Extended,0x7f6 ; " is greater than generation number "
0202 01cc | | Execute Vector,Catenate
0203 e605 | | Load 0x3,0x5
0204 821a | | Call 0x1,0x1a
0205 01cc | | Execute Vector,Catenate
0206 0092 07f4 | | Action Push_String_Extended,0x7f4 ; " in unit map for the primary subsystem"
0208 01cc | | Execute Vector,Catenate
0209 840e | | Call 0x2,0xe
020a e608 | | Load 0x3,0x8
020b e607 | | Load 0x3,0x7
020c 027d | } | Execute Discrete,Greater
020d 680f |h | Jump_Zero 0x21d
020e 0092 07f7 | | Action Push_String_Extended,0x7f7 ; "Last unit number "
0210 e608 | | Load 0x3,0x8
0211 821a | | Call 0x1,0x1a
0212 01cc | | Execute Vector,Catenate
0213 0092 07f8 | | Action Push_String_Extended,0x7f8 ; " is greater than last unit number "
0215 01cc | | Execute Vector,Catenate
0216 e607 | | Load 0x3,0x7
0217 821a | | Call 0x1,0x1a
0218 01cc | | Execute Vector,Catenate
0219 0092 07f4 | | Action Push_String_Extended,0x7f4 ; " in unit map for the primary subsystem"
021b 01cc | | Execute Vector,Catenate
021c 840e | | Call 0x2,0xe
021d e7ff | | Load 0x3,-0x1
021e c60c | | Store 0x3,0xc
021f 00da | | Load_Top At_Offset_2
0220 e7fe | | Load 0x3,-0x2
0221 e012 | | Load 0x0,0x12
0222 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0223 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0224 c60b | | Store 0x3,0xb
0225 00cf | | Action Mark_Auxiliary
0226 7868 |xh | Jump 0x28f
0227 00db | | Load_Top At_Offset_3
0228 e012 | | Load 0x0,0x12
0229 1b13 | | Execute Package,Field_Read,Field_Number 0x13
022a 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
022b a60a | | Store_Unchecked 0x3,0xa
022c 00d9 | | Load_Top At_Offset_1
022d 0120 | | Execute Any,Is_Value
022e 6804 |h | Jump_Zero 0x233
022f e012 | | Load 0x0,0x12
0230 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0231 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0232 7801 |x | Jump 0x234
0233 00d9 | | Load_Top At_Offset_1
0234 e012 | | Load 0x0,0x12
0235 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0236 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0237 e60c | | Load 0x3,0xc
0238 e60b | | Load 0x3,0xb
0239 e012 | | Load 0x0,0x12
023a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
023b 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
023c e012 | | Load 0x0,0x12
023d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
023e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
023f c60c | | Store 0x3,0xc
0240 c609 | | Store 0x3,0x9
0241 c60d | | Store 0x3,0xd
0242 00d9 | | Load_Top At_Offset_1
0243 e012 | | Load 0x0,0x12
0244 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0245 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0246 4610 |F | Jump_Case 0x10
0247 7816 |x | Jump 0x25e ; case 0x0
0248 780f |x | Jump 0x258 ; case 0x1
0249 780e |x | Jump 0x258 ; case 0x2
024a 780d |x | Jump 0x258 ; case 0x3
024b 780c |x | Jump 0x258 ; case 0x4
024c 782c |x, | Jump 0x279 ; case 0x5
024d 780a |x | Jump 0x258 ; case 0x6
024e 7809 |x | Jump 0x258 ; case 0x7
024f 7808 |x | Jump 0x258 ; case 0x8
0250 7807 |x | Jump 0x258 ; case 0x9
0251 7806 |x | Jump 0x258 ; case 0xa
0252 7805 |x | Jump 0x258 ; case 0xb
0253 7804 |x | Jump 0x258 ; case 0xc
0254 7803 |x | Jump 0x258 ; case 0xd
0255 7802 |x | Jump 0x258 ; case 0xe
0256 7801 |x | Jump 0x258 ; case 0xf
0257 7800 |x | Jump 0x258 ; case 0x10
0258 00d9 | | Load_Top At_Offset_1
0259 e012 | | Load 0x0,0x12
025a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
025b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
025c 840c | | Call 0x2,0xc
025d 782b |x+ | Jump 0x289
025e e60a | | Load 0x3,0xa
025f e609 | | Load 0x3,0x9
0260 027e | ~ | Execute Discrete,Not_Equal
0261 6827 |h' | Jump_Zero 0x289
0262 4820 |H | Short_Literal 0x20
0263 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "Unit number for "
0265 e60b | | Load 0x3,0xb
0266 e012 | | Load 0x0,0x12
0267 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0268 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0269 01cc | | Execute Vector,Catenate
026a 01cb | | Execute Vector,Append
026b e60a | | Load 0x3,0xa
026c 821a | | Call 0x1,0x1a
026d 01cc | | Execute Vector,Catenate
026e 0092 07fa | | Action Push_String_Extended,0x7fa ; " does not match unit number "
0270 01cc | | Execute Vector,Catenate
0271 e609 | | Load 0x3,0x9
0272 821a | | Call 0x1,0x1a
0273 01cc | | Execute Vector,Catenate
0274 0092 07f4 | | Action Push_String_Extended,0x7f4 ; " in unit map for the primary subsystem"
0276 01cc | | Execute Vector,Catenate
0277 840e | | Call 0x2,0xe
0278 7810 |x | Jump 0x289
0279 4820 |H | Short_Literal 0x20
027a 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "Unit number for "
027c e60b | | Load 0x3,0xb
027d e012 | | Load 0x0,0x12
027e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
027f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0280 01cc | | Execute Vector,Catenate
0281 01cb | | Execute Vector,Append
0282 e60a | | Load 0x3,0xa
0283 821a | | Call 0x1,0x1a
0284 01cc | | Execute Vector,Catenate
0285 0092 07fb | | Action Push_String_Extended,0x7fb ; " is not defined in unit map for the primary subsystem"
0287 01cc | | Execute Vector,Catenate
0288 840e | | Call 0x2,0xe
0289 00db | | Load_Top At_Offset_3
028a e012 | | Load 0x0,0x12
028b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
028c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
028d c60b | | Store 0x3,0xb
028e 00c9 | | Action Pop_Auxiliary_Loop
028f 00db | | Load_Top At_Offset_3
0290 e012 | | Load 0x0,0x12
0291 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0292 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0293 6f93 |o | Jump_Zero 0x227
0294 4503 |E | Exit_Subprogram 0x3
0295 0000 0000 | | .XXX[0x3]
0297 0000 | |
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a8 | | .CONST 0x02a8 ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0004 | | .CONST 0x0004 ; Number of locals
029b INIT_0298:
029b e012 | | Load 0x0,0x12
029c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
029d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
029e 02c7 | | Declare_Variable Any
029f 00d8 | | Load_Top At_Offset_0
02a0 1c00 | | Execute_Immediate Run_Utility,0x0
02a1 e012 | | Load 0x0,0x12
02a2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a4 02c7 | | Declare_Variable Any
02a5 00d8 | | Load_Top At_Offset_0
02a6 1c00 | | Execute_Immediate Run_Utility,0x0
02a7 00e1 | | Load_Encached Boolean_Cache
02a8 BODY_0298:
02a8 00e1 | | Load_Encached Boolean_Cache
02a9 00db | | Load_Top At_Offset_3
02aa e5ff | | Load 0x2,-0x1
02ab 8414 | | Call 0x2,0x14
02ac c602 | | Store 0x3,0x2
02ad 0059 | Y | Store_Top Discrete,At_Offset_1
02ae 00d8 | | Load_Top At_Offset_0
02af 7001 |p | Jump_Nonzero 0x2b1
02b0 4501 |E | Exit_Subprogram 0x1
02b1 00e1 | | Load_Encached Boolean_Cache
02b2 00da | | Load_Top At_Offset_2
02b3 e5fe | | Load 0x2,-0x2
02b4 8414 | | Call 0x2,0x14
02b5 c603 | | Store 0x3,0x3
02b6 0059 | Y | Store_Top Discrete,At_Offset_1
02b7 00d8 | | Load_Top At_Offset_0
02b8 7001 |p | Jump_Nonzero 0x2ba
02b9 4501 |E | Exit_Subprogram 0x1
02ba 00d9 | | Load_Top At_Offset_1
02bb 00db | | Load_Top At_Offset_3
02bc 8416 | | Call 0x2,0x16
02bd 00da | | Load_Top At_Offset_2
02be 8415 | | Call 0x2,0x15
02bf c602 | | Store 0x3,0x2
02c0 00d9 | | Load_Top At_Offset_1
02c1 8415 | | Call 0x2,0x15
02c2 c603 | | Store 0x3,0x3
02c3 e403 | | Load 0x2,0x3
02c4 6801 |h | Jump_Zero 0x2c6
02c5 840f | | Call 0x2,0xf
02c6 4501 |E | Exit_Subprogram 0x1
02c7 0000 | | .XXX[0x1]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 0092 07fc | | Action Push_String_Extended,0x7fc ; "State.Compatibility.Declaration_Numbers."
02cd 00db | | Load_Top At_Offset_3
02ce e003 | | Load 0x0,0x3
02cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02d0 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
02d1 01cc | | Execute Vector,Catenate
02d2 4401 |D | Exit_Subprogram With_Result,0x1
02d3 0000 0000 | | .BLANK 0000[0x5]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 0309 | | .CONST 0x0309 ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 000c | | .CONST 0x000c ; Number of locals
02db INIT_02d8:
02db 00db | | Load_Top At_Offset_3
02dc e012 | | Load 0x0,0x12
02dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02de 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02df 00db | | Load_Top At_Offset_3
02e0 e012 | | Load 0x0,0x12
02e1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02e2 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02e3 e7fe | | Load 0x3,-0x2
02e4 e012 | | Load 0x0,0x12
02e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02e6 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02e7 e7ff | | Load 0x3,-0x1
02e8 e012 | | Load 0x0,0x12
02e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02ea 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02eb e7fe | | Load 0x3,-0x2
02ec e012 | | Load 0x0,0x12
02ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02ee 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02ef e7ff | | Load 0x3,-0x1
02f0 e012 | | Load 0x0,0x12
02f1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02f2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02f3 e7fe | | Load 0x3,-0x2
02f4 e012 | | Load 0x0,0x12
02f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02f6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02f7 e012 | | Load 0x0,0x12
02f8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02f9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02fa e012 | | Load 0x0,0x12
02fb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02fc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02fd e012 | | Load 0x0,0x12
02fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02ff 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0300 02c7 | | Declare_Variable Any
0301 00d8 | | Load_Top At_Offset_0
0302 1c00 | | Execute_Immediate Run_Utility,0x0
0303 e012 | | Load 0x0,0x12
0304 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0305 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0306 02c7 | | Declare_Variable Any
0307 00d8 | | Load_Top At_Offset_0
0308 1c00 | | Execute_Immediate Run_Utility,0x0
0309 BODY_02d8:
0309 00be | | Action Activate_Tasks
030a e602 | | Load 0x3,0x2
030b 0e01 | | Execute_Immediate Not_Equal,0x1
030c 6804 |h | Jump_Zero 0x311
030d e7fc | | Load 0x3,-0x4
030e 0092 07fd | | Action Push_String_Extended,0x7fd ; "Subsystem mode is not secondary"
0310 8410 | | Call 0x2,0x10
0311 e604 | | Load 0x3,0x4
0312 e603 | | Load 0x3,0x3
0313 027e | ~ | Execute Discrete,Not_Equal
0314 6810 |h | Jump_Zero 0x325
0315 e7fc | | Load 0x3,-0x4
0316 0092 07f2 | | Action Push_String_Extended,0x7f2 ; "Subsystem ID "
0318 e604 | | Load 0x3,0x4
0319 821b | | Call 0x1,0x1b
031a 01cc | | Execute Vector,Catenate
031b 0092 07fe | | Action Push_String_Extended,0x7fe ; " does not match Subsystem ID "
031d 01cc | | Execute Vector,Catenate
031e e603 | | Load 0x3,0x3
031f 821b | | Call 0x1,0x1b
0320 01cc | | Execute Vector,Catenate
0321 0092 07ff | | Action Push_String_Extended,0x7ff ; " in declaration map for the primary subsystem"
0323 01cc | | Execute Vector,Catenate
0324 8410 | | Call 0x2,0x10
0325 e606 | | Load 0x3,0x6
0326 e605 | | Load 0x3,0x5
0327 027d | } | Execute Discrete,Greater
0328 6810 |h | Jump_Zero 0x339
0329 e7fc | | Load 0x3,-0x4
032a 0092 07f5 | | Action Push_String_Extended,0x7f5 ; "Generation number "
032c e606 | | Load 0x3,0x6
032d 821a | | Call 0x1,0x1a
032e 01cc | | Execute Vector,Catenate
032f 0092 07f6 | | Action Push_String_Extended,0x7f6 ; " is greater than generation number "
0331 01cc | | Execute Vector,Catenate
0332 e605 | | Load 0x3,0x5
0333 821a | | Call 0x1,0x1a
0334 01cc | | Execute Vector,Catenate
0335 0092 07ff | | Action Push_String_Extended,0x7ff ; " in declaration map for the primary subsystem"
0337 01cc | | Execute Vector,Catenate
0338 8410 | | Call 0x2,0x10
0339 e608 | | Load 0x3,0x8
033a e607 | | Load 0x3,0x7
033b 027d | } | Execute Discrete,Greater
033c 6810 |h | Jump_Zero 0x34d
033d e7fc | | Load 0x3,-0x4
033e 0092 0800 | | Action Push_String_Extended,0x800 ; "Last decl number "
0340 e608 | | Load 0x3,0x8
0341 821c | | Call 0x1,0x1c
0342 01cc | | Execute Vector,Catenate
0343 0092 0801 | | Action Push_String_Extended,0x801 ; " is greater than last declaration number "
0345 01cc | | Execute Vector,Catenate
0346 e607 | | Load 0x3,0x7
0347 821c | | Call 0x1,0x1c
0348 01cc | | Execute Vector,Catenate
0349 0092 07ff | | Action Push_String_Extended,0x7ff ; " in declaration map for the primary subsystem"
034b 01cc | | Execute Vector,Catenate
034c 8410 | | Call 0x2,0x10
034d 00d9 | | Load_Top At_Offset_1
034e e7fe | | Load 0x3,-0x2
034f e012 | | Load 0x0,0x12
0350 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0351 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0352 c60b | | Store 0x3,0xb
0353 00cf | | Action Mark_Auxiliary
0354 785c |x\ | Jump 0x3b1
0355 00da | | Load_Top At_Offset_2
0356 e012 | | Load 0x0,0x12
0357 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0358 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0359 a60a | | Store_Unchecked 0x3,0xa
035a 00d9 | | Load_Top At_Offset_1
035b 0120 | | Execute Any,Is_Value
035c 6804 |h | Jump_Zero 0x361
035d e012 | | Load 0x0,0x12
035e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
035f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0360 7801 |x | Jump 0x362
0361 00d9 | | Load_Top At_Offset_1
0362 e012 | | Load 0x0,0x12
0363 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0364 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0365 e60b | | Load 0x3,0xb
0366 e012 | | Load 0x0,0x12
0367 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0368 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0369 e7ff | | Load 0x3,-0x1
036a e012 | | Load 0x0,0x12
036b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
036c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
036d c609 | | Store 0x3,0x9
036e c60c | | Store 0x3,0xc
036f 00d9 | | Load_Top At_Offset_1
0370 e012 | | Load 0x0,0x12
0371 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0372 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0373 4611 |F | Jump_Case 0x11
0374 7817 |x | Jump 0x38c ; case 0x0
0375 7810 |x | Jump 0x386 ; case 0x1
0376 780f |x | Jump 0x386 ; case 0x2
0377 780e |x | Jump 0x386 ; case 0x3
0378 780d |x | Jump 0x386 ; case 0x4
0379 780c |x | Jump 0x386 ; case 0x5
037a 7826 |x& | Jump 0x3a1 ; case 0x6
037b 780a |x | Jump 0x386 ; case 0x7
037c 7809 |x | Jump 0x386 ; case 0x8
037d 7808 |x | Jump 0x386 ; case 0x9
037e 7807 |x | Jump 0x386 ; case 0xa
037f 7806 |x | Jump 0x386 ; case 0xb
0380 7805 |x | Jump 0x386 ; case 0xc
0381 7804 |x | Jump 0x386 ; case 0xd
0382 7803 |x | Jump 0x386 ; case 0xe
0383 7802 |x | Jump 0x386 ; case 0xf
0384 7801 |x | Jump 0x386 ; case 0x10
0385 7800 |x | Jump 0x386 ; case 0x11
0386 00d9 | | Load_Top At_Offset_1
0387 e012 | | Load 0x0,0x12
0388 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0389 1816 | | Execute Package,Field_Execute,Field_Number 0x16
038a 840c | | Call 0x2,0xc
038b 781f |x | Jump 0x3ab
038c 00db | | Load_Top At_Offset_3
038d e609 | | Load 0x3,0x9
038e 027f | | Execute Discrete,Equal
038f 701b |p | Jump_Nonzero 0x3ab
0390 e7fc | | Load 0x3,-0x4
0391 0092 0802 | | Action Push_String_Extended,0x802 ; "Declaration number "
0393 e60a | | Load 0x3,0xa
0394 821c | | Call 0x1,0x1c
0395 01cc | | Execute Vector,Catenate
0396 0092 0803 | | Action Push_String_Extended,0x803 ; " conflicts with declaration number "
0398 01cc | | Execute Vector,Catenate
0399 e609 | | Load 0x3,0x9
039a 821c | | Call 0x1,0x1c
039b 01cc | | Execute Vector,Catenate
039c 0092 07ff | | Action Push_String_Extended,0x7ff ; " in declaration map for the primary subsystem"
039e 01cc | | Execute Vector,Catenate
039f 8410 | | Call 0x2,0x10
03a0 780a |x | Jump 0x3ab
03a1 e7fc | | Load 0x3,-0x4
03a2 0092 0802 | | Action Push_String_Extended,0x802 ; "Declaration number "
03a4 e60a | | Load 0x3,0xa
03a5 821c | | Call 0x1,0x1c
03a6 01cc | | Execute Vector,Catenate
03a7 0092 0804 | | Action Push_String_Extended,0x804 ; " is not defined in the declaration map for the primary subsystem"
03a9 01cc | | Execute Vector,Catenate
03aa 8410 | | Call 0x2,0x10
03ab 00da | | Load_Top At_Offset_2
03ac e012 | | Load 0x0,0x12
03ad 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03ae 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03af c60b | | Store 0x3,0xb
03b0 00c9 | | Action Pop_Auxiliary_Loop
03b1 00da | | Load_Top At_Offset_2
03b2 e012 | | Load 0x0,0x12
03b3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03b4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
03b5 6f9f |o | Jump_Zero 0x355
03b6 00ce | | Action Pop_Auxiliary
03b7 e404 | | Load 0x2,0x4
03b8 6802 |h | Jump_Zero 0x3bb
03b9 e7fc | | Load 0x3,-0x4
03ba 8411 | | Call 0x2,0x11
03bb 4505 |E | Exit_Subprogram 0x5
03bc 0000 0000 | | .BLANK 0000[0x4]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03d5 | | .CONST 0x03d5 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0004 | | .CONST 0x0004 ; Number of locals
03c3 INIT_03c0:
03c3 e012 | | Load 0x0,0x12
03c4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03c6 02c7 | | Declare_Variable Any
03c7 00d8 | | Load_Top At_Offset_0
03c8 1c00 | | Execute_Immediate Run_Utility,0x0
03c9 e012 | | Load 0x0,0x12
03ca 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03cc 02c7 | | Declare_Variable Any
03cd 00d8 | | Load_Top At_Offset_0
03ce 1c00 | | Execute_Immediate Run_Utility,0x0
03cf e012 | | Load 0x0,0x12
03d0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d2 02c7 | | Declare_Variable Any
03d3 00d8 | | Load_Top At_Offset_0
03d4 1c00 | | Execute_Immediate Run_Utility,0x0
03d5 BODY_03c0:
03d5 00d8 | | Load_Top At_Offset_0
03d6 0120 | | Execute Any,Is_Value
03d7 6804 |h | Jump_Zero 0x3dc
03d8 e012 | | Load 0x0,0x12
03d9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03db 7801 |x | Jump 0x3dd
03dc 00d8 | | Load_Top At_Offset_0
03dd 00db | | Load_Top At_Offset_3
03de 4800 |H | Short_Literal 0x0
03df e00f | | Load 0x0,0xf
03e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e1 e7ff | | Load 0x3,-0x1
03e2 e012 | | Load 0x0,0x12
03e3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03e4 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03e5 c602 | | Store 0x3,0x2
03e6 c604 | | Store 0x3,0x4
03e7 00d8 | | Load_Top At_Offset_0
03e8 e012 | | Load 0x0,0x12
03e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03eb 7006 |p | Jump_Nonzero 0x3f2
03ec 00d8 | | Load_Top At_Offset_0
03ed e012 | | Load 0x0,0x12
03ee 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03ef 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03f0 840c | | Call 0x2,0xc
03f1 4503 |E | Exit_Subprogram 0x3
03f2 00d8 | | Load_Top At_Offset_0
03f3 0120 | | Execute Any,Is_Value
03f4 6804 |h | Jump_Zero 0x3f9
03f5 e012 | | Load 0x0,0x12
03f6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f8 7801 |x | Jump 0x3fa
03f9 00d8 | | Load_Top At_Offset_0
03fa 00da | | Load_Top At_Offset_2
03fb 4800 |H | Short_Literal 0x0
03fc e00f | | Load 0x0,0xf
03fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03fe e7fe | | Load 0x3,-0x2
03ff e012 | | Load 0x0,0x12
0400 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0401 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0402 c603 | | Store 0x3,0x3
0403 c604 | | Store 0x3,0x4
0404 00d8 | | Load_Top At_Offset_0
0405 e012 | | Load 0x0,0x12
0406 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0407 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0408 7006 |p | Jump_Nonzero 0x40f
0409 00d8 | | Load_Top At_Offset_0
040a e012 | | Load 0x0,0x12
040b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
040c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
040d 840c | | Call 0x2,0xc
040e 4503 |E | Exit_Subprogram 0x3
040f e7fe | | Load 0x3,-0x2
0410 e7ff | | Load 0x3,-0x1
0411 00db | | Load_Top At_Offset_3
0412 e602 | | Load 0x3,0x2
0413 8419 | | Call 0x2,0x19
0414 00d8 | | Load_Top At_Offset_0
0415 0120 | | Execute Any,Is_Value
0416 6804 |h | Jump_Zero 0x41b
0417 e012 | | Load 0x0,0x12
0418 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0419 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041a 7801 |x | Jump 0x41c
041b 00d8 | | Load_Top At_Offset_0
041c 00db | | Load_Top At_Offset_3
041d e012 | | Load 0x0,0x12
041e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
041f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0420 c602 | | Store 0x3,0x2
0421 c604 | | Store 0x3,0x4
0422 00d8 | | Load_Top At_Offset_0
0423 e012 | | Load 0x0,0x12
0424 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0425 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0426 7005 |p | Jump_Nonzero 0x42c
0427 00d8 | | Load_Top At_Offset_0
0428 e012 | | Load 0x0,0x12
0429 1b14 | | Execute Package,Field_Read,Field_Number 0x14
042a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
042b 840c | | Call 0x2,0xc
042c 00d8 | | Load_Top At_Offset_0
042d 0120 | | Execute Any,Is_Value
042e 6804 |h | Jump_Zero 0x433
042f e012 | | Load 0x0,0x12
0430 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0431 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0432 7801 |x | Jump 0x434
0433 00d8 | | Load_Top At_Offset_0
0434 00da | | Load_Top At_Offset_2
0435 e012 | | Load 0x0,0x12
0436 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0437 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0438 c603 | | Store 0x3,0x3
0439 c604 | | Store 0x3,0x4
043a 00d8 | | Load_Top At_Offset_0
043b e012 | | Load 0x0,0x12
043c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
043d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
043e 7005 |p | Jump_Nonzero 0x444
043f 00d8 | | Load_Top At_Offset_0
0440 e012 | | Load 0x0,0x12
0441 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0442 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0443 840c | | Call 0x2,0xc
0444 e404 | | Load 0x2,0x4
0445 6802 |h | Jump_Zero 0x448
0446 e7fe | | Load 0x3,-0x2
0447 8411 | | Call 0x2,0x11
0448 4503 |E | Exit_Subprogram 0x3
0449 0000 0000 | | .BLANK 0000[0x7]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0462 | b | .CONST 0x0462 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0006 | | .CONST 0x0006 ; Number of locals
0453 INIT_0450:
0453 00da | | Load_Top At_Offset_2
0454 8418 | | Call 0x2,0x18
0455 e003 | | Load 0x0,0x3
0456 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0457 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0458 e003 | | Load 0x0,0x3
0459 1b0f | | Execute Package,Field_Read,Field_Number 0xf
045a 02c7 | | Declare_Variable Any
045b 00d8 | | Load_Top At_Offset_0
045c 1c00 | | Execute_Immediate Run_Utility,0x0
045d e003 | | Load 0x0,0x3
045e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
045f e003 | | Load 0x0,0x3
0460 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0461 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0462 BODY_0450:
0462 e003 | | Load 0x0,0x3
0463 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0464 e003 | | Load 0x0,0x3
0465 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0466 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0467 605c |`\ | Indirect_Literal Discrete,0x4c4,{0x00000000, 0x00004000}
0468 e00f | | Load 0x0,0xf
0469 1b0e | | Execute Package,Field_Read,Field_Number 0xe
046a 4800 |H | Short_Literal 0x0
046b e5ff | | Load 0x2,-0x1
046c e003 | | Load 0x0,0x3
046d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
046e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
046f c603 | | Store 0x3,0x3
0470 005a | Z | Store_Top Discrete,At_Offset_2
0471 00d9 | | Load_Top At_Offset_1
0472 821d | | Call 0x1,0x1d
0473 700b |p | Jump_Nonzero 0x47f
0474 e5ff | | Load 0x2,-0x1
0475 0092 0805 | | Action Push_String_Extended,0x805 ; "Could not get map context for <1>: "
0477 00db | | Load_Top At_Offset_3
0478 e003 | | Load 0x0,0x3
0479 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047a 011c | | Execute Any,Convert_Unchecked
047b 1c01 | | Execute_Immediate Run_Utility,0x1
047c 01cc | | Execute Vector,Catenate
047d 840d | | Call 0x2,0xd
047e 4502 |E | Exit_Subprogram 0x2
047f e003 | | Load 0x0,0x3
0480 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0481 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0482 00db | | Load_Top At_Offset_3
0483 0120 | | Execute Any,Is_Value
0484 6803 |h | Jump_Zero 0x488
0485 e003 | | Load 0x0,0x3
0486 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0487 7801 |x | Jump 0x489
0488 00db | | Load_Top At_Offset_3
0489 603a |`: | Indirect_Literal Discrete,0x4c4,{0x00000000, 0x00004000}
048a e00f | | Load 0x0,0xf
048b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
048c e603 | | Load 0x3,0x3
048d e602 | | Load 0x3,0x2
048e e003 | | Load 0x0,0x3
048f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0490 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0491 c604 | | Store 0x3,0x4
0492 0059 | Y | Store_Top Discrete,At_Offset_1
0493 00d8 | | Load_Top At_Offset_0
0494 460e |F | Jump_Case 0xe
0495 7822 |x" | Jump 0x4b8 ; case 0x0
0496 780d |x | Jump 0x4a4 ; case 0x1
0497 780c |x | Jump 0x4a4 ; case 0x2
0498 7823 |x# | Jump 0x4bc ; case 0x3
0499 780a |x | Jump 0x4a4 ; case 0x4
049a 7809 |x | Jump 0x4a4 ; case 0x5
049b 7808 |x | Jump 0x4a4 ; case 0x6
049c 7807 |x | Jump 0x4a4 ; case 0x7
049d 7806 |x | Jump 0x4a4 ; case 0x8
049e 7805 |x | Jump 0x4a4 ; case 0x9
049f 7804 |x | Jump 0x4a4 ; case 0xa
04a0 7803 |x | Jump 0x4a4 ; case 0xb
04a1 7802 |x | Jump 0x4a4 ; case 0xc
04a2 7801 |x | Jump 0x4a4 ; case 0xd
04a3 7800 |x | Jump 0x4a4 ; case 0xe
04a4 0092 0806 | | Action Push_String_Extended,0x806 ; "Could not find declaration map in primary susystem because "
04a6 601d |` | Indirect_Literal Discrete,0x4c4,{0x00000000, 0x00004000}
04a7 e00f | | Load 0x0,0xf
04a8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04a9 e010 | | Load 0x0,0x10
04aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ab e011 | | Load 0x0,0x11
04ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ad 4801 |H | Short_Literal 0x1
04ae 4800 |H | Short_Literal 0x0
04af e603 | | Load 0x3,0x3
04b0 e602 | | Load 0x3,0x2
04b1 e606 | | Load 0x3,0x6
04b2 e003 | | Load 0x0,0x3
04b3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b4 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
04b5 01cc | | Execute Vector,Catenate
04b6 840c | | Call 0x2,0xc
04b7 4502 |E | Exit_Subprogram 0x2
04b8 e7ff | | Load 0x3,-0x1
04b9 00db | | Load_Top At_Offset_3
04ba 841a | | Call 0x2,0x1a
04bb 4502 |E | Exit_Subprogram 0x2
04bc e7ff | | Load 0x3,-0x1
04bd 0092 0807 | | Action Push_String_Extended,0x807 ; "Declaration map not found in primary subsystem"
04bf 8410 | | Call 0x2,0x10
04c0 e7ff | | Load 0x3,-0x1
04c1 8411 | | Call 0x2,0x11
04c2 4502 |E | Exit_Subprogram 0x2
04c3 0000 | | .XXX[0x1]
04c4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04de | | .CONST 0x04de ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0005 | | .CONST 0x0005 ; Number of locals
04cb INIT_04c8:
04cb e003 | | Load 0x0,0x3
04cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04cd 02c7 | | Declare_Variable Any
04ce 00d8 | | Load_Top At_Offset_0
04cf 1c00 | | Execute_Immediate Run_Utility,0x0
04d0 e003 | | Load 0x0,0x3
04d1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04d2 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04d3 02c7 | | Declare_Variable Any
04d4 00d8 | | Load_Top At_Offset_0
04d5 1c00 | | Execute_Immediate Run_Utility,0x0
04d6 e003 | | Load 0x0,0x3
04d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d8 e012 | | Load 0x0,0x12
04d9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04db 02c7 | | Declare_Variable Any
04dc 00d8 | | Load_Top At_Offset_0
04dd 1c00 | | Execute_Immediate Run_Utility,0x0
04de BODY_04c8:
04de 00d8 | | Load_Top At_Offset_0
04df 0120 | | Execute Any,Is_Value
04e0 6804 |h | Jump_Zero 0x4e5
04e1 e012 | | Load 0x0,0x12
04e2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04e4 7801 |x | Jump 0x4e6
04e5 00d8 | | Load_Top At_Offset_0
04e6 00db | | Load_Top At_Offset_3
04e7 0120 | | Execute Any,Is_Value
04e8 6804 |h | Jump_Zero 0x4ed
04e9 e003 | | Load 0x0,0x3
04ea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04eb 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04ec 7801 |x | Jump 0x4ee
04ed 00db | | Load_Top At_Offset_3
04ee e00f | | Load 0x0,0xf
04ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04f0 e5fe | | Load 0x2,-0x2
04f1 e012 | | Load 0x0,0x12
04f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04f4 c603 | | Store 0x3,0x3
04f5 c605 | | Store 0x3,0x5
04f6 00d8 | | Load_Top At_Offset_0
04f7 e012 | | Load 0x0,0x12
04f8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04fa 7006 |p | Jump_Nonzero 0x501
04fb 00d8 | | Load_Top At_Offset_0
04fc e012 | | Load 0x0,0x12
04fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04ff 840c | | Call 0x2,0xc
0500 4501 |E | Exit_Subprogram 0x1
0501 00cf | | Action Mark_Auxiliary
0502 782a |x* | Jump 0x52d
0503 e003 | | Load 0x0,0x3
0504 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0505 e602 | | Load 0x3,0x2
0506 0120 | | Execute Any,Is_Value
0507 6803 |h | Jump_Zero 0x50b
0508 e003 | | Load 0x0,0x3
0509 1b0f | | Execute Package,Field_Read,Field_Number 0xf
050a 7801 |x | Jump 0x50c
050b e602 | | Load 0x3,0x2
050c e603 | | Load 0x3,0x3
050d e003 | | Load 0x0,0x3
050e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
050f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0510 c602 | | Store 0x3,0x2
0511 005b | [ | Store_Top Discrete,At_Offset_3
0512 00da | | Load_Top At_Offset_2
0513 821d | | Call 0x1,0x1d
0514 7010 |p | Jump_Nonzero 0x525
0515 0092 0808 | | Action Push_String_Extended,0x808 ; "Could not get declaration map for "
0517 e603 | | Load 0x3,0x3
0518 8402 | | Call 0x2,0x2
0519 01cc | | Execute Vector,Catenate
051a 0092 0809 | | Action Push_String_Extended,0x809 ; ": "
051c 01cc | | Execute Vector,Catenate
051d 00db | | Load_Top At_Offset_3
051e e003 | | Load 0x0,0x3
051f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0520 011c | | Execute Any,Convert_Unchecked
0521 1c01 | | Execute_Immediate Run_Utility,0x1
0522 01cc | | Execute Vector,Catenate
0523 840c | | Call 0x2,0xc
0524 7802 |x | Jump 0x527
0525 e602 | | Load 0x3,0x2
0526 841b | | Call 0x2,0x1b
0527 00db | | Load_Top At_Offset_3
0528 e003 | | Load 0x0,0x3
0529 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
052a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
052b c603 | | Store 0x3,0x3
052c 00c9 | | Action Pop_Auxiliary_Loop
052d 00db | | Load_Top At_Offset_3
052e e003 | | Load 0x0,0x3
052f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0530 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0531 6fd1 |o | Jump_Zero 0x503
0532 4501 |E | Exit_Subprogram 0x1
0533 0000 0000 | | .BLANK 0000[0x5]
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 0092 080a | | Action Push_String_Extended,0x80a ; "State.Compatibility.Offsets."
053d 00db | | Load_Top At_Offset_3
053e e003 | | Load 0x0,0x3
053f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0540 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0541 01cc | | Execute Vector,Catenate
0542 4401 |D | Exit_Subprogram With_Result,0x1
0543 0000 0000 | | .BLANK 0000[0x5]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0554 | T | .CONST 0x0554 ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0003 | | .CONST 0x0003 ; Number of locals
054b INIT_0548:
054b e012 | | Load 0x0,0x12
054c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
054d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
054e e012 | | Load 0x0,0x12
054f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0550 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0551 02c7 | | Declare_Variable Any
0552 00d8 | | Load_Top At_Offset_0
0553 1c00 | | Execute_Immediate Run_Utility,0x0
0554 BODY_0548:
0554 e7fd | | Load 0x3,-0x3
0555 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0556 7004 |p | Jump_Nonzero 0x55b
0557 e7fd | | Load 0x3,-0x3
0558 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0559 6801 |h | Jump_Zero 0x55b
055a 4505 |E | Exit_Subprogram 0x5
055b 00d8 | | Load_Top At_Offset_0
055c 0120 | | Execute Any,Is_Value
055d 6804 |h | Jump_Zero 0x562
055e e012 | | Load 0x0,0x12
055f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0560 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0561 7801 |x | Jump 0x563
0562 00d8 | | Load_Top At_Offset_0
0563 e012 | | Load 0x0,0x12
0564 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0565 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0566 e7fd | | Load 0x3,-0x3
0567 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0568 e7fd | | Load 0x3,-0x3
0569 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
056a e7fd | | Load 0x3,-0x3
056b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
056c e7ff | | Load 0x3,-0x1
056d e012 | | Load 0x0,0x12
056e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
056f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0570 005b | [ | Store_Top Discrete,At_Offset_3
0571 c603 | | Store 0x3,0x3
0572 00d8 | | Load_Top At_Offset_0
0573 e012 | | Load 0x0,0x12
0574 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0575 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0576 4611 |F | Jump_Case 0x11
0577 7817 |x | Jump 0x58f ; case 0x0
0578 7810 |x | Jump 0x589 ; case 0x1
0579 780f |x | Jump 0x589 ; case 0x2
057a 780e |x | Jump 0x589 ; case 0x3
057b 780d |x | Jump 0x589 ; case 0x4
057c 780c |x | Jump 0x589 ; case 0x5
057d 784c |xL | Jump 0x5ca ; case 0x6
057e 780a |x | Jump 0x589 ; case 0x7
057f 7809 |x | Jump 0x589 ; case 0x8
0580 7808 |x | Jump 0x589 ; case 0x9
0581 7807 |x | Jump 0x589 ; case 0xa
0582 7806 |x | Jump 0x589 ; case 0xb
0583 7805 |x | Jump 0x589 ; case 0xc
0584 7804 |x | Jump 0x589 ; case 0xd
0585 7803 |x | Jump 0x589 ; case 0xe
0586 7802 |x | Jump 0x589 ; case 0xf
0587 7801 |x | Jump 0x589 ; case 0x10
0588 7800 |x | Jump 0x589 ; case 0x11
0589 00d8 | | Load_Top At_Offset_0
058a e012 | | Load 0x0,0x12
058b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
058c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
058d 840c | | Call 0x2,0xc
058e 4505 |E | Exit_Subprogram 0x5
058f e7fd | | Load 0x3,-0x3
0590 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0591 701c |p | Jump_Nonzero 0x5ae
0592 e7fc | | Load 0x3,-0x4
0593 00da | | Load_Top At_Offset_2
0594 027d | } | Execute Discrete,Greater
0595 6850 |hP | Jump_Zero 0x5e6
0596 e7fe | | Load 0x3,-0x2
0597 0092 080b | | Action Push_String_Extended,0x80b ; "Next offset "
0599 e7fc | | Load 0x3,-0x4
059a 821a | | Call 0x1,0x1a
059b 01cc | | Execute Vector,Catenate
059c 0092 080c | | Action Push_String_Extended,0x80c ; " for declaration "
059e 01cc | | Execute Vector,Catenate
059f e7fd | | Load 0x3,-0x3
05a0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05a1 821c | | Call 0x1,0x1c
05a2 01cc | | Execute Vector,Catenate
05a3 0092 080d | | Action Push_String_Extended,0x80d ; " is greater than next offset "
05a5 01cc | | Execute Vector,Catenate
05a6 00db | | Load_Top At_Offset_3
05a7 821a | | Call 0x1,0x1a
05a8 01cc | | Execute Vector,Catenate
05a9 0092 080e | | Action Push_String_Extended,0x80e ; " in offset map for the primary subsystem"
05ab 01cc | | Execute Vector,Catenate
05ac 8412 | | Call 0x2,0x12
05ad 4505 |E | Exit_Subprogram 0x5
05ae e7fc | | Load 0x3,-0x4
05af 00da | | Load_Top At_Offset_2
05b0 027e | ~ | Execute Discrete,Not_Equal
05b1 6834 |h4 | Jump_Zero 0x5e6
05b2 e7fe | | Load 0x3,-0x2
05b3 0092 080f | | Action Push_String_Extended,0x80f ; "Offset "
05b5 e7fc | | Load 0x3,-0x4
05b6 821a | | Call 0x1,0x1a
05b7 01cc | | Execute Vector,Catenate
05b8 0092 080c | | Action Push_String_Extended,0x80c ; " for declaration "
05ba 01cc | | Execute Vector,Catenate
05bb e7fd | | Load 0x3,-0x3
05bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05bd 821c | | Call 0x1,0x1c
05be 01cc | | Execute Vector,Catenate
05bf 0092 0810 | | Action Push_String_Extended,0x810 ; " does not match offset "
05c1 01cc | | Execute Vector,Catenate
05c2 00db | | Load_Top At_Offset_3
05c3 821a | | Call 0x1,0x1a
05c4 01cc | | Execute Vector,Catenate
05c5 0092 080e | | Action Push_String_Extended,0x80e ; " in offset map for the primary subsystem"
05c7 01cc | | Execute Vector,Catenate
05c8 8412 | | Call 0x2,0x12
05c9 4505 |E | Exit_Subprogram 0x5
05ca e7fd | | Load 0x3,-0x3
05cb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05cc 700e |p | Jump_Nonzero 0x5db
05cd e7fe | | Load 0x3,-0x2
05ce 0092 0811 | | Action Push_String_Extended,0x811 ; "Next offset for declaration "
05d0 e7fd | | Load 0x3,-0x3
05d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05d2 821c | | Call 0x1,0x1c
05d3 01cc | | Execute Vector,Catenate
05d4 0092 0812 | | Action Push_String_Extended,0x812 ; " is not defined in offset map for the primary subsystem"
05d6 01cc | | Execute Vector,Catenate
05d7 8412 | | Call 0x2,0x12
05d8 4800 |H | Short_Literal 0x0
05d9 a5fc | | Store_Unchecked 0x2,-0x4
05da 4505 |E | Exit_Subprogram 0x5
05db e7fe | | Load 0x3,-0x2
05dc 0092 0813 | | Action Push_String_Extended,0x813 ; "Offset for declaration "
05de e7fd | | Load 0x3,-0x3
05df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05e0 821c | | Call 0x1,0x1c
05e1 01cc | | Execute Vector,Catenate
05e2 0092 0812 | | Action Push_String_Extended,0x812 ; " is not defined in offset map for the primary subsystem"
05e4 01cc | | Execute Vector,Catenate
05e5 8412 | | Call 0x2,0x12
05e6 4505 |E | Exit_Subprogram 0x5
05e7 0000 | | .XXX[0x1]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 0615 | | .CONST 0x0615 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 000b | | .CONST 0x000b ; Number of locals
05eb INIT_05e8:
05eb 00db | | Load_Top At_Offset_3
05ec e012 | | Load 0x0,0x12
05ed 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05ee 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05ef 00db | | Load_Top At_Offset_3
05f0 e012 | | Load 0x0,0x12
05f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05f2 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
05f3 e7fe | | Load 0x3,-0x2
05f4 e012 | | Load 0x0,0x12
05f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05f6 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
05f7 e7ff | | Load 0x3,-0x1
05f8 e012 | | Load 0x0,0x12
05f9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05fa 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
05fb e7fe | | Load 0x3,-0x2
05fc e012 | | Load 0x0,0x12
05fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05fe 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
05ff e012 | | Load 0x0,0x12
0600 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0601 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0602 e012 | | Load 0x0,0x12
0603 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0604 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0605 e012 | | Load 0x0,0x12
0606 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0607 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0608 0322 | " | Declare_Variable Record
0609 e012 | | Load 0x0,0x12
060a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
060b 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
060c 02c7 | | Declare_Variable Any
060d 00d8 | | Load_Top At_Offset_0
060e 1c00 | | Execute_Immediate Run_Utility,0x0
060f e012 | | Load 0x0,0x12
0610 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0611 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0612 02c7 | | Declare_Variable Any
0613 00d8 | | Load_Top At_Offset_0
0614 1c00 | | Execute_Immediate Run_Utility,0x0
0615 BODY_05e8:
0615 00be | | Action Activate_Tasks
0616 e602 | | Load 0x3,0x2
0617 0e01 | | Execute_Immediate Not_Equal,0x1
0618 6804 |h | Jump_Zero 0x61d
0619 e7fc | | Load 0x3,-0x4
061a 0092 07fd | | Action Push_String_Extended,0x7fd ; "Subsystem mode is not secondary"
061c 8412 | | Call 0x2,0x12
061d e604 | | Load 0x3,0x4
061e e603 | | Load 0x3,0x3
061f 027e | ~ | Execute Discrete,Not_Equal
0620 6810 |h | Jump_Zero 0x631
0621 e7fc | | Load 0x3,-0x4
0622 0092 07f2 | | Action Push_String_Extended,0x7f2 ; "Subsystem ID "
0624 e604 | | Load 0x3,0x4
0625 821b | | Call 0x1,0x1b
0626 01cc | | Execute Vector,Catenate
0627 0092 07fe | | Action Push_String_Extended,0x7fe ; " does not match Subsystem ID "
0629 01cc | | Execute Vector,Catenate
062a e603 | | Load 0x3,0x3
062b 821b | | Call 0x1,0x1b
062c 01cc | | Execute Vector,Catenate
062d 0092 080e | | Action Push_String_Extended,0x80e ; " in offset map for the primary subsystem"
062f 01cc | | Execute Vector,Catenate
0630 8412 | | Call 0x2,0x12
0631 e606 | | Load 0x3,0x6
0632 e605 | | Load 0x3,0x5
0633 027d | } | Execute Discrete,Greater
0634 6810 |h | Jump_Zero 0x645
0635 e7fc | | Load 0x3,-0x4
0636 0092 07f5 | | Action Push_String_Extended,0x7f5 ; "Generation number "
0638 e606 | | Load 0x3,0x6
0639 821a | | Call 0x1,0x1a
063a 01cc | | Execute Vector,Catenate
063b 0092 07f6 | | Action Push_String_Extended,0x7f6 ; " is greater than generation number "
063d 01cc | | Execute Vector,Catenate
063e e605 | | Load 0x3,0x5
063f 821a | | Call 0x1,0x1a
0640 01cc | | Execute Vector,Catenate
0641 0092 080e | | Action Push_String_Extended,0x80e ; " in offset map for the primary subsystem"
0643 01cc | | Execute Vector,Catenate
0644 8412 | | Call 0x2,0x12
0645 00d9 | | Load_Top At_Offset_1
0646 e7fe | | Load 0x3,-0x2
0647 e012 | | Load 0x0,0x12
0648 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0649 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
064a c60a | | Store 0x3,0xa
064b 00cf | | Action Mark_Auxiliary
064c 7816 |x | Jump 0x663
064d 00da | | Load_Top At_Offset_2
064e e012 | | Load 0x0,0x12
064f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0650 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0651 a608 | | Store_Unchecked 0x3,0x8
0652 00da | | Load_Top At_Offset_2
0653 e012 | | Load 0x0,0x12
0654 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0655 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0656 e609 | | Load 0x3,0x9
0657 017d | } | Execute Record,Structure_Write
0658 e608 | | Load 0x3,0x8
0659 e609 | | Load 0x3,0x9
065a e7fc | | Load 0x3,-0x4
065b e7ff | | Load 0x3,-0x1
065c 841e | | Call 0x2,0x1e
065d 00da | | Load_Top At_Offset_2
065e e012 | | Load 0x0,0x12
065f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0660 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0661 c60a | | Store 0x3,0xa
0662 00c9 | | Action Pop_Auxiliary_Loop
0663 00da | | Load_Top At_Offset_2
0664 e012 | | Load 0x0,0x12
0665 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0666 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0667 6fe5 |o | Jump_Zero 0x64d
0668 00ce | | Action Pop_Auxiliary
0669 e405 | | Load 0x2,0x5
066a 6802 |h | Jump_Zero 0x66d
066b e7fc | | Load 0x3,-0x4
066c 8413 | | Call 0x2,0x13
066d 4505 |E | Exit_Subprogram 0x5
066e 0000 0000 | | .XXX[0x2]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0685 | | .CONST 0x0685 ; Address of begin
0671 0004 | | .CONST 0x0004 ; Address of exception handler
0672 0004 | | .CONST 0x0004 ; Number of locals
0673 INIT_0670:
0673 e012 | | Load 0x0,0x12
0674 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0675 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0676 02c7 | | Declare_Variable Any
0677 00d8 | | Load_Top At_Offset_0
0678 1c00 | | Execute_Immediate Run_Utility,0x0
0679 e012 | | Load 0x0,0x12
067a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
067b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067c 02c7 | | Declare_Variable Any
067d 00d8 | | Load_Top At_Offset_0
067e 1c00 | | Execute_Immediate Run_Utility,0x0
067f e012 | | Load 0x0,0x12
0680 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0681 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0682 02c7 | | Declare_Variable Any
0683 00d8 | | Load_Top At_Offset_0
0684 1c00 | | Execute_Immediate Run_Utility,0x0
0685 BODY_0670:
0685 00d8 | | Load_Top At_Offset_0
0686 0120 | | Execute Any,Is_Value
0687 6804 |h | Jump_Zero 0x68c
0688 e012 | | Load 0x0,0x12
0689 1b16 | | Execute Package,Field_Read,Field_Number 0x16
068a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
068b 7801 |x | Jump 0x68d
068c 00d8 | | Load_Top At_Offset_0
068d 00db | | Load_Top At_Offset_3
068e 4800 |H | Short_Literal 0x0
068f e00f | | Load 0x0,0xf
0690 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0691 e7ff | | Load 0x3,-0x1
0692 e012 | | Load 0x0,0x12
0693 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0694 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0695 c602 | | Store 0x3,0x2
0696 c604 | | Store 0x3,0x4
0697 00d8 | | Load_Top At_Offset_0
0698 e012 | | Load 0x0,0x12
0699 1b16 | | Execute Package,Field_Read,Field_Number 0x16
069a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
069b 7006 |p | Jump_Nonzero 0x6a2
069c 00d8 | | Load_Top At_Offset_0
069d e012 | | Load 0x0,0x12
069e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
069f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06a0 840c | | Call 0x2,0xc
06a1 4503 |E | Exit_Subprogram 0x3
06a2 00d8 | | Load_Top At_Offset_0
06a3 0120 | | Execute Any,Is_Value
06a4 6804 |h | Jump_Zero 0x6a9
06a5 e012 | | Load 0x0,0x12
06a6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a8 7801 |x | Jump 0x6aa
06a9 00d8 | | Load_Top At_Offset_0
06aa 00da | | Load_Top At_Offset_2
06ab 4800 |H | Short_Literal 0x0
06ac e00f | | Load 0x0,0xf
06ad 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06ae e7fe | | Load 0x3,-0x2
06af e012 | | Load 0x0,0x12
06b0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06b1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06b2 c603 | | Store 0x3,0x3
06b3 c604 | | Store 0x3,0x4
06b4 00d8 | | Load_Top At_Offset_0
06b5 e012 | | Load 0x0,0x12
06b6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06b7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06b8 7006 |p | Jump_Nonzero 0x6bf
06b9 00d8 | | Load_Top At_Offset_0
06ba e012 | | Load 0x0,0x12
06bb 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06bc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06bd 840c | | Call 0x2,0xc
06be 4503 |E | Exit_Subprogram 0x3
06bf e7fe | | Load 0x3,-0x2
06c0 e7ff | | Load 0x3,-0x1
06c1 00db | | Load_Top At_Offset_3
06c2 e602 | | Load 0x3,0x2
06c3 841f | | Call 0x2,0x1f
06c4 00d8 | | Load_Top At_Offset_0
06c5 0120 | | Execute Any,Is_Value
06c6 6804 |h | Jump_Zero 0x6cb
06c7 e012 | | Load 0x0,0x12
06c8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06ca 7801 |x | Jump 0x6cc
06cb 00d8 | | Load_Top At_Offset_0
06cc 00db | | Load_Top At_Offset_3
06cd e012 | | Load 0x0,0x12
06ce 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06cf 1820 | | Execute Package,Field_Execute,Field_Number 0x20
06d0 c602 | | Store 0x3,0x2
06d1 c604 | | Store 0x3,0x4
06d2 00d8 | | Load_Top At_Offset_0
06d3 e012 | | Load 0x0,0x12
06d4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06d5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06d6 7005 |p | Jump_Nonzero 0x6dc
06d7 00d8 | | Load_Top At_Offset_0
06d8 e012 | | Load 0x0,0x12
06d9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06da 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06db 840c | | Call 0x2,0xc
06dc 00d8 | | Load_Top At_Offset_0
06dd 0120 | | Execute Any,Is_Value
06de 6804 |h | Jump_Zero 0x6e3
06df e012 | | Load 0x0,0x12
06e0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06e2 7801 |x | Jump 0x6e4
06e3 00d8 | | Load_Top At_Offset_0
06e4 00da | | Load_Top At_Offset_2
06e5 e012 | | Load 0x0,0x12
06e6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06e7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
06e8 c603 | | Store 0x3,0x3
06e9 c604 | | Store 0x3,0x4
06ea 00d8 | | Load_Top At_Offset_0
06eb e012 | | Load 0x0,0x12
06ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06ed 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06ee 7005 |p | Jump_Nonzero 0x6f4
06ef 00d8 | | Load_Top At_Offset_0
06f0 e012 | | Load 0x0,0x12
06f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06f2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06f3 840c | | Call 0x2,0xc
06f4 e405 | | Load 0x2,0x5
06f5 6802 |h | Jump_Zero 0x6f8
06f6 e7fe | | Load 0x3,-0x2
06f7 8413 | | Call 0x2,0x13
06f8 4503 |E | Exit_Subprogram 0x3
06f9 0000 0000 | | .BLANK 0000[0x7]
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0712 | | .CONST 0x0712 ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0006 | | .CONST 0x0006 ; Number of locals
0703 INIT_0700:
0703 00da | | Load_Top At_Offset_2
0704 841d | | Call 0x2,0x1d
0705 e003 | | Load 0x0,0x3
0706 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0707 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0708 e003 | | Load 0x0,0x3
0709 1b0f | | Execute Package,Field_Read,Field_Number 0xf
070a 02c7 | | Declare_Variable Any
070b 00d8 | | Load_Top At_Offset_0
070c 1c00 | | Execute_Immediate Run_Utility,0x0
070d e003 | | Load 0x0,0x3
070e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
070f e003 | | Load 0x0,0x3
0710 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0711 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0712 BODY_0700:
0712 e003 | | Load 0x0,0x3
0713 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0714 e003 | | Load 0x0,0x3
0715 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0716 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0717 605c |`\ | Indirect_Literal Discrete,0x774,{0x00000000, 0x00004000}
0718 e00f | | Load 0x0,0xf
0719 1b0e | | Execute Package,Field_Read,Field_Number 0xe
071a 4800 |H | Short_Literal 0x0
071b e5ff | | Load 0x2,-0x1
071c e003 | | Load 0x0,0x3
071d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
071e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
071f c603 | | Store 0x3,0x3
0720 005a | Z | Store_Top Discrete,At_Offset_2
0721 00d9 | | Load_Top At_Offset_1
0722 821d | | Call 0x1,0x1d
0723 700b |p | Jump_Nonzero 0x72f
0724 e5fe | | Load 0x2,-0x2
0725 0092 0805 | | Action Push_String_Extended,0x805 ; "Could not get map context for <1>: "
0727 00db | | Load_Top At_Offset_3
0728 e003 | | Load 0x0,0x3
0729 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072a 011c | | Execute Any,Convert_Unchecked
072b 1c01 | | Execute_Immediate Run_Utility,0x1
072c 01cc | | Execute Vector,Catenate
072d 840d | | Call 0x2,0xd
072e 4502 |E | Exit_Subprogram 0x2
072f e003 | | Load 0x0,0x3
0730 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0731 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0732 00db | | Load_Top At_Offset_3
0733 0120 | | Execute Any,Is_Value
0734 6803 |h | Jump_Zero 0x738
0735 e003 | | Load 0x0,0x3
0736 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0737 7801 |x | Jump 0x739
0738 00db | | Load_Top At_Offset_3
0739 603a |`: | Indirect_Literal Discrete,0x774,{0x00000000, 0x00004000}
073a e00f | | Load 0x0,0xf
073b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
073c e603 | | Load 0x3,0x3
073d e602 | | Load 0x3,0x2
073e e003 | | Load 0x0,0x3
073f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0740 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0741 c604 | | Store 0x3,0x4
0742 0059 | Y | Store_Top Discrete,At_Offset_1
0743 00d8 | | Load_Top At_Offset_0
0744 460e |F | Jump_Case 0xe
0745 7822 |x" | Jump 0x768 ; case 0x0
0746 780d |x | Jump 0x754 ; case 0x1
0747 780c |x | Jump 0x754 ; case 0x2
0748 7823 |x# | Jump 0x76c ; case 0x3
0749 780a |x | Jump 0x754 ; case 0x4
074a 7809 |x | Jump 0x754 ; case 0x5
074b 7808 |x | Jump 0x754 ; case 0x6
074c 7807 |x | Jump 0x754 ; case 0x7
074d 7806 |x | Jump 0x754 ; case 0x8
074e 7805 |x | Jump 0x754 ; case 0x9
074f 7804 |x | Jump 0x754 ; case 0xa
0750 7803 |x | Jump 0x754 ; case 0xb
0751 7802 |x | Jump 0x754 ; case 0xc
0752 7801 |x | Jump 0x754 ; case 0xd
0753 7800 |x | Jump 0x754 ; case 0xe
0754 0092 0814 | | Action Push_String_Extended,0x814 ; "Could not find offset map in primary susystem because "
0756 601d |` | Indirect_Literal Discrete,0x774,{0x00000000, 0x00004000}
0757 e00f | | Load 0x0,0xf
0758 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0759 e010 | | Load 0x0,0x10
075a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
075b e011 | | Load 0x0,0x11
075c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
075d 4801 |H | Short_Literal 0x1
075e 4800 |H | Short_Literal 0x0
075f e603 | | Load 0x3,0x3
0760 e602 | | Load 0x3,0x2
0761 e606 | | Load 0x3,0x6
0762 e003 | | Load 0x0,0x3
0763 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0764 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0765 01cc | | Execute Vector,Catenate
0766 840c | | Call 0x2,0xc
0767 4502 |E | Exit_Subprogram 0x2
0768 e7ff | | Load 0x3,-0x1
0769 00db | | Load_Top At_Offset_3
076a 8420 | | Call 0x2,0x20
076b 4502 |E | Exit_Subprogram 0x2
076c e7ff | | Load 0x3,-0x1
076d 0092 0815 | | Action Push_String_Extended,0x815 ; "Offset map not found in primary subsystem"
076f 8412 | | Call 0x2,0x12
0770 e7ff | | Load 0x3,-0x1
0771 8413 | | Call 0x2,0x13
0772 4502 |E | Exit_Subprogram 0x2
0773 0000 | | .XXX[0x1]
0774 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 078e | | .CONST 0x078e ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0005 | | .CONST 0x0005 ; Number of locals
077b INIT_0778:
077b e003 | | Load 0x0,0x3
077c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
077d 02c7 | | Declare_Variable Any
077e 00d8 | | Load_Top At_Offset_0
077f 1c00 | | Execute_Immediate Run_Utility,0x0
0780 e003 | | Load 0x0,0x3
0781 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0782 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0783 02c7 | | Declare_Variable Any
0784 00d8 | | Load_Top At_Offset_0
0785 1c00 | | Execute_Immediate Run_Utility,0x0
0786 e003 | | Load 0x0,0x3
0787 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0788 e012 | | Load 0x0,0x12
0789 1b16 | | Execute Package,Field_Read,Field_Number 0x16
078a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
078b 02c7 | | Declare_Variable Any
078c 00d8 | | Load_Top At_Offset_0
078d 1c00 | | Execute_Immediate Run_Utility,0x0
078e BODY_0778:
078e 00d8 | | Load_Top At_Offset_0
078f 0120 | | Execute Any,Is_Value
0790 6804 |h | Jump_Zero 0x795
0791 e012 | | Load 0x0,0x12
0792 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0793 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0794 7801 |x | Jump 0x796
0795 00d8 | | Load_Top At_Offset_0
0796 00db | | Load_Top At_Offset_3
0797 0120 | | Execute Any,Is_Value
0798 6804 |h | Jump_Zero 0x79d
0799 e003 | | Load 0x0,0x3
079a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
079b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
079c 7801 |x | Jump 0x79e
079d 00db | | Load_Top At_Offset_3
079e e00f | | Load 0x0,0xf
079f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07a0 e5fe | | Load 0x2,-0x2
07a1 e012 | | Load 0x0,0x12
07a2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07a4 c603 | | Store 0x3,0x3
07a5 c605 | | Store 0x3,0x5
07a6 00d8 | | Load_Top At_Offset_0
07a7 e012 | | Load 0x0,0x12
07a8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07a9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07aa 7006 |p | Jump_Nonzero 0x7b1
07ab 00d8 | | Load_Top At_Offset_0
07ac e012 | | Load 0x0,0x12
07ad 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07af 840c | | Call 0x2,0xc
07b0 4501 |E | Exit_Subprogram 0x1
07b1 00cf | | Action Mark_Auxiliary
07b2 782a |x* | Jump 0x7dd
07b3 e003 | | Load 0x0,0x3
07b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07b5 e602 | | Load 0x3,0x2
07b6 0120 | | Execute Any,Is_Value
07b7 6803 |h | Jump_Zero 0x7bb
07b8 e003 | | Load 0x0,0x3
07b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ba 7801 |x | Jump 0x7bc
07bb e602 | | Load 0x3,0x2
07bc e603 | | Load 0x3,0x3
07bd e003 | | Load 0x0,0x3
07be 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07bf 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07c0 c602 | | Store 0x3,0x2
07c1 005b | [ | Store_Top Discrete,At_Offset_3
07c2 00da | | Load_Top At_Offset_2
07c3 821d | | Call 0x1,0x1d
07c4 7010 |p | Jump_Nonzero 0x7d5
07c5 0092 0816 | | Action Push_String_Extended,0x816 ; "Could not get offset map for "
07c7 e603 | | Load 0x3,0x3
07c8 8402 | | Call 0x2,0x2
07c9 01cc | | Execute Vector,Catenate
07ca 0092 0809 | | Action Push_String_Extended,0x809 ; ": "
07cc 01cc | | Execute Vector,Catenate
07cd 00db | | Load_Top At_Offset_3
07ce e003 | | Load 0x0,0x3
07cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07d0 011c | | Execute Any,Convert_Unchecked
07d1 1c01 | | Execute_Immediate Run_Utility,0x1
07d2 01cc | | Execute Vector,Catenate
07d3 840c | | Call 0x2,0xc
07d4 7802 |x | Jump 0x7d7
07d5 e602 | | Load 0x3,0x2
07d6 8421 | ! | Call 0x2,0x21
07d7 00db | | Load_Top At_Offset_3
07d8 e003 | | Load 0x0,0x3
07d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07da 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07db c603 | | Store 0x3,0x3
07dc 00c9 | | Action Pop_Auxiliary_Loop
07dd 00db | | Load_Top At_Offset_3
07de e003 | | Load 0x0,0x3
07df 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07e0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07e1 6fd1 |o | Jump_Zero 0x7b3
07e2 4501 |E | Exit_Subprogram 0x1
07e3 ; --------------------------------------------------------------------------------------
07e3 ; STRING TABLE
07e3 ; --------------------------------------------------------------------------------------
07e3 006a | j | .STRTAB 0x006a->0x0818 ; "Comparing CDB for secondary subsystem <2> against CDB for primary subsystem <1>"
07e4 00b7 | | .STRTAB 0x00b7->0x083f ; "CDB for secondary subsystem <2> is incompatible with CDB for primary subsystem <1>"
07e5 0107 | | .STRTAB 0x0107->0x0868 ; "Incompatible unit maps"
07e6 011b | | .STRTAB 0x011b->0x0873 ; "Incompatible declaration maps"
07e7 0136 | 6 | .STRTAB 0x0136->0x0882 ; "Incompatible offset maps"
07e8 014c | L | .STRTAB 0x014c->0x088e ; "Errors (prevented complete comparison)"
07e9 0170 | p | .STRTAB 0x0170->0x08a1 ; "CDB for secondary subsystem <2> is compatible with CDB for primary subsystem <1>"
07ea 01be | | .STRTAB 0x01be->0x08c9 ; "Unit map for <1> is incompatible: "
07eb 01de | | .STRTAB 0x01de->0x08da ; "Unit map for <1> is incompatible"
07ec 01fc | | .STRTAB 0x01fc->0x08ea ; "Declaration map <1> is incompatible: "
07ed 021f | | .STRTAB 0x021f->0x08fc ; "Declaration map <1> is incompatible"
07ee 0240 | @ | .STRTAB 0x0240->0x090e ; "Offset map <1> is incompatible: "
07ef 025e | ^ | .STRTAB 0x025e->0x091e ; "Offset map <1> is incompatible"
07f0 027a | z | .STRTAB 0x027a->0x092d ; "Unit map not found for <1>"
07f1 0292 | | .STRTAB 0x0292->0x093a ; "Subsystem is not a secondary copy"
07f2 02b1 | | .STRTAB 0x02b1->0x094a ; "Subsystem ID "
; "Subsystem ID "
; "Subsystem ID "
07f3 02bc | | .STRTAB 0x02bc->0x0951 ; " does not match subsystem ID "
07f4 02d7 | | .STRTAB 0x02d7->0x095f ; " in unit map for the primary subsystem"
; " in unit map for the primary subsystem"
; " in unit map for the primary subsystem"
; " in unit map for the primary subsystem"
07f5 02fb | | .STRTAB 0x02fb->0x0972 ; "Generation number "
; "Generation number "
; "Generation number "
07f6 030b | | .STRTAB 0x030b->0x097b ; " is greater than generation number "
; " is greater than generation number "
; " is greater than generation number "
07f7 032c | , | .STRTAB 0x032c->0x098d ; "Last unit number "
07f8 033b | ; | .STRTAB 0x033b->0x0995 ; " is greater than last unit number "
07f9 035b | [ | .STRTAB 0x035b->0x09a6 ; "Unit number for "
; "Unit number for "
07fa 0369 | i | .STRTAB 0x0369->0x09ae ; " does not match unit number "
07fb 0383 | | .STRTAB 0x0383->0x09bc ; " is not defined in unit map for the primary subsystem"
07fc 03b6 | | .STRTAB 0x03b6->0x09d7 ; "State.Compatibility.Declaration_Numbers."
07fd 03dc | | .STRTAB 0x03dc->0x09eb ; "Subsystem mode is not secondary"
; "Subsystem mode is not secondary"
07fe 03f9 | | .STRTAB 0x03f9->0x09fa ; " does not match Subsystem ID "
; " does not match Subsystem ID "
07ff 0414 | | .STRTAB 0x0414->0x0a09 ; " in declaration map for the primary subsystem"
; " in declaration map for the primary subsystem"
; " in declaration map for the primary subsystem"
; " in declaration map for the primary subsystem"
0800 043f | ? | .STRTAB 0x043f->0x0a1f ; "Last decl number "
0801 044e | N | .STRTAB 0x044e->0x0a28 ; " is greater than last declaration number "
0802 0475 | u | .STRTAB 0x0475->0x0a3c ; "Declaration number "
; "Declaration number "
0803 0486 | | .STRTAB 0x0486->0x0a46 ; " conflicts with declaration number "
0804 04a7 | | .STRTAB 0x04a7->0x0a57 ; " is not defined in the declaration map for the primary subsystem"
0805 04e5 | | .STRTAB 0x04e5->0x0a77 ; "Could not get map context for <1>: "
; "Could not get map context for <1>: "
0806 0506 | | .STRTAB 0x0506->0x0a89 ; "Could not find declaration map in primary susystem because "
0807 053f | ? | .STRTAB 0x053f->0x0aa6 ; "Declaration map not found in primary subsystem"
0808 056b | k | .STRTAB 0x056b->0x0abd ; "Could not get declaration map for "
0809 058b | | .STRTAB 0x058b->0x0ace ; ": "
; ": "
080a 058b | | .STRTAB 0x058b->0x0acf ; "State.Compatibility.Offsets."
080b 05a5 | | .STRTAB 0x05a5->0x0add ; "Next offset "
080c 05af | | .STRTAB 0x05af->0x0ae3 ; " for declaration "
; " for declaration "
080d 05be | | .STRTAB 0x05be->0x0aec ; " is greater than next offset "
080e 05d9 | | .STRTAB 0x05d9->0x0afa ; " in offset map for the primary subsystem"
; " in offset map for the primary subsystem"
; " in offset map for the primary subsystem"
; " in offset map for the primary subsystem"
080f 05ff | | .STRTAB 0x05ff->0x0b0e ; "Offset "
0810 0604 | | .STRTAB 0x0604->0x0b12 ; " does not match offset "
0811 0619 | | .STRTAB 0x0619->0x0b1d ; "Next offset for declaration "
0812 0633 | 3 | .STRTAB 0x0633->0x0b2b ; " is not defined in offset map for the primary subsystem"
; " is not defined in offset map for the primary subsystem"
0813 0668 | h | .STRTAB 0x0668->0x0b47 ; "Offset for declaration "
0814 067d | } | .STRTAB 0x067d->0x0b52 ; "Could not find offset map in primary susystem because "
0815 06b1 | | .STRTAB 0x06b1->0x0b6d ; "Offset map not found in primary subsystem"
0816 06d8 | | .STRTAB 0x06d8->0x0b82 ; "Could not get offset map for "
0817 06f3 | | .STREND 0x06f3->0x0b90
0818 436f 6d70 |Comp| .STRTAB_STRINGS
0b91 0000 0000 | | .BLANK 0000[0x7]
0b98 ; --------------------------------------------------------------------------------------
0b98 ; Debug Table
0b98 ; --------------------------------------------------------------------------------------
0b98 0004 000f | | .DEBUG4 0x0004,0x000f,0x4b36,0x0000,0x0001,0x0000
0b9e 002e 5902 | .Y | .XXX[0x1e]
0ba0 803b 9700 | ; |
0ba2 0000 736c | sl|
0ba4 9901 0008 | |
0ba6 0005 2000 | |
0ba8 0000 3264 | 2d|
0baa 0000 2000 | |
0bac 0000 3002 | 0 |
0bae 8000 0000 | |
0bb0 8000 0020 | |
0bb2 0000 0110 | |
0bb4 0000 0000 | |
0bb6 8000 0005 | |
0bb8 2000 0101 | |
0bba 11f7 8000 | |
0bbc 0000 0000 | | .BLANK 0000[0x1a]
0bd6 0180 0015 | | .XXX[0x3]
0bd8 7380 |s |
0bd9 0000 0000 | | .BLANK 0000[0x27]