|
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: 1024 (0x400)
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 00f0 | | .CONST 0x00f0 ; 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 8000 | | .CONST 0x8000 ; 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 0023 | # | .CONST 0x0023 ; Address of begin
0019 0052 | R | .CONST 0x0052 ; Address of exception handler
001a 0005 | | .CONST 0x0005 ; Number of locals
001b INIT_0018:
001b 00e1 | | Load_Encached Boolean_Cache
001c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
001d e001 | | Load 0x0,0x1
001e 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
001f 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
0021 029f 009b | | Declare_Subprogram INIT_0098,For_Call
0023 BODY_0018:
0023 e5fe | | Load 0x2,-0x2
0024 6817 |h | Jump_Zero 0x3c
0025 0092 00c6 | | Action Push_String_Extended,0xc6 ; "<nil>"
0027 00ea | | Load_Encached Null_String_Cache
0028 4800 |H | Short_Literal 0x0
0029 4801 |H | Short_Literal 0x1
002a e5fc | | Load 0x2,-0x4
002b e002 | | Load 0x0,0x2
002c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
002d 00da | | Load_Top At_Offset_2
002e 4801 |H | Short_Literal 0x1
002f e5fc | | Load 0x2,-0x4
0030 0092 00c7 | | Action Push_String_Extended,0xc7 ; "."
0032 01cc | | Execute Vector,Catenate
0033 e5ff | | Load 0x2,-0x1
0034 01cc | | Execute Vector,Catenate
0035 e5ff | | Load 0x2,-0x1
0036 e001 | | Load 0x0,0x1
0037 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0038 005b | [ | Store_Top Discrete,At_Offset_3
0039 00da | | Load_Top At_Offset_2
003a 8405 | | Call 0x2,0x5
003b a402 | | Store_Unchecked 0x2,0x2
003c 00db | | Load_Top At_Offset_3
003d 6809 |h | Jump_Zero 0x47
003e e5fd | | Load 0x2,-0x3
003f 4800 |H | Short_Literal 0x0
0040 e5fe | | Load 0x2,-0x2
0041 e5ff | | Load 0x2,-0x1
0042 e5fc | | Load 0x2,-0x4
0043 8404 | | Call 0x2,0x4
0044 e003 | | Load 0x0,0x3
0045 180e | | Execute Package,Field_Execute,Field_Number 0xe
0046 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0047 0092 00c8 | | Action Push_String_Extended,0xc8 ; " Problem with Dump file - "
0049 00db | | Load_Top At_Offset_3
004a e001 | | Load 0x0,0x1
004b 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
004c 011c | | Execute Any,Convert_Unchecked
004d 1c01 | | Execute_Immediate Run_Utility,0x1
004e 01cc | | Execute Vector,Catenate
004f e004 | | Load 0x0,0x4
0050 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0051 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0052 TRAP_0018:
0052 e005 | | Load 0x0,0x5
0053 010f | | Execute Exception,Equal
0054 6805 |h | Jump_Zero 0x5a
0055 0092 00c9 | | Action Push_String_Extended,0xc9 ; "could not locate tombstone file"
0057 e004 | | Load 0x0,0x4
0058 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0059 4505 |E | Exit_Suprogram New_Top_Offset 0x5
005a 0100 | | Execute Exception,Raise
005b 0000 0000 | | .BLANK 0000[0x5]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 006a | j | .CONST 0x006a ; Address of begin
0061 0090 | | .CONST 0x0090 ; Address of exception handler
0062 0003 | | .CONST 0x0003 ; Number of locals
0063 INIT_0060:
0063 e004 | | Load 0x0,0x4
0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0065 02c7 | | Declare_Variable Any
0066 00d8 | | Load_Top At_Offset_0
0067 1c00 | | Execute_Immediate Run_Utility,0x0
0068 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call
006a BODY_0060:
006a e7fd | | Load 0x3,-0x3
006b 6817 |h | Jump_Zero 0x83
006c 00d9 | | Load_Top At_Offset_1
006d 00ea | | Load_Encached Null_String_Cache
006e e7ff | | Load 0x3,-0x1
006f 0092 00c7 | | Action Push_String_Extended,0xc7 ; "."
0071 01cc | | Execute Vector,Catenate
0072 e7fe | | Load 0x3,-0x2
0073 01cc | | Execute Vector,Catenate
0074 4800 |H | Short_Literal 0x0
0075 e004 | | Load 0x0,0x4
0076 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0077 c602 | | Store 0x3,0x2
0078 00d9 | | Load_Top At_Offset_1
0079 e004 | | Load 0x0,0x4
007a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
007b c602 | | Store 0x3,0x2
007c e7ff | | Load 0x3,-0x1
007d 0092 00c7 | | Action Push_String_Extended,0xc7 ; "."
007f 01cc | | Execute Vector,Catenate
0080 e7fe | | Load 0x3,-0x2
0081 01cc | | Execute Vector,Catenate
0082 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0083 00d9 | | Load_Top At_Offset_1
0084 00ea | | Load_Encached Null_String_Cache
0085 e7fe | | Load 0x3,-0x2
0086 4800 |H | Short_Literal 0x0
0087 e004 | | Load 0x0,0x4
0088 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0089 c602 | | Store 0x3,0x2
008a 00d9 | | Load_Top At_Offset_1
008b e004 | | Load 0x0,0x4
008c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
008d c602 | | Store 0x3,0x2
008e e7fe | | Load 0x3,-0x2
008f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0090 TRAP_0060:
0090 0007 | | Action Break_Optional
0091 e7fd | | Load 0x3,-0x3
0092 7002 |p | Jump_Nonzero 0x95
0093 8603 | | Call 0x3,0x3
0094 7802 |x | Jump 0x97
0095 e005 | | Load 0x0,0x5
0096 0257 | W | Execute Discrete,Raise
0097 0831 | 1 | Execute_Immediate Raise,0x31
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 0f00 | | Execute_Immediate Equal,0x0
009d 00db | | Load_Top At_Offset_3
009e 0f10 | | Execute_Immediate Equal,0x10
009f 0278 | x | Execute Discrete,Or
00a0 00db | | Load_Top At_Offset_3
00a1 0f11 | | Execute_Immediate Equal,0x11
00a2 0278 | x | Execute Discrete,Or
00a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 00c3 | | .CONST 0x00c3 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab e602 | | Load 0x3,0x2
00ac 00ea | | Load_Encached Null_String_Cache
00ad e7ff | | Load 0x3,-0x1
00ae 0092 00c7 | | Action Push_String_Extended,0xc7 ; "."
00b0 01cc | | Execute Vector,Catenate
00b1 e7fe | | Load 0x3,-0x2
00b2 01cc | | Execute Vector,Catenate
00b3 4800 |H | Short_Literal 0x0
00b4 e004 | | Load 0x0,0x4
00b5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b6 c602 | | Store 0x3,0x2
00b7 e602 | | Load 0x3,0x2
00b8 e004 | | Load 0x0,0x4
00b9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00ba c602 | | Store 0x3,0x2
00bb e7ff | | Load 0x3,-0x1
00bc 0092 00c7 | | Action Push_String_Extended,0xc7 ; "."
00be 01cc | | Execute Vector,Catenate
00bf e7fe | | Load 0x3,-0x2
00c0 01cc | | Execute Vector,Catenate
00c1 00cb | | Action Pop_Block_With_Result
00c2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00c3 TRAP_00a8:
00c3 0007 | | Action Break_Optional
00c4 e005 | | Load 0x0,0x5
00c5 0257 | W | Execute Discrete,Raise
00c6 ; --------------------------------------------------------------------------------------
00c6 ; STRING TABLE
00c6 ; --------------------------------------------------------------------------------------
00c6 000a | | .STRTAB 0x000a->0x00cb ; "<nil>"
00c7 000d | | .STRTAB 0x000d->0x00cd ; "."
00c8 000c | | .STRTAB 0x000c->0x00ce ; " Problem with Dump file - "
00c9 0024 | $ | .STRTAB 0x0024->0x00db ; "could not locate tombstone file"
00ca 0041 | A | .STREND 0x0041->0x00ea
00cb 3c6e 696c |<nil| .STRTAB_STRINGS
00eb 0000 0000 | | .BLANK 0000[0x5]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; Debug Table
00f0 ; --------------------------------------------------------------------------------------
00f0 0004 000e | | .DEBUG4 0x0004,0x000e,0x41f5,0x0000,0x0001,0x0000
00f6 0000 0089 | | .XXX[0x10a]
00f8 8e80 261c | & |
00fa c009 9020 | |
00fc 08b0 04ba | |
00fe 5801 3032 |X 02|
0100 0000 25ef | % |
0102 0010 a5c1 | |
0104 0009 8b00 | |
0106 0000 0001 | |
0108 0800 0073 | s|
010a 2d06 c000 |- |
010c 0000 04bd | |
010e e211 2000 | |
0110 98b0 0000 | |
0112 0000 0985 | |
0114 8801 2c32 | ,2|
0116 831c 001d | |
0118 3580 0000 |5 |
011a 0002 61cc | a |
011c 0097 4b00 | K |
011e 2606 4000 |& @ |
0120 1808 00e0 | |
0122 0000 0000 | |
0124 003a 0b40 | : @|
0126 09bb 6c5c | l\|
0128 c800 e65a | Z|
012a 0000 0000 | |
012c 3300 1ccb |3 |
012e 4000 0001 |@ |
0130 c000 0001 | |
0132 c024 e762 | $ b|
0134 e009 9d48 | H|
0136 0000 0000 | |
0138 8800 0072 | r|
013a d8c5 9980 | |
013c 1367 3000 | g0 |
013e 0000 0133 | 3|
0140 3200 0000 |2 |
0142 0000 0732 | 2|
0144 d000 00e6 | |
0146 5a00 0000 |Z |
0148 0011 31d0 | 1 |
014a 04d7 e401 | |
014c 3717 000a |7 |
014e 0099 d480 | |
0150 26a8 a000 |& |
0152 04d2 2c02 | , |
0154 0cb8 2001 | |
0156 3673 0000 |6s |
0158 0000 5000 | P |
015a 000e 65a0 | e |
015c e800 0000 | |
015e 009a 45c2 | E |
0160 2400 1367 |$ g|
0162 3000 0000 |0 |
0164 0135 c400 | 5 |
0166 2628 b063 |&( c|
0168 8003 a6b0 | |
016a 0000 0000 | |
016c 4d7e 4013 |M~@ |
016e 3a90 04d5 |: |
0170 1400 0301 | |
0172 001c 0000 | |
0174 0000 0007 | |
0176 4168 013c |Ah <|
0178 808b 9900 | |
017a 1ccb 4000 | @ |
017c 0000 0a10 | |
017e 0399 6800 | h |
0180 0000 3c00 | < |
0182 0000 3c04 | < |
0184 a4ec 5c01 | \ |
0186 38bc 0000 |8 |
0188 0000 1100 | |
018a 000e 5b18 | [ |
018c b330 0277 | 0 w|
018e 0c00 0000 | |
0190 0027 08a0 | ' |
0192 0000 0000 | |
0194 00e6 5a00 | Z |
0196 001c cb40 | @|
0198 0000 0002 | |
019a 263a 009d |&: |
019c 8600 2785 | ' |
019e 4023 0013 |@# |
01a0 8bc0 04e9 | |
01a2 6000 009c |` |
01a4 cf00 4097 | @ |
01a6 0400 2770 | 'p|
01a8 c000 0000 | |
01aa 0760 0001 | ` |
01ac ccb4 1f00 | |
01ae 0000 0013 | |
01b0 99e8 4480 | D |
01b2 0277 0c00 | w |
01b4 0000 0027 | '|
01b6 5ae0 04d9 |Z |
01b8 620c 7000 |b p |
01ba 74d6 0000 |t |
01bc 0000 09d8 | |
01be 6002 7178 |` qx|
01c0 009d 2c00 | , |
01c2 0060 2003 | ` |
01c4 8000 0000 | |
01c6 0000 e82d | -|
01c8 0028 3271 | (2q|
01ca 7320 0399 |s |
01cc 6800 0000 |h |
01ce 0036 0073 | 6 s|
01d0 2d00 0000 |- |
01d2 0800 0000 | |
01d4 0800 959d | |
01d6 8b80 27b9 | ' |
01d8 e000 0000 | |
01da 0220 0001 | |
01dc cb63 1666 | c f|
01de 0050 2640 | P&@|
01e0 0000 0004 | |
01e2 f560 0000 | ` |
01e4 0000 001c | |
01e6 cb40 0003 | @ |
01e8 9968 0000 | h |
01ea 0000 44c7 | D |
01ec 4014 01f0 |@ |
01ee 0504 f400 | |
01f0 3002 7b9e |0 { |
01f2 009f b580 | |
01f4 0013 eb10 | |
01f6 07f2 e080 | |
01f8 0502 6400 | d |
01fa 0000 0144 | D|
01fc 0000 3996 | 9 |
01fe 8420 0000 | |