|
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_03bcfe
└─⟦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 03b0 | | .CONST 0x03b0 ; 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 8002 | | .CONST 0x8002 ; 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 002c | , | .CONST 0x002c ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 000f | | .CONST 0x000f ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c 0322 | " | Declare_Variable Record
001d 00e5 | | Load_Encached Long_Integer_Cache
001e 03e9 | | Declare_Variable Discrete,Duplicate
001f 03e9 | | Declare_Variable Discrete,Duplicate
0020 03e9 | | Declare_Variable Discrete,Duplicate
0021 03e9 | | Declare_Variable Discrete,Duplicate
0022 00e5 | | Load_Encached Long_Integer_Cache
0023 03e9 | | Declare_Variable Discrete,Duplicate
0024 03e9 | | Declare_Variable Discrete,Duplicate
0025 00e2 | | Load_Encached Integer_Cache
0026 e003 | | Load 0x0,0x3
0027 03e9 | | Declare_Variable Discrete,Duplicate
0028 029f 029b | | Declare_Subprogram INIT_0298,For_Call
002a 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call
002c BODY_0018:
002c 4800 |H | Short_Literal 0x0
002d e5fd | | Load 0x2,-0x3
002e 4829 |H) | Short_Literal 0x29
002f 4820 |H | Short_Literal 0x20
0030 0092 02d4 | | Action Push_String_Extended,0x2d4 ; "Top => "
0032 4830 |H0 | Short_Literal 0x30
0033 4808 |H | Short_Literal 0x8
0034 4800 |H | Short_Literal 0x0
0035 e5ff | | Load 0x2,-0x1
0036 0227 | ' | Execute Access,All_Reference
0037 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0038 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0039 8004 | | Call 0x0,0x4
003a 01cc | | Execute Vector,Catenate
003b 01cb | | Execute Vector,Append
003c 4800 |H | Short_Literal 0x0
003d e5ff | | Load 0x2,-0x1
003e 0227 | ' | Execute Access,All_Reference
003f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0040 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0041 8005 | | Call 0x0,0x5
0042 01cc | | Execute Vector,Catenate
0043 0092 02d5 | | Action Push_String_Extended,0x2d5 ; " ("
0045 01cc | | Execute Vector,Catenate
0046 4830 |H0 | Short_Literal 0x30
0047 4800 |H | Short_Literal 0x0
0048 4800 |H | Short_Literal 0x0
0049 e5ff | | Load 0x2,-0x1
004a 0227 | ' | Execute Access,All_Reference
004b 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
004c 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
004d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
004e 0906 | | Execute_Immediate Binary_Scale,0x6
004f e5ff | | Load 0x2,-0x1
0050 0227 | ' | Execute Access,All_Reference
0051 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0052 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0053 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0054 0273 | s | Execute Discrete,Plus
0055 00d8 | | Load_Top At_Offset_0
0056 00e2 | | Load_Encached Integer_Cache
0057 0260 | ` | Execute Discrete,In_Type
0058 7001 |p | Jump_Nonzero 0x5a
0059 0801 | | Execute_Immediate Raise,0x1
005a 8006 | | Call 0x0,0x6
005b 01cc | | Execute Vector,Catenate
005c 01cb | | Execute Vector,Append
005d e5fe | | Load 0x2,-0x2
005e 8007 | | Call 0x0,0x7
005f 4800 |H | Short_Literal 0x0
0060 e5fd | | Load 0x2,-0x3
0061 4820 |H | Short_Literal 0x20
0062 0092 02d6 | | Action Push_String_Extended,0x2d6 ; "Pred => "
0064 4830 |H0 | Short_Literal 0x30
0065 4808 |H | Short_Literal 0x8
0066 4800 |H | Short_Literal 0x0
0067 e5ff | | Load 0x2,-0x1
0068 0227 | ' | Execute Access,All_Reference
0069 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
006a 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
006b 8004 | | Call 0x0,0x4
006c 01cc | | Execute Vector,Catenate
006d 01cb | | Execute Vector,Append
006e 4800 |H | Short_Literal 0x0
006f e5ff | | Load 0x2,-0x1
0070 0227 | ' | Execute Access,All_Reference
0071 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0072 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0073 8005 | | Call 0x0,0x5
0074 01cc | | Execute Vector,Catenate
0075 e5fe | | Load 0x2,-0x2
0076 8007 | | Call 0x0,0x7
0077 4800 |H | Short_Literal 0x0
0078 e5fd | | Load 0x2,-0x3
0079 0092 02d7 | | Action Push_String_Extended,0x2d7 ; "Save => "
007b 4800 |H | Short_Literal 0x0
007c e5ff | | Load 0x2,-0x1
007d 0227 | ' | Execute Access,All_Reference
007e 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
007f 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0080 8005 | | Call 0x0,0x5
0081 01cc | | Execute Vector,Catenate
0082 e5fe | | Load 0x2,-0x2
0083 8007 | | Call 0x0,0x7
0084 4800 |H | Short_Literal 0x0
0085 e5fd | | Load 0x2,-0x3
0086 e5fe | | Load 0x2,-0x2
0087 8008 | | Call 0x0,0x8
0088 4800 |H | Short_Literal 0x0
0089 e5fd | | Load 0x2,-0x3
008a 0092 02d8 | | Action Push_String_Extended,0x2d8 ; "PC => "
008c 4800 |H | Short_Literal 0x0
008d e5ff | | Load 0x2,-0x1
008e 0227 | ' | Execute Access,All_Reference
008f 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0090 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0091 8009 | | Call 0x0,0x9
0092 01cc | | Execute Vector,Catenate
0093 e5fe | | Load 0x2,-0x2
0094 8007 | | Call 0x0,0x7
0095 4800 |H | Short_Literal 0x0
0096 e5fd | | Load 0x2,-0x3
0097 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "DPC => "
0099 4800 |H | Short_Literal 0x0
009a e5ff | | Load 0x2,-0x1
009b 0227 | ' | Execute Access,All_Reference
009c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
009d 340e |4 | Execute Record,Field_Reference,Field_Number 0xe
009e 8009 | | Call 0x0,0x9
009f 01cc | | Execute Vector,Catenate
00a0 e5fe | | Load 0x2,-0x2
00a1 8007 | | Call 0x0,0x7
00a2 4800 |H | Short_Literal 0x0
00a3 e5fd | | Load 0x2,-0x3
00a4 0092 02da | | Action Push_String_Extended,0x2da ; "Lex levels valid =>"
00a6 840e | | Call 0x2,0xe
00a7 01cc | | Execute Vector,Catenate
00a8 0092 02db | | Action Push_String_Extended,0x2db ; "."
00aa 01cc | | Execute Vector,Catenate
00ab e5fe | | Load 0x2,-0x2
00ac 8007 | | Call 0x0,0x7
00ad 4800 |H | Short_Literal 0x0
00ae e5fd | | Load 0x2,-0x3
00af e5fe | | Load 0x2,-0x2
00b0 8008 | | Call 0x0,0x8
00b1 4800 |H | Short_Literal 0x0
00b2 e5fd | | Load 0x2,-0x3
00b3 0092 02dc | | Action Push_String_Extended,0x2dc ; "TLC => "
00b5 4830 |H0 | Short_Literal 0x30
00b6 4800 |H | Short_Literal 0x0
00b7 4800 |H | Short_Literal 0x0
00b8 e5ff | | Load 0x2,-0x1
00b9 0227 | ' | Execute Access,All_Reference
00ba 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
00bb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00bc 8006 | | Call 0x0,0x6
00bd 01cc | | Execute Vector,Catenate
00be e5fe | | Load 0x2,-0x2
00bf 8007 | | Call 0x0,0x7
00c0 4800 |H | Short_Literal 0x0
00c1 e5fd | | Load 0x2,-0x3
00c2 0092 02dd | | Action Push_String_Extended,0x2dd ; "VLC => "
00c4 4830 |H0 | Short_Literal 0x30
00c5 4800 |H | Short_Literal 0x0
00c6 4800 |H | Short_Literal 0x0
00c7 e5ff | | Load 0x2,-0x1
00c8 0227 | ' | Execute Access,All_Reference
00c9 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
00ca 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
00cb 8006 | | Call 0x0,0x6
00cc 01cc | | Execute Vector,Catenate
00cd e5fe | | Load 0x2,-0x2
00ce 8007 | | Call 0x0,0x7
00cf 4800 |H | Short_Literal 0x0
00d0 e5fd | | Load 0x2,-0x3
00d1 e5fe | | Load 0x2,-0x2
00d2 8008 | | Call 0x0,0x8
00d3 4800 |H | Short_Literal 0x0
00d4 e5fd | | Load 0x2,-0x3
00d5 0092 02de | | Action Push_String_Extended,0x2de ; "MAR => "
00d7 e5ff | | Load 0x2,-0x1
00d8 0227 | ' | Execute Access,All_Reference
00d9 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
00da 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11
00db 800a | | Call 0x0,0xa
00dc 01cc | | Execute Vector,Catenate
00dd e5fe | | Load 0x2,-0x2
00de 8007 | | Call 0x0,0x7
00df 4800 |H | Short_Literal 0x0
00e0 e5fd | | Load 0x2,-0x3
00e1 0092 02df | | Action Push_String_Extended,0x2df ; "TAR => "
00e3 4830 |H0 | Short_Literal 0x30
00e4 4800 |H | Short_Literal 0x0
00e5 4800 |H | Short_Literal 0x0
00e6 e5ff | | Load 0x2,-0x1
00e7 0227 | ' | Execute Access,All_Reference
00e8 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
00e9 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
00ea 8004 | | Call 0x0,0x4
00eb 01cc | | Execute Vector,Catenate
00ec 0092 02e0 | | Action Push_String_Extended,0x2e0 ; " VAR => "
00ee 01cc | | Execute Vector,Catenate
00ef 4830 |H0 | Short_Literal 0x30
00f0 4800 |H | Short_Literal 0x0
00f1 4800 |H | Short_Literal 0x0
00f2 e5ff | | Load 0x2,-0x1
00f3 0227 | ' | Execute Access,All_Reference
00f4 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
00f5 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
00f6 8004 | | Call 0x0,0x4
00f7 01cc | | Execute Vector,Catenate
00f8 e5fe | | Load 0x2,-0x2
00f9 8007 | | Call 0x0,0x7
00fa 4800 |H | Short_Literal 0x0
00fb e5fd | | Load 0x2,-0x3
00fc 0092 02e1 | | Action Push_String_Extended,0x2e1 ; "RDR => "
00fe e5ff | | Load 0x2,-0x1
00ff 0227 | ' | Execute Access,All_Reference
0100 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0101 3416 |4 | Execute Record,Field_Reference,Field_Number 0x16
0102 800a | | Call 0x0,0xa
0103 01cc | | Execute Vector,Catenate
0104 e5fe | | Load 0x2,-0x2
0105 8007 | | Call 0x0,0x7
0106 4800 |H | Short_Literal 0x0
0107 e5fd | | Load 0x2,-0x3
0108 0092 02e2 | | Action Push_String_Extended,0x2e2 ; "WDR => "
010a e5ff | | Load 0x2,-0x1
010b 0227 | ' | Execute Access,All_Reference
010c 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
010d 3417 |4 | Execute Record,Field_Reference,Field_Number 0x17
010e 800a | | Call 0x0,0xa
010f 01cc | | Execute Vector,Catenate
0110 e5fe | | Load 0x2,-0x2
0111 8007 | | Call 0x0,0x7
0112 4800 |H | Short_Literal 0x0
0113 e5fd | | Load 0x2,-0x3
0114 e5fe | | Load 0x2,-0x2
0115 8008 | | Call 0x0,0x8
0116 e5fc | | Load 0x2,-0x4
0117 68fe |h | Jump_Zero 0x216
0118 4800 |H | Short_Literal 0x0
0119 e5fd | | Load 0x2,-0x3
011a 0092 02e3 | | Action Push_String_Extended,0x2e3 ; "PRI HEAD TAIL"
011c e5fe | | Load 0x2,-0x2
011d 8007 | | Call 0x0,0x7
011e 00cf | | Action Mark_Auxiliary
011f 480f |H | Short_Literal 0xf
0120 4800 |H | Short_Literal 0x0
0121 0007 | | Action Break_Optional
0122 00d8 | | Load_Top At_Offset_0
0123 0a60 | ` | Execute_Immediate Plus,0x60
0124 00d8 | | Load_Top At_Offset_0
0125 e00b | | Load 0x0,0xb
0126 0260 | ` | Execute Discrete,In_Type
0127 7001 |p | Jump_Nonzero 0x129
0128 0801 | | Execute_Immediate Raise,0x1
0129 e5ff | | Load 0x2,-0x1
012a 800c | | Call 0x0,0xc
012b e402 | | Load 0x2,0x2
012c 017d | } | Execute Record,Structure_Write
012d 00e5 | | Load_Encached Long_Integer_Cache
012e 00e5 | | Load_Encached Long_Integer_Cache
012f e402 | | Load 0x2,0x2
0130 800d | | Call 0x0,0xd
0131 c403 | | Store 0x2,0x3
0132 c404 | | Store 0x2,0x4
0133 00e5 | | Load_Encached Long_Integer_Cache
0134 4820 |H | Short_Literal 0x20
0135 4800 |H | Short_Literal 0x0
0136 e403 | | Load 0x2,0x3
0137 800e | | Call 0x0,0xe
0138 c406 | | Store 0x2,0x6
0139 00e5 | | Load_Encached Long_Integer_Cache
013a 4820 |H | Short_Literal 0x20
013b 4800 |H | Short_Literal 0x0
013c e404 | | Load 0x2,0x4
013d 800e | | Call 0x0,0xe
013e c407 | | Store 0x2,0x7
013f 4800 |H | Short_Literal 0x0
0140 e5fd | | Load 0x2,-0x3
0141 4820 |H | Short_Literal 0x20
0142 4803 |H | Short_Literal 0x3
0143 4801 |H | Short_Literal 0x1
0144 e412 | | Load 0x2,0x12
0145 8006 | | Call 0x0,0x6
0146 0092 02e4 | | Action Push_String_Extended,0x2e4 ; " "
0148 01cc | | Execute Vector,Catenate
0149 4830 |H0 | Short_Literal 0x30
014a 4808 |H | Short_Literal 0x8
014b 4800 |H | Short_Literal 0x0
014c e406 | | Load 0x2,0x6
014d 8004 | | Call 0x0,0x4
014e 01cc | | Execute Vector,Catenate
014f 0092 02e4 | | Action Push_String_Extended,0x2e4 ; " "
0151 01cc | | Execute Vector,Catenate
0152 4830 |H0 | Short_Literal 0x30
0153 4808 |H | Short_Literal 0x8
0154 4800 |H | Short_Literal 0x0
0155 e407 | | Load 0x2,0x7
0156 8004 | | Call 0x0,0x4
0157 01cc | | Execute Vector,Catenate
0158 e5fe | | Load 0x2,-0x2
0159 8007 | | Call 0x0,0x7
015a 00c8 | | Action Pop_Auxiliary_Range
015b 3fc6 |? | Loop_Increasing 0x122
015c 00ce | | Action Pop_Auxiliary
015d 4800 |H | Short_Literal 0x0
015e e5fd | | Load 0x2,-0x3
015f e5fe | | Load 0x2,-0x2
0160 8008 | | Call 0x0,0x8
0161 4ae0 |J | Short_Literal 0x2e0
0162 e5ff | | Load 0x2,-0x1
0163 800c | | Call 0x0,0xc
0164 e402 | | Load 0x2,0x2
0165 017d | } | Execute Record,Structure_Write
0166 00e5 | | Load_Encached Long_Integer_Cache
0167 00e5 | | Load_Encached Long_Integer_Cache
0168 e402 | | Load 0x2,0x2
0169 800d | | Call 0x0,0xd
016a c403 | | Store 0x2,0x3
016b c404 | | Store 0x2,0x4
016c 00e5 | | Load_Encached Long_Integer_Cache
016d 4820 |H | Short_Literal 0x20
016e 4800 |H | Short_Literal 0x0
016f e403 | | Load 0x2,0x3
0170 800e | | Call 0x0,0xe
0171 c405 | | Store 0x2,0x5
0172 4800 |H | Short_Literal 0x0
0173 e5fd | | Load 0x2,-0x3
0174 0092 02e5 | | Action Push_String_Extended,0x2e5 ; " Delay Queue Head - "
0176 4830 |H0 | Short_Literal 0x30
0177 4808 |H | Short_Literal 0x8
0178 4800 |H | Short_Literal 0x0
0179 e405 | | Load 0x2,0x5
017a 8004 | | Call 0x0,0x4
017b 01cc | | Execute Vector,Catenate
017c e5fe | | Load 0x2,-0x2
017d 8007 | | Call 0x0,0x7
017e 4800 |H | Short_Literal 0x0
017f e5fd | | Load 0x2,-0x3
0180 e5fe | | Load 0x2,-0x2
0181 8008 | | Call 0x0,0x8
0182 4871 |Hq | Short_Literal 0x71
0183 e5ff | | Load 0x2,-0x1
0184 800c | | Call 0x0,0xc
0185 e402 | | Load 0x2,0x2
0186 017d | } | Execute Record,Structure_Write
0187 00e5 | | Load_Encached Long_Integer_Cache
0188 00e5 | | Load_Encached Long_Integer_Cache
0189 e402 | | Load 0x2,0x2
018a 800d | | Call 0x0,0xd
018b c403 | | Store 0x2,0x3
018c c404 | | Store 0x2,0x4
018d 00e5 | | Load_Encached Long_Integer_Cache
018e 4820 |H | Short_Literal 0x20
018f 4800 |H | Short_Literal 0x0
0190 e403 | | Load 0x2,0x3
0191 800e | | Call 0x0,0xe
0192 c405 | | Store 0x2,0x5
0193 4800 |H | Short_Literal 0x0
0194 e5fd | | Load 0x2,-0x3
0195 0092 02e6 | | Action Push_String_Extended,0x2e6 ; " Disk Wait Head - "
0197 4830 |H0 | Short_Literal 0x30
0198 4808 |H | Short_Literal 0x8
0199 4800 |H | Short_Literal 0x0
019a e405 | | Load 0x2,0x5
019b 8004 | | Call 0x0,0x4
019c 01cc | | Execute Vector,Catenate
019d e5fe | | Load 0x2,-0x2
019e 8007 | | Call 0x0,0x7
019f 4800 |H | Short_Literal 0x0
01a0 e5fd | | Load 0x2,-0x3
01a1 e5fe | | Load 0x2,-0x2
01a2 8008 | | Call 0x0,0x8
01a3 4870 |Hp | Short_Literal 0x70
01a4 e5ff | | Load 0x2,-0x1
01a5 800c | | Call 0x0,0xc
01a6 e402 | | Load 0x2,0x2
01a7 017d | } | Execute Record,Structure_Write
01a8 00e5 | | Load_Encached Long_Integer_Cache
01a9 00e5 | | Load_Encached Long_Integer_Cache
01aa e402 | | Load 0x2,0x2
01ab 800d | | Call 0x0,0xd
01ac c403 | | Store 0x2,0x3
01ad c404 | | Store 0x2,0x4
01ae 00e5 | | Load_Encached Long_Integer_Cache
01af 4820 |H | Short_Literal 0x20
01b0 4800 |H | Short_Literal 0x0
01b1 e403 | | Load 0x2,0x3
01b2 800e | | Call 0x0,0xe
01b3 c405 | | Store 0x2,0x5
01b4 4800 |H | Short_Literal 0x0
01b5 e5fd | | Load 0x2,-0x3
01b6 0092 02e7 | | Action Push_String_Extended,0x2e7 ; " FAQ Head - "
01b8 4830 |H0 | Short_Literal 0x30
01b9 4808 |H | Short_Literal 0x8
01ba 4800 |H | Short_Literal 0x0
01bb e405 | | Load 0x2,0x5
01bc 8004 | | Call 0x0,0x4
01bd 01cc | | Execute Vector,Catenate
01be e5fe | | Load 0x2,-0x2
01bf 8007 | | Call 0x0,0x7
01c0 4800 |H | Short_Literal 0x0
01c1 e5fd | | Load 0x2,-0x3
01c2 e5fe | | Load 0x2,-0x2
01c3 8008 | | Call 0x0,0x8
01c4 488a |H | Short_Literal 0x8a
01c5 e5ff | | Load 0x2,-0x1
01c6 800c | | Call 0x0,0xc
01c7 e402 | | Load 0x2,0x2
01c8 017d | } | Execute Record,Structure_Write
01c9 00e5 | | Load_Encached Long_Integer_Cache
01ca 00e5 | | Load_Encached Long_Integer_Cache
01cb e402 | | Load 0x2,0x2
01cc 800d | | Call 0x0,0xd
01cd c403 | | Store 0x2,0x3
01ce c404 | | Store 0x2,0x4
01cf 00e5 | | Load_Encached Long_Integer_Cache
01d0 4815 |H | Short_Literal 0x15
01d1 4801 |H | Short_Literal 0x1
01d2 e404 | | Load 0x2,0x4
01d3 800e | | Call 0x0,0xe
01d4 c40a | | Store 0x2,0xa
01d5 00e5 | | Load_Encached Long_Integer_Cache
01d6 4815 |H | Short_Literal 0x15
01d7 4816 |H | Short_Literal 0x16
01d8 e404 | | Load 0x2,0x4
01d9 800e | | Call 0x0,0xe
01da c409 | | Store 0x2,0x9
01db 00e5 | | Load_Encached Long_Integer_Cache
01dc 4815 |H | Short_Literal 0x15
01dd 482b |H+ | Short_Literal 0x2b
01de e404 | | Load 0x2,0x4
01df 800e | | Call 0x0,0xe
01e0 c408 | | Store 0x2,0x8
01e1 4800 |H | Short_Literal 0x0
01e2 e5fd | | Load 0x2,-0x3
01e3 0092 02e8 | | Action Push_String_Extended,0x2e8 ; "CURRENT LOAD REG - "
01e5 4830 |H0 | Short_Literal 0x30
01e6 4810 |H | Short_Literal 0x10
01e7 4800 |H | Short_Literal 0x0
01e8 e404 | | Load 0x2,0x4
01e9 8004 | | Call 0x0,0x4
01ea 01cc | | Execute Vector,Catenate
01eb e5fe | | Load 0x2,-0x2
01ec 8007 | | Call 0x0,0x7
01ed 4800 |H | Short_Literal 0x0
01ee e5fd | | Load 0x2,-0x3
01ef 0092 02e9 | | Action Push_String_Extended,0x2e9 ; " RUN LOAD - "
01f1 4830 |H0 | Short_Literal 0x30
01f2 4806 |H | Short_Literal 0x6
01f3 4801 |H | Short_Literal 0x1
01f4 e408 | | Load 0x2,0x8
01f5 8004 | | Call 0x0,0x4
01f6 01cc | | Execute Vector,Catenate
01f7 e5fe | | Load 0x2,-0x2
01f8 8007 | | Call 0x0,0x7
01f9 4800 |H | Short_Literal 0x0
01fa e5fd | | Load 0x2,-0x3
01fb 0092 02ea | | Action Push_String_Extended,0x2ea ; " DISK WAIT LOAD - "
01fd 4830 |H0 | Short_Literal 0x30
01fe 4806 |H | Short_Literal 0x6
01ff 4801 |H | Short_Literal 0x1
0200 e409 | | Load 0x2,0x9
0201 8004 | | Call 0x0,0x4
0202 01cc | | Execute Vector,Catenate
0203 e5fe | | Load 0x2,-0x2
0204 8007 | | Call 0x0,0x7
0205 4800 |H | Short_Literal 0x0
0206 e5fd | | Load 0x2,-0x3
0207 0092 02eb | | Action Push_String_Extended,0x2eb ; " WITHHELD LOAD - "
0209 4830 |H0 | Short_Literal 0x30
020a 4806 |H | Short_Literal 0x6
020b 4801 |H | Short_Literal 0x1
020c e40a | | Load 0x2,0xa
020d 8004 | | Call 0x0,0x4
020e 01cc | | Execute Vector,Catenate
020f e5fe | | Load 0x2,-0x2
0210 8007 | | Call 0x0,0x7
0211 4800 |H | Short_Literal 0x0
0212 e5fd | | Load 0x2,-0x3
0213 e5fe | | Load 0x2,-0x2
0214 8008 | | Call 0x0,0x8
0215 780a |x | Jump 0x220
0216 4800 |H | Short_Literal 0x0
0217 e5fd | | Load 0x2,-0x3
0218 0092 02ec | | Action Push_String_Extended,0x2ec ; " ** Register File state not dumped to tombstone **"
021a e5fe | | Load 0x2,-0x2
021b 8007 | | Call 0x0,0x7
021c 4800 |H | Short_Literal 0x0
021d e5fd | | Load 0x2,-0x3
021e e5fe | | Load 0x2,-0x2
021f 8008 | | Call 0x0,0x8
0220 00cf | | Action Mark_Auxiliary
0221 480f |H | Short_Literal 0xf
0222 4800 |H | Short_Literal 0x0
0223 0007 | | Action Break_Optional
0224 4800 |H | Short_Literal 0x0
0225 e5fd | | Load 0x2,-0x3
0226 0092 02ed | | Action Push_String_Extended,0x2ed ; "GP("
0228 4830 |H0 | Short_Literal 0x30
0229 4801 |H | Short_Literal 0x1
022a 4800 |H | Short_Literal 0x0
022b e412 | | Load 0x2,0x12
022c 8006 | | Call 0x0,0x6
022d 01cc | | Execute Vector,Catenate
022e 0092 02ee | | Action Push_String_Extended,0x2ee ; ") => "
0230 01cc | | Execute Vector,Catenate
0231 00db | | Load_Top At_Offset_3
0232 e5ff | | Load 0x2,-0x1
0233 0227 | ' | Execute Access,All_Reference
0234 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0235 3418 |4 | Execute Record,Field_Reference,Field_Number 0x18
0236 01d5 | | Execute Vector,Field_Reference
0237 800a | | Call 0x0,0xa
0238 01cc | | Execute Vector,Catenate
0239 e5fe | | Load 0x2,-0x2
023a 8007 | | Call 0x0,0x7
023b 00c8 | | Action Pop_Auxiliary_Range
023c 3fe7 |? | Loop_Increasing 0x224
023d 00ce | | Action Pop_Auxiliary
023e 4800 |H | Short_Literal 0x0
023f e5fd | | Load 0x2,-0x3
0240 e5fe | | Load 0x2,-0x2
0241 8008 | | Call 0x0,0x8
0242 e5ff | | Load 0x2,-0x1
0243 0227 | ' | Execute Access,All_Reference
0244 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0245 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0246 a40c | | Store_Unchecked 0x2,0xc
0247 e5ff | | Load 0x2,-0x1
0248 0227 | ' | Execute Access,All_Reference
0249 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
024a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
024b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
024c 00db | | Load_Top At_Offset_3
024d 00db | | Load_Top At_Offset_3
024e 027e | ~ | Execute Discrete,Not_Equal
024f 6806 |h | Jump_Zero 0x256
0250 4800 |H | Short_Literal 0x0
0251 e5fd | | Load 0x2,-0x3
0252 0092 02ef | | Action Push_String_Extended,0x2ef ; "TTOP AND VTOP INCONSISTENT"
0254 e5fe | | Load 0x2,-0x2
0255 8007 | | Call 0x0,0x7
0256 00db | | Load_Top At_Offset_3
0257 4c10 |L | Short_Literal -0x3f0
0258 0273 | s | Execute Discrete,Plus
0259 c40b | | Store 0x2,0xb
025a 00cf | | Action Mark_Auxiliary
025b 480f |H | Short_Literal 0xf
025c 4800 |H | Short_Literal 0x0
025d 0007 | | Action Break_Optional
025e 4800 |H | Short_Literal 0x0
025f e5fd | | Load 0x2,-0x3
0260 00da | | Load_Top At_Offset_2
0261 840f | | Call 0x2,0xf
0262 e40b | | Load 0x2,0xb
0263 e5ff | | Load 0x2,-0x1
0264 0227 | ' | Execute Access,All_Reference
0265 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
0266 3419 |4 | Execute Record,Field_Reference,Field_Number 0x19
0267 01d5 | | Execute Vector,Field_Reference
0268 800a | | Call 0x0,0xa
0269 01cc | | Execute Vector,Catenate
026a e5fe | | Load 0x2,-0x2
026b 8007 | | Call 0x0,0x7
026c e40b | | Load 0x2,0xb
026d 7003 |p | Jump_Nonzero 0x271
026e 480f |H | Short_Literal 0xf
026f a40b | | Store_Unchecked 0x2,0xb
0270 7803 |x | Jump 0x274
0271 e40b | | Load 0x2,0xb
0272 0aff | | Execute_Immediate Plus,-0x1
0273 c40b | | Store 0x2,0xb
0274 00c8 | | Action Pop_Auxiliary_Range
0275 3fe8 |? | Loop_Increasing 0x25e
0276 00ce | | Action Pop_Auxiliary
0277 4800 |H | Short_Literal 0x0
0278 e5fd | | Load 0x2,-0x3
0279 e5fe | | Load 0x2,-0x2
027a 8008 | | Call 0x0,0x8
027b 4800 |H | Short_Literal 0x0
027c e5fd | | Load 0x2,-0x3
027d e5fe | | Load 0x2,-0x2
027e 8008 | | Call 0x0,0x8
027f e5fc | | Load 0x2,-0x4
0280 680f |h | Jump_Zero 0x290
0281 4800 |H | Short_Literal 0x0
0282 e5fd | | Load 0x2,-0x3
0283 0092 02f0 | | Action Push_String_Extended,0x2f0 ; "PFMAR => "
0285 49a0 |I | Short_Literal 0x1a0
0286 e5ff | | Load 0x2,-0x1
0287 800c | | Call 0x0,0xc
0288 800f | | Call 0x0,0xf
0289 01cc | | Execute Vector,Catenate
028a e5fe | | Load 0x2,-0x2
028b 8007 | | Call 0x0,0x7
028c 4800 |H | Short_Literal 0x0
028d e5fd | | Load 0x2,-0x3
028e e5fe | | Load 0x2,-0x2
028f 8008 | | Call 0x0,0x8
0290 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0291 0000 0000 | | .BLANK 0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a1 | | .CONST 0x02a1 ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b 4880 |H | Short_Literal 0x80
029c e010 | | Load 0x0,0x10
029d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
029e 1c08 | | Execute_Immediate Run_Utility,0x8
029f 00d8 | | Load_Top At_Offset_0
02a0 1c00 | | Execute_Immediate Run_Utility,0x0
02a1 BODY_0298:
02a1 00d8 | | Load_Top At_Offset_0
02a2 00ea | | Load_Encached Null_String_Cache
02a3 e010 | | Load 0x0,0x10
02a4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a5 00d1 | | Pop_Control Pop_Count_1
02a6 00cf | | Action Mark_Auxiliary
02a7 480f |H | Short_Literal 0xf
02a8 4800 |H | Short_Literal 0x0
02a9 0007 | | Action Break_Optional
02aa 00d8 | | Load_Top At_Offset_0
02ab e5ff | | Load 0x2,-0x1
02ac 0227 | ' | Execute Access,All_Reference
02ad 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9
02ae 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
02af 01d7 | | Execute Vector,Field_Read
02b0 6807 |h | Jump_Zero 0x2b8
02b1 00db | | Load_Top At_Offset_3
02b2 00d9 | | Load_Top At_Offset_1
02b3 00e0 | | Load_Encached Standard_Cache
02b4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02b5 e010 | | Load 0x0,0x10
02b6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02b7 00d1 | | Pop_Control Pop_Count_1
02b8 00c8 | | Action Pop_Auxiliary_Range
02b9 3ff0 |? | Loop_Increasing 0x2aa
02ba 00ce | | Action Pop_Auxiliary
02bb 00d8 | | Load_Top At_Offset_0
02bc e010 | | Load 0x0,0x10
02bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02be 00ca | | Action Exit_Nullary_Function
02bf 0000 | | .XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 00da | | Load_Top At_Offset_2
02c4 7003 |p | Jump_Nonzero 0x2c8
02c5 0092 02f1 | | Action Push_String_Extended,0x2f1 ; "TOP => "
02c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c8 0092 02f2 | | Action Push_String_Extended,0x2f2 ; "TOP-"
02ca 4830 |H0 | Short_Literal 0x30
02cb 4801 |H | Short_Literal 0x1
02cc 4800 |H | Short_Literal 0x0
02cd e7ff | | Load 0x3,-0x1
02ce 8006 | | Call 0x0,0x6
02cf 01cc | | Execute Vector,Catenate
02d0 0092 02f3 | | Action Push_String_Extended,0x2f3 ; " => "
02d2 01cc | | Execute Vector,Catenate
02d3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d4 ; --------------------------------------------------------------------------------------
02d4 ; STRING TABLE
02d4 ; --------------------------------------------------------------------------------------
02d4 0042 | B | .STRTAB 0x0042->0x02f5 ; "Top => "
02d5 0048 | H | .STRTAB 0x0048->0x02f9 ; " ("
02d6 0048 | H | .STRTAB 0x0048->0x02fa ; "Pred => "
02d7 004e | N | .STRTAB 0x004e->0x02fe ; "Save => "
02d8 0054 | T | .STRTAB 0x0054->0x0302 ; "PC => "
02d9 0059 | Y | .STRTAB 0x0059->0x0305 ; "DPC => "
02da 005e | ^ | .STRTAB 0x005e->0x0309 ; "Lex levels valid =>"
02db 006f | o | .STRTAB 0x006f->0x0312 ; "."
02dc 006e | n | .STRTAB 0x006e->0x0313 ; "TLC => "
02dd 0073 | s | .STRTAB 0x0073->0x0316 ; "VLC => "
02de 0078 | x | .STRTAB 0x0078->0x031a ; "MAR => "
02df 007d | } | .STRTAB 0x007d->0x031d ; "TAR => "
02e0 0082 | | .STRTAB 0x0082->0x0321 ; " VAR => "
02e1 0088 | | .STRTAB 0x0088->0x0325 ; "RDR => "
02e2 008d | | .STRTAB 0x008d->0x0328 ; "WDR => "
02e3 0092 | | .STRTAB 0x0092->0x032c ; "PRI HEAD TAIL"
02e4 00a5 | | .STRTAB 0x00a5->0x0336 ; " "
02e5 00a5 | | .STRTAB 0x00a5->0x0337 ; " Delay Queue Head - "
02e6 00b7 | | .STRTAB 0x00b7->0x0341 ; " Disk Wait Head - "
02e7 00c7 | | .STRTAB 0x00c7->0x034a ; " FAQ Head - "
02e8 00d1 | | .STRTAB 0x00d1->0x0350 ; "CURRENT LOAD REG - "
02e9 00e2 | | .STRTAB 0x00e2->0x035a ; " RUN LOAD - "
02ea 00f2 | | .STRTAB 0x00f2->0x0363 ; " DISK WAIT LOAD - "
02eb 0102 | | .STRTAB 0x0102->0x036c ; " WITHHELD LOAD - "
02ec 0112 | | .STRTAB 0x0112->0x0375 ; " ** Register File state not dumped to tombstone **"
02ed 0142 | B | .STRTAB 0x0142->0x038e ; "GP("
02ee 0143 | C | .STRTAB 0x0143->0x038f ; ") => "
02ef 0146 | F | .STRTAB 0x0146->0x0392 ; "TTOP AND VTOP INCONSISTENT"
02f0 015e | ^ | .STRTAB 0x015e->0x039f ; "PFMAR => "
02f1 0166 | f | .STRTAB 0x0166->0x03a4 ; "TOP => "
02f2 016d | m | .STRTAB 0x016d->0x03a8 ; "TOP-"
02f3 016f | o | .STRTAB 0x016f->0x03aa ; " => "
02f4 0171 | q | .STREND 0x0171->0x03ac
02f5 546f 7020 |Top | .STRTAB_STRINGS
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; Debug Table
03b0 ; --------------------------------------------------------------------------------------
03b0 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34dc,0x0000,0x0001,0x0000
03b6 0000 0000 | | .XXX[0x3]
03b8 0000 | |
03b9 0208 aded | | .XXX[0x40]
03bb 408d c400 |@ |
03bd 0068 0000 | h |
03bf 0024 0004 | $ |
03c1 7530 0000 |u0 |
03c3 0008 0000 | |
03c5 0028 0000 | ( |
03c7 0018 0007 | |
03c9 bf98 0068 | h|
03cb bf70 0068 | p h|
03cd 40e8 0069 |@ i|
03cf 84e8 0034 | 4|
03d1 7504 000a |u |
03d3 2e37 205b |.7 [|
03d5 1539 2000 | 9 |
03d7 0000 0690 | |
03d9 45e9 c0fd |E |
03db edc0 0003 | |
03dd 4000 0000 |@ |
03df 0000 0000 | |
03e1 000b 9d8a | |
03e3 8500 0000 | |
03e5 400b 9d8c |@ |
03e7 8500 0000 | |
03e9 4000 0600 |@ |
03eb 9800 0000 | |
03ed 0000 0000 | |
03ef 0002 e763 | c|
03f1 2140 0000 |!@ |
03f3 1008 16c5 | |
03f5 4e48 0000 |NH |
03f7 0001 a000 | |
03f9 0000 0000 | | .BLANK 0000[0x5]
03fe 2000 0000 | | .XXX[0x2]