|
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_6a18da
└─⟦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 0014 | | .CONST 0x0014 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000e | | .CONST 0x000e ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0011 00c7 | | Action Elaborate_Subprogram
0012 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0013 00c7 | | Action Elaborate_Subprogram
0014 BODY_0008:
0014 00bc | | Action Signal_Activated
0015 00bb | | Action Signal_Completion
0016 0000 0000 | | .XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b | | .CONST 0x001b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0001 | | .CONST 0x0001 ; Number of locals
001b BODY_0018:
001b INIT_0018:
001b 00da | | Load_Top At_Offset_2
001c 7002 |p | Jump_Nonzero 0x1f
001d 4800 |H | Short_Literal 0x0
001e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
001f 00da | | Load_Top At_Offset_2
0020 e001 | | Load 0x0,0x1
0021 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0022 e001 | | Load 0x0,0x1
0023 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0024 460b |F | Jump_Case 0xc
0025 780b |x | Jump 0x31 ; case 0x0
0026 780a |x | Jump 0x31 ; case 0x1
0027 7809 |x | Jump 0x31 ; case 0x2
0028 7808 |x | Jump 0x31 ; case 0x3
0029 7807 |x | Jump 0x31 ; case 0x4
002a 780a |x | Jump 0x35 ; case 0x5
002b 7807 |x | Jump 0x33 ; case 0x6
002c 7808 |x | Jump 0x35 ; case 0x7
002d 7809 |x | Jump 0x37 ; case 0x8
002e 7802 |x | Jump 0x31 ; case 0x9
002f 7801 |x | Jump 0x31 ; case 0xa
0030 7800 |x | Jump 0x31 ; case 0xb
0031 4800 |H | Short_Literal 0x0
0032 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0033 4801 |H | Short_Literal 0x1
0034 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0035 4802 |H | Short_Literal 0x2
0036 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0037 4804 |H | Short_Literal 0x4
0038 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0039 0000 0000 | | .BLANK 0000[0x7]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 00ec | | Load_Encached Diana_Tree_Cache
0044 00ec | | Load_Encached Diana_Tree_Cache
0045 e002 | | Load 0x0,0x2
0046 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0047 e003 | | Load 0x0,0x3
0048 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0049 00ec | | Load_Encached Diana_Tree_Cache
004a e5ff | | Load 0x2,-0x1
004b e001 | | Load 0x0,0x1
004c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
004d 00ec | | Load_Encached Diana_Tree_Cache
004e e5ff | | Load 0x2,-0x1
004f 820d | | Call 0x1,0xd
0050 e5fe | | Load 0x2,-0x2
0051 e004 | | Load 0x0,0x4
0052 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0053 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000b | | .DEBUG4 0x0004,0x000b,0x16a0,0x0000,0x0001,0x0000
005e 0000 0000 | | .BLANK 0000[0x29]
0087 0ffc | | .XXX[0x1]
0088 0000 0000 | | .BLANK 0000[0x1b]
00a3 000f 7a00 | z | .XXX[0x9]
00a5 0000 42d0 | B |
00a7 0000 0000 | |
00a9 0000 0003 | |
00ab d600 | |
00ac 0000 0000 | | .BLANK 0000[0x1b]
00c7 0407 0084 | | .XXX[0x2]
00c9 0000 0000 | | .BLANK 0000[0x7]
00d0 0004 2300 | # | .XXX[0x8]
00d2 0000 0000 | |
00d4 0000 003c | <|
00d6 5808 2000 |X |
00d8 0000 0000 | | .BLANK 0000[0xb]
00e3 0003 bd80 | | .XXX[0x7]
00e5 8300 0000 | |
00e7 0000 0039 | 9|
00e9 5008 |P |
00ea 0000 0000 | | .BLANK 0000[0xf]
00f9 1064 | d | .XXX[0x1]
00fa 0000 0000 | | .BLANK 0000[0x6]
0100 03d9 8000 | | .XXX[0xb]
0102 0000 0000 | |
0104 0000 3d10 | = |
0106 0000 0000 | |
0108 0000 0003 | |
010a 9780 | |
010b 0000 0000 | | .BLANK 0000[0x8]
0113 03b3 8081 | | .XXX[0x6]
0115 0010 3000 | 0 |
0117 0000 3a88 | : |
0119 0000 0000 | | .BLANK 0000[0x16]
012f 0003 fa00 | | .XXX[0x2]
0131 0000 0000 | | .BLANK 0000[0x14]
0145 0f2a 0000 | * | .XXX[0x4]
0147 003e 7000 | >p |
0149 0000 0000 | | .BLANK 0000[0x2b]
0174 000e e200 | | .XXX[0x8c]
0176 0000 3ec0 | > |
0178 0000 0105 | |
017a 0000 0004 | |
017c 2800 0000 |( |
017e 10c8 0000 | |
0180 027b 0009 | { |
0182 027e 000a | ~ |
0184 027f 000b | |
0186 0285 000c | |
0188 028a 000d | |
018a 0290 000e | |
018c 0296 000f | |
018e 029c 0010 | |
0190 02a6 0011 | |
0192 02ad 0012 | |
0194 02b1 0013 | |
0196 02b9 0014 | |
0198 02bd 0015 | |
019a 02c1 0016 | |
019c 02c3 0017 | |
019e 0000 0001 | |
01a0 02cb 0001 | |
01a2 0003 0000 | |
01a4 02d3 ffff | |
01a6 02d5 fffe | |
01a8 02d7 fffd | |
01aa 000b 0000 | |
01ac 02da ffff | |
01ae 02dc fffe | |
01b0 02e2 fffd | |
01b2 02e8 fffc | |
01b4 02ea fffb | |
01b6 02ec fffa | |
01b8 02ee fff9 | |
01ba 02f0 fff8 | |
01bc 02f2 fff7 | |
01be 02f4 fff6 | |
01c0 02f6 fff5 | |
01c2 0001 0004 | |
01c4 0303 0001 | |
01c6 0303 0002 | |
01c8 0303 fbff | |
01ca 0308 0401 | |
01cc 030e 0402 | |
01ce 0000 0003 | |
01d0 031b 0001 | |
01d2 0320 0002 | |
01d4 0324 0003 | $ |
01d6 0000 0001 | |
01d8 032b 0001 | + |
01da 0003 000c | |
01dc 0333 ffff | 3 |
01de 0338 fffe | 8 |
01e0 033c fffd | < |
01e2 033f 0001 | ? |
01e4 0345 0002 | E |
01e6 0354 0003 | T |
01e8 0358 0004 | X |
01ea 035c 0005 | \ |
01ec 035e 0006 | ^ |
01ee 0361 0007 | a |
01f0 036d 0008 | m |
01f2 0376 0009 | v |
01f4 0378 000a | x |
01f6 037c 000b | | |
01f8 0380 000c | |
01fa 0000 0008 | |
01fc 0393 0001 | |
01fe 0395 0002 | |