|
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_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 | |