|
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_ccb0b3
└─⟦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 0078 | x | .CONST 0x0078 ; 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 0027 | ' | .CONST 0x0027 ; Address of begin
0009 0070 | p | .CONST 0x0070 ; Address of exception handler
000a 0007 | | .CONST 0x0007 ; Number of locals
000b INIT_0008:
000b e01c | | Load 0x0,0x1c
000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000d 02ff | | Declare_Variable Variant_Record
000e 00d8 | | Load_Top At_Offset_0
000f 1c00 | | Execute_Immediate Run_Utility,0x0
0010 e01c | | Load 0x0,0x1c
0011 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0012 02ff | | Declare_Variable Variant_Record
0013 00d8 | | Load_Top At_Offset_0
0014 1c00 | | Execute_Immediate Run_Utility,0x0
0015 e01c | | Load 0x0,0x1c
0016 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0017 02ff | | Declare_Variable Variant_Record
0018 00d8 | | Load_Top At_Offset_0
0019 1c00 | | Execute_Immediate Run_Utility,0x0
001a e01d | | Load 0x0,0x1d
001b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 e01d | | Load 0x0,0x1d
0021 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0022 02ff | | Declare_Variable Variant_Record
0023 00d8 | | Load_Top At_Offset_0
0024 1c00 | | Execute_Immediate Run_Utility,0x0
0025 e01e | | Load 0x0,0x1e
0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0027 BODY_0008:
0027 e5ff | | Load 0x2,-0x1
0028 e006 | | Load 0x0,0x6
0029 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002a 6802 |h | Jump_Zero 0x2d
002b 00ec | | Load_Encached Diana_Tree_Cache
002c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
002d e5ff | | Load 0x2,-0x1
002e e006 | | Load 0x0,0x6
002f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0030 180d | | Execute Package,Field_Execute,Field_Number 0xd
0031 e402 | | Load 0x2,0x2
0032 016d | m | Execute Variant_Record,Structure_Write
0033 e01e | | Load 0x0,0x1e
0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0035 e403 | | Load 0x2,0x3
0036 e5fe | | Load 0x2,-0x2
0037 e402 | | Load 0x2,0x2
0038 e01c | | Load 0x0,0x1c
0039 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
003a 00d1 | | Pop_Control Pop_Count_1
003b 0059 | Y | Store_Top Discrete,At_Offset_1
003c 00d8 | | Load_Top At_Offset_0
003d 6802 |h | Jump_Zero 0x40
003e 00ec | | Load_Encached Diana_Tree_Cache
003f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0040 e01e | | Load 0x0,0x1e
0041 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0042 e404 | | Load 0x2,0x4
0043 e01a | | Load 0x0,0x1a
0044 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0045 602e |`. | Indirect_Literal Discrete,0x74,{0x00000000, 0x00028000}
0046 4800 |H | Short_Literal 0x0
0047 e403 | | Load 0x2,0x3
0048 e01c | | Load 0x0,0x1c
0049 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
004a 00d1 | | Pop_Control Pop_Count_1
004b 0059 | Y | Store_Top Discrete,At_Offset_1
004c 00d8 | | Load_Top At_Offset_0
004d 6801 |h | Jump_Zero 0x4f
004e 0887 | | Execute_Immediate Raise,0x87
004f 00db | | Load_Top At_Offset_3
0050 e01d | | Load 0x0,0x1d
0051 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0052 0162 | b | Execute Variant_Record,Check_In_Type
0053 00da | | Load_Top At_Offset_2
0054 016d | m | Execute Variant_Record,Structure_Write
0055 e01e | | Load 0x0,0x1e
0056 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0057 00db | | Load_Top At_Offset_3
0058 0120 | | Execute Any,Is_Value
0059 6804 |h | Jump_Zero 0x5e
005a e01d | | Load 0x0,0x1d
005b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
005c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005d 7801 |x | Jump 0x5f
005e 00db | | Load_Top At_Offset_3
005f e01a | | Load 0x0,0x1a
0060 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0061 4800 |H | Short_Literal 0x0
0062 4800 |H | Short_Literal 0x0
0063 e406 | | Load 0x2,0x6
0064 e01d | | Load 0x0,0x1d
0065 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0066 c405 | | Store 0x2,0x5
0067 0059 | Y | Store_Top Discrete,At_Offset_1
0068 00d8 | | Load_Top At_Offset_0
0069 6801 |h | Jump_Zero 0x6b
006a 0887 | | Execute_Immediate Raise,0x87
006b 00da | | Load_Top At_Offset_2
006c e01d | | Load 0x0,0x1d
006d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
006e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
006f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0070 TRAP_0008:
0070 0007 | | Action Break_Optional
0071 00ec | | Load_Encached Diana_Tree_Cache
0072 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0073 0000 | | .XXX[0x1]
0074 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0078 ; --------------------------------------------------------------------------------------
0078 ; Debug Table
0078 ; --------------------------------------------------------------------------------------
0078 0004 000e | | .DEBUG4 0x0004,0x000e,0x9430,0x0000,0x0001,0x0000
007e 0000 0000 | | .BLANK 0000[0xfa]
0178 25d5 b800 |% | .XXX[0x7]
017a 25de d804 |% |
017c 0014 8011 | |
017e 1c80 | |
017f 0000 0000 | | .BLANK 0000[0xb]
018a 025d a480 | ] | .XXX[0x7]
018c 025e 3680 | ^6 |
018e 4002 16ff |@ |
0190 32d8 |2 |
0191 0000 0000 | | .BLANK 0000[0xb]
019c 0025 ded8 | % | .XXX[0x6]
019e 0025 e7f8 | % |
01a0 0400 0c44 | D|
01a2 0000 0000 | | .BLANK 0000[0xc]
01ae 0002 5e36 | ^6| .XXX[0x6]
01b0 8002 5ec8 | ^ |
01b2 8040 042e | @ .|
01b4 0000 0000 | | .BLANK 0000[0xd]
01c1 25e7 f800 |% | .XXX[0x7]
01c3 25f1 1804 |% |
01c5 0021 6ff3 | !o |
01c7 2e00 |. |
01c8 0000 0000 | | .BLANK 0000[0xb]
01d3 025e c880 | ^ | .XXX[0xe]
01d5 025f 7a40 | _z@|
01d7 0255 d980 | U |
01d9 0000 02c0 | |
01db 000c 8100 | |
01dd 0000 0080 | |
01df 8007 5000 | P |
01e1 0000 0000 | | .BLANK 0000[0xc]
01ed 004b e230 | K 0| .XXX[0x8]
01ef 004b f868 | K h|
01f1 1d60 4f50 | `OP|
01f3 b002 7000 | p |
01f5 0000 0000 | | .BLANK 0000[0xa]
01ff 0004 | | .XXX[0x1]