|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd
└─⟦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 0328 | ( | .CONST 0x0328 ; 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 8001 | | .CONST 0x8001 ; 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 0080 | | .CONST 0x0080 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0026 | & | .CONST 0x0026 ; Number of locals 001b INIT_0018: 001b 4800 |H | Short_Literal 0x0 001c 481f |H | Short_Literal 0x1f 001d 00e3 | | Load_Encached Natural_Cache 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4801 |H | Short_Literal 0x1 0020 035d | ] | Declare_Type Array,Defined 0021 e001 | | Load 0x0,0x1 0022 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0023 00e5 | | Load_Encached Long_Integer_Cache 0024 e402 | | Load 0x2,0x2 0025 00e3 | | Load_Encached Natural_Cache 0026 00e3 | | Load_Encached Natural_Cache 0027 02a0 | | Declare_Subprogram Null_Subprogram 0028 4805 |H | Short_Literal 0x5 0029 032d | - | Declare_Type Record,Defined 002a e002 | | Load 0x0,0x2 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c 02c7 | | Declare_Variable Any 002d 00d8 | | Load_Top At_Offset_0 002e 1c00 | | Execute_Immediate Run_Utility,0x0 002f e001 | | Load 0x0,0x1 0030 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0031 00e5 | | Load_Encached Long_Integer_Cache 0032 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0033 00e5 | | Load_Encached Long_Integer_Cache 0034 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0035 00e3 | | Load_Encached Natural_Cache 0036 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0037 e001 | | Load 0x0,0x1 0038 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0039 00e5 | | Load_Encached Long_Integer_Cache 003a 00e2 | | Load_Encached Integer_Cache 003b 00e2 | | Load_Encached Integer_Cache 003c 00e2 | | Load_Encached Integer_Cache 003d e5fe | | Load 0x2,-0x2 003e 4be8 |K | Short_Literal 0x3e8 003f 0271 | q | Execute Discrete,Times 0040 00d8 | | Load_Top At_Offset_0 0041 0c00 | | Execute_Immediate Greater_Equal,0x0 0042 7002 |p | Jump_Nonzero 0x45 0043 6108 |a | Indirect_Literal Discrete,0x14c,{0xffffffff, 0xffffc000} 0044 7801 |x | Jump 0x46 0045 6102 |a | Indirect_Literal Discrete,0x148,{0x00000000, 0x00004000} 0046 0273 | s | Execute Discrete,Plus 0047 09f1 | | Execute_Immediate Binary_Scale,-0xf 0048 e001 | | Load 0x0,0x1 0049 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 004a 03f1 | | Declare_Variable Discrete,With_Value 004b e001 | | Load 0x0,0x1 004c 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 004d 03e9 | | Declare_Variable Discrete,Duplicate 004e 03e9 | | Declare_Variable Discrete,Duplicate 004f 03e9 | | Declare_Variable Discrete,Duplicate 0050 e001 | | Load 0x0,0x1 0051 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0052 03e9 | | Declare_Variable Discrete,Duplicate 0053 03e9 | | Declare_Variable Discrete,Duplicate 0054 03e9 | | Declare_Variable Discrete,Duplicate 0055 e001 | | Load 0x0,0x1 0056 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0057 03e9 | | Declare_Variable Discrete,Duplicate 0058 03e9 | | Declare_Variable Discrete,Duplicate 0059 03e9 | | Declare_Variable Discrete,Duplicate 005a e403 | | Load 0x2,0x3 005b 0322 | " | Declare_Variable Record 005c 00d8 | | Load_Top At_Offset_0 005d 0322 | " | Declare_Variable Record 005e e003 | | Load 0x0,0x3 005f 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 0060 02c7 | | Declare_Variable Any 0061 00d8 | | Load_Top At_Offset_0 0062 1c00 | | Execute_Immediate Run_Utility,0x0 0063 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call 0065 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 0067 e004 | | Load 0x0,0x4 0068 e005 | | Load 0x0,0x5 0069 481e |H | Short_Literal 0x1e 006a 4802 |H | Short_Literal 0x2 006b 0099 | | Action Reference_Dynamic 006c 481f |H | Short_Literal 0x1f 006d 4802 |H | Short_Literal 0x2 006e 0099 | | Action Reference_Dynamic 006f e003 | | Load 0x0,0x3 0070 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0071 0387 | | Declare_Variable Package 0072 00d8 | | Load_Top At_Offset_0 0073 020f | | Execute Module,Activate 0074 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call 0076 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call 0078 029f 0213 | | Declare_Subprogram INIT_0210,For_Call 007a 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call 007c 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call 007e 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 0080 BODY_0018: 0080 00be | | Action Activate_Tasks 0081 e5fc | | Load 0x2,-0x4 0082 6807 |h | Jump_Zero 0x8a 0083 e404 | | Load 0x2,0x4 0084 00ea | | Load_Encached Null_String_Cache 0085 e5fd | | Load 0x2,-0x3 0086 e002 | | Load 0x0,0x2 0087 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0088 c404 | | Store 0x2,0x4 0089 7807 |x | Jump 0x91 008a e404 | | Load 0x2,0x4 008b 00ea | | Load_Encached Null_String_Cache 008c e5fd | | Load 0x2,-0x3 008d 4801 |H | Short_Literal 0x1 008e e002 | | Load 0x0,0x2 008f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0090 c404 | | Store 0x2,0x4 0091 e5fb | | Load 0x2,-0x5 0092 e404 | | Load 0x2,0x4 0093 e002 | | Load 0x0,0x2 0094 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0095 e5ff | | Load 0x2,-0x1 0096 00e0 | | Load_Encached Standard_Cache 0097 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0098 0092 02c2 | | Action Push_String_Extended,0x2c2 ; " samples, start at " 009a 01cc | | Execute Vector,Catenate 009b 8422 | " | Call 0x2,0x22 009c 01cc | | Execute Vector,Catenate 009d e404 | | Load 0x2,0x4 009e e002 | | Load 0x0,0x2 009f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 00a0 4802 |H | Short_Literal 0x2 00a1 e404 | | Load 0x2,0x4 00a2 e002 | | Load 0x0,0x2 00a3 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 00a4 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "Time Cpu DiskW Disk Users Jobs Jobs_T Load15 Disk15 Whld15" 00a6 e404 | | Load 0x2,0x4 00a7 e002 | | Load 0x0,0x2 00a8 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 00a9 0092 02c4 | | Action Push_String_Extended,0x2c4 ; "----------------- ---- ------ ------- ----- ---- ------ ------ ------ ------" 00ab e404 | | Load 0x2,0x4 00ac e002 | | Load 0x0,0x2 00ad 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 00ae e41b | | Load 0x2,0x1b 00af 8421 | ! | Call 0x2,0x21 00b0 00d1 | | Pop_Control Pop_Count_1 00b1 e41d | | Load 0x2,0x1d 00b2 4800 |H | Short_Literal 0x0 00b3 e003 | | Load 0x0,0x3 00b4 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 00b5 c41d | | Store 0x2,0x1d 00b6 00cf | | Action Mark_Auxiliary 00b7 7808 |x | Jump 0xc0 00b8 e408 | | Load 0x2,0x8 00b9 0a01 | | Execute_Immediate Plus,0x1 00ba c408 | | Store 0x2,0x8 00bb e41d | | Load 0x2,0x1d 00bc e003 | | Load 0x0,0x3 00bd 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 00be c41d | | Store 0x2,0x1d 00bf 00c9 | | Action Pop_Auxiliary_Loop 00c0 e41d | | Load 0x2,0x1d 00c1 e003 | | Load 0x0,0x3 00c2 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 00c3 6ff4 |o | Jump_Zero 0xb8 00c4 00c9 | | Action Pop_Auxiliary_Loop 00c5 e5ff | | Load 0x2,-0x1 00c6 4801 |H | Short_Literal 0x1 00c7 0263 | c | Execute Discrete,Above_Bound 00c8 7079 |py | Jump_Nonzero 0x142 00c9 e5fe | | Load 0x2,-0x2 00ca 00ba | | Action Initiate_Delay 00cb e41c | | Load 0x2,0x1c 00cc 8421 | ! | Call 0x2,0x21 00cd 00d1 | | Pop_Control Pop_Count_1 00ce e41c | | Load 0x2,0x1c 00cf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00d0 e41b | | Load 0x2,0x1b 00d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00d2 0272 | r | Execute Discrete,Minus 00d3 a409 | | Store_Unchecked 0x2,0x9 00d4 e41c | | Load 0x2,0x1c 00d5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00d6 e41b | | Load 0x2,0x1b 00d7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00d8 0272 | r | Execute Discrete,Minus 00d9 a40a | | Store_Unchecked 0x2,0xa 00da e41c | | Load 0x2,0x1c 00db 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00dc e41b | | Load 0x2,0x1b 00dd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00de 0272 | r | Execute Discrete,Minus 00df a40b | | Store_Unchecked 0x2,0xb 00e0 0092 02c5 | | Action Push_String_Extended,0x2c5 ; "Login" 00e2 e006 | | Load 0x0,0x6 00e3 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00e4 a40c | | Store_Unchecked 0x2,0xc 00e5 e41c | | Load 0x2,0x1c 00e6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00e7 e41b | | Load 0x2,0x1b 00e8 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00e9 0272 | r | Execute Discrete,Minus 00ea a40d | | Store_Unchecked 0x2,0xd 00eb 4811 |H | Short_Literal 0x11 00ec 8422 | " | Call 0x2,0x22 00ed 8423 | # | Call 0x2,0x23 00ee 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 00f0 01cc | | Execute Vector,Catenate 00f1 4804 |H | Short_Literal 0x4 00f2 e409 | | Load 0x2,0x9 00f3 4864 |Hd | Short_Literal 0x64 00f4 0271 | q | Execute Discrete,Times 00f5 e40e | | Load 0x2,0xe 00f6 0270 | p | Execute Discrete,Divide 00f7 8425 | % | Call 0x2,0x25 00f8 8423 | # | Call 0x2,0x23 00f9 01cc | | Execute Vector,Catenate 00fa 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 00fc 01cc | | Execute Vector,Catenate 00fd 4806 |H | Short_Literal 0x6 00fe e40a | | Load 0x2,0xa 00ff 8425 | % | Call 0x2,0x25 0100 8423 | # | Call 0x2,0x23 0101 01cc | | Execute Vector,Catenate 0102 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 0104 01cc | | Execute Vector,Catenate 0105 4807 |H | Short_Literal 0x7 0106 e40b | | Load 0x2,0xb 0107 8424 | $ | Call 0x2,0x24 0108 8423 | # | Call 0x2,0x23 0109 01cc | | Execute Vector,Catenate 010a 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 010c 01cc | | Execute Vector,Catenate 010d 4805 |H | Short_Literal 0x5 010e e40c | | Load 0x2,0xc 010f 8424 | $ | Call 0x2,0x24 0110 8423 | # | Call 0x2,0x23 0111 01cc | | Execute Vector,Catenate 0112 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 0114 01cc | | Execute Vector,Catenate 0115 4804 |H | Short_Literal 0x4 0116 e408 | | Load 0x2,0x8 0117 8424 | $ | Call 0x2,0x24 0118 8423 | # | Call 0x2,0x23 0119 01cc | | Execute Vector,Catenate 011a 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 011c 01cc | | Execute Vector,Catenate 011d 4806 |H | Short_Literal 0x6 011e e40d | | Load 0x2,0xd 011f 8424 | $ | Call 0x2,0x24 0120 8423 | # | Call 0x2,0x23 0121 01cc | | Execute Vector,Catenate 0122 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 0124 01cc | | Execute Vector,Catenate 0125 4806 |H | Short_Literal 0x6 0126 e412 | | Load 0x2,0x12 0127 8426 | & | Call 0x2,0x26 0128 8423 | # | Call 0x2,0x23 0129 01cc | | Execute Vector,Catenate 012a 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 012c 01cc | | Execute Vector,Catenate 012d 4806 |H | Short_Literal 0x6 012e e416 | | Load 0x2,0x16 012f 8426 | & | Call 0x2,0x26 0130 8423 | # | Call 0x2,0x23 0131 01cc | | Execute Vector,Catenate 0132 0092 02c6 | | Action Push_String_Extended,0x2c6 ; " " 0134 01cc | | Execute Vector,Catenate 0135 4806 |H | Short_Literal 0x6 0136 e41a | | Load 0x2,0x1a 0137 8426 | & | Call 0x2,0x26 0138 8423 | # | Call 0x2,0x23 0139 01cc | | Execute Vector,Catenate 013a e404 | | Load 0x2,0x4 013b e002 | | Load 0x0,0x2 013c 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 013d e41c | | Load 0x2,0x1c 013e e41b | | Load 0x2,0x1b 013f 017d | } | Execute Record,Structure_Write 0140 00c8 | | Action Pop_Auxiliary_Range 0141 3f87 |? | Loop_Increasing 0xc9 0142 00ce | | Action Pop_Auxiliary 0143 e404 | | Load 0x2,0x4 0144 e002 | | Load 0x0,0x2 0145 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0146 c404 | | Store 0x2,0x4 0147 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0148 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 014c ffff ffff | | .LITERAL {0xffffffff, 0xffffc000} 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 e408 | | Load 0x2,0x8 0154 0a01 | | Execute_Immediate Plus,0x1 0155 c408 | | Store 0x2,0x8 0156 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0157 0000 | | .XXX[0x1] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b e407 | | Load 0x2,0x7 015c 0a01 | | Execute_Immediate Plus,0x1 015d a407 | | Store_Unchecked 0x2,0x7 015e e408 | | Load 0x2,0x8 015f 0aff | | Execute_Immediate Plus,-0x1 0160 c408 | | Store 0x2,0x8 0161 e405 | | Load 0x2,0x5 0162 e7ff | | Load 0x3,-0x1 0163 e001 | | Load 0x0,0x1 0164 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0165 0273 | s | Execute Discrete,Plus 0166 a405 | | Store_Unchecked 0x2,0x5 0167 e406 | | Load 0x2,0x6 0168 e7ff | | Load 0x3,-0x1 0169 e001 | | Load 0x0,0x1 016a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 016b 0273 | s | Execute Discrete,Plus 016c a406 | | Store_Unchecked 0x2,0x6 016d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 016e 0000 0000 | | .XXX[0x2] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0187 | | .CONST 0x0187 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 000a | | .CONST 0x000a ; Number of locals 0173 INIT_0170: 0173 00e1 | | Load_Encached Boolean_Cache 0174 e007 | | Load 0x0,0x7 0175 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0176 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0177 0322 | " | Declare_Variable Record 0178 e001 | | Load 0x0,0x1 0179 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 017a 00e5 | | Load_Encached Long_Integer_Cache 017b 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call 017d e001 | | Load 0x0,0x1 017e 1930 | 0 | Execute Package,Field_Reference,Field_Number 0x30 017f 00c6 | | Action Check_Subprogram_Elaborated 0180 4806 |H | Short_Literal 0x6 0181 4803 |H | Short_Literal 0x3 0182 0099 | | Action Reference_Dynamic 0183 e008 | | Load 0x0,0x8 0184 e009 | | Load 0x0,0x9 0185 480a |H | Short_Literal 0xa 0186 0007 | | Action Break_Optional 0187 BODY_0170: 0187 e405 | | Load 0x2,0x5 0188 a604 | | Store_Unchecked 0x3,0x4 0189 e406 | | Load 0x2,0x6 018a a605 | | Store_Unchecked 0x3,0x5 018b 48ff |H | Short_Literal 0xff 018c 4804 |H | Short_Literal 0x4 018d 4807 |H | Short_Literal 0x7 018e 4803 |H | Short_Literal 0x3 018f 0099 | | Action Reference_Dynamic 0190 4808 |H | Short_Literal 0x8 0191 4803 |H | Short_Literal 0x3 0192 0099 | | Action Reference_Dynamic 0193 e001 | | Load 0x0,0x1 0194 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0195 e604 | | Load 0x3,0x4 0196 e7ff | | Load 0x3,-0x1 0197 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0198 e605 | | Load 0x3,0x5 0199 e7ff | | Load 0x3,-0x1 019a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 019b e407 | | Load 0x2,0x7 019c 00d8 | | Load_Top At_Offset_0 019d 00e2 | | Load_Encached Integer_Cache 019e 0260 | ` | Execute Discrete,In_Type 019f 7001 |p | Jump_Nonzero 0x1a1 01a0 0801 | | Execute_Immediate Raise,0x1 01a1 e7ff | | Load 0x3,-0x1 01a2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 01a3 4800 |H | Short_Literal 0x0 01a4 e7ff | | Load 0x3,-0x1 01a5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01a6 00cf | | Action Mark_Auxiliary 01a7 481f |H | Short_Literal 0x1f 01a8 4800 |H | Short_Literal 0x0 01a9 0007 | | Action Break_Optional 01aa e603 | | Load 0x3,0x3 01ab 00e1 | | Load_Encached Boolean_Cache 01ac e60d | | Load 0x3,0xd 01ad e007 | | Load 0x0,0x7 01ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01af 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01b0 c602 | | Store 0x3,0x2 01b1 00d1 | | Pop_Control Pop_Count_1 01b2 e602 | | Load 0x3,0x2 01b3 6812 |h | Jump_Zero 0x1c6 01b4 e603 | | Load 0x3,0x3 01b5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b6 e603 | | Load 0x3,0x3 01b7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01b8 0272 | r | Execute Discrete,Minus 01b9 e60d | | Load 0x3,0xd 01ba e7ff | | Load 0x3,-0x1 01bb 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 01bc 01d6 | | Execute Vector,Field_Write 01bd e7ff | | Load 0x3,-0x1 01be 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01bf e60d | | Load 0x3,0xd 01c0 e7ff | | Load 0x3,-0x1 01c1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 01c2 01d7 | | Execute Vector,Field_Read 01c3 0273 | s | Execute Discrete,Plus 01c4 e7ff | | Load 0x3,-0x1 01c5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01c6 00c8 | | Action Pop_Auxiliary_Range 01c7 3fe2 |? | Loop_Increasing 0x1aa 01c8 00ce | | Action Pop_Auxiliary 01c9 e001 | | Load 0x0,0x1 01ca 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01cb e001 | | Load 0x0,0x1 01cc 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01cd e001 | | Load 0x0,0x1 01ce 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01cf e001 | | Load 0x0,0x1 01d0 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01d1 e001 | | Load 0x0,0x1 01d2 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 01d3 c40f | | Store 0x2,0xf 01d4 c410 | | Store 0x2,0x10 01d5 c411 | | Store 0x2,0x11 01d6 c412 | | Store 0x2,0x12 01d7 e001 | | Load 0x0,0x1 01d8 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01d9 e001 | | Load 0x0,0x1 01da 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01db e001 | | Load 0x0,0x1 01dc 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01dd e001 | | Load 0x0,0x1 01de 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01df e001 | | Load 0x0,0x1 01e0 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 01e1 c413 | | Store 0x2,0x13 01e2 c414 | | Store 0x2,0x14 01e3 c415 | | Store 0x2,0x15 01e4 c416 | | Store 0x2,0x16 01e5 e001 | | Load 0x0,0x1 01e6 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01e7 e001 | | Load 0x0,0x1 01e8 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01e9 e001 | | Load 0x0,0x1 01ea 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01eb e001 | | Load 0x0,0x1 01ec 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 01ed e001 | | Load 0x0,0x1 01ee 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 01ef c417 | | Store 0x2,0x17 01f0 c418 | | Store 0x2,0x18 01f1 c419 | | Store 0x2,0x19 01f2 c41a | | Store 0x2,0x1a 01f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01f4 0000 0000 | | .BLANK 0000[0x4] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 0201 | | .CONST 0x0201 ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0002 | | .CONST 0x0002 ; Number of locals 01fb INIT_01f8: 01fb e00a | | Load 0x0,0xa 01fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01fd 02c7 | | Declare_Variable Any 01fe e00a | | Load 0x0,0xa 01ff 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0200 a602 | | Store_Unchecked 0x3,0x2 0201 BODY_01f8: 0201 4800 |H | Short_Literal 0x0 0202 4801 |H | Short_Literal 0x1 0203 4803 |H | Short_Literal 0x3 0204 e602 | | Load 0x3,0x2 0205 e00b | | Load 0x0,0xb 0206 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0207 e00b | | Load 0x0,0xb 0208 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0209 00ca | | Action Exit_Nullary_Function 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 e7ff | | Load 0x3,-0x1 0214 01db | | Execute Vector,Length 0215 e7fe | | Load 0x3,-0x2 0216 027b | { | Execute Discrete,Greater_Equal 0217 680f |h | Jump_Zero 0x227 0218 e7ff | | Load 0x3,-0x1 0219 01dd | | Execute Vector,First 021a e7ff | | Load 0x3,-0x1 021b 01dd | | Execute Vector,First 021c e7fe | | Load 0x3,-0x2 021d 0273 | s | Execute Discrete,Plus 021e 0aff | | Execute_Immediate Plus,-0x1 021f 00d8 | | Load_Top At_Offset_0 0220 00e2 | | Load_Encached Integer_Cache 0221 0260 | ` | Execute Discrete,In_Type 0222 7001 |p | Jump_Nonzero 0x224 0223 0801 | | Execute_Immediate Raise,0x1 0224 e7ff | | Load 0x3,-0x1 0225 01cf | | Execute Vector,Slice_Read 0226 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0227 e7ff | | Load 0x3,-0x1 0228 4801 |H | Short_Literal 0x1 0229 e7fe | | Load 0x3,-0x2 022a e7ff | | Load 0x3,-0x1 022b 01db | | Execute Vector,Length 022c 0272 | r | Execute Discrete,Minus 022d 00e9 | | Load_Encached String_Cache 022e 0334 | 4 | Declare_Variable Array,With_Constraint 022f 00d8 | | Load_Top At_Offset_0 0230 01dc | | Execute Vector,Last 0231 4801 |H | Short_Literal 0x1 0232 0263 | c | Execute Discrete,Above_Bound 0233 7005 |p | Jump_Nonzero 0x239 0234 4820 |H | Short_Literal 0x20 0235 e605 | | Load 0x3,0x5 0236 e603 | | Load 0x3,0x3 0237 01d6 | | Execute Vector,Field_Write 0238 3ffb |? | Loop_Increasing 0x234 0239 01cc | | Execute Vector,Catenate 023a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 023b 0000 0000 | | .BLANK 0000[0x5] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 4820 |H | Short_Literal 0x20 0244 4800 |H | Short_Literal 0x0 0245 480a |H | Short_Literal 0xa 0246 e7ff | | Load 0x3,-0x1 0247 e00c | | Load 0x0,0xc 0248 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0249 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 024a 0000 0000 | | .BLANK 0000[0x6] 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 4820 |H | Short_Literal 0x20 0254 4800 |H | Short_Literal 0x0 0255 480a |H | Short_Literal 0xa 0256 e7ff | | Load 0x3,-0x1 0257 e00c | | Load 0x0,0xc 0258 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0259 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 025a 0000 0000 | | .BLANK 0000[0x6] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 026d | m | .CONST 0x026d ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0003 | | .CONST 0x0003 ; Number of locals 0263 INIT_0260: 0263 e7ff | | Load 0x3,-0x1 0264 4864 |Hd | Short_Literal 0x64 0265 0270 | p | Execute Discrete,Divide 0266 00e0 | | Load_Encached Standard_Cache 0267 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0268 e7ff | | Load 0x3,-0x1 0269 4864 |Hd | Short_Literal 0x64 026a 026e | n | Execute Discrete,Modulo 026b 00e0 | | Load_Encached Standard_Cache 026c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 026d BODY_0260: 026d e7ff | | Load 0x3,-0x1 026e 4864 |Hd | Short_Literal 0x64 026f 026e | n | Execute Discrete,Modulo 0270 0d0a | | Execute_Immediate Less,0xa 0271 681d |h | Jump_Zero 0x28f 0272 e602 | | Load 0x3,0x2 0273 01dd | | Execute Vector,First 0274 0a01 | | Execute_Immediate Plus,0x1 0275 00d8 | | Load_Top At_Offset_0 0276 00e2 | | Load_Encached Integer_Cache 0277 0260 | ` | Execute Discrete,In_Type 0278 7001 |p | Jump_Nonzero 0x27a 0279 0801 | | Execute_Immediate Raise,0x1 027a e602 | | Load 0x3,0x2 027b 01dc | | Execute Vector,Last 027c e602 | | Load 0x3,0x2 027d 01cf | | Execute Vector,Slice_Read 027e 0092 02c7 | | Action Push_String_Extended,0x2c7 ; ".0" 0280 01cc | | Execute Vector,Catenate 0281 e603 | | Load 0x3,0x3 0282 01dd | | Execute Vector,First 0283 0a01 | | Execute_Immediate Plus,0x1 0284 00d8 | | Load_Top At_Offset_0 0285 00e2 | | Load_Encached Integer_Cache 0286 0260 | ` | Execute Discrete,In_Type 0287 7001 |p | Jump_Nonzero 0x289 0288 0801 | | Execute_Immediate Raise,0x1 0289 e603 | | Load 0x3,0x3 028a 01dc | | Execute Vector,Last 028b e603 | | Load 0x3,0x3 028c 01cf | | Execute Vector,Slice_Read 028d 01cc | | Execute Vector,Catenate 028e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 028f e602 | | Load 0x3,0x2 0290 01dd | | Execute Vector,First 0291 0a01 | | Execute_Immediate Plus,0x1 0292 00d8 | | Load_Top At_Offset_0 0293 00e2 | | Load_Encached Integer_Cache 0294 0260 | ` | Execute Discrete,In_Type 0295 7001 |p | Jump_Nonzero 0x297 0296 0801 | | Execute_Immediate Raise,0x1 0297 e602 | | Load 0x3,0x2 0298 01dc | | Execute Vector,Last 0299 e602 | | Load 0x3,0x2 029a 01cf | | Execute Vector,Slice_Read 029b 0092 02c8 | | Action Push_String_Extended,0x2c8 ; "." 029d 01cc | | Execute Vector,Catenate 029e e603 | | Load 0x3,0x3 029f 01dd | | Execute Vector,First 02a0 0a01 | | Execute_Immediate Plus,0x1 02a1 00d8 | | Load_Top At_Offset_0 02a2 00e2 | | Load_Encached Integer_Cache 02a3 0260 | ` | Execute Discrete,In_Type 02a4 7001 |p | Jump_Nonzero 0x2a6 02a5 0801 | | Execute_Immediate Raise,0x1 02a6 e603 | | Load 0x3,0x3 02a7 01dc | | Execute Vector,Last 02a8 e603 | | Load 0x3,0x3 02a9 01cf | | Execute Vector,Slice_Read 02aa 01cc | | Execute Vector,Catenate 02ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ac 0000 0000 | | .BLANK 0000[0x4] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 e9ff | | Load 0x4,-0x1 02b4 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 02b5 0f05 | | Execute_Immediate Equal,0x5 02b6 700a |p | Jump_Nonzero 0x2c1 02b7 e604 | | Load 0x3,0x4 02b8 e9ff | | Load 0x4,-0x1 02b9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02ba 0273 | s | Execute Discrete,Plus 02bb a604 | | Store_Unchecked 0x3,0x4 02bc e605 | | Load 0x3,0x5 02bd e9ff | | Load 0x4,-0x1 02be 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02bf 0273 | s | Execute Discrete,Plus 02c0 a605 | | Store_Unchecked 0x3,0x5 02c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02c2 ; -------------------------------------------------------------------------------------- 02c2 ; STRING TABLE 02c2 ; -------------------------------------------------------------------------------------- 02c2 0010 | | .STRTAB 0x0010->0x02ca ; " samples, start at " 02c3 0021 | ! | .STRTAB 0x0021->0x02d3 ; "Time Cpu DiskW Disk Users Jobs Jobs_T Load15 Disk15 Whld15" 02c4 006b | k | .STRTAB 0x006b->0x02f9 ; "----------------- ---- ------ ------- ----- ---- ------ ------ ------ ------" 02c5 00b5 | | .STRTAB 0x00b5->0x031f ; "Login" 02c6 00b8 | | .STRTAB 0x00b8->0x0322 ; " " 02c7 00b7 | | .STRTAB 0x00b7->0x0322 ; ".0" 02c8 00b7 | | .STRTAB 0x00b7->0x0323 ; "." 02c9 00b6 | | .STREND 0x00b6->0x0324 02ca 2073 616d | sam| .STRTAB_STRINGS 0324 0000 0000 | | .BLANK 0000[0x4] 0328 ; -------------------------------------------------------------------------------------- 0328 ; Debug Table 0328 ; -------------------------------------------------------------------------------------- 0328 0004 000d | | .DEBUG4 0x0004,0x000d,0x5ba8,0x0000,0x0001,0x0000 032e 4541 4d2e |EAM.| .XXX[0x29] 0330 5354 5245 |STRE| 0332 414d 5f49 |AM_I| 0334 4400 7e90 |D ~ | 0336 2300 0450 |# P| 0338 4f4f 4c17 |OOL | 033a 0018 5452 | TR| 033c 414e 5350 |ANSP| 033e 4f52 545f |ORT_| 0340 5354 5245 |STRE| 0342 414d 2e50 |AM.P| 0344 4f4f 4c5f |OOL_| 0346 4944 007d |ID }| 0348 9025 0006 | % | 034a 4953 5f4e |IS_N| 034c 4557 1700 |EW | 034e 1053 5441 | STA| 0350 4e44 4152 |NDAR| 0352 442e 424f |D.BO| 0354 4f4c 4541 |OLEA| 0356 4e00 |N | 0357 0000 0000 | | .BLANK 0000[0x4] 035b 1e00 0000 | | .XXX[0x61] 035d 0200 0000 | | 035f ce00 3ea8 | > | 0361 a482 9ca6 | | 0363 a09e a4a8 | | 0365 bea6 a8a4 | | 0367 8a82 9a5c | \| 0369 9caa 9898 | | 036b beaa 9c92 | | 036d a2aa 8abe | | 036f 9288 70cc | p | 0371 2e00 34a8 |. 4 | 0373 a482 9ca6 | | 0375 a09e a4a8 | | 0377 bea6 a8a4 | | 0379 8a82 9a5c | \| 037b aa9c 92a2 | | 037d aa8a be92 | | 037f 8800 1c2e | .| 0381 0034 a8a4 | 4 | 0383 829c a6a0 | | 0385 9ea4 a8be | | 0387 a6a8 a48a | | 0389 829a 5caa | \ | 038b 9c92 a2aa | | 038d 8abe 9288 | | 038f 2e00 0a8c |. | 0391 92a4 a6a8 | | 0393 0000 0000 | | 0395 0000 0074 | t| 0397 0000 0004 | | 0399 0000 0110 | | 039b 0065 5149 | eQI| 039d 0539 4d41 | 9MA| 039f 3d49 517d |=IQ}| 03a1 4d51 4915 |MQI | 03a3 0534 b94d | 4 M| 03a5 0d05 5915 | Y | 03a7 391d 14f5 |9 | 03a9 ee51 fa40 | Q @| 03ab 8c00 1141 | A| 03ad 3d3d 305c |==0\| 03af 0061 5149 | aQI| 03b1 0539 4d41 | 9MA| 03b3 3d49 517d |=IQ}| 03b5 4d51 4915 |MQI | 03b7 0534 b941 | 4 A| 03b9 3d3d 317d |==1}| 03bb 2510 |% | 03bc 0000 0000 | | .BLANK 0000[0x4] 03c0 0080 0000 | | .XXX[0x40] 03c2 0008 0000 | | 03c4 00f8 00ca | | 03c6 a292 0a72 | r| 03c8 9a82 7a92 | z | 03ca a2fa 9aa2 | | 03cc 922a 0a69 | * i| 03ce 729a 1a0a |r | 03d0 b22a 723a | *r:| 03d2 29eb dca0 |) | 03d4 0000 0000 | | 03d6 0000 0001 | | 03d8 1000 0000 | | 03da 1000 0001 | | 03dc f001 9545 | E| 03de 2414 e535 |$ 5| 03e0 04f5 2545 | %E| 03e2 f535 4524 | 5E$| 03e4 5414 d2e4 |T | 03e6 6494 e414 |d | 03e8 c495 a453 | S| 03ea d7b9 4000 | @ | 03ec 0000 0000 | | 03ee 0000 0240 | @| 03f0 0000 0020 | | 03f2 0000 0e80 | | 03f4 038a 8a48 | H| 03f6 29ca 6a09 |) j | 03f8 ea4a 8bea | J | 03fa 6a8a 48a8 |j H | 03fc 29a5 ca68 |) h| 03fe aa8b eaaa | |