|
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 0058 | X | .CONST 0x0058 ; 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 0018 | | .CONST 0x0018 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated
000d 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 00e3 | | Load_Encached Natural_Cache
0011 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0012 00e3 | | Load_Encached Natural_Cache
0013 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0014 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0015 00c7 | | Action Elaborate_Subprogram
0016 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0017 00c7 | | Action Elaborate_Subprogram
0018 BODY_0008:
0018 00bc | | Action Signal_Activated
0019 00bb | | Action Signal_Completion
001a 0000 0000 | | .BLANK 0000[0x6]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0023 | # | .CONST 0x0023 ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 0001 | | .CONST 0x0001 ; Number of locals
0023 BODY_0020:
0023 INIT_0020:
0023 e20f | | Load 0x1,0xf
0024 0dfa | | Execute_Immediate Less,-0x6
0025 6809 |h | Jump_Zero 0x2f
0026 e5fd | | Load 0x2,-0x3
0027 e5fe | | Load 0x2,-0x2
0028 e5ff | | Load 0x2,-0x1
0029 e001 | | Load 0x0,0x1
002a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
002b e20f | | Load 0x1,0xf
002c 0a01 | | Execute_Immediate Plus,0x1
002d c20f | | Store 0x1,0xf
002e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
002f e210 | | Load 0x1,0x10
0030 0a01 | | Execute_Immediate Plus,0x1
0031 c210 | | Store 0x1,0x10
0032 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0033 0000 0000 | | .BLANK 0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b e210 | | Load 0x1,0x10
003c 680b |h | Jump_Zero 0x48
003d e002 | | Load 0x0,0x2
003e 180e | | Execute Package,Field_Execute,Field_Number 0xe
003f 4807 |H | Short_Literal 0x7
0040 0092 0049 | I| Action Push_String_Extended,0x49 ; "Messages skipped: "
0042 e210 | | Load 0x1,0x10
0043 00e0 | | Load_Encached Standard_Cache
0044 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0045 01cc | | Execute Vector,Catenate
0046 e001 | | Load 0x0,0x1
0047 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0048 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0049 ; --------------------------------------------------------------------------------------
0049 ; STRING TABLE
0049 ; --------------------------------------------------------------------------------------
0049 0004 | | .STRTAB 0x0004->0x004b ; "Messages skipped: "
004a 0014 | | .STREND 0x0014->0x0054
004b 4d65 7373 |Mess| .STRTAB_STRINGS
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000d | | .DEBUG4 0x0004,0x000d,0x401b,0x0000,0x0001,0x0000
005e 0000 0000 | | .BLANK 0000[0xe1]
013f 0010 1001 | | .XXX[0x3]
0141 c000 | |
0142 0000 0000 | | .BLANK 0000[0x4]
0146 86d9 8000 | | .XXX[0x27]
0148 0000 0002 | |
014a 1a58 8000 | X |
014c 4212 3000 |B 0 |
014e 0002 7d56 | }V|
0150 0000 0000 | |
0152 86cf 0006 | |
0154 6017 5063 |` Pc|
0156 04f0 0000 | |
0158 0000 0001 | |
015a 8602 1fad | |
015c 0086 9dc0 | |
015e 004c 37c0 | L7 |
0160 0000 0000 | |
0162 0086 c760 | `|
0164 0010 d3b8 | |
0166 0000 0083 | |
0168 1807 8086 | |
016a aa60 0000 | ` |
016c 06e0 | |
016d 0000 0000 | | .BLANK 0000[0x4]
0171 0086 e560 | `| .XXX[0x3d]
0173 0010 d3b8 | |
0175 0000 009d | |
0177 8b80 870a | |
0179 c000 0000 | |
017b 0bb0 0000 | |
017d 0001 3b17 | ; |
017f 010e 1580 | |
0181 0000 0017 | |
0183 8000 0000 | |
0185 0266 2402 | f$ |
0187 1dff 0000 | |
0189 0000 21be | ! |
018b f808 6ed0 | n |
018d 0000 0000 | |
018f 0027 62e0 | 'b |
0191 21cf 4000 |! @ |
0193 0000 006c | l|
0195 0000 0000 | |
0197 4ec5 c043 |N C|
0199 9e80 0000 | |
019b 0005 e800 | |
019d 0000 0099 | |
019f 8900 877f | |
01a1 c000 0000 | |
01a3 0872 e202 | r |
01a5 1c7d 0000 | } |
01a7 0000 0008 | |
01a9 a118 0877 | w|
01ab 0800 0000 | |
01ad 00be | |
01ae 0000 0000 | | .BLANK 0000[0x6]
01b4 0001 0000 | | .XXX[0x18]
01b6 0000 43a8 | C |
01b8 c844 8008 | D |
01ba 77fc 0000 |w |
01bc 0000 8769 | i|
01be e000 0002 | |
01c0 34fc 021e |4 |
01c2 4900 0000 |I |
01c4 0021 dc20 | ! |
01c6 0873 d002 | s |
01c8 1c2b 2192 | +! |
01ca 8021 e910 | ! |
01cc 0000 0000 | | .BLANK 0000[0x6]
01d2 202f 6021 | /`!| .XXX[0x10]
01d4 f5b0 0000 | |
01d6 0002 1e49 | I|
01d8 4d9d c043 |M C|
01da eb60 0000 | ` |
01dc 0118 2c01 | , |
01de 0fad 8045 | E|
01e0 09f0 17e0 | |
01e2 0000 0000 | | .BLANK 0000[0x7]
01e9 087b 8e00 | { | .XXX[0x11]
01eb e20c 7a00 | z |
01ed 56bb 8000 |V |
01ef 0000 21ee | ! |
01f1 3808 7a44 |8 zD|
01f3 021e c080 | |
01f5 0020 22cf | " |
01f7 5808 7d6d |X }m|
01f9 0c8c | |
01fa 0000 0000 | | .BLANK 0000[0x5]
01ff 0011 | | .XXX[0x1]