|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 02f0 | | .CONST 0x02f0 ; 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 0028 | ( | .CONST 0x0028 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 000b | | .CONST 0x000b ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 0322 | " | Declare_Variable Record 001e 00e5 | | Load_Encached Long_Integer_Cache 001f 03e9 | | Declare_Variable Discrete,Duplicate 0020 03e9 | | Declare_Variable Discrete,Duplicate 0021 03e9 | | Declare_Variable Discrete,Duplicate 0022 03e9 | | Declare_Variable Discrete,Duplicate 0023 00e5 | | Load_Encached Long_Integer_Cache 0024 03e9 | | Declare_Variable Discrete,Duplicate 0025 03e9 | | Declare_Variable Discrete,Duplicate 0026 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call 0028 BODY_0018: 0028 840b | | Call 0x2,0xb 0029 e5ff | | Load 0x2,-0x1 002a e001 | | Load 0x0,0x1 002b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 002c 0092 024a | J| Action Push_String_Extended,0x24a ; "PRI HEAD TAIL" 002e e002 | | Load 0x0,0x2 002f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0030 00cf | | Action Mark_Auxiliary 0031 480f |H | Short_Literal 0xf 0032 4800 |H | Short_Literal 0x0 0033 0007 | | Action Break_Optional 0034 00d8 | | Load_Top At_Offset_0 0035 0a60 | ` | Execute_Immediate Plus,0x60 0036 e001 | | Load 0x0,0x1 0037 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0038 00d9 | | Load_Top At_Offset_1 0039 00d0 | | Action Swap_Control 003a 0260 | ` | Execute Discrete,In_Type 003b 7001 |p | Jump_Nonzero 0x3d 003c 0801 | | Execute_Immediate Raise,0x1 003d e001 | | Load 0x0,0x1 003e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 003f e402 | | Load 0x2,0x2 0040 017d | } | Execute Record,Structure_Write 0041 00e5 | | Load_Encached Long_Integer_Cache 0042 00e5 | | Load_Encached Long_Integer_Cache 0043 e402 | | Load 0x2,0x2 0044 e003 | | Load 0x0,0x3 0045 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0046 c403 | | Store 0x2,0x3 0047 c404 | | Store 0x2,0x4 0048 00e5 | | Load_Encached Long_Integer_Cache 0049 4820 |H | Short_Literal 0x20 004a 4800 |H | Short_Literal 0x0 004b e403 | | Load 0x2,0x3 004c e003 | | Load 0x0,0x3 004d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 004e c406 | | Store 0x2,0x6 004f 00e5 | | Load_Encached Long_Integer_Cache 0050 4820 |H | Short_Literal 0x20 0051 4800 |H | Short_Literal 0x0 0052 e404 | | Load 0x2,0x4 0053 e003 | | Load 0x0,0x3 0054 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0055 c407 | | Store 0x2,0x7 0056 4820 |H | Short_Literal 0x20 0057 4803 |H | Short_Literal 0x3 0058 4801 |H | Short_Literal 0x1 0059 00db | | Load_Top At_Offset_3 005a e004 | | Load 0x0,0x4 005b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 005c 0092 024b | K| Action Push_String_Extended,0x24b ; " " 005e 01cc | | Execute Vector,Catenate 005f 4830 |H0 | Short_Literal 0x30 0060 4808 |H | Short_Literal 0x8 0061 4800 |H | Short_Literal 0x0 0062 e406 | | Load 0x2,0x6 0063 e004 | | Load 0x0,0x4 0064 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0065 01cc | | Execute Vector,Catenate 0066 0092 024b | K| Action Push_String_Extended,0x24b ; " " 0068 01cc | | Execute Vector,Catenate 0069 4830 |H0 | Short_Literal 0x30 006a 4808 |H | Short_Literal 0x8 006b 4800 |H | Short_Literal 0x0 006c e407 | | Load 0x2,0x7 006d e004 | | Load 0x0,0x4 006e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 006f 01cc | | Execute Vector,Catenate 0070 e002 | | Load 0x0,0x2 0071 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0072 00c8 | | Action Pop_Auxiliary_Range 0073 3fc0 |? | Loop_Increasing 0x34 0074 00ce | | Action Pop_Auxiliary 0075 4801 |H | Short_Literal 0x1 0076 e002 | | Load 0x0,0x2 0077 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0078 4ae0 |J | Short_Literal 0x2e0 0079 e001 | | Load 0x0,0x1 007a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 007b e402 | | Load 0x2,0x2 007c 017d | } | Execute Record,Structure_Write 007d 00e5 | | Load_Encached Long_Integer_Cache 007e 00e5 | | Load_Encached Long_Integer_Cache 007f e402 | | Load 0x2,0x2 0080 e003 | | Load 0x0,0x3 0081 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0082 c403 | | Store 0x2,0x3 0083 c404 | | Store 0x2,0x4 0084 00e5 | | Load_Encached Long_Integer_Cache 0085 4820 |H | Short_Literal 0x20 0086 4800 |H | Short_Literal 0x0 0087 e403 | | Load 0x2,0x3 0088 e003 | | Load 0x0,0x3 0089 1813 | | Execute Package,Field_Execute,Field_Number 0x13 008a c405 | | Store 0x2,0x5 008b 0092 024c | L| Action Push_String_Extended,0x24c ; " Delay Queue Head - " 008d 4830 |H0 | Short_Literal 0x30 008e 4808 |H | Short_Literal 0x8 008f 4800 |H | Short_Literal 0x0 0090 e405 | | Load 0x2,0x5 0091 e004 | | Load 0x0,0x4 0092 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0093 01cc | | Execute Vector,Catenate 0094 e002 | | Load 0x0,0x2 0095 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0096 4801 |H | Short_Literal 0x1 0097 e002 | | Load 0x0,0x2 0098 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0099 4871 |Hq | Short_Literal 0x71 009a e001 | | Load 0x0,0x1 009b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 009c e402 | | Load 0x2,0x2 009d 017d | } | Execute Record,Structure_Write 009e 00e5 | | Load_Encached Long_Integer_Cache 009f 00e5 | | Load_Encached Long_Integer_Cache 00a0 e402 | | Load 0x2,0x2 00a1 e003 | | Load 0x0,0x3 00a2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00a3 c403 | | Store 0x2,0x3 00a4 c404 | | Store 0x2,0x4 00a5 00e5 | | Load_Encached Long_Integer_Cache 00a6 4820 |H | Short_Literal 0x20 00a7 4800 |H | Short_Literal 0x0 00a8 e403 | | Load 0x2,0x3 00a9 e003 | | Load 0x0,0x3 00aa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ab c405 | | Store 0x2,0x5 00ac 0092 024d | M| Action Push_String_Extended,0x24d ; " Disk Wait Head - " 00ae 4830 |H0 | Short_Literal 0x30 00af 4808 |H | Short_Literal 0x8 00b0 4800 |H | Short_Literal 0x0 00b1 e405 | | Load 0x2,0x5 00b2 e004 | | Load 0x0,0x4 00b3 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 00b4 01cc | | Execute Vector,Catenate 00b5 e002 | | Load 0x0,0x2 00b6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00b7 4801 |H | Short_Literal 0x1 00b8 e002 | | Load 0x0,0x2 00b9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00ba 4870 |Hp | Short_Literal 0x70 00bb e001 | | Load 0x0,0x1 00bc 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00bd e402 | | Load 0x2,0x2 00be 017d | } | Execute Record,Structure_Write 00bf 00e5 | | Load_Encached Long_Integer_Cache 00c0 00e5 | | Load_Encached Long_Integer_Cache 00c1 e402 | | Load 0x2,0x2 00c2 e003 | | Load 0x0,0x3 00c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00c4 c403 | | Store 0x2,0x3 00c5 c404 | | Store 0x2,0x4 00c6 00e5 | | Load_Encached Long_Integer_Cache 00c7 4820 |H | Short_Literal 0x20 00c8 4800 |H | Short_Literal 0x0 00c9 e403 | | Load 0x2,0x3 00ca e003 | | Load 0x0,0x3 00cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00cc c405 | | Store 0x2,0x5 00cd 0092 024e | N| Action Push_String_Extended,0x24e ; " FAQ Head - " 00cf 4830 |H0 | Short_Literal 0x30 00d0 4808 |H | Short_Literal 0x8 00d1 4800 |H | Short_Literal 0x0 00d2 e405 | | Load 0x2,0x5 00d3 e004 | | Load 0x0,0x4 00d4 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 00d5 01cc | | Execute Vector,Catenate 00d6 e002 | | Load 0x0,0x2 00d7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00d8 4801 |H | Short_Literal 0x1 00d9 e002 | | Load 0x0,0x2 00da 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00db 488a |H | Short_Literal 0x8a 00dc e001 | | Load 0x0,0x1 00dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00de e402 | | Load 0x2,0x2 00df 017d | } | Execute Record,Structure_Write 00e0 00e5 | | Load_Encached Long_Integer_Cache 00e1 00e5 | | Load_Encached Long_Integer_Cache 00e2 e402 | | Load 0x2,0x2 00e3 e003 | | Load 0x0,0x3 00e4 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00e5 c403 | | Store 0x2,0x3 00e6 c404 | | Store 0x2,0x4 00e7 00e5 | | Load_Encached Long_Integer_Cache 00e8 4815 |H | Short_Literal 0x15 00e9 4801 |H | Short_Literal 0x1 00ea e404 | | Load 0x2,0x4 00eb e003 | | Load 0x0,0x3 00ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ed 005a | Z | Store_Top Discrete,At_Offset_2 00ee 00e5 | | Load_Encached Long_Integer_Cache 00ef 4815 |H | Short_Literal 0x15 00f0 4816 |H | Short_Literal 0x16 00f1 e404 | | Load 0x2,0x4 00f2 e003 | | Load 0x0,0x3 00f3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f4 005b | [ | Store_Top Discrete,At_Offset_3 00f5 00e5 | | Load_Encached Long_Integer_Cache 00f6 4815 |H | Short_Literal 0x15 00f7 482b |H+ | Short_Literal 0x2b 00f8 e404 | | Load 0x2,0x4 00f9 e003 | | Load 0x0,0x3 00fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00fb c408 | | Store 0x2,0x8 00fc 0092 024f | O| Action Push_String_Extended,0x24f ; "CURRENT LOAD REG - " 00fe 4830 |H0 | Short_Literal 0x30 00ff 4810 |H | Short_Literal 0x10 0100 4800 |H | Short_Literal 0x0 0101 e404 | | Load 0x2,0x4 0102 e004 | | Load 0x0,0x4 0103 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0104 01cc | | Execute Vector,Catenate 0105 e002 | | Load 0x0,0x2 0106 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0107 0092 0250 | P| Action Push_String_Extended,0x250 ; " RUN LOAD - " 0109 4830 |H0 | Short_Literal 0x30 010a 4806 |H | Short_Literal 0x6 010b 4801 |H | Short_Literal 0x1 010c e408 | | Load 0x2,0x8 010d e004 | | Load 0x0,0x4 010e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 010f 01cc | | Execute Vector,Catenate 0110 e002 | | Load 0x0,0x2 0111 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0112 0092 0251 | Q| Action Push_String_Extended,0x251 ; " DISK WAIT LOAD - " 0114 4830 |H0 | Short_Literal 0x30 0115 4806 |H | Short_Literal 0x6 0116 4801 |H | Short_Literal 0x1 0117 e409 | | Load 0x2,0x9 0118 e004 | | Load 0x0,0x4 0119 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 011a 01cc | | Execute Vector,Catenate 011b e002 | | Load 0x0,0x2 011c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 011d 0092 0252 | R| Action Push_String_Extended,0x252 ; " WITHHELD LOAD - " 011f 4830 |H0 | Short_Literal 0x30 0120 4806 |H | Short_Literal 0x6 0121 4801 |H | Short_Literal 0x1 0122 e40a | | Load 0x2,0xa 0123 e004 | | Load 0x0,0x4 0124 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0125 01cc | | Execute Vector,Catenate 0126 e002 | | Load 0x0,0x2 0127 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0128 4801 |H | Short_Literal 0x1 0129 e002 | | Load 0x0,0x2 012a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 012b 00cf | | Action Mark_Auxiliary 012c 480f |H | Short_Literal 0xf 012d 4800 |H | Short_Literal 0x0 012e 0007 | | Action Break_Optional 012f 0092 0253 | S| Action Push_String_Extended,0x253 ; "GP(" 0131 4830 |H0 | Short_Literal 0x30 0132 4801 |H | Short_Literal 0x1 0133 4800 |H | Short_Literal 0x0 0134 e40e | | Load 0x2,0xe 0135 e004 | | Load 0x0,0x4 0136 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0137 01cc | | Execute Vector,Catenate 0138 0092 0254 | T| Action Push_String_Extended,0x254 ; ") => " 013a 01cc | | Execute Vector,Catenate 013b 00d9 | | Load_Top At_Offset_1 013c 4be0 |K | Short_Literal 0x3e0 013d 0273 | s | Execute Discrete,Plus 013e e001 | | Load 0x0,0x1 013f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0140 00d9 | | Load_Top At_Offset_1 0141 00d0 | | Action Swap_Control 0142 0260 | ` | Execute Discrete,In_Type 0143 7001 |p | Jump_Nonzero 0x145 0144 0801 | | Execute_Immediate Raise,0x1 0145 e001 | | Load 0x0,0x1 0146 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0147 e001 | | Load 0x0,0x1 0148 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0149 01cc | | Execute Vector,Catenate 014a e002 | | Load 0x0,0x2 014b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 014c 00c8 | | Action Pop_Auxiliary_Range 014d 3fe1 |? | Loop_Increasing 0x12f 014e 00ce | | Action Pop_Auxiliary 014f 4801 |H | Short_Literal 0x1 0150 e002 | | Load 0x0,0x2 0151 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0152 0092 0255 | U| Action Push_String_Extended,0x255 ; "PFMAR => " 0154 49a0 |I | Short_Literal 0x1a0 0155 e001 | | Load 0x0,0x1 0156 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0157 e001 | | Load 0x0,0x1 0158 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0159 01cc | | Execute Vector,Catenate 015a e002 | | Load 0x0,0x2 015b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 015c 4801 |H | Short_Literal 0x1 015d e002 | | Load 0x0,0x2 015e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 015f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 016b | k | .CONST 0x016b ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 e005 | | Load 0x0,0x5 0164 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0165 0322 | " | Declare_Variable Record 0166 e5ff | | Load 0x2,-0x1 0167 e005 | | Load 0x0,0x5 0168 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0169 00d9 | | Load_Top At_Offset_1 016a 017d | } | Execute Record,Structure_Write 016b BODY_0160: 016b 4829 |H) | Short_Literal 0x29 016c 4820 |H | Short_Literal 0x20 016d 0092 0256 | V| Action Push_String_Extended,0x256 ; "Top => " 016f 4830 |H0 | Short_Literal 0x30 0170 4808 |H | Short_Literal 0x8 0171 4800 |H | Short_Literal 0x0 0172 e602 | | Load 0x3,0x2 0173 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0174 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0175 e004 | | Load 0x0,0x4 0176 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0177 01cc | | Execute Vector,Catenate 0178 01cb | | Execute Vector,Append 0179 4800 |H | Short_Literal 0x0 017a 00db | | Load_Top At_Offset_3 017b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 017c 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 017d e004 | | Load 0x0,0x4 017e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 017f 01cc | | Execute Vector,Catenate 0180 0092 0257 | W| Action Push_String_Extended,0x257 ; " (" 0182 01cc | | Execute Vector,Catenate 0183 4830 |H0 | Short_Literal 0x30 0184 4800 |H | Short_Literal 0x0 0185 4800 |H | Short_Literal 0x0 0186 e602 | | Load 0x3,0x2 0187 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0188 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 0189 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 018a 0906 | | Execute_Immediate Binary_Scale,0x6 018b e602 | | Load 0x3,0x2 018c 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 018d 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 018e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 018f 0273 | s | Execute Discrete,Plus 0190 00d8 | | Load_Top At_Offset_0 0191 00e2 | | Load_Encached Integer_Cache 0192 0260 | ` | Execute Discrete,In_Type 0193 7001 |p | Jump_Nonzero 0x195 0194 0801 | | Execute_Immediate Raise,0x1 0195 e004 | | Load 0x0,0x4 0196 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0197 01cc | | Execute Vector,Catenate 0198 01cb | | Execute Vector,Append 0199 e002 | | Load 0x0,0x2 019a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 019b 4820 |H | Short_Literal 0x20 019c 0092 0258 | X| Action Push_String_Extended,0x258 ; "Pred => " 019e 4830 |H0 | Short_Literal 0x30 019f 4808 |H | Short_Literal 0x8 01a0 4800 |H | Short_Literal 0x0 01a1 e602 | | Load 0x3,0x2 01a2 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01a3 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 01a4 e004 | | Load 0x0,0x4 01a5 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 01a6 01cc | | Execute Vector,Catenate 01a7 01cb | | Execute Vector,Append 01a8 4800 |H | Short_Literal 0x0 01a9 00da | | Load_Top At_Offset_2 01aa 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01ab 340b |4 | Execute Record,Field_Reference,Field_Number 0xb 01ac e004 | | Load 0x0,0x4 01ad 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 01ae 01cc | | Execute Vector,Catenate 01af e002 | | Load 0x0,0x2 01b0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01b1 0092 0259 | Y| Action Push_String_Extended,0x259 ; "Save => " 01b3 4800 |H | Short_Literal 0x0 01b4 00da | | Load_Top At_Offset_2 01b5 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01b6 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 01b7 e004 | | Load 0x0,0x4 01b8 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 01b9 01cc | | Execute Vector,Catenate 01ba e002 | | Load 0x0,0x2 01bb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01bc 4801 |H | Short_Literal 0x1 01bd e002 | | Load 0x0,0x2 01be 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01bf 0092 025a | Z| Action Push_String_Extended,0x25a ; "PC => " 01c1 4800 |H | Short_Literal 0x0 01c2 00da | | Load_Top At_Offset_2 01c3 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01c4 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 01c5 e004 | | Load 0x0,0x4 01c6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 01c7 01cc | | Execute Vector,Catenate 01c8 e002 | | Load 0x0,0x2 01c9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ca 0092 025b | [| Action Push_String_Extended,0x25b ; "DPC => " 01cc 4800 |H | Short_Literal 0x0 01cd 00da | | Load_Top At_Offset_2 01ce 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01cf 340e |4 | Execute Record,Field_Reference,Field_Number 0xe 01d0 e004 | | Load 0x0,0x4 01d1 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 01d2 01cc | | Execute Vector,Catenate 01d3 e002 | | Load 0x0,0x2 01d4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01d5 0092 025c | \| Action Push_String_Extended,0x25c ; "Lex levels valid =>" 01d7 e002 | | Load 0x0,0x2 01d8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01d9 00cf | | Action Mark_Auxiliary 01da 480f |H | Short_Literal 0xf 01db 4800 |H | Short_Literal 0x0 01dc 0007 | | Action Break_Optional 01dd 00d8 | | Load_Top At_Offset_0 01de e602 | | Load 0x3,0x2 01df 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01e0 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01e1 01d7 | | Execute Vector,Field_Read 01e2 6805 |h | Jump_Zero 0x1e8 01e3 00d8 | | Load_Top At_Offset_0 01e4 00e0 | | Load_Encached Standard_Cache 01e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01e6 e002 | | Load 0x0,0x2 01e7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01e8 00c8 | | Action Pop_Auxiliary_Range 01e9 3ff3 |? | Loop_Increasing 0x1dd 01ea 00ce | | Action Pop_Auxiliary 01eb 0092 025d | ]| Action Push_String_Extended,0x25d ; "." 01ed e002 | | Load 0x0,0x2 01ee 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ef 4801 |H | Short_Literal 0x1 01f0 e002 | | Load 0x0,0x2 01f1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01f2 0092 025e | ^| Action Push_String_Extended,0x25e ; "TLC => " 01f4 4830 |H0 | Short_Literal 0x30 01f5 4800 |H | Short_Literal 0x0 01f6 4800 |H | Short_Literal 0x0 01f7 e602 | | Load 0x3,0x2 01f8 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01f9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01fa e004 | | Load 0x0,0x4 01fb 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 01fc 01cc | | Execute Vector,Catenate 01fd e002 | | Load 0x0,0x2 01fe 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01ff 0092 025f | _| Action Push_String_Extended,0x25f ; "VLC => " 0201 4830 |H0 | Short_Literal 0x30 0202 4800 |H | Short_Literal 0x0 0203 4800 |H | Short_Literal 0x0 0204 e602 | | Load 0x3,0x2 0205 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0206 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0207 e004 | | Load 0x0,0x4 0208 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0209 01cc | | Execute Vector,Catenate 020a e002 | | Load 0x0,0x2 020b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 020c 4801 |H | Short_Literal 0x1 020d e002 | | Load 0x0,0x2 020e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 020f 0092 0260 | `| Action Push_String_Extended,0x260 ; "MAR => " 0211 00d9 | | Load_Top At_Offset_1 0212 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0213 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11 0214 e004 | | Load 0x0,0x4 0215 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0216 01cc | | Execute Vector,Catenate 0217 e002 | | Load 0x0,0x2 0218 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0219 0092 0261 | a| Action Push_String_Extended,0x261 ; "TAR => " 021b 4830 |H0 | Short_Literal 0x30 021c 4800 |H | Short_Literal 0x0 021d 4800 |H | Short_Literal 0x0 021e e602 | | Load 0x3,0x2 021f 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0220 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0221 e004 | | Load 0x0,0x4 0222 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0223 01cc | | Execute Vector,Catenate 0224 0092 0262 | b| Action Push_String_Extended,0x262 ; " VAR => " 0226 01cc | | Execute Vector,Catenate 0227 4830 |H0 | Short_Literal 0x30 0228 4800 |H | Short_Literal 0x0 0229 4800 |H | Short_Literal 0x0 022a e602 | | Load 0x3,0x2 022b 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 022c 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 022d e004 | | Load 0x0,0x4 022e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 022f 01cc | | Execute Vector,Catenate 0230 e002 | | Load 0x0,0x2 0231 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0232 0092 0263 | c| Action Push_String_Extended,0x263 ; "RDR => " 0234 00d9 | | Load_Top At_Offset_1 0235 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0236 3416 |4 | Execute Record,Field_Reference,Field_Number 0x16 0237 e004 | | Load 0x0,0x4 0238 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0239 01cc | | Execute Vector,Catenate 023a e002 | | Load 0x0,0x2 023b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 023c 0092 0264 | d| Action Push_String_Extended,0x264 ; "WDR => " 023e 00d9 | | Load_Top At_Offset_1 023f 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 0240 3417 |4 | Execute Record,Field_Reference,Field_Number 0x17 0241 e004 | | Load 0x0,0x4 0242 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0243 01cc | | Execute Vector,Catenate 0244 e002 | | Load 0x0,0x2 0245 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0246 4801 |H | Short_Literal 0x1 0247 e002 | | Load 0x0,0x2 0248 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0249 4501 |E | Exit_Suprogram New_Top_Offset 0x1 024a ; -------------------------------------------------------------------------------------- 024a ; STRING TABLE 024a ; -------------------------------------------------------------------------------------- 024a 0038 | 8 | .STRTAB 0x0038->0x0266 ; "PRI HEAD TAIL" 024b 004b | K | .STRTAB 0x004b->0x0270 ; " " 024c 004b | K | .STRTAB 0x004b->0x0271 ; " Delay Queue Head - " 024d 005d | ] | .STRTAB 0x005d->0x027b ; " Disk Wait Head - " 024e 006d | m | .STRTAB 0x006d->0x0284 ; " FAQ Head - " 024f 0077 | w | .STRTAB 0x0077->0x028a ; "CURRENT LOAD REG - " 0250 0088 | | .STRTAB 0x0088->0x0294 ; " RUN LOAD - " 0251 0098 | | .STRTAB 0x0098->0x029d ; " DISK WAIT LOAD - " 0252 00a8 | | .STRTAB 0x00a8->0x02a6 ; " WITHHELD LOAD - " 0253 00b8 | | .STRTAB 0x00b8->0x02af ; "GP(" 0254 00b9 | | .STRTAB 0x00b9->0x02b0 ; ") => " 0255 00bc | | .STRTAB 0x00bc->0x02b3 ; "PFMAR => " 0256 00c4 | | .STRTAB 0x00c4->0x02b8 ; "Top => " 0257 00ca | | .STRTAB 0x00ca->0x02bc ; " (" 0258 00ca | | .STRTAB 0x00ca->0x02bd ; "Pred => " 0259 00d0 | | .STRTAB 0x00d0->0x02c1 ; "Save => " 025a 00d6 | | .STRTAB 0x00d6->0x02c5 ; "PC => " 025b 00db | | .STRTAB 0x00db->0x02c8 ; "DPC => " 025c 00e0 | | .STRTAB 0x00e0->0x02cc ; "Lex levels valid =>" 025d 00f1 | | .STRTAB 0x00f1->0x02d5 ; "." 025e 00f0 | | .STRTAB 0x00f0->0x02d6 ; "TLC => " 025f 00f5 | | .STRTAB 0x00f5->0x02d9 ; "VLC => " 0260 00fa | | .STRTAB 0x00fa->0x02dd ; "MAR => " 0261 00ff | | .STRTAB 0x00ff->0x02e0 ; "TAR => " 0262 0104 | | .STRTAB 0x0104->0x02e4 ; " VAR => " 0263 010a | | .STRTAB 0x010a->0x02e8 ; "RDR => " 0264 010f | | .STRTAB 0x010f->0x02eb ; "WDR => " 0265 0114 | | .STREND 0x0114->0x02ef 0266 5052 4920 |PRI | .STRTAB_STRINGS 02ef 0000 | | .XXX[0x1] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; Debug Table 02f0 ; -------------------------------------------------------------------------------------- 02f0 0004 000e | | .DEBUG4 0x0004,0x000e,0x1ed9,0x0000,0x0001,0x0000 02f6 0000 0000 | | .XXX[0xe6] 02f8 00fb 0004 | | 02fa 0001 00db | | 02fc 00db e001 | | 02fe 1819 4503 | E | 0300 0103 0004 | | 0302 0001 00da | | 0304 8216 4502 | E | 0306 0000 0000 | | 0308 010b 0004 | | 030a 0001 00da | | 030c 4801 e21b |H | 030e 170e 4502 | E | 0310 0113 0004 | | 0312 0001 00da | | 0314 4801 e21b |H | 0316 170d 4502 | E | 0318 011d 0004 | | 031a 0002 e001 | | 031c 1b0e e001 | | 031e 1b0e 4801 | H | 0320 e214 170d | | 0322 0031 00d8 | 1 | 0324 00ca 0000 | | 0326 0000 0000 | | 0328 0130 0004 | 0 | 032a 0004 e001 | | 032c 1b0d 00f0 | | 032e e001 1b0e | | 0330 00f0 48e5 | H | 0332 e002 180d | | 0334 0032 e001 | 2 | 0336 1b0d e001 | | 0338 1b0e 00db | | 033a e5ff e001 | | 033c 1812 0032 | 2| 033e 005b 00da | [ | 0340 680f 00da |h | 0342 e001 1b0d | | 0344 025e 1c01 | ^ | 0346 4802 0092 |H | 0348 034a e004 | J | 034a 1810 0092 | | 034c 034b e004 | K | 034e 1811 4502 | E | 0350 00d9 00d9 | | 0352 4802 e214 |H | 0354 170e 4502 | E | 0356 0000 0000 | | 0358 015b 0004 | [ | 035a 0001 00db | | 035c 4602 4503 |F E | 035e 7801 7808 |x x | 0360 4801 0092 |H | 0362 034c e5ff | L | 0364 01cc e001 | | 0366 1819 4503 | E | 0368 4801 0092 |H | 036a 034d e001 | M | 036c 1819 4503 | E | 036e 0000 0000 | | 0370 0173 0004 | s | 0372 0001 00da | | 0374 e001 1810 | | 0376 021f 6805 | h | 0378 4801 0092 |H | 037a 034d e001 | M | 037c 1819 4502 | E | 037e 0000 0000 | | 0380 018b 01d9 | | 0382 0003 e00c | | 0384 1b0d 02c7 | | 0386 00d8 1c00 | | 0388 e00c 1b11 | | 038a 0322 e00c | " | 038c 1b18 180d | | 038e c402 00d9 | | 0390 e00c 1b18 | | 0392 1810 00d9 | | 0394 017d 0007 | } | 0396 00d8 3c00 | < | 0398 00e4 025b | [| 039a 00da e00c | | 039c 1b18 1817 | | 039e 00d8 2503 | % | 03a0 0007 00e3 | | 03a2 03e9 e00d | | 03a4 1b0d 0337 | 7| 03a6 e00d 180e | | 03a8 00d9 01d4 | | 03aa e403 3c01 | < | 03ac 0052 7803 | Rx | 03ae 00d9 0a01 | | 03b0 005a 00d9 | Z | 03b2 e405 01db | | 03b4 027a 6806 | zh | 03b6 00d9 e405 | | 03b8 01d7 00d9 | | 03ba 01d7 6ff2 | o | 03bc 00d9 0aff | | 03be 005a e403 | Z | 03c0 3c01 0053 |< S| 03c2 7803 00da |x | 03c4 0aff 005b | [| 03c6 00da e405 | | 03c8 01dd 027b | {| 03ca 6806 00da |h | 03cc e405 01d7 | | 03ce 00d9 01d7 | | 03d0 6ff2 00da |o | 03d2 0a01 005b | [| 03d4 00da 00da | | 03d6 e405 01cf | | 03d8 00ca 0007 | | 03da 00ea 00ca | | 03dc 0000 0000 | | .BLANK 0000[0x4] 03e0 01ea 0237 | 7| .XXX[0x20] 03e2 0003 e001 | | 03e4 1b0d e006 | | 03e6 1811 e5ff | | 03e8 e00e 1811 | | 03ea 00d8 01db | | 03ec 0c01 6838 | h8| 03ee 00d8 01dd | | 03f0 00d9 01d7 | | 03f2 0b3c 7023 | <p#| 03f4 0b5b 7021 | [p!| 03f6 e001 1b0d | | 03f8 e006 1811 | | 03fa e5ff e00e | | 03fc 1811 8215 | | 03fe e001 1818 | |