|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00b0 | | .CONST 0x00b0 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 002b | + | .CONST 0x002b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; Number of locals
000b INIT_0008:
000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x00e2,0x0000,0x0000,0x0056,0xbc75,0x0000,0x002b
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 00bf | | Action Accept_Activation
0014 6093 |` | Indirect_Literal Discrete,0xa8,{0x00000000, 0x0056bc85} ; Debug Table 0x1 = .DEBUG 0x0014,0x00ec,0x0000,0x0000,0x0056,0xbc85,0x0000,0x0006
; Debug Table 0x1.0x0 = 0x14,0xffff
0015 4807 |H | Short_Literal 0x7
0016 608d |` | Indirect_Literal Discrete,0xa4,{0x00000000, 0x000004c7}
0017 00ec | | Load_Encached Diana_Tree_Cache
0018 00e1 | | Load_Encached Boolean_Cache
0019 00eb | | Load_Encached Diana_Cache
001a 1917 | | Execute Package,Field_Reference,Field_Number 0x17
001b e001 | | Load 0x0,0x1
001c 0387 | | Declare_Variable Package
001d 00d8 | | Load_Top At_Offset_0
001e 020f | | Execute Module,Activate
001f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1 = 0x1f,0xfffe
0020 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0021 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0x2 = 0x21,0xfffd
0022 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0023 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 00c7 | | Action Elaborate_Subprogram
0025 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x4 = 0x25,0xfffb
0026 00c7 | | Action Elaborate_Subprogram
0027 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x5 = 0x27,0xfffa
0028 00c7 | | Action Elaborate_Subprogram
0029 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x6 = 0x29,0xfff9
002a 00c7 | | Action Elaborate_Subprogram
002b BODY_0008:
002b 00bc | | Action Signal_Activated
002c 00bb | | Action Signal_Completion
002d 0000 0000 | | .XXX[0x3]
002f 0000 | |
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033 | 3 | .CONST 0x0033 ; Address of begin
0031 0004 | | .CONST 0x0004 ; Address of exception handler
0032 0001 | | .CONST 0x0001 ; Number of locals
0033 BODY_0030:
0033 INIT_0030:
0033 e211 | | Load 0x1,0x11 ; Debug Table 0x2 = .DEBUG 0x0033,0x00fc,0x0001,0x0000,0x0056,0xbc75,0x0000,0x002c
; Debug Table 0x2.0x0 = 0x33,0x1
0034 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0035 606e |`n | Indirect_Literal Discrete,0xa4,{0x00000000, 0x000004c7}
0036 e211 | | Load 0x1,0x11
0037 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0038 c212 | | Store 0x1,0x12
0039 e211 | | Load 0x1,0x11 ; Debug Table 0x2.0x1 = 0x39,0x2
003a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
003b 6068 |`h | Indirect_Literal Discrete,0xa4,{0x00000000, 0x000004c7}
003c e211 | | Load 0x1,0x11
003d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
003e c213 | | Store 0x1,0x13
003f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0047 | G | .CONST 0x0047 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0003 | | .CONST 0x0003 ; Number of locals
0043 INIT_0040:
0043 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3 = .DEBUG 0x0043,0x0102,0x0002,0x0000,0x0056,0xbc75,0x0000,0x0030
; Debug Table 0x3.0x0 = 0x43,0xffff
0044 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0045 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x45,0xfffe
0046 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0047 BODY_0040:
0047 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x2 = 0x47,0x1
0048 00da | | Load_Top At_Offset_2
0049 00de | | Load_Top At_Offset_6
004a e212 | | Load 0x1,0x12
004b e211 | | Load 0x1,0x11
004c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
004d 005b | [ | Store_Top Discrete,At_Offset_3
004e 0059 | Y | Store_Top Discrete,At_Offset_1
004f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0x4f,0x2
0050 6802 |h | Jump_Zero 0x53
0051 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x4 = 0x51,0x3
0052 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0053 e212 | | Load 0x1,0x12 ; Debug Table 0x3.0x5 = 0x53,0x4
0054 4800 |H | Short_Literal 0x0
0055 4801 |H | Short_Literal 0x1
0056 e5ff | | Load 0x2,-0x1
0057 e211 | | Load 0x1,0x11
0058 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0059 c212 | | Store 0x1,0x12
005a 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x6 = 0x5a,0x5
005b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
005c 0000 0000 | | .BLANK 0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0068 | h | .CONST 0x0068 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0002 | | .CONST 0x0002 ; Number of locals
0063 INIT_0060:
0063 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x0063,0x0112,0x0001,0x0000,0x0056,0xbc75,0x0000,0x003b
; Debug Table 0x4.0x0 = 0x63,0xffff
0064 48ac |H | Short_Literal 0xac
0065 00eb | | Load_Encached Diana_Cache
0066 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0067 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0068 BODY_0060:
0068 00dc | | Load_Top At_Offset_4 ; Debug Table 0x4.0x1 = 0x68,0x1
0069 e002 | | Load 0x0,0x2
006a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
006b 025e | ^ | Execute Discrete,Convert
006c 1c01 | | Execute_Immediate Run_Utility,0x1
006d 00eb | | Load_Encached Diana_Cache
006e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
006f e002 | | Load 0x0,0x2
0070 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0071 00da | | Load_Top At_Offset_2
0072 4973 |Is | Short_Literal 0x173
0073 00eb | | Load_Encached Diana_Cache
0074 0098 | | Execute Package,Field_Read_Dynamic
0075 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0076 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x2 = 0x76,0x2
0077 e002 | | Load 0x0,0x2
0078 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0079 00da | | Load_Top At_Offset_2
007a 4973 |Is | Short_Literal 0x173
007b 00eb | | Load_Encached Diana_Cache
007c 0098 | | Execute Package,Field_Read_Dynamic
007d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
007e 00dd | | Load_Top At_Offset_5 ; Debug Table 0x4.0x3 = 0x7e,0x3
007f 0227 | ' | Execute Access,All_Reference
0080 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0081 00d9 | | Load_Top At_Offset_1
0082 00eb | | Load_Encached Diana_Cache
0083 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0084 00de | | Load_Top At_Offset_6
0085 0227 | ' | Execute Access,All_Reference
0086 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0087 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008f | | .CONST 0x008f ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0003 | | .CONST 0x0003 ; Number of locals
008b INIT_0088:
008b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5 = .DEBUG 0x008b,0x011c,0x0002,0x0000,0x0056,0xbc75,0x0000,0x004d
; Debug Table 0x5.0x0 = 0x8b,0xffff
008c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
008d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x1 = 0x8d,0xfffe
008e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
008f BODY_0088:
008f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x2 = 0x8f,0x1
0090 00da | | Load_Top At_Offset_2
0091 00de | | Load_Top At_Offset_6
0092 e213 | | Load 0x1,0x13
0093 e211 | | Load 0x1,0x11
0094 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0095 005b | [ | Store_Top Discrete,At_Offset_3
0096 0059 | Y | Store_Top Discrete,At_Offset_1
0097 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0x97,0x2
0098 6802 |h | Jump_Zero 0x9b
0099 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x4 = 0x99,0x3
009a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
009b e213 | | Load 0x1,0x13 ; Debug Table 0x5.0x5 = 0x9b,0x4
009c 4800 |H | Short_Literal 0x0
009d 4801 |H | Short_Literal 0x1
009e e5ff | | Load 0x2,-0x1
009f e211 | | Load 0x1,0x11
00a0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a1 c213 | | Store 0x1,0x13
00a2 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x6 = 0xa2,0x5
00a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a4 0000 0000 | | .LITERAL {0x00000000, 0x000004c7}
00a8 0000 0000 | | .LITERAL {0x00000000, 0x0056bc85}
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Debug Table
00b0 ; --------------------------------------------------------------------------------------
00b0 0003 0006 | | .CONST 0x0003,0x0006
00b2 000b 00e2 | | .DEBUG 0x000b,0x00e2,0x0000,0x0000,0x0056,0xbc75,0x0000,0x002b
00ba 0014 00ec | | .DEBUG 0x0014,0x00ec,0x0000,0x0000,0x0056,0xbc85,0x0000,0x0006
00c2 0033 00fc | 3 | .DEBUG 0x0033,0x00fc,0x0001,0x0000,0x0056,0xbc75,0x0000,0x002c
00ca 0043 0102 | C | .DEBUG 0x0043,0x0102,0x0002,0x0000,0x0056,0xbc75,0x0000,0x0030
00d2 0063 0112 | c | .DEBUG 0x0063,0x0112,0x0001,0x0000,0x0056,0xbc75,0x0000,0x003b
00da 008b 011c | | .DEBUG 0x008b,0x011c,0x0002,0x0000,0x0056,0xbc75,0x0000,0x004d
00e2 ; --------------------------------------------------------------------------------------
00e2 ; Debug3 Subtable 0x0
00e2 ; --------------------------------------------------------------------------------------
00e2 0004 0000 | | .DBG3TAB 0x0004,0x0000
00e4 000b ffff | | .CONST 0x000b,0xffff
00e6 000d fffe | | .CONST 0x000d,0xfffe
00e8 000f fffd | | .CONST 0x000f,0xfffd
00ea 0011 fffc | | .CONST 0x0011,0xfffc
00ec ; --------------------------------------------------------------------------------------
00ec ; Debug3 Subtable 0x1
00ec ; --------------------------------------------------------------------------------------
00ec 0007 0000 | | .DBG3TAB 0x0007,0x0000
00ee 0014 ffff | | .CONST 0x0014,0xffff
00f0 001f fffe | | .CONST 0x001f,0xfffe
00f2 0021 fffd | ! | .CONST 0x0021,0xfffd
00f4 0023 fffc | # | .CONST 0x0023,0xfffc
00f6 0025 fffb | % | .CONST 0x0025,0xfffb
00f8 0027 fffa | ' | .CONST 0x0027,0xfffa
00fa 0029 fff9 | ) | .CONST 0x0029,0xfff9
00fc ; --------------------------------------------------------------------------------------
00fc ; Debug3 Subtable 0x2
00fc ; --------------------------------------------------------------------------------------
00fc 0000 0002 | | .DBG3TAB 0x0000,0x0002
00fe 0033 0001 | 3 | .CONST 0x0033,0x0001
0100 0039 0002 | 9 | .CONST 0x0039,0x0002
0102 ; --------------------------------------------------------------------------------------
0102 ; Debug3 Subtable 0x3
0102 ; --------------------------------------------------------------------------------------
0102 0002 0005 | | .DBG3TAB 0x0002,0x0005
0104 0043 ffff | C | .CONST 0x0043,0xffff
0106 0045 fffe | E | .CONST 0x0045,0xfffe
0108 0047 0001 | G | .CONST 0x0047,0x0001
010a 004f 0002 | O | .CONST 0x004f,0x0002
010c 0051 0003 | Q | .CONST 0x0051,0x0003
010e 0053 0004 | S | .CONST 0x0053,0x0004
0110 005a 0005 | Z | .CONST 0x005a,0x0005
0112 ; --------------------------------------------------------------------------------------
0112 ; Debug3 Subtable 0x4
0112 ; --------------------------------------------------------------------------------------
0112 0001 0003 | | .DBG3TAB 0x0001,0x0003
0114 0063 ffff | c | .CONST 0x0063,0xffff
0116 0068 0001 | h | .CONST 0x0068,0x0001
0118 0076 0002 | v | .CONST 0x0076,0x0002
011a 007e 0003 | ~ | .CONST 0x007e,0x0003
011c ; --------------------------------------------------------------------------------------
011c ; Debug3 Subtable 0x5
011c ; --------------------------------------------------------------------------------------
011c 0002 0005 | | .DBG3TAB 0x0002,0x0005
011e 008b ffff | | .CONST 0x008b,0xffff
0120 008d fffe | | .CONST 0x008d,0xfffe
0122 008f 0001 | | .CONST 0x008f,0x0001
0124 0097 0002 | | .CONST 0x0097,0x0002
0126 0099 0003 | | .CONST 0x0099,0x0003
0128 009b 0004 | | .CONST 0x009b,0x0004
012a 00a2 0005 | | .CONST 0x00a2,0x0005
012c 0000 0000 | | .BLANK 0000[0xd4]