|
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_03c0fe
└─⟦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 0568 | h | .CONST 0x0568 ; 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 003e | > | .CONST 0x003e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 029d 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call
0012 029d 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call
0014 029d 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call
0016 029d 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call
0018 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call
001a 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call
001c e002 | | Load 0x0,0x2
001d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001e 02c7 | | Declare_Variable Any
001f e003 | | Load 0x0,0x3
0020 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0021 e002 | | Load 0x0,0x2
0022 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0023 a215 | | Store_Unchecked 0x1,0x15
0024 029d 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call
0026 029d 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call
0028 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call
002a 029d 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call
002c 029d 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call
002e 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call
0030 029d 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call
0032 029d 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call
0034 029d 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call
0036 029d 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call
0038 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call
003a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
003b 00c7 | | Action Elaborate_Subprogram
003c 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003d 00c7 | | Action Elaborate_Subprogram
003e BODY_0008:
003e 00bc | | Action Signal_Activated
003f 00bb | | Action Signal_Completion
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 00ea | | Load_Encached Null_String_Cache
0044 e5fd | | Load 0x2,-0x3
0045 e5fe | | Load 0x2,-0x2
0046 e5ff | | Load 0x2,-0x1
0047 e004 | | Load 0x0,0x4
0048 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0049 180d | | Execute Package,Field_Execute,Field_Number 0xd
004a 8220 | | Call 0x1,0x20
004b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
004c 0000 0000 | | .BLANK 0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0063 | c | .CONST 0x0063 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0005 | | .CONST 0x0005 ; Number of locals
0053 INIT_0050:
0053 e004 | | Load 0x0,0x4
0054 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0055 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0056 02c7 | | Declare_Variable Any
0057 00d8 | | Load_Top At_Offset_0
0058 1c00 | | Execute_Immediate Run_Utility,0x0
0059 e004 | | Load 0x0,0x4
005a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
005b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
005c e004 | | Load 0x0,0x4
005d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005e e004 | | Load 0x0,0x4
005f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0060 02c7 | | Declare_Variable Any
0061 00d8 | | Load_Top At_Offset_0
0062 1c00 | | Execute_Immediate Run_Utility,0x0
0063 BODY_0050:
0063 e004 | | Load 0x0,0x4
0064 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0065 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0066 e402 | | Load 0x2,0x2
0067 6040 |`@ | Indirect_Literal Discrete,0xa8,{0x00000000, 0x00004000}
0068 e002 | | Load 0x0,0x2
0069 1b0e | | Execute Package,Field_Read,Field_Number 0xe
006a e005 | | Load 0x0,0x5
006b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
006c e006 | | Load 0x0,0x6
006d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
006e 4801 |H | Short_Literal 0x1
006f 4801 |H | Short_Literal 0x1
0070 e005 | | Load 0x0,0x5
0071 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0072 e004 | | Load 0x0,0x4
0073 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0074 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0075 e5ff | | Load 0x2,-0x1
0076 e004 | | Load 0x0,0x4
0077 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0078 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0079 c402 | | Store 0x2,0x2
007a c403 | | Store 0x2,0x3
007b 00cf | | Action Mark_Auxiliary
007c 7822 |x" | Jump 0x9f
007d e004 | | Load 0x0,0x4
007e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007f e405 | | Load 0x2,0x5
0080 0120 | | Execute Any,Is_Value
0081 6803 |h | Jump_Zero 0x85
0082 e004 | | Load 0x0,0x4
0083 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0084 7801 |x | Jump 0x86
0085 e405 | | Load 0x2,0x5
0086 e402 | | Load 0x2,0x2
0087 e004 | | Load 0x0,0x4
0088 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0089 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
008a c405 | | Store 0x2,0x5
008b c404 | | Store 0x2,0x4
008c e402 | | Load 0x2,0x2
008d e004 | | Load 0x0,0x4
008e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
008f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0090 e007 | | Load 0x0,0x7
0091 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0092 e5fd | | Load 0x2,-0x3
0093 e5fe | | Load 0x2,-0x2
0094 e405 | | Load 0x2,0x5
0095 820d | | Call 0x1,0xd
0096 00ea | | Load_Encached Null_String_Cache
0097 e007 | | Load 0x0,0x7
0098 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0099 e402 | | Load 0x2,0x2
009a e004 | | Load 0x0,0x4
009b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
009c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
009d c402 | | Store 0x2,0x2
009e 00c9 | | Action Pop_Auxiliary_Loop
009f e402 | | Load 0x2,0x2
00a0 e004 | | Load 0x0,0x4
00a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00a2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00a3 6fd9 |o | Jump_Zero 0x7d
00a4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00a5 0000 0000 | | .XXX[0x3]
00a7 0000 | |
00a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 e5ff | | Load 0x2,-0x1
00b4 e008 | | Load 0x0,0x8
00b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b6 011c | | Execute Any,Convert_Unchecked
00b7 1c01 | | Execute_Immediate Run_Utility,0x1
00b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00b9 0000 0000 | | .BLANK 0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 e5ff | | Load 0x2,-0x1
00c4 00e1 | | Load_Encached Boolean_Cache
00c5 011c | | Execute Any,Convert_Unchecked
00c6 1c01 | | Execute_Immediate Run_Utility,0x1
00c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 e5ff | | Load 0x2,-0x1
00cc 00d8 | | Load_Top At_Offset_0
00cd 00e2 | | Load_Encached Integer_Cache
00ce 0260 | ` | Execute Discrete,In_Type
00cf 7001 |p | Jump_Nonzero 0xd1
00d0 0801 | | Execute_Immediate Raise,0x1
00d1 00e0 | | Load_Encached Standard_Cache
00d2 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d4 0000 0000 | | .BLANK 0000[0x4]
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 e5ff | | Load 0x2,-0x1
00dc 00e0 | | Load_Encached Standard_Cache
00dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 e5ff | | Load 0x2,-0x1
00e4 00d8 | | Load_Top At_Offset_0
00e5 00e2 | | Load_Encached Integer_Cache
00e6 0260 | ` | Execute Discrete,In_Type
00e7 7001 |p | Jump_Nonzero 0xe9
00e8 0801 | | Execute_Immediate Raise,0x1
00e9 00e0 | | Load_Encached Standard_Cache
00ea 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00ec 0000 0000 | | .BLANK 0000[0x4]
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 e5ff | | Load 0x2,-0x1
00f4 e009 | | Load 0x0,0x9
00f5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00f6 011c | | Execute Any,Convert_Unchecked
00f7 1c01 | | Execute_Immediate Run_Utility,0x1
00f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00f9 0000 0000 | | .BLANK 0000[0x7]
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 e5ff | | Load 0x2,-0x1
0104 00d8 | | Load_Top At_Offset_0
0105 4800 |H | Short_Literal 0x0
0106 4807 |H | Short_Literal 0x7
0107 0262 | b | Execute Discrete,In_Range
0108 681b |h | Jump_Zero 0x124
0109 4607 |F | Jump_Case 0x8
010a 780a |x | Jump 0x115 ; case 0x0
010b 780c |x | Jump 0x118 ; case 0x1
010c 780e |x | Jump 0x11b ; case 0x2
010d 7810 |x | Jump 0x11e ; case 0x3
010e 7812 |x | Jump 0x121 ; case 0x4
010f 7815 |x | Jump 0x125 ; case 0x5
0110 7814 |x | Jump 0x125 ; case 0x6
0111 7800 |x | Jump 0x112 ; case 0x7
0112 0092 0452 | R| Action Push_String_Extended,0x452 ; "7 (N/A)"
0114 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0115 0092 0453 | S| Action Push_String_Extended,0x453 ; "0 (Nonexistent)"
0117 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0118 0092 0454 | T| Action Push_String_Extended,0x454 ; "1 (Archived)"
011a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
011b 0092 0455 | U| Action Push_String_Extended,0x455 ; "2 (Source)"
011d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
011e 0092 0456 | V| Action Push_String_Extended,0x456 ; "3 (Installed)"
0120 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0121 0092 0457 | W| Action Push_String_Extended,0x457 ; "4 (Coded)"
0123 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0124 00d1 | | Pop_Control Pop_Count_1
0125 e5ff | | Load 0x2,-0x1
0126 00e0 | | Load_Encached Standard_Cache
0127 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0128 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0129 0000 0000 | | .BLANK 0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 e5ff | | Load 0x2,-0x1
0134 e00a | | Load 0x0,0xa
0135 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0136 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0137 0000 | | .XXX[0x1]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e5ff | | Load 0x2,-0x1
013c e00a | | Load 0x0,0xa
013d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
013e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
013f 0000 | | .XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0154 | T | .CONST 0x0154 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 e5ff | | Load 0x2,-0x1
0144 00e0 | | Load_Encached Standard_Cache
0145 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0146 0092 0458 | X| Action Push_String_Extended,0x458 ; " ("
0148 01cc | | Execute Vector,Catenate
0149 e5ff | | Load 0x2,-0x1
014a e004 | | Load 0x0,0x4
014b 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
014c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
014d e004 | | Load 0x0,0x4
014e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
014f 01cc | | Execute Vector,Catenate
0150 0092 0459 | Y| Action Push_String_Extended,0x459 ; ")"
0152 01cc | | Execute Vector,Catenate
0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0154 TRAP_0140:
0154 0007 | | Action Break_Optional
0155 e5ff | | Load 0x2,-0x1
0156 00e0 | | Load_Encached Standard_Cache
0157 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0158 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0159 0000 0000 | | .BLANK 0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0171 | q | .CONST 0x0171 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 e5ff | | Load 0x2,-0x1
0164 00e0 | | Load_Encached Standard_Cache
0165 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0166 0092 0458 | X| Action Push_String_Extended,0x458 ; " ("
0168 01cc | | Execute Vector,Catenate
0169 e5ff | | Load 0x2,-0x1
016a e004 | | Load 0x0,0x4
016b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
016c 01cc | | Execute Vector,Catenate
016d 0092 0459 | Y| Action Push_String_Extended,0x459 ; ")"
016f 01cc | | Execute Vector,Catenate
0170 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0171 TRAP_0160:
0171 0007 | | Action Break_Optional
0172 e5ff | | Load 0x2,-0x1
0173 00e0 | | Load_Encached Standard_Cache
0174 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0175 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0176 0000 0000 | | .XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b e5fe | | Load 0x2,-0x2
017c 6841 |hA | Jump_Zero 0x1be
017d e5ff | | Load 0x2,-0x1
017e 460f |F | Jump_Case 0x10
017f 7812 |x | Jump 0x192 ; case 0x0
0180 7813 |x | Jump 0x194 ; case 0x1
0181 7839 |x9 | Jump 0x1bb ; case 0x2
0182 781a |x | Jump 0x19d ; case 0x3
0183 7825 |x% | Jump 0x1a9 ; case 0x4
0184 7812 |x | Jump 0x197 ; case 0x5
0185 7829 |x) | Jump 0x1af ; case 0x6
0186 781c |x | Jump 0x1a3 ; case 0x7
0187 782d |x- | Jump 0x1b5 ; case 0x8
0188 7811 |x | Jump 0x19a ; case 0x9
0189 782e |x. | Jump 0x1b8 ; case 0xa
018a 781b |x | Jump 0x1a6 ; case 0xb
018b 7820 |x | Jump 0x1ac ; case 0xc
018c 7813 |x | Jump 0x1a0 ; case 0xd
018d 7824 |x$ | Jump 0x1b2 ; case 0xe
018e 7800 |x | Jump 0x18f ; case 0xf
018f 0092 045a | Z| Action Push_String_Extended,0x45a ; "RCOD"
0191 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0192 00ea | | Load_Encached Null_String_Cache
0193 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0194 0092 045b | [| Action Push_String_Extended,0x45b ; "R"
0196 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0197 0092 045c | \| Action Push_String_Extended,0x45c ; "RC"
0199 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
019a 0092 045d | ]| Action Push_String_Extended,0x45d ; "RO"
019c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
019d 0092 045e | ^| Action Push_String_Extended,0x45e ; "RD"
019f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a0 0092 045f | _| Action Push_String_Extended,0x45f ; "RCO"
01a2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a3 0092 0460 | `| Action Push_String_Extended,0x460 ; "RCD"
01a5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a6 0092 0461 | a| Action Push_String_Extended,0x461 ; "ROD"
01a8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a9 0092 0462 | b| Action Push_String_Extended,0x462 ; "C"
01ab 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01ac 0092 0463 | c| Action Push_String_Extended,0x463 ; "CO"
01ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01af 0092 0464 | d| Action Push_String_Extended,0x464 ; "CD"
01b1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01b2 0092 0465 | e| Action Push_String_Extended,0x465 ; "COD"
01b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01b5 0092 0466 | f| Action Push_String_Extended,0x466 ; "O"
01b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01b8 0092 0467 | g| Action Push_String_Extended,0x467 ; "OD"
01ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01bb 0092 0468 | h| Action Push_String_Extended,0x468 ; "D"
01bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01be e5ff | | Load 0x2,-0x1
01bf 460f |F | Jump_Case 0x10
01c0 7812 |x | Jump 0x1d3 ; case 0x0
01c1 7813 |x | Jump 0x1d5 ; case 0x1
01c2 7815 |x | Jump 0x1d8 ; case 0x2
01c3 780c |x | Jump 0x1d0 ; case 0x3
01c4 780e |x | Jump 0x1d3 ; case 0x4
01c5 780f |x | Jump 0x1d5 ; case 0x5
01c6 7811 |x | Jump 0x1d8 ; case 0x6
01c7 7808 |x | Jump 0x1d0 ; case 0x7
01c8 780a |x | Jump 0x1d3 ; case 0x8
01c9 780b |x | Jump 0x1d5 ; case 0x9
01ca 780d |x | Jump 0x1d8 ; case 0xa
01cb 7804 |x | Jump 0x1d0 ; case 0xb
01cc 7806 |x | Jump 0x1d3 ; case 0xc
01cd 7807 |x | Jump 0x1d5 ; case 0xd
01ce 7809 |x | Jump 0x1d8 ; case 0xe
01cf 7800 |x | Jump 0x1d0 ; case 0xf
01d0 0092 0469 | i| Action Push_String_Extended,0x469 ; "RW"
01d2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01d3 00ea | | Load_Encached Null_String_Cache
01d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01d5 0092 045b | [| Action Push_String_Extended,0x45b ; "R"
01d7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01d8 0092 046a | j| Action Push_String_Extended,0x46a ; "W"
01da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01db 0000 0000 | | .BLANK 0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e4 | | .CONST 0x01e4 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 00e1 | | Load_Encached Boolean_Cache
01e4 BODY_01e0:
01e4 e5fe | | Load 0x2,-0x2
01e5 e5ff | | Load 0x2,-0x1
01e6 01d5 | | Execute Vector,Field_Reference
01e7 e00b | | Load 0x0,0xb
01e8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01e9 017f | | Execute Record,Equal
01ea 6802 |h | Jump_Zero 0x1ed
01eb 00ea | | Load_Encached Null_String_Cache
01ec 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01ed e5fe | | Load 0x2,-0x2
01ee 0f06 | | Execute_Immediate Equal,0x6
01ef 6803 |h | Jump_Zero 0x1f3
01f0 4800 |H | Short_Literal 0x0
01f1 a402 | | Store_Unchecked 0x2,0x2
01f2 7808 |x | Jump 0x1fb
01f3 e5fe | | Load 0x2,-0x2
01f4 0a01 | | Execute_Immediate Plus,0x1
01f5 e5ff | | Load 0x2,-0x1
01f6 01d5 | | Execute Vector,Field_Reference
01f7 e00b | | Load 0x0,0xb
01f8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01f9 017e | ~ | Execute Record,Not_Equal
01fa a402 | | Store_Unchecked 0x2,0x2
01fb 00d8 | | Load_Top At_Offset_0
01fc 6814 |h | Jump_Zero 0x211
01fd e5fe | | Load 0x2,-0x2
01fe e5ff | | Load 0x2,-0x1
01ff 01d5 | | Execute Vector,Field_Reference
0200 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0201 e00c | | Load 0x0,0xc
0202 180d | | Execute Package,Field_Execute,Field_Number 0xd
0203 0092 046b | k| Action Push_String_Extended,0x46b ; "=>"
0205 01cc | | Execute Vector,Catenate
0206 e5fd | | Load 0x2,-0x3
0207 e5fe | | Load 0x2,-0x2
0208 e5ff | | Load 0x2,-0x1
0209 01d5 | | Execute Vector,Field_Reference
020a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
020b 821b | | Call 0x1,0x1b
020c 01cc | | Execute Vector,Catenate
020d 0092 046c | l| Action Push_String_Extended,0x46c ; ","
020f 01cc | | Execute Vector,Catenate
0210 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0211 e5fe | | Load 0x2,-0x2
0212 e5ff | | Load 0x2,-0x1
0213 01d5 | | Execute Vector,Field_Reference
0214 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0215 e00c | | Load 0x0,0xc
0216 180d | | Execute Package,Field_Execute,Field_Number 0xd
0217 0092 046b | k| Action Push_String_Extended,0x46b ; "=>"
0219 01cc | | Execute Vector,Catenate
021a e5fd | | Load 0x2,-0x3
021b e5fe | | Load 0x2,-0x2
021c e5ff | | Load 0x2,-0x1
021d 01d5 | | Execute Vector,Field_Reference
021e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
021f 821b | | Call 0x1,0x1b
0220 01cc | | Execute Vector,Catenate
0221 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0222 0000 0000 | | .BLANK 0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b e5fe | | Load 0x2,-0x2
022c 4800 |H | Short_Literal 0x0
022d e5ff | | Load 0x2,-0x1
022e 821c | | Call 0x1,0x1c
022f e5fe | | Load 0x2,-0x2
0230 4801 |H | Short_Literal 0x1
0231 e5ff | | Load 0x2,-0x1
0232 821c | | Call 0x1,0x1c
0233 01cc | | Execute Vector,Catenate
0234 e5fe | | Load 0x2,-0x2
0235 4802 |H | Short_Literal 0x2
0236 e5ff | | Load 0x2,-0x1
0237 821c | | Call 0x1,0x1c
0238 01cc | | Execute Vector,Catenate
0239 e5fe | | Load 0x2,-0x2
023a 4803 |H | Short_Literal 0x3
023b e5ff | | Load 0x2,-0x1
023c 821c | | Call 0x1,0x1c
023d 01cc | | Execute Vector,Catenate
023e e5fe | | Load 0x2,-0x2
023f 4804 |H | Short_Literal 0x4
0240 e5ff | | Load 0x2,-0x1
0241 821c | | Call 0x1,0x1c
0242 01cc | | Execute Vector,Catenate
0243 e5fe | | Load 0x2,-0x2
0244 4805 |H | Short_Literal 0x5
0245 e5ff | | Load 0x2,-0x1
0246 821c | | Call 0x1,0x1c
0247 01cc | | Execute Vector,Catenate
0248 e5fe | | Load 0x2,-0x2
0249 4806 |H | Short_Literal 0x6
024a e5ff | | Load 0x2,-0x1
024b 821c | | Call 0x1,0x1c
024c 01cc | | Execute Vector,Catenate
024d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
024e 0000 0000 | | .XXX[0x2]
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 e5ff | | Load 0x2,-0x1
0254 0f00 | | Execute_Immediate Equal,0x0
0255 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0256 0000 0000 | | .XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b e5ff | | Load 0x2,-0x1
025c 6803 |h | Jump_Zero 0x260
025d e5fe | | Load 0x2,-0x2
025e e007 | | Load 0x0,0x7
025f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0260 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0261 0000 0000 | | .BLANK 0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 028f | | .CONST 0x028f ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 000b | | .CONST 0x000b ; Number of locals
026b INIT_0268:
026b e009 | | Load 0x0,0x9
026c 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
026d 02c7 | | Declare_Variable Any
026e 00d8 | | Load_Top At_Offset_0
026f 1c00 | | Execute_Immediate Run_Utility,0x0
0270 e009 | | Load 0x0,0x9
0271 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0272 02c7 | | Declare_Variable Any
0273 00d8 | | Load_Top At_Offset_0
0274 1c00 | | Execute_Immediate Run_Utility,0x0
0275 e009 | | Load 0x0,0x9
0276 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0277 0322 | " | Declare_Variable Record
0278 00d8 | | Load_Top At_Offset_0
0279 1c00 | | Execute_Immediate Run_Utility,0x0
027a e008 | | Load 0x0,0x8
027b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
027c e5ff | | Load 0x2,-0x1
027d e009 | | Load 0x0,0x9
027e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
027f e5ff | | Load 0x2,-0x1
0280 e009 | | Load 0x0,0x9
0281 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0282 00e3 | | Load_Encached Natural_Cache
0283 e009 | | Load 0x0,0x9
0284 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0285 02ff | | Declare_Variable Variant_Record
0286 00d8 | | Load_Top At_Offset_0
0287 1c00 | | Execute_Immediate Run_Utility,0x0
0288 e00d | | Load 0x0,0xd
0289 1b10 | | Execute Package,Field_Read,Field_Number 0x10
028a 0322 | " | Declare_Variable Record
028b 00d8 | | Load_Top At_Offset_0
028c 1c00 | | Execute_Immediate Run_Utility,0x0
028d 029f 0443 | C| Declare_Subprogram INIT_0440,For_Call
028f BODY_0268:
028f e5fc | | Load 0x2,-0x4
0290 e5ff | | Load 0x2,-0x1
0291 8217 | | Call 0x1,0x17
0292 01cc | | Execute Vector,Catenate
0293 e007 | | Load 0x0,0x7
0294 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0295 e008 | | Load 0x0,0x8
0296 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0297 e404 | | Load 0x2,0x4
0298 e002 | | Load 0x0,0x2
0299 1b0e | | Execute Package,Field_Read,Field_Number 0xe
029a 619d |a | Indirect_Literal Discrete,0x438,{0x00000000, 0x00028000}
029b e5ff | | Load 0x2,-0x1
029c e009 | | Load 0x0,0x9
029d 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
029e 00d1 | | Pop_Control Pop_Count_1
029f c405 | | Store 0x2,0x5
02a0 e405 | | Load 0x2,0x5
02a1 821e | | Call 0x1,0x1e
02a2 6987 |i | Jump_Zero 0x42a
02a3 0092 046d | m| Action Push_String_Extended,0x46d ; " Information:"
02a5 e007 | | Load 0x0,0x7
02a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02a7 e5fc | | Load 0x2,-0x4
02a8 0092 046e | n| Action Push_String_Extended,0x46e ; "Name : "
02aa 01cc | | Execute Vector,Catenate
02ab e406 | | Load 0x2,0x6
02ac 01cc | | Execute Vector,Catenate
02ad 0092 0458 | X| Action Push_String_Extended,0x458 ; " ("
02af 01cc | | Execute Vector,Catenate
02b0 e407 | | Load 0x2,0x7
02b1 01cc | | Execute Vector,Catenate
02b2 0092 046f | o| Action Push_String_Extended,0x46f ; " in "
02b4 01cc | | Execute Vector,Catenate
02b5 e007 | | Load 0x0,0x7
02b6 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02b7 4829 |H) | Short_Literal 0x29
02b8 e404 | | Load 0x2,0x4
02b9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02ba 8217 | | Call 0x1,0x17
02bb 01cb | | Execute Vector,Append
02bc e007 | | Load 0x0,0x7
02bd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02be e5fc | | Load 0x2,-0x4
02bf 0092 0470 | p| Action Push_String_Extended,0x470 ; "Library : "
02c1 01cc | | Execute Vector,Catenate
02c2 e404 | | Load 0x2,0x4
02c3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
02c4 e009 | | Load 0x0,0x9
02c5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02c6 011c | | Execute Any,Convert_Unchecked
02c7 1c01 | | Execute_Immediate Run_Utility,0x1
02c8 01cc | | Execute Vector,Catenate
02c9 e007 | | Load 0x0,0x7
02ca 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02cb 0092 0471 | q| Action Push_String_Extended,0x471 ; " "
02cd e404 | | Load 0x2,0x4
02ce 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
02cf 8217 | | Call 0x1,0x17
02d0 01cc | | Execute Vector,Catenate
02d1 e007 | | Load 0x0,0x7
02d2 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02d3 0092 0472 | r| Action Push_String_Extended,0x472 ; " on Vpid"
02d5 e404 | | Load 0x2,0x4
02d6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02d7 00e0 | | Load_Encached Standard_Cache
02d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02d9 01cc | | Execute Vector,Catenate
02da e007 | | Load 0x0,0x7
02db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02dc e5fc | | Load 0x2,-0x4
02dd 0092 0473 | s| Action Push_String_Extended,0x473 ; "Class :"
02df 01cc | | Execute Vector,Catenate
02e0 e404 | | Load 0x2,0x4
02e1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02e2 8219 | | Call 0x1,0x19
02e3 01cc | | Execute Vector,Catenate
02e4 e007 | | Load 0x0,0x7
02e5 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02e6 0092 0474 | t| Action Push_String_Extended,0x474 ; "; Subclass:"
02e8 e404 | | Load 0x2,0x4
02e9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02ea 821a | | Call 0x1,0x1a
02eb 01cc | | Execute Vector,Catenate
02ec e007 | | Load 0x0,0x7
02ed 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02ee 0092 0475 | u| Action Push_String_Extended,0x475 ; "; State: "
02f0 e404 | | Load 0x2,0x4
02f1 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
02f2 8216 | | Call 0x1,0x16
02f3 01cc | | Execute Vector,Catenate
02f4 e007 | | Load 0x0,0x7
02f5 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02f6 0092 0476 | v| Action Push_String_Extended,0x476 ; "; Frozen"
02f8 e404 | | Load 0x2,0x4
02f9 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
02fa 821f | | Call 0x1,0x1f
02fb 0092 0477 | w| Action Push_String_Extended,0x477 ; "; Controlled"
02fd e404 | | Load 0x2,0x4
02fe 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
02ff 821f | | Call 0x1,0x1f
0300 0092 0478 | x| Action Push_String_Extended,0x478 ; "; Slushy"
0302 e404 | | Load 0x2,0x4
0303 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0304 821f | | Call 0x1,0x1f
0305 0092 0479 | y| Action Push_String_Extended,0x479 ; "; Control_Point"
0307 e404 | | Load 0x2,0x4
0308 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0309 821f | | Call 0x1,0x1f
030a 00ea | | Load_Encached Null_String_Cache
030b e007 | | Load 0x0,0x7
030c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
030d e404 | | Load 0x2,0x4
030e 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
030f 683d |h= | Jump_Zero 0x34d
0310 e5fc | | Load 0x2,-0x4
0311 0092 047a | z| Action Push_String_Extended,0x47a ; "Switches: "
0313 01cc | | Execute Vector,Catenate
0314 e404 | | Load 0x2,0x4
0315 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
0316 8218 | | Call 0x1,0x18
0317 01cc | | Execute Vector,Catenate
0318 e007 | | Load 0x0,0x7
0319 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
031a e404 | | Load 0x2,0x4
031b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
031c 7030 |p0 | Jump_Nonzero 0x34d
031d e5fc | | Load 0x2,-0x4
031e 0092 047b | {| Action Push_String_Extended,0x47b ; "Access : Default: "
0320 01cc | | Execute Vector,Catenate
0321 4800 |H | Short_Literal 0x0
0322 e404 | | Load 0x2,0x4
0323 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10
0324 821d | | Call 0x1,0x1d
0325 01cc | | Execute Vector,Catenate
0326 e007 | | Load 0x0,0x7
0327 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0328 e5fc | | Load 0x2,-0x4
0329 0092 047c | || Action Push_String_Extended,0x47c ; " Library: "
032b 01cc | | Execute Vector,Catenate
032c 4801 |H | Short_Literal 0x1
032d e404 | | Load 0x2,0x4
032e 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11
032f 821d | | Call 0x1,0x1d
0330 01cc | | Execute Vector,Catenate
0331 e007 | | Load 0x0,0x7
0332 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0333 e404 | | Load 0x2,0x4
0334 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0335 4fff |O | Short_Literal -0x1
0336 027f | | Execute Discrete,Equal
0337 6805 |h | Jump_Zero 0x33d
0338 0092 047d | }| Action Push_String_Extended,0x47d ; "Target : <<Unknown>>"
033a e007 | | Load 0x0,0x7
033b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
033c 7810 |x | Jump 0x34d
033d 0092 047e | ~| Action Push_String_Extended,0x47e ; "Target : "
033f 4820 |H | Short_Literal 0x20
0340 4800 |H | Short_Literal 0x0
0341 4810 |H | Short_Literal 0x10
0342 e404 | | Load 0x2,0x4
0343 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0344 e00e | | Load 0x0,0xe
0345 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0346 01cc | | Execute Vector,Catenate
0347 0092 047f | | Action Push_String_Extended,0x47f ; " = "
0349 01cc | | Execute Vector,Catenate
034a e007 | | Load 0x0,0x7
034b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
034c 840b | | Call 0x2,0xb
034d e5fc | | Load 0x2,-0x4
034e 0092 0480 | | Action Push_String_Extended,0x480 ; "Versions:"
0350 01cc | | Execute Vector,Catenate
0351 e404 | | Load 0x2,0x4
0352 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
0353 00e0 | | Load_Encached Standard_Cache
0354 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0355 01cc | | Execute Vector,Catenate
0356 0092 0481 | | Action Push_String_Extended,0x481 ; "; Retention Count:"
0358 01cc | | Execute Vector,Catenate
0359 e404 | | Load 0x2,0x4
035a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
035b 00e0 | | Load_Encached Standard_Cache
035c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
035d 01cc | | Execute Vector,Catenate
035e e007 | | Load 0x0,0x7
035f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0360 0092 0482 | | Action Push_String_Extended,0x482 ; "; Default: "
0362 e404 | | Load 0x2,0x4
0363 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0364 8218 | | Call 0x1,0x18
0365 01cc | | Execute Vector,Catenate
0366 e007 | | Load 0x0,0x7
0367 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0368 e5fd | | Load 0x2,-0x3
0369 6870 |hp | Jump_Zero 0x3da
036a e008 | | Load 0x0,0x8
036b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036c e403 | | Load 0x2,0x3
036d 0120 | | Execute Any,Is_Value
036e 6803 |h | Jump_Zero 0x372
036f e009 | | Load 0x0,0x9
0370 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0371 7801 |x | Jump 0x373
0372 e403 | | Load 0x2,0x3
0373 4801 |H | Short_Literal 0x1
0374 60c3 |` | Indirect_Literal Discrete,0x438,{0x00000000, 0x00028000}
0375 e215 | | Load 0x1,0x15
0376 e5ff | | Load 0x2,-0x1
0377 e009 | | Load 0x0,0x9
0378 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0379 c403 | | Store 0x2,0x3
037a c405 | | Store 0x2,0x5
037b e405 | | Load 0x2,0x5
037c 821e | | Call 0x1,0x1e
037d 6850 |hP | Jump_Zero 0x3ce
037e 00cf | | Action Mark_Auxiliary
037f 7848 |xH | Jump 0x3c8
0380 e5fc | | Load 0x2,-0x4
0381 0092 0483 | | Action Push_String_Extended,0x483 ; " Version"
0383 01cc | | Execute Vector,Catenate
0384 e403 | | Load 0x2,0x3
0385 e009 | | Load 0x0,0x9
0386 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0387 00e0 | | Load_Encached Standard_Cache
0388 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0389 01cc | | Execute Vector,Catenate
038a 0092 0484 | | Action Push_String_Extended,0x484 ; ": "
038c 01cc | | Execute Vector,Catenate
038d e403 | | Load 0x2,0x3
038e e009 | | Load 0x0,0x9
038f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0390 8218 | | Call 0x1,0x18
0391 01cc | | Execute Vector,Catenate
0392 0092 0485 | | Action Push_String_Extended,0x485 ; " ("
0394 01cc | | Execute Vector,Catenate
0395 e007 | | Load 0x0,0x7
0396 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0397 e008 | | Load 0x0,0x8
0398 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0399 e40a | | Load 0x2,0xa
039a e002 | | Load 0x0,0x2
039b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
039c 4800 |H | Short_Literal 0x0
039d 4800 |H | Short_Literal 0x0
039e e403 | | Load 0x2,0x3
039f e009 | | Load 0x0,0x9
03a0 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03a1 e00d | | Load 0x0,0xd
03a2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03a3 00d1 | | Pop_Control Pop_Count_1
03a4 c405 | | Store 0x2,0x5
03a5 e405 | | Load 0x2,0x5
03a6 821e | | Call 0x1,0x1e
03a7 6812 |h | Jump_Zero 0x3ba
03a8 4829 |H) | Short_Literal 0x29
03a9 e40a | | Load 0x2,0xa
03aa 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03ab 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
03ac 00e0 | | Load_Encached Standard_Cache
03ad 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03ae 0092 046f | o| Action Push_String_Extended,0x46f ; " in "
03b0 01cc | | Execute Vector,Catenate
03b1 e40a | | Load 0x2,0xa
03b2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03b3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
03b4 8218 | | Call 0x1,0x18
03b5 01cc | | Execute Vector,Catenate
03b6 01cb | | Execute Vector,Append
03b7 e007 | | Load 0x0,0x7
03b8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03b9 7809 |x | Jump 0x3c3
03ba 4829 |H) | Short_Literal 0x29
03bb e405 | | Load 0x2,0x5
03bc e008 | | Load 0x0,0x8
03bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03be 011c | | Execute Any,Convert_Unchecked
03bf 1c01 | | Execute_Immediate Run_Utility,0x1
03c0 01cb | | Execute Vector,Append
03c1 e007 | | Load 0x0,0x7
03c2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03c3 e403 | | Load 0x2,0x3
03c4 e009 | | Load 0x0,0x9
03c5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03c6 c403 | | Store 0x2,0x3
03c7 00c9 | | Action Pop_Auxiliary_Loop
03c8 e403 | | Load 0x2,0x3
03c9 e009 | | Load 0x0,0x9
03ca 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
03cb 6fb4 |o | Jump_Zero 0x380
03cc 00ce | | Action Pop_Auxiliary
03cd 780c |x | Jump 0x3da
03ce e5fc | | Load 0x2,-0x4
03cf 0092 0486 | | Action Push_String_Extended,0x486 ; "*** Can't get versions: "
03d1 01cc | | Execute Vector,Catenate
03d2 e405 | | Load 0x2,0x5
03d3 e008 | | Load 0x0,0x8
03d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d5 011c | | Execute Any,Convert_Unchecked
03d6 1c01 | | Execute_Immediate Run_Utility,0x1
03d7 01cc | | Execute Vector,Catenate
03d8 e007 | | Load 0x0,0x7
03d9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03da e008 | | Load 0x0,0x8
03db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03dc e402 | | Load 0x2,0x2
03dd 0120 | | Execute Any,Is_Value
03de 6803 |h | Jump_Zero 0x3e2
03df e009 | | Load 0x0,0x9
03e0 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
03e1 7801 |x | Jump 0x3e3
03e2 e402 | | Load 0x2,0x2
03e3 6054 |`T | Indirect_Literal Discrete,0x438,{0x00000000, 0x00028000}
03e4 e215 | | Load 0x1,0x15
03e5 e5ff | | Load 0x2,-0x1
03e6 e009 | | Load 0x0,0x9
03e7 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
03e8 c402 | | Store 0x2,0x2
03e9 c405 | | Store 0x2,0x5
03ea e405 | | Load 0x2,0x5
03eb 821e | | Call 0x1,0x1e
03ec 6830 |h0 | Jump_Zero 0x41d
03ed e402 | | Load 0x2,0x2
03ee e009 | | Load 0x0,0x9
03ef 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
03f0 6807 |h | Jump_Zero 0x3f8
03f1 e5fc | | Load 0x2,-0x4
03f2 0092 0487 | | Action Push_String_Extended,0x487 ; "No children."
03f4 01cc | | Execute Vector,Catenate
03f5 e007 | | Load 0x0,0x7
03f6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03f7 783b |x; | Jump 0x433
03f8 e5fc | | Load 0x2,-0x4
03f9 0092 0488 | | Action Push_String_Extended,0x488 ; "Children:"
03fb 01cc | | Execute Vector,Catenate
03fc e007 | | Load 0x0,0x7
03fd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03fe 00cf | | Action Mark_Auxiliary
03ff 7817 |x | Jump 0x417
0400 e5fe | | Load 0x2,-0x2
0401 6810 |h | Jump_Zero 0x412
0402 e5fc | | Load 0x2,-0x4
0403 0092 0489 | | Action Push_String_Extended,0x489 ; " "
0405 01cc | | Execute Vector,Catenate
0406 e5fd | | Load 0x2,-0x3
0407 e5fe | | Load 0x2,-0x2
0408 0aff | | Execute_Immediate Plus,-0x1
0409 00d8 | | Load_Top At_Offset_0
040a 00e2 | | Load_Encached Integer_Cache
040b 0260 | ` | Execute Discrete,In_Type
040c 7001 |p | Jump_Nonzero 0x40e
040d 0801 | | Execute_Immediate Raise,0x1
040e e402 | | Load 0x2,0x2
040f e009 | | Load 0x0,0x9
0410 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0411 8220 | | Call 0x1,0x20
0412 e402 | | Load 0x2,0x2
0413 e009 | | Load 0x0,0x9
0414 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0415 c402 | | Store 0x2,0x2
0416 00c9 | | Action Pop_Auxiliary_Loop
0417 e402 | | Load 0x2,0x2
0418 e009 | | Load 0x0,0x9
0419 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
041a 6fe5 |o | Jump_Zero 0x400
041b 00ce | | Action Pop_Auxiliary
041c 7816 |x | Jump 0x433
041d e5fc | | Load 0x2,-0x4
041e 0092 048a | | Action Push_String_Extended,0x48a ; "Children: "
0420 01cc | | Execute Vector,Catenate
0421 e405 | | Load 0x2,0x5
0422 e008 | | Load 0x0,0x8
0423 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0424 011c | | Execute Any,Convert_Unchecked
0425 1c01 | | Execute_Immediate Run_Utility,0x1
0426 01cc | | Execute Vector,Catenate
0427 e007 | | Load 0x0,0x7
0428 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0429 7809 |x | Jump 0x433
042a 4820 |H | Short_Literal 0x20
042b e405 | | Load 0x2,0x5
042c e008 | | Load 0x0,0x8
042d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042e 011c | | Execute Any,Convert_Unchecked
042f 1c01 | | Execute_Immediate Run_Utility,0x1
0430 01ca | | Execute Vector,Prepend
0431 e007 | | Load 0x0,0x7
0432 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0433 00ea | | Load_Encached Null_String_Cache
0434 e007 | | Load 0x0,0x7
0435 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0436 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0437 0000 | | .XXX[0x1]
0438 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
043c 0000 0000 | | .BLANK 0000[0x4]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 044c | L | .CONST 0x044c ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 e404 | | Load 0x2,0x4
0444 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0445 e00f | | Load 0x0,0xf
0446 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0447 e00f | | Load 0x0,0xf
0448 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0449 e007 | | Load 0x0,0x7
044a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
044b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
044c TRAP_0440:
044c 0007 | | Action Break_Optional
044d 0092 048b | | Action Push_String_Extended,0x48b ; "<<Unregistered>>"
044f e007 | | Load 0x0,0x7
0450 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0451 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0452 ; --------------------------------------------------------------------------------------
0452 ; STRING TABLE
0452 ; --------------------------------------------------------------------------------------
0452 0076 | v | .STRTAB 0x0076->0x048d ; "7 (N/A)"
0453 007b | { | .STRTAB 0x007b->0x0490 ; "0 (Nonexistent)"
0454 0088 | | .STRTAB 0x0088->0x0498 ; "1 (Archived)"
0455 0092 | | .STRTAB 0x0092->0x049e ; "2 (Source)"
0456 009a | | .STRTAB 0x009a->0x04a3 ; "3 (Installed)"
0457 00a5 | | .STRTAB 0x00a5->0x04a9 ; "4 (Coded)"
0458 00ac | | .STRTAB 0x00ac->0x04ae ; " ("
0459 00ac | | .STRTAB 0x00ac->0x04af ; ")"
045a 00ab | | .STRTAB 0x00ab->0x04af ; "RCOD"
045b 00ad | | .STRTAB 0x00ad->0x04b1 ; "R"
045c 00ac | | .STRTAB 0x00ac->0x04b2 ; "RC"
045d 00ac | | .STRTAB 0x00ac->0x04b3 ; "RO"
045e 00ac | | .STRTAB 0x00ac->0x04b4 ; "RD"
045f 00ac | | .STRTAB 0x00ac->0x04b5 ; "RCO"
0460 00ad | | .STRTAB 0x00ad->0x04b6 ; "RCD"
0461 00ae | | .STRTAB 0x00ae->0x04b8 ; "ROD"
0462 00af | | .STRTAB 0x00af->0x04b9 ; "C"
0463 00ae | | .STRTAB 0x00ae->0x04ba ; "CO"
0464 00ae | | .STRTAB 0x00ae->0x04bb ; "CD"
0465 00ae | | .STRTAB 0x00ae->0x04bc ; "COD"
0466 00af | | .STRTAB 0x00af->0x04bd ; "O"
0467 00ae | | .STRTAB 0x00ae->0x04be ; "OD"
0468 00ae | | .STRTAB 0x00ae->0x04bf ; "D"
0469 00ad | | .STRTAB 0x00ad->0x04bf ; "RW"
046a 00ad | | .STRTAB 0x00ad->0x04c0 ; "W"
046b 00ac | | .STRTAB 0x00ac->0x04c1 ; "=>"
046c 00ac | | .STRTAB 0x00ac->0x04c2 ; ","
046d 00ab | | .STRTAB 0x00ab->0x04c2 ; " Information:"
046e 00b6 | | .STRTAB 0x00b6->0x04c9 ; "Name : "
046f 00be | | .STRTAB 0x00be->0x04ce ; " in "
0470 00c0 | | .STRTAB 0x00c0->0x04d0 ; "Library : "
0471 00c8 | | .STRTAB 0x00c8->0x04d5 ; " "
0472 00c7 | | .STRTAB 0x00c7->0x04d5 ; " on Vpid"
0473 00cd | | .STRTAB 0x00cd->0x04d9 ; "Class :"
0474 00d4 | | .STRTAB 0x00d4->0x04de ; "; Subclass:"
0475 00dd | | .STRTAB 0x00dd->0x04e3 ; "; State: "
0476 00e4 | | .STRTAB 0x00e4->0x04e8 ; "; Frozen"
0477 00ea | | .STRTAB 0x00ea->0x04ec ; "; Controlled"
0478 00f4 | | .STRTAB 0x00f4->0x04f2 ; "; Slushy"
0479 00fa | | .STRTAB 0x00fa->0x04f6 ; "; Control_Point"
047a 0107 | | .STRTAB 0x0107->0x04fd ; "Switches: "
047b 010f | | .STRTAB 0x010f->0x0502 ; "Access : Default: "
047c 0120 | | .STRTAB 0x0120->0x050c ; " Library: "
047d 0131 | 1 | .STRTAB 0x0131->0x0515 ; "Target : <<Unknown>>"
047e 0144 | D | .STRTAB 0x0144->0x0520 ; "Target : "
047f 014c | L | .STRTAB 0x014c->0x0525 ; " = "
0480 014d | M | .STRTAB 0x014d->0x0526 ; "Versions:"
0481 0154 | T | .STRTAB 0x0154->0x052b ; "; Retention Count:"
0482 0164 | d | .STRTAB 0x0164->0x0534 ; "; Default: "
0483 016d | m | .STRTAB 0x016d->0x0539 ; " Version"
0484 0174 | t | .STRTAB 0x0174->0x053e ; ": "
0485 0174 | t | .STRTAB 0x0174->0x053f ; " ("
0486 0175 | u | .STRTAB 0x0175->0x0540 ; "*** Can't get versions: "
0487 018b | | .STRTAB 0x018b->0x054c ; "No children."
0488 0195 | | .STRTAB 0x0195->0x0552 ; "Children:"
0489 019c | | .STRTAB 0x019c->0x0557 ; " "
048a 019c | | .STRTAB 0x019c->0x0558 ; "Children: "
048b 01a4 | | .STRTAB 0x01a4->0x055d ; "<<Unregistered>>"
048c 01b2 | | .STREND 0x01b2->0x0565
048d 3720 284e |7 (N| .STRTAB_STRINGS
0565 0000 0000 | | .XXX[0x3]
0567 0000 | |
0568 ; --------------------------------------------------------------------------------------
0568 ; Debug Table
0568 ; --------------------------------------------------------------------------------------
0568 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9757,0x0000,0x0001,0x0000
056e 0000 0000 | | .BLANK 0000[0x92]