|
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: 4096 (0x1000)
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 0628 | ( | .CONST 0x0628 ; 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 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0054 | T | .CONST 0x0054 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 000d | | .CONST 0x000d ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c e003 | | Load 0x0,0x3
001d 4808 |H | Short_Literal 0x8
001e 0092 04c0 | | Action Push_String_Extended,0x4c0 ; " "
0020 e004 | | Load 0x0,0x4
0021 0387 | | Declare_Variable Package
0022 00d8 | | Load_Top At_Offset_0
0023 020f | | Execute Module,Activate
0024 e005 | | Load 0x0,0x5
0025 e006 | | Load 0x0,0x6
0026 4806 |H | Short_Literal 0x6
0027 0092 04c0 | | Action Push_String_Extended,0x4c0 ; " "
0029 e004 | | Load 0x0,0x4
002a 0387 | | Declare_Variable Package
002b 00d8 | | Load_Top At_Offset_0
002c 020f | | Execute Module,Activate
002d e007 | | Load 0x0,0x7
002e e008 | | Load 0x0,0x8
002f 4803 |H | Short_Literal 0x3
0030 0092 04c0 | | Action Push_String_Extended,0x4c0 ; " "
0032 e004 | | Load 0x0,0x4
0033 0387 | | Declare_Variable Package
0034 00d8 | | Load_Top At_Offset_0
0035 020f | | Execute Module,Activate
0036 e009 | | Load 0x0,0x9
0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0038 02c7 | | Declare_Variable Any
0039 00d8 | | Load_Top At_Offset_0
003a 1c00 | | Execute_Immediate Run_Utility,0x0
003b e009 | | Load 0x0,0x9
003c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003d 02c7 | | Declare_Variable Any
003e 00d8 | | Load_Top At_Offset_0
003f 1c00 | | Execute_Immediate Run_Utility,0x0
0040 029f 0103 | | Declare_Subprogram INIT_0100,For_Call
0042 029f 0113 | | Declare_Subprogram INIT_0110,For_Call
0044 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call
0046 029f 016b | k| Declare_Subprogram INIT_0168,For_Call
0048 e00a | | Load 0x0,0xa
0049 e00b | | Load 0x0,0xb
004a 00e6 | | Load_Encached Float_Cache
004b e009 | | Load 0x0,0x9
004c 1b79 | y | Execute Package,Field_Read,Field_Number 0x79
004d 0387 | | Declare_Variable Package
004e 00d8 | | Load_Top At_Offset_0
004f 020f | | Execute Module,Activate
0050 029f 0183 | | Declare_Subprogram INIT_0180,For_Call
0052 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
0054 BODY_0018:
0054 4800 |H | Short_Literal 0x0
0055 0092 04c1 | | Action Push_String_Extended,0x4c1 ; "Name"
0057 e402 | | Load 0x2,0x2
0058 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0059 4800 |H | Short_Literal 0x0
005a 0092 04c2 | | Action Push_String_Extended,0x4c2 ; "Cluster Id"
005c e402 | | Load 0x2,0x2
005d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
005e 4800 |H | Short_Literal 0x0
005f 0092 04c3 | | Action Push_String_Extended,0x4c3 ; "Release"
0061 e402 | | Load 0x2,0x2
0062 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0063 4800 |H | Short_Literal 0x0
0064 0092 04c4 | | Action Push_String_Extended,0x4c4 ; "Type"
0066 e402 | | Load 0x2,0x2
0067 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0068 4800 |H | Short_Literal 0x0
0069 0092 04c5 | | Action Push_String_Extended,0x4c5 ; "Mem"
006b e402 | | Load 0x2,0x2
006c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
006d 4800 |H | Short_Literal 0x0
006e 0092 04c6 | | Action Push_String_Extended,0x4c6 ; "Exab"
0070 e402 | | Load 0x2,0x2
0071 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0072 4800 |H | Short_Literal 0x0
0073 0092 04c7 | | Action Push_String_Extended,0x4c7 ; "Owner"
0075 e402 | | Load 0x2,0x2
0076 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0077 4800 |H | Short_Literal 0x0
0078 0092 04c8 | | Action Push_String_Extended,0x4c8 ; "Last Backup"
007a e402 | | Load 0x2,0x2
007b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
007c 4800 |H | Short_Literal 0x0
007d 0092 04c1 | | Action Push_String_Extended,0x4c1 ; "Name"
007f e403 | | Load 0x2,0x3
0080 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0081 4800 |H | Short_Literal 0x0
0082 0092 04c9 | | Action Push_String_Extended,0x4c9 ; "V1"
0084 e403 | | Load 0x2,0x3
0085 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0086 4800 |H | Short_Literal 0x0
0087 0092 04ca | | Action Push_String_Extended,0x4ca ; "V2"
0089 e403 | | Load 0x2,0x3
008a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
008b 4800 |H | Short_Literal 0x0
008c 0092 04cb | | Action Push_String_Extended,0x4cb ; "V3"
008e e403 | | Load 0x2,0x3
008f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0090 4800 |H | Short_Literal 0x0
0091 0092 04cc | | Action Push_String_Extended,0x4cc ; "V4"
0093 e403 | | Load 0x2,0x3
0094 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0095 4800 |H | Short_Literal 0x0
0096 0092 04cd | | Action Push_String_Extended,0x4cd ; "Disk Total"
0098 e403 | | Load 0x2,0x3
0099 1812 | | Execute Package,Field_Execute,Field_Number 0x12
009a 4800 |H | Short_Literal 0x0
009b 0092 04c1 | | Action Push_String_Extended,0x4c1 ; "Name"
009d e404 | | Load 0x2,0x4
009e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
009f 4800 |H | Short_Literal 0x0
00a0 0092 04ce | | Action Push_String_Extended,0x4ce ; "Use"
00a2 e404 | | Load 0x2,0x4
00a3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a4 4800 |H | Short_Literal 0x0
00a5 0092 04cf | | Action Push_String_Extended,0x4cf ; "Users"
00a7 e404 | | Load 0x2,0x4
00a8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a9 e406 | | Load 0x2,0x6
00aa 00ea | | Load_Encached Null_String_Cache
00ab e5fe | | Load 0x2,-0x2
00ac 4800 |H | Short_Literal 0x0
00ad e009 | | Load 0x0,0x9
00ae 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00af c406 | | Store 0x2,0x6
00b0 e405 | | Load 0x2,0x5
00b1 00ea | | Load_Encached Null_String_Cache
00b2 e5ff | | Load 0x2,-0x1
00b3 4800 |H | Short_Literal 0x0
00b4 e009 | | Load 0x0,0x9
00b5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b6 c405 | | Store 0x2,0x5
00b7 00cf | | Action Mark_Auxiliary
00b8 7802 |x | Jump 0xbb
00b9 840d | | Call 0x2,0xd
00ba 00c9 | | Action Pop_Auxiliary_Loop
00bb e405 | | Load 0x2,0x5
00bc e009 | | Load 0x0,0x9
00bd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00be 6ffa |o | Jump_Zero 0xb9
00bf 00ce | | Action Pop_Auxiliary
00c0 e406 | | Load 0x2,0x6
00c1 e009 | | Load 0x0,0x9
00c2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c3 c406 | | Store 0x2,0x6
00c4 0092 04d0 | | Action Push_String_Extended,0x4d0 ; "Machine Configuration List. Generated "
00c6 4800 |H | Short_Literal 0x0
00c7 4800 |H | Short_Literal 0x0
00c8 4800 |H | Short_Literal 0x0
00c9 e00c | | Load 0x0,0xc
00ca 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00cb e00d | | Load 0x0,0xd
00cc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00cd e00d | | Load 0x0,0xd
00ce 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00cf 01cc | | Execute Vector,Catenate
00d0 e009 | | Load 0x0,0x9
00d1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00d2 4802 |H | Short_Literal 0x2
00d3 e009 | | Load 0x0,0x9
00d4 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00d5 e009 | | Load 0x0,0x9
00d6 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00d7 e402 | | Load 0x2,0x2
00d8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00d9 4801 |H | Short_Literal 0x1
00da e009 | | Load 0x0,0x9
00db 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00dc 0092 04d1 | | Action Push_String_Extended,0x4d1 ; "Note: System models are either 100, 200, or 300C."
00de e009 | | Load 0x0,0x9
00df 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00e0 4804 |H | Short_Literal 0x4
00e1 e009 | | Load 0x0,0x9
00e2 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00e3 0092 04d2 | | Action Push_String_Extended,0x4d2 ; "Disk Configuration. For each volume, shows capacity \x0a percent used, and bad block count."
00e5 e009 | | Load 0x0,0x9
00e6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00e7 4801 |H | Short_Literal 0x1
00e8 e009 | | Load 0x0,0x9
00e9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00ea e009 | | Load 0x0,0x9
00eb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00ec e403 | | Load 0x2,0x3
00ed 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ee 4804 |H | Short_Literal 0x4
00ef e009 | | Load 0x0,0x9
00f0 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00f1 0092 04d3 | | Action Push_String_Extended,0x4d3 ; "Machine usage and users information."
00f3 e009 | | Load 0x0,0x9
00f4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00f5 4801 |H | Short_Literal 0x1
00f6 e009 | | Load 0x0,0x9
00f7 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00f8 e009 | | Load 0x0,0x9
00f9 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00fa e404 | | Load 0x2,0x4
00fb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00fc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00fd 0000 0000 | | .XXX[0x3]
00ff 0000 | |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105 | | .CONST 0x0105 ; Address of begin
0101 0107 | | .CONST 0x0107 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
0105 BODY_0100:
0105 8602 | | Call 0x3,0x2
0106 0831 | 1 | Execute_Immediate Raise,0x31
0107 TRAP_0100:
0107 00d8 | | Load_Top At_Offset_0
0108 0107 | | Execute Exception,Get_Name
0109 4950 |IP | Short_Literal 0x150
010a 495f |I_ | Short_Literal 0x15f
010b 0262 | b | Execute Discrete,In_Range
010c 6802 |h | Jump_Zero 0x10f
010d 00ea | | Load_Encached Null_String_Cache
010e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
010f 0100 | | Execute Exception,Raise
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0117 | | .CONST 0x0117 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0004 | | .CONST 0x0004 ; Number of locals
0113 INIT_0110:
0113 00e3 | | Load_Encached Natural_Cache
0114 03e9 | | Declare_Variable Discrete,Duplicate
0115 029f 025b | [| Declare_Subprogram INIT_0258,For_Call
0117 BODY_0110:
0117 4801 |H | Short_Literal 0x1
0118 e7ff | | Load 0x3,-0x1
0119 e7fe | | Load 0x3,-0x2
011a e00e | | Load 0x0,0xe
011b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
011c a602 | | Store_Unchecked 0x3,0x2
011d e602 | | Load 0x3,0x2
011e 682a |h* | Jump_Zero 0x149
011f e602 | | Load 0x3,0x2
0120 e7fe | | Load 0x3,-0x2
0121 01db | | Execute Vector,Length
0122 0273 | s | Execute Discrete,Plus
0123 c602 | | Store 0x3,0x2
0124 4800 |H | Short_Literal 0x0
0125 e602 | | Load 0x3,0x2
0126 e7ff | | Load 0x3,-0x1
0127 01dc | | Execute Vector,Last
0128 e7ff | | Load 0x3,-0x1
0129 01cf | | Execute Vector,Slice_Read
012a 0092 04d4 | | Action Push_String_Extended,0x4d4 ; "\x0a"
012c e00e | | Load 0x0,0xe
012d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
012e a603 | | Store_Unchecked 0x3,0x3
012f e603 | | Load 0x3,0x3
0130 7004 |p | Jump_Nonzero 0x135
0131 e7ff | | Load 0x3,-0x1
0132 01dc | | Execute Vector,Last
0133 c603 | | Store 0x3,0x3
0134 7803 |x | Jump 0x138
0135 e603 | | Load 0x3,0x3
0136 0aff | | Execute_Immediate Plus,-0x1
0137 c603 | | Store 0x3,0x3
0138 e7fc | | Load 0x3,-0x4
0139 6809 |h | Jump_Zero 0x143
013a 4820 |H | Short_Literal 0x20
013b e602 | | Load 0x3,0x2
013c e603 | | Load 0x3,0x3
013d e7ff | | Load 0x3,-0x1
013e 01cf | | Execute Vector,Slice_Read
013f e00e | | Load 0x0,0xe
0140 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0141 8604 | | Call 0x3,0x4
0142 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0143 e602 | | Load 0x3,0x2
0144 e603 | | Load 0x3,0x3
0145 e7ff | | Load 0x3,-0x1
0146 01cf | | Execute Vector,Slice_Read
0147 8604 | | Call 0x3,0x4
0148 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0149 00ea | | Load_Encached Null_String_Cache
014a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
014b 0000 0000 | | .BLANK 0000[0x5]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 015a | Z | .CONST 0x015a ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0003 | | .CONST 0x0003 ; Number of locals
0153 INIT_0150:
0153 e009 | | Load 0x0,0x9
0154 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0155 02c7 | | Declare_Variable Any
0156 00d8 | | Load_Top At_Offset_0
0157 1c00 | | Execute_Immediate Run_Utility,0x0
0158 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
015a BODY_0150:
015a e602 | | Load 0x3,0x2
015b 00ea | | Load_Encached Null_String_Cache
015c e7ff | | Load 0x3,-0x1
015d 4800 |H | Short_Literal 0x0
015e e009 | | Load 0x0,0x9
015f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0160 c602 | | Store 0x3,0x2
0161 8603 | | Call 0x3,0x3
0162 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0163 0000 0000 | | .BLANK 0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 0092 04d5 | | Action Push_String_Extended,0x4d5 ; "info_file"
016d e00f | | Load 0x0,0xf
016e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
016f 0092 04d6 | | Action Push_String_Extended,0x4d6 ; "activity=>!machine.release.current.activity"
0171 00ea | | Load_Encached Null_String_Cache
0172 0092 04d7 | | Action Push_String_Extended,0x4d7 ; "!"
0174 0092 04d7 | | Action Push_String_Extended,0x4d7 ; "!"
0176 e5fd | | Load 0x2,-0x3
0177 e7ff | | Load 0x3,-0x1
0178 e010 | | Load 0x0,0x10
0179 180d | | Execute Package,Field_Execute,Field_Number 0xd
017a e00f | | Load 0x0,0xf
017b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
017c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0195 | | .CONST 0x0195 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 000e | | .CONST 0x000e ; Number of locals
0183 INIT_0180:
0183 00e3 | | Load_Encached Natural_Cache
0184 03e9 | | Declare_Variable Discrete,Duplicate
0185 03e9 | | Declare_Variable Discrete,Duplicate
0186 00e3 | | Load_Encached Natural_Cache
0187 00e1 | | Load_Encached Boolean_Cache
0188 00e1 | | Load_Encached Boolean_Cache
0189 03e9 | | Declare_Variable Discrete,Duplicate
018a 00e1 | | Load_Encached Boolean_Cache
018b 029f 0293 | | Declare_Subprogram INIT_0290,For_Call
018d 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call
018f 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0191 029f 032b | +| Declare_Subprogram INIT_0328,For_Call
0193 029f 035b | [| Declare_Subprogram INIT_0358,For_Call
0195 BODY_0180:
0195 e7ff | | Load 0x3,-0x1
0196 e402 | | Load 0x2,0x2
0197 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0198 e7ff | | Load 0x3,-0x1
0199 e403 | | Load 0x2,0x3
019a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019b e7fe | | Load 0x3,-0x2
019c 01db | | Execute Vector,Length
019d 701f |p | Jump_Nonzero 0x1bd
019e 00ea | | Load_Encached Null_String_Cache
019f e402 | | Load 0x2,0x2
01a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a1 00ea | | Load_Encached Null_String_Cache
01a2 e402 | | Load 0x2,0x2
01a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a4 00ea | | Load_Encached Null_String_Cache
01a5 e402 | | Load 0x2,0x2
01a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a7 00ea | | Load_Encached Null_String_Cache
01a8 e402 | | Load 0x2,0x2
01a9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01aa 00ea | | Load_Encached Null_String_Cache
01ab e402 | | Load 0x2,0x2
01ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ad 00ea | | Load_Encached Null_String_Cache
01ae e403 | | Load 0x2,0x3
01af 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b0 00ea | | Load_Encached Null_String_Cache
01b1 e403 | | Load 0x2,0x3
01b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b3 00ea | | Load_Encached Null_String_Cache
01b4 e403 | | Load 0x2,0x3
01b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b6 00ea | | Load_Encached Null_String_Cache
01b7 e403 | | Load 0x2,0x3
01b8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b9 00ea | | Load_Encached Null_String_Cache
01ba e403 | | Load 0x2,0x3
01bb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01bc 7826 |x& | Jump 0x1e3
01bd 4801 |H | Short_Literal 0x1
01be 4807 |H | Short_Literal 0x7
01bf 0092 04d8 | | Action Push_String_Extended,0x4d8 ; "Machine_Id => "
01c1 e7fe | | Load 0x3,-0x2
01c2 8408 | | Call 0x2,0x8
01c3 e402 | | Load 0x2,0x2
01c4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c5 4801 |H | Short_Literal 0x1
01c6 480c |H | Short_Literal 0xc
01c7 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "Release => "
01c9 e7fe | | Load 0x3,-0x2
01ca 8408 | | Call 0x2,0x8
01cb e402 | | Load 0x2,0x2
01cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01cd 860a | | Call 0x3,0xa
01ce 860b | | Call 0x3,0xb
01cf 4801 |H | Short_Literal 0x1
01d0 6037 |`7 | Indirect_Literal Discrete,0x208,{0x00000000, 0x7fffffff}
01d1 0092 04da | | Action Push_String_Extended,0x4da ; "Exabyte => "
01d3 e7fe | | Load 0x3,-0x2
01d4 8408 | | Call 0x2,0x8
01d5 00e1 | | Load_Encached Boolean_Cache
01d6 1c02 | | Execute_Immediate Run_Utility,0x2
01d7 a609 | | Store_Unchecked 0x3,0x9
01d8 e609 | | Load 0x3,0x9
01d9 6805 |h | Jump_Zero 0x1df
01da 0092 04db | | Action Push_String_Extended,0x4db ; "Yes"
01dc e402 | | Load 0x2,0x2
01dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01de 7803 |x | Jump 0x1e2
01df 00ea | | Load_Encached Null_String_Cache
01e0 e402 | | Load 0x2,0x2
01e1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e2 860c | | Call 0x3,0xc
01e3 e406 | | Load 0x2,0x6
01e4 e009 | | Load 0x0,0x9
01e5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01e6 c406 | | Store 0x2,0x6
01e7 4800 |H | Short_Literal 0x0
01e8 a606 | | Store_Unchecked 0x3,0x6
01e9 00cf | | Action Mark_Auxiliary
01ea 7802 |x | Jump 0x1ed
01eb 860d | | Call 0x3,0xd
01ec 00c9 | | Action Pop_Auxiliary_Loop
01ed e406 | | Load 0x2,0x6
01ee e009 | | Load 0x0,0x9
01ef 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01f0 6ffa |o | Jump_Zero 0x1eb
01f1 00ce | | Action Pop_Auxiliary
01f2 e606 | | Load 0x3,0x6
01f3 7003 |p | Jump_Nonzero 0x1f7
01f4 00ea | | Load_Encached Null_String_Cache
01f5 e402 | | Load 0x2,0x2
01f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f7 e7fe | | Load 0x3,-0x2
01f8 01db | | Execute Vector,Length
01f9 6809 |h | Jump_Zero 0x203
01fa 4801 |H | Short_Literal 0x1
01fb 480e |H | Short_Literal 0xe
01fc 0092 04dc | | Action Push_String_Extended,0x4dc ; "Last_Backup => "
01fe e7fe | | Load 0x3,-0x2
01ff 8408 | | Call 0x2,0x8
0200 e402 | | Load 0x2,0x2
0201 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0202 7803 |x | Jump 0x206
0203 00ea | | Load_Encached Null_String_Cache
0204 e402 | | Load 0x2,0x2
0205 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0206 860e | | Call 0x3,0xe
0207 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0208 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
020c 0000 0000 | | .BLANK 0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0216 | | .CONST 0x0216 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0002 | | .CONST 0x0002 ; Number of locals
0213 INIT_0210:
0213 e405 | | Load 0x2,0x5
0214 e009 | | Load 0x0,0x9
0215 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0216 BODY_0210:
0216 00d8 | | Load_Top At_Offset_0
0217 01db | | Execute Vector,Length
0218 681c |h | Jump_Zero 0x235
0219 00d8 | | Load_Top At_Offset_0
021a 01dd | | Execute Vector,First
021b e602 | | Load 0x3,0x2
021c 01d7 | | Execute Vector,Field_Read
021d 0e2a | * | Execute_Immediate Not_Equal,0x2a
021e 6808 |h | Jump_Zero 0x227
021f 00d8 | | Load_Top At_Offset_0
0220 840a | | Call 0x2,0xa
0221 0092 04d5 | | Action Push_String_Extended,0x4d5 ; "info_file"
0223 8409 | | Call 0x2,0x9
0224 e602 | | Load 0x3,0x2
0225 840c | | Call 0x2,0xc
0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0227 00ea | | Load_Encached Null_String_Cache
0228 e602 | | Load 0x3,0x2
0229 01dd | | Execute Vector,First
022a 0a01 | | Execute_Immediate Plus,0x1
022b 00d8 | | Load_Top At_Offset_0
022c 00e2 | | Load_Encached Integer_Cache
022d 0260 | ` | Execute Discrete,In_Type
022e 7001 |p | Jump_Nonzero 0x230
022f 0801 | | Execute_Immediate Raise,0x1
0230 e602 | | Load 0x3,0x2
0231 01dc | | Execute Vector,Last
0232 e602 | | Load 0x3,0x2
0233 01cf | | Execute Vector,Slice_Read
0234 840c | | Call 0x2,0xc
0235 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023e | > | .CONST 0x023e ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b e7ff | | Load 0x3,-0x1
023c e009 | | Load 0x0,0x9
023d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
023e BODY_0238:
023e 00d8 | | Load_Top At_Offset_0
023f 01db | | Execute Vector,Length
0240 e7fe | | Load 0x3,-0x2
0241 027a | z | Execute Discrete,Less_Equal
0242 6803 |h | Jump_Zero 0x246
0243 00d8 | | Load_Top At_Offset_0
0244 00cb | | Action Pop_Block_With_Result
0245 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0246 00d8 | | Load_Top At_Offset_0
0247 01dd | | Execute Vector,First
0248 e802 | | Load 0x4,0x2
0249 01dd | | Execute Vector,First
024a e7fe | | Load 0x3,-0x2
024b 0273 | s | Execute Discrete,Plus
024c 0aff | | Execute_Immediate Plus,-0x1
024d 00d8 | | Load_Top At_Offset_0
024e 00e2 | | Load_Encached Integer_Cache
024f 0260 | ` | Execute Discrete,In_Type
0250 7001 |p | Jump_Nonzero 0x252
0251 0801 | | Execute_Immediate Raise,0x1
0252 e802 | | Load 0x4,0x2
0253 01cf | | Execute Vector,Slice_Read
0254 00cb | | Action Pop_Block_With_Result
0255 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 e9ff | | Load 0x4,-0x1
025c 01db | | Execute Vector,Length
025d e7fd | | Load 0x3,-0x3
025e 027a | z | Execute Discrete,Less_Equal
025f 6802 |h | Jump_Zero 0x262
0260 e9ff | | Load 0x4,-0x1
0261 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0262 e9ff | | Load 0x4,-0x1
0263 01dd | | Execute Vector,First
0264 e9ff | | Load 0x4,-0x1
0265 01dd | | Execute Vector,First
0266 e7fd | | Load 0x3,-0x3
0267 0273 | s | Execute Discrete,Plus
0268 0aff | | Execute_Immediate Plus,-0x1
0269 00d8 | | Load_Top At_Offset_0
026a 00e2 | | Load_Encached Integer_Cache
026b 0260 | ` | Execute Discrete,In_Type
026c 7001 |p | Jump_Nonzero 0x26e
026d 0801 | | Execute_Immediate Raise,0x1
026e e9ff | | Load 0x4,-0x1
026f 01cf | | Execute Vector,Slice_Read
0270 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0271 0000 0000 | | .BLANK 0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b e602 | | Load 0x3,0x2
027c e009 | | Load 0x0,0x9
027d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
027e 6806 |h | Jump_Zero 0x285
027f e602 | | Load 0x3,0x2
0280 e009 | | Load 0x0,0x9
0281 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0282 c602 | | Store 0x3,0x2
0283 00ea | | Load_Encached Null_String_Cache
0284 00ca | | Action Exit_Nullary_Function
0285 480a |H | Short_Literal 0xa
0286 e602 | | Load 0x3,0x2
0287 e009 | | Load 0x0,0x9
0288 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0289 01cb | | Execute Vector,Append
028a 8603 | | Call 0x3,0x3
028b 01cc | | Execute Vector,Catenate
028c 00ca | | Action Exit_Nullary_Function
028d 0000 0000 | | .XXX[0x3]
028f 0000 | |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 02b8 | | .CONST 0x02b8 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 4801 |H | Short_Literal 0x1
0294 602b |`+ | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x7fffffff}
0295 0092 04dd | | Action Push_String_Extended,0x4dd ; "Series_100 => "
0297 e7fe | | Load 0x3,-0x2
0298 8408 | | Call 0x2,0x8
0299 00e1 | | Load_Encached Boolean_Cache
029a 1c02 | | Execute_Immediate Run_Utility,0x2
029b a607 | | Store_Unchecked 0x3,0x7
029c 4801 |H | Short_Literal 0x1
029d 6022 |`" | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x7fffffff}
029e 0092 04de | | Action Push_String_Extended,0x4de ; "Coprocessor => "
02a0 e7fe | | Load 0x3,-0x2
02a1 8408 | | Call 0x2,0x8
02a2 00e1 | | Load_Encached Boolean_Cache
02a3 1c02 | | Execute_Immediate Run_Utility,0x2
02a4 a608 | | Store_Unchecked 0x3,0x8
02a5 e607 | | Load 0x3,0x7
02a6 6805 |h | Jump_Zero 0x2ac
02a7 0092 04df | | Action Push_String_Extended,0x4df ; "100"
02a9 e402 | | Load 0x2,0x2
02aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02ac e608 | | Load 0x3,0x8
02ad 6805 |h | Jump_Zero 0x2b3
02ae 0092 04e0 | | Action Push_String_Extended,0x4e0 ; "300C"
02b0 e402 | | Load 0x2,0x2
02b1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02b2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b3 0092 04e1 | | Action Push_String_Extended,0x4e1 ; "200"
02b5 e402 | | Load 0x2,0x2
02b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b8 TRAP_0290:
02b8 0007 | | Action Break_Optional
02b9 0092 04e2 | | Action Push_String_Extended,0x4e2 ; "?"
02bb e402 | | Load 0x2,0x2
02bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02be 0000 0000 | | .XXX[0x2]
02c0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02c4 0000 0000 | | .BLANK 0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cc | | .CONST 0x02cc ; Address of begin
02c9 02e3 | | .CONST 0x02e3 ; Address of exception handler
02ca 0002 | | .CONST 0x0002 ; Number of locals
02cb INIT_02c8:
02cb 00e1 | | Load_Encached Boolean_Cache
02cc BODY_02c8:
02cc 4801 |H | Short_Literal 0x1
02cd 67f2 |g | Indirect_Literal Discrete,0x2c0,{0x00000000, 0x7fffffff}
02ce 0092 04e3 | | Action Push_String_Extended,0x4e3 ; "Memory_Boards => "
02d0 e7fe | | Load 0x3,-0x2
02d1 8408 | | Call 0x2,0x8
02d2 00e2 | | Load_Encached Integer_Cache
02d3 00e0 | | Load_Encached Standard_Cache
02d4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02d5 0f02 | | Execute_Immediate Equal,0x2
02d6 a802 | | Store_Unchecked 0x4,0x2
02d7 00d8 | | Load_Top At_Offset_0
02d8 6805 |h | Jump_Zero 0x2de
02d9 0092 04e4 | | Action Push_String_Extended,0x4e4 ; "64"
02db e402 | | Load 0x2,0x2
02dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02de 0092 04e5 | | Action Push_String_Extended,0x4e5 ; "32"
02e0 e402 | | Load 0x2,0x2
02e1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02e3 TRAP_02c8:
02e3 0007 | | Action Break_Optional
02e4 0092 04e2 | | Action Push_String_Extended,0x4e2 ; "?"
02e6 e402 | | Load 0x2,0x2
02e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02e9 0000 0000 | | .BLANK 0000[0x7]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0313 | | .CONST 0x0313 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0007 | | .CONST 0x0007 ; Number of locals
02f3 INIT_02f0:
02f3 4801 |H | Short_Literal 0x1
02f4 602b |`+ | Indirect_Literal Discrete,0x320,{0x00000000, 0x7fffffff}
02f5 0092 04e6 | | Action Push_String_Extended,0x4e6 ; "Volume 1 "
02f7 e7fe | | Load 0x3,-0x2
02f8 8408 | | Call 0x2,0x8
02f9 4801 |H | Short_Literal 0x1
02fa 6025 |`% | Indirect_Literal Discrete,0x320,{0x00000000, 0x7fffffff}
02fb 0092 04e7 | | Action Push_String_Extended,0x4e7 ; "Volume 2 "
02fd e7fe | | Load 0x3,-0x2
02fe 8408 | | Call 0x2,0x8
02ff 4801 |H | Short_Literal 0x1
0300 601f |` | Indirect_Literal Discrete,0x320,{0x00000000, 0x7fffffff}
0301 0092 04e8 | | Action Push_String_Extended,0x4e8 ; "Volume 3 "
0303 e7fe | | Load 0x3,-0x2
0304 8408 | | Call 0x2,0x8
0305 4801 |H | Short_Literal 0x1
0306 6019 |` | Indirect_Literal Discrete,0x320,{0x00000000, 0x7fffffff}
0307 0092 04e9 | | Action Push_String_Extended,0x4e9 ; "Volume 4 "
0309 e7fe | | Load 0x3,-0x2
030a 8408 | | Call 0x2,0x8
030b 4801 |H | Short_Literal 0x1
030c 6013 |` | Indirect_Literal Discrete,0x320,{0x00000000, 0x7fffffff}
030d 0092 04ea | | Action Push_String_Extended,0x4ea ; "Volumes => "
030f e7fe | | Load 0x3,-0x2
0310 8408 | | Call 0x2,0x8
0311 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call
0313 BODY_02f0:
0313 e802 | | Load 0x4,0x2
0314 8807 | | Call 0x4,0x7
0315 e803 | | Load 0x4,0x3
0316 8807 | | Call 0x4,0x7
0317 e804 | | Load 0x4,0x4
0318 8807 | | Call 0x4,0x7
0319 e805 | | Load 0x4,0x5
031a 8807 | | Call 0x4,0x7
031b e806 | | Load 0x4,0x6
031c 8807 | | Call 0x4,0x7
031d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
031e 0000 0000 | | .XXX[0x2]
0320 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0324 0000 0000 | | .BLANK 0000[0x4]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032e | . | .CONST 0x032e ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0002 | | .CONST 0x0002 ; Number of locals
032b INIT_0328:
032b e406 | | Load 0x2,0x6
032c e009 | | Load 0x0,0x9
032d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
032e BODY_0328:
032e 4801 |H | Short_Literal 0x1
032f e802 | | Load 0x4,0x2
0330 e7ff | | Load 0x3,-0x1
0331 0092 04eb | | Action Push_String_Extended,0x4eb ; "_mgr"
0333 01cc | | Execute Vector,Catenate
0334 e00e | | Load 0x0,0xe
0335 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0336 a605 | | Store_Unchecked 0x3,0x5
0337 e605 | | Load 0x3,0x5
0338 e802 | | Load 0x4,0x2
0339 01dd | | Execute Vector,First
033a 027f | | Execute Discrete,Equal
033b 681a |h | Jump_Zero 0x356
033c e605 | | Load 0x3,0x5
033d e7ff | | Load 0x3,-0x1
033e 01db | | Execute Vector,Length
033f 0273 | s | Execute Discrete,Plus
0340 0a06 | | Execute_Immediate Plus,0x6
0341 c605 | | Store 0x3,0x5
0342 00e3 | | Load_Encached Natural_Cache
0343 00e3 | | Load_Encached Natural_Cache
0344 e605 | | Load 0x3,0x5
0345 e011 | | Load 0x0,0x11
0346 e012 | | Load 0x0,0x12
0347 e802 | | Load 0x4,0x2
0348 8013 | | Call 0x0,0x13
0349 c605 | | Store 0x3,0x5
034a c602 | | Store 0x3,0x2
034b c603 | | Store 0x3,0x3
034c e602 | | Load 0x3,0x2
034d e603 | | Load 0x3,0x3
034e e802 | | Load 0x4,0x2
034f 01cf | | Execute Vector,Slice_Read
0350 e402 | | Load 0x2,0x2
0351 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0352 4801 |H | Short_Literal 0x1
0353 a606 | | Store_Unchecked 0x3,0x6
0354 00cc | | Action Pop_Block
0355 7e9b |~ | Jump 0x1f1
0356 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0357 0000 | | .XXX[0x1]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 036e | n | .CONST 0x036e ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0005 | | .CONST 0x0005 ; Number of locals
035b INIT_0358:
035b 4823 |H# | Short_Literal 0x23
035c e014 | | Load 0x0,0x14
035d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
035e 1c08 | | Execute_Immediate Run_Utility,0x8
035f 00d8 | | Load_Top At_Offset_0
0360 1c00 | | Execute_Immediate Run_Utility,0x0
0361 4823 |H# | Short_Literal 0x23
0362 e014 | | Load 0x0,0x14
0363 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0364 1c08 | | Execute_Immediate Run_Utility,0x8
0365 00d8 | | Load_Top At_Offset_0
0366 1c00 | | Execute_Immediate Run_Utility,0x0
0367 e009 | | Load 0x0,0x9
0368 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0369 02c7 | | Declare_Variable Any
036a 00d8 | | Load_Top At_Offset_0
036b 1c00 | | Execute_Immediate Run_Utility,0x0
036c 029f 047b | {| Declare_Subprogram INIT_0478,For_Call
036e BODY_0358:
036e e7ff | | Load 0x3,-0x1
036f 8805 | | Call 0x4,0x5
0370 e804 | | Load 0x4,0x4
0371 00ea | | Load_Encached Null_String_Cache
0372 0092 04ec | | Action Push_String_Extended,0x4ec ; "Machine_Use"
0374 4800 |H | Short_Literal 0x0
0375 e009 | | Load 0x0,0x9
0376 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0377 c804 | | Store 0x4,0x4
0378 e802 | | Load 0x4,0x2
0379 00d8 | | Load_Top At_Offset_0
037a e014 | | Load 0x0,0x14
037b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
037c e804 | | Load 0x4,0x4
037d 8407 | | Call 0x2,0x7
037e e014 | | Load 0x0,0x14
037f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0380 00d1 | | Pop_Control Pop_Count_1
0381 e803 | | Load 0x4,0x3
0382 00d8 | | Load_Top At_Offset_0
0383 e014 | | Load 0x0,0x14
0384 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0385 e804 | | Load 0x4,0x4
0386 8407 | | Call 0x2,0x7
0387 e014 | | Load 0x0,0x14
0388 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0389 00d1 | | Pop_Control Pop_Count_1
038a e804 | | Load 0x4,0x4
038b e009 | | Load 0x0,0x9
038c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
038d c804 | | Store 0x4,0x4
038e e7ff | | Load 0x3,-0x1
038f e404 | | Load 0x2,0x4
0390 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0391 e802 | | Load 0x4,0x2
0392 e014 | | Load 0x0,0x14
0393 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0394 e404 | | Load 0x2,0x4
0395 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0396 e803 | | Load 0x4,0x3
0397 e014 | | Load 0x0,0x14
0398 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0399 e404 | | Load 0x2,0x4
039a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
039b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
039c 0000 0000 | | .BLANK 0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03b7 | | .CONST 0x03b7 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 000a | | .CONST 0x000a ; Number of locals
03a3 INIT_03a0:
03a3 ebff | | Load 0x5,-0x1
03a4 01dd | | Execute Vector,First
03a5 00e3 | | Load_Encached Natural_Cache
03a6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03a7 00e3 | | Load_Encached Natural_Cache
03a8 03e9 | | Declare_Variable Discrete,Duplicate
03a9 03e9 | | Declare_Variable Discrete,Duplicate
03aa 4801 |H | Short_Literal 0x1
03ab 4804 |H | Short_Literal 0x4
03ac 00e9 | | Load_Encached String_Cache
03ad 035b | [ | Declare_Type Array,Constrained
03ae 0337 | 7 | Declare_Variable Array
03af 4801 |H | Short_Literal 0x1
03b0 4804 |H | Short_Literal 0x4
03b1 00e9 | | Load_Encached String_Cache
03b2 035b | [ | Declare_Type Array,Constrained
03b3 0337 | 7 | Declare_Variable Array
03b4 00e5 | | Load_Encached Long_Integer_Cache
03b5 03e9 | | Declare_Variable Discrete,Duplicate
03b6 03e9 | | Declare_Variable Discrete,Duplicate
03b7 BODY_03a0:
03b7 ebff | | Load 0x5,-0x1
03b8 01db | | Execute Vector,Length
03b9 7004 |p | Jump_Nonzero 0x3be
03ba 00ea | | Load_Encached Null_String_Cache
03bb e403 | | Load 0x2,0x3
03bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03bd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03be 4801 |H | Short_Literal 0x1
03bf ebff | | Load 0x5,-0x1
03c0 0092 04ed | | Action Push_String_Extended,0x4ed ; "Retargets => "
03c2 e00e | | Load 0x0,0xe
03c3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03c4 aa03 | | Store_Unchecked 0x5,0x3
03c5 ea03 | | Load 0x5,0x3
03c6 6816 |h | Jump_Zero 0x3dd
03c7 ea03 | | Load 0x5,0x3
03c8 0a0d | | Execute_Immediate Plus,0xd
03c9 ca02 | | Store 0x5,0x2
03ca 00e3 | | Load_Encached Natural_Cache
03cb 00e3 | | Load_Encached Natural_Cache
03cc ea02 | | Load 0x5,0x2
03cd e011 | | Load 0x0,0x11
03ce e012 | | Load 0x0,0x12
03cf ebff | | Load 0x5,-0x1
03d0 8013 | | Call 0x0,0x13
03d1 ca02 | | Store 0x5,0x2
03d2 ca04 | | Store 0x5,0x4
03d3 ca05 | | Store 0x5,0x5
03d4 ea04 | | Load 0x5,0x4
03d5 ea05 | | Load 0x5,0x5
03d6 ebff | | Load 0x5,-0x1
03d7 01cf | | Execute Vector,Slice_Read
03d8 00e5 | | Load_Encached Long_Integer_Cache
03d9 00e0 | | Load_Encached Standard_Cache
03da 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03db aa08 | | Store_Unchecked 0x5,0x8
03dc 7802 |x | Jump 0x3df
03dd 4fff |O | Short_Literal -0x1
03de aa08 | | Store_Unchecked 0x5,0x8
03df 4801 |H | Short_Literal 0x1
03e0 ebff | | Load 0x5,-0x1
03e1 0092 04ee | | Action Push_String_Extended,0x4ee ; "Capacity => "
03e3 e00e | | Load 0x0,0xe
03e4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03e5 aa03 | | Store_Unchecked 0x5,0x3
03e6 ea03 | | Load 0x5,0x3
03e7 0a0c | | Execute_Immediate Plus,0xc
03e8 ca02 | | Store 0x5,0x2
03e9 00e3 | | Load_Encached Natural_Cache
03ea 00e3 | | Load_Encached Natural_Cache
03eb ea02 | | Load 0x5,0x2
03ec e011 | | Load 0x0,0x11
03ed e012 | | Load 0x0,0x12
03ee ebff | | Load 0x5,-0x1
03ef 8013 | | Call 0x0,0x13
03f0 ca02 | | Store 0x5,0x2
03f1 ca04 | | Store 0x5,0x4
03f2 ca05 | | Store 0x5,0x5
03f3 ea04 | | Load 0x5,0x4
03f4 ea05 | | Load 0x5,0x5
03f5 0aff | | Execute_Immediate Plus,-0x1
03f6 ebff | | Load 0x5,-0x1
03f7 01cf | | Execute Vector,Slice_Read
03f8 00e5 | | Load_Encached Long_Integer_Cache
03f9 00e0 | | Load_Encached Standard_Cache
03fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03fb aa09 | | Store_Unchecked 0x5,0x9
03fc 4801 |H | Short_Literal 0x1
03fd ebff | | Load 0x5,-0x1
03fe 0092 04ef | | Action Push_String_Extended,0x4ef ; "Used => "
0400 e00e | | Load 0x0,0xe
0401 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0402 aa03 | | Store_Unchecked 0x5,0x3
0403 ea03 | | Load 0x5,0x3
0404 0a08 | | Execute_Immediate Plus,0x8
0405 ca02 | | Store 0x5,0x2
0406 00e3 | | Load_Encached Natural_Cache
0407 00e3 | | Load_Encached Natural_Cache
0408 ea02 | | Load 0x5,0x2
0409 e011 | | Load 0x0,0x11
040a e012 | | Load 0x0,0x12
040b ebff | | Load 0x5,-0x1
040c 8013 | | Call 0x0,0x13
040d ca02 | | Store 0x5,0x2
040e ca04 | | Store 0x5,0x4
040f ca05 | | Store 0x5,0x5
0410 ea04 | | Load 0x5,0x4
0411 ea05 | | Load 0x5,0x5
0412 0aff | | Execute_Immediate Plus,-0x1
0413 e7fe | | Load 0x3,-0x2
0414 01cf | | Execute Vector,Slice_Read
0415 00e5 | | Load_Encached Long_Integer_Cache
0416 00e0 | | Load_Encached Standard_Cache
0417 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0418 aa0a | | Store_Unchecked 0x5,0xa
0419 ea09 | | Load 0x5,0x9
041a 4be8 |K | Short_Literal 0x3e8
041b 027b | { | Execute Discrete,Greater_Equal
041c 6815 |h | Jump_Zero 0x432
041d ea06 | | Load 0x5,0x6
041e 4801 |H | Short_Literal 0x1
041f 4803 |H | Short_Literal 0x3
0420 ea0b | | Load 0x5,0xb
0421 035b | [ | Declare_Type Array,Constrained
0422 00d0 | | Action Swap_Control
0423 01cd | | Execute Vector,Slice_Reference
0424 4800 |H | Short_Literal 0x0
0425 4801 |H | Short_Literal 0x1
0426 ea09 | | Load 0x5,0x9
0427 0237 | 7 | Execute Float,Convert_From_Discrete
0428 5847 |XG | Indirect_Literal Float,0x470,1000.0
0429 023a | : | Execute Float,Divide
042a e40b | | Load 0x2,0xb
042b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
042c 00d1 | | Pop_Control Pop_Count_1
042d 4847 |HG | Short_Literal 0x47
042e 4804 |H | Short_Literal 0x4
042f ea06 | | Load 0x5,0x6
0430 01d6 | | Execute Vector,Field_Write
0431 780e |x | Jump 0x440
0432 4820 |H | Short_Literal 0x20
0433 4803 |H | Short_Literal 0x3
0434 480a |H | Short_Literal 0xa
0435 ea09 | | Load 0x5,0x9
0436 e00e | | Load 0x0,0xe
0437 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0438 4801 |H | Short_Literal 0x1
0439 4803 |H | Short_Literal 0x3
043a ea06 | | Load 0x5,0x6
043b 01ce | | Execute Vector,Slice_Write
043c 484d |HM | Short_Literal 0x4d
043d 4804 |H | Short_Literal 0x4
043e ea06 | | Load 0x5,0x6
043f 01d6 | | Execute Vector,Field_Write
0440 ea07 | | Load 0x5,0x7
0441 4800 |H | Short_Literal 0x0
0442 4800 |H | Short_Literal 0x0
0443 ea0a | | Load 0x5,0xa
0444 0237 | 7 | Execute Float,Convert_From_Discrete
0445 ea09 | | Load 0x5,0x9
0446 0237 | 7 | Execute Float,Convert_From_Discrete
0447 023a | : | Execute Float,Divide
0448 5823 |X# | Indirect_Literal Float,0x46c,100.0
0449 023b | ; | Execute Float,Times
044a e40b | | Load 0x2,0xb
044b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
044c 00d1 | | Pop_Control Pop_Count_1
044d ea08 | | Load 0x5,0x8
044e 0c01 | | Execute_Immediate Greater_Equal,0x1
044f 6810 |h | Jump_Zero 0x460
0450 ea06 | | Load 0x5,0x6
0451 0092 04c0 | | Action Push_String_Extended,0x4c0 ; " "
0453 01cc | | Execute Vector,Catenate
0454 ea07 | | Load 0x5,0x7
0455 01cc | | Execute Vector,Catenate
0456 0092 04f0 | | Action Push_String_Extended,0x4f0 ; "%"
0458 01cc | | Execute Vector,Catenate
0459 ea08 | | Load 0x5,0x8
045a 00e0 | | Load_Encached Standard_Cache
045b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
045c 01cc | | Execute Vector,Catenate
045d e403 | | Load 0x2,0x3
045e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
045f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0460 ea06 | | Load 0x5,0x6
0461 0092 04c0 | | Action Push_String_Extended,0x4c0 ; " "
0463 01cc | | Execute Vector,Catenate
0464 ea07 | | Load 0x5,0x7
0465 01cc | | Execute Vector,Catenate
0466 0092 04f0 | | Action Push_String_Extended,0x4f0 ; "%"
0468 01cc | | Execute Vector,Catenate
0469 e403 | | Load 0x2,0x3
046a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
046b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
046c 4059 0000 |@Y | .DBL 100.0
046e 0000 0000 | |
0470 408f 4000 |@ @ | .DBL 1000.0
0472 0000 0000 | |
0474 0000 0000 | | .BLANK 0000[0x4]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b | { | .CONST 0x047b ; Address of begin
0479 04aa | | .CONST 0x04aa ; Address of exception handler
047a 0001 | | .CONST 0x0001 ; Number of locals
047b BODY_0478:
047b INIT_0478:
047b e015 | | Load 0x0,0x15
047c 180e | | Execute Package,Field_Execute,Field_Number 0xe
047d e015 | | Load 0x0,0x15
047e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
047f e015 | | Load 0x0,0x15
0480 180e | | Execute Package,Field_Execute,Field_Number 0xe
0481 e015 | | Load 0x0,0x15
0482 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0483 e015 | | Load 0x0,0x15
0484 180e | | Execute Package,Field_Execute,Field_Number 0xe
0485 e015 | | Load 0x0,0x15
0486 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0487 e015 | | Load 0x0,0x15
0488 180e | | Execute Package,Field_Execute,Field_Number 0xe
0489 e015 | | Load 0x0,0x15
048a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
048b e015 | | Load 0x0,0x15
048c 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
048d 4803 |H | Short_Literal 0x3
048e e015 | | Load 0x0,0x15
048f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0490 e016 | | Load 0x0,0x16
0491 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0492 e016 | | Load 0x0,0x16
0493 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0494 e016 | | Load 0x0,0x16
0495 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0496 e016 | | Load 0x0,0x16
0497 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0498 4800 |H | Short_Literal 0x0
0499 e016 | | Load 0x0,0x16
049a 180e | | Execute Package,Field_Execute,Field_Number 0xe
049b e016 | | Load 0x0,0x16
049c 180f | | Execute Package,Field_Execute,Field_Number 0xf
049d e016 | | Load 0x0,0x16
049e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
049f 00ea | | Load_Encached Null_String_Cache
04a0 0092 04f1 | | Action Push_String_Extended,0x4f1 ; "Network_Public"
04a2 ebff | | Load 0x5,-0x1
04a3 0092 04ec | | Action Push_String_Extended,0x4ec ; "Machine_Use"
04a5 0092 04f2 | | Action Push_String_Extended,0x4f2 ; "!Machine.Machine_Use"
04a7 e017 | | Load 0x0,0x17
04a8 180f | | Execute Package,Field_Execute,Field_Number 0xf
04a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04aa TRAP_0478:
04aa 0007 | | Action Break_Optional
04ab e804 | | Load 0x4,0x4
04ac 00ea | | Load_Encached Null_String_Cache
04ad 0092 04f3 | | Action Push_String_Extended,0x4f3 ; "Machine_use"
04af 4801 |H | Short_Literal 0x1
04b0 e009 | | Load 0x0,0x9
04b1 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04b2 c804 | | Store 0x4,0x4
04b3 00ea | | Load_Encached Null_String_Cache
04b4 e804 | | Load 0x4,0x4
04b5 e009 | | Load 0x0,0x9
04b6 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
04b7 00ea | | Load_Encached Null_String_Cache
04b8 e804 | | Load 0x4,0x4
04b9 e009 | | Load 0x0,0x9
04ba 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
04bb e804 | | Load 0x4,0x4
04bc e009 | | Load 0x0,0x9
04bd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04be c804 | | Store 0x4,0x4
04bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04c0 ; --------------------------------------------------------------------------------------
04c0 ; STRING TABLE
04c0 ; --------------------------------------------------------------------------------------
04c0 006a | j | .STRTAB 0x006a->0x04f5 ; " "
04c1 0069 | i | .STRTAB 0x0069->0x04f5 ; "Name"
04c2 006b | k | .STRTAB 0x006b->0x04f7 ; "Cluster Id"
04c3 0073 | s | .STRTAB 0x0073->0x04fc ; "Release"
04c4 0078 | x | .STRTAB 0x0078->0x0500 ; "Type"
04c5 007a | z | .STRTAB 0x007a->0x0502 ; "Mem"
04c6 007b | { | .STRTAB 0x007b->0x0503 ; "Exab"
04c7 007d | } | .STRTAB 0x007d->0x0505 ; "Owner"
04c8 0080 | | .STRTAB 0x0080->0x0508 ; "Last Backup"
04c9 0089 | | .STRTAB 0x0089->0x050d ; "V1"
04ca 0089 | | .STRTAB 0x0089->0x050e ; "V2"
04cb 0089 | | .STRTAB 0x0089->0x050f ; "V3"
04cc 0089 | | .STRTAB 0x0089->0x0510 ; "V4"
04cd 0089 | | .STRTAB 0x0089->0x0511 ; "Disk Total"
04ce 0091 | | .STRTAB 0x0091->0x0516 ; "Use"
04cf 0092 | | .STRTAB 0x0092->0x0518 ; "Users"
04d0 0095 | | .STRTAB 0x0095->0x051a ; "Machine Configuration List. Generated "
04d1 00ba | | .STRTAB 0x00ba->0x052e ; "Note: System models are either 100, 200, or 300C."
04d2 00e9 | | .STRTAB 0x00e9->0x0546 ; "Disk Configuration. For each volume, shows capacity \x0a percent used, and bad block count."
04d3 0143 | C | .STRTAB 0x0143->0x0574 ; "Machine usage and users information."
04d4 0165 | e | .STRTAB 0x0165->0x0586 ; "\x0a"
04d5 0164 | d | .STRTAB 0x0164->0x0587 ; "info_file"
04d6 016b | k | .STRTAB 0x016b->0x058b ; "activity=>!machine.release.current.activity"
04d7 0194 | | .STRTAB 0x0194->0x05a1 ; "!"
04d8 0193 | | .STRTAB 0x0193->0x05a1 ; "Machine_Id => "
04d9 019f | | .STRTAB 0x019f->0x05a8 ; "Release => "
04da 01a8 | | .STRTAB 0x01a8->0x05ae ; "Exabyte => "
04db 01b1 | | .STRTAB 0x01b1->0x05b3 ; "Yes"
04dc 01b2 | | .STRTAB 0x01b2->0x05b5 ; "Last_Backup => "
04dd 01bf | | .STRTAB 0x01bf->0x05bc ; "Series_100 => "
04de 01cb | | .STRTAB 0x01cb->0x05c3 ; "Coprocessor => "
04df 01d8 | | .STRTAB 0x01d8->0x05cb ; "100"
04e0 01d9 | | .STRTAB 0x01d9->0x05cc ; "300C"
04e1 01db | | .STRTAB 0x01db->0x05ce ; "200"
04e2 01dc | | .STRTAB 0x01dc->0x05d0 ; "?"
04e3 01db | | .STRTAB 0x01db->0x05d0 ; "Memory_Boards => "
04e4 01ea | | .STRTAB 0x01ea->0x05d9 ; "64"
04e5 01ea | | .STRTAB 0x01ea->0x05da ; "32"
04e6 01ea | | .STRTAB 0x01ea->0x05db ; "Volume 1 "
04e7 01f1 | | .STRTAB 0x01f1->0x05df ; "Volume 2 "
04e8 01f8 | | .STRTAB 0x01f8->0x05e4 ; "Volume 3 "
04e9 01ff | | .STRTAB 0x01ff->0x05e8 ; "Volume 4 "
04ea 0206 | | .STRTAB 0x0206->0x05ed ; "Volumes => "
04eb 0210 | | .STRTAB 0x0210->0x05f3 ; "_mgr"
04ec 0212 | | .STRTAB 0x0212->0x05f5 ; "Machine_Use"
04ed 021b | | .STRTAB 0x021b->0x05fa ; "Retargets => "
04ee 0226 | & | .STRTAB 0x0226->0x0601 ; "Capacity => "
04ef 0230 | 0 | .STRTAB 0x0230->0x0607 ; "Used => "
04f0 0236 | 6 | .STRTAB 0x0236->0x060b ; "%"
04f1 0235 | 5 | .STRTAB 0x0235->0x060b ; "Network_Public"
04f2 0241 | A | .STRTAB 0x0241->0x0612 ; "!Machine.Machine_Use"
04f3 0253 | S | .STRTAB 0x0253->0x061c ; "Machine_use"
04f4 025c | \ | .STREND 0x025c->0x0622
04f5 204e 616d | Nam| .STRTAB_STRINGS
0622 0000 0000 | | .BLANK 0000[0x6]
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug Table
0628 ; --------------------------------------------------------------------------------------
0628 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9797,0x0000,0x0001,0x0000
062e 0000 0000 | | .BLANK 0000[0x1d2]