|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Types: SEG
Notes: 5811_R1K_CODE
Names: »1009683.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »1009683.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »1009683.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »1009683.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »1009683.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »1009683.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0088 | | .CONST 0x0088 ; 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 0100 | | .CONST 0x0100 ; 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 000d | | .CONST 0x000d ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x00ca,0x8000,0x0000,0x0037,0x0994,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 600d |` | Indirect_Literal Discrete,0x1c,{0x000f6813, 0x00000230} ; 0xf6813 = BARRIER_MANAGER
000f 02a0 | | Declare_Subprogram Null_Subprogram
0010 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0011 00bf | | Action Accept_Activation
0012 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0012,0x00d2,0x8000,0x0000,0x0037,0x0bf4,0x0000,0x0003
; Debug Table 0x1.0x0 = 0x12,0xffff
0013 4801 |H | Short_Literal 0x1
0014 00da | | Load_Top At_Offset_2
0015 020e | | Execute Module,Augment_Imports
0016 00d8 | | Load_Top At_Offset_0
0017 020d | | Execute Module,Elaborate
0018 BODY_0008:
0018 00bc | | Action Signal_Activated
0019 00bb | | Action Signal_Completion
001a 0000 0000 | | .XXX[0x2]
001c 000f 6813 | h | .LITERAL {0x000f6813, 0x00000230}
0020 003e 0004 | > | .XXX[0x3]
0022 0014 | |
0023 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2 = .DEBUG 0x0023,0x00d6,0x4000,0x0000,0x0037,0x0994,0x0000,0x000d
; Debug Table 0x2.0x0 = 0x23,0xffff
0025 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2.0x1 = 0x25,0xfffe
0027 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2.0x2 = 0x27,0xfffd
0029 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x2.0x3 = 0x29,0xfffc
002b 00bf | | Action Accept_Activation
002c e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x002c,0x00e0,0x4000,0x0000,0x0037,0x0bf4,0x0000,0x0006
; Debug Table 0x3.0x0 = 0x2c,0xffff
002d 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
002e 0322 | " | Declare_Variable Record
002f 4800 |H | Short_Literal 0x0
0030 00d9 | | Load_Top At_Offset_1
0031 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0032 e001 | | Load 0x0,0x1
0033 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0034 00d9 | | Load_Top At_Offset_1
0035 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0036 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x3.0x1 = 0x36,0xfffe
0037 00c7 | | Action Elaborate_Subprogram
0038 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x3.0x2 = 0x38,0xfffd
0039 00c7 | | Action Elaborate_Subprogram
003a 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x3.0x3 = 0x3a,0xfffc
003b 00c7 | | Action Elaborate_Subprogram
003c 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x3.0x4 = 0x3c,0xfffb
003d 00c7 | | Action Elaborate_Subprogram
003e 00bc | | Action Signal_Activated
003f 00bb | | Action Signal_Completion
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x0043,0x00ec,0x1001,0x0000,0x0037,0x0994,0x0000,0x0014
; Debug Table 0x4.0x0 = 0x43,0x1
0044 e214 | | Load 0x1,0x14
0045 017d | } | Execute Record,Structure_Write
0046 820f | | Call 0x1,0xf ; Debug Table 0x4.0x1 = 0x46,0x2
0047 e214 | | Load 0x1,0x14 ; Debug Table 0x4.0x2 = 0x47,0x3
0048 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0049 7002 |p | Jump_Nonzero 0x4c
004a 4887 |H | Short_Literal 0x87
004b 0257 | W | Execute Discrete,Raise
004c 6033 |`3 | Indirect_Literal Discrete,0x80,{0x00000000, 0x37099401} ; Debug Table 0x4.0x3 = 0x4c,0x4
004d 0257 | W | Execute Discrete,Raise
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 e214 | | Load 0x1,0x14 ; Debug Table 0x5 = .DEBUG 0x0053,0x00f6,0x1002,0x0000,0x0037,0x0994,0x0000,0x001e
; Debug Table 0x5.0x0 = 0x53,0x1
0054 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0055 7002 |p | Jump_Nonzero 0x58
0056 4887 |H | Short_Literal 0x87
0057 0257 | W | Execute Discrete,Raise
0058 e214 | | Load 0x1,0x14 ; Debug Table 0x5.0x1 = 0x58,0x2
0059 0320 | | Declare_Variable Record,Duplicate
005a 00ca | | Action Exit_Nullary_Function
005b 0000 0000 | | .BLANK 0000[0x5]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x0063,0x00fc,0x1001,0x0000,0x0037,0x0994,0x0000,0x0025
; Debug Table 0x6.0x0 = 0x63,0x1
0064 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0065 0322 | " | Declare_Variable Record
0066 4807 |H | Short_Literal 0x7
0067 00d9 | | Load_Top At_Offset_1
0068 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0069 00db | | Load_Top At_Offset_3
006a 00d9 | | Load_Top At_Offset_1
006b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
006c 8210 | | Call 0x1,0x10
006d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
006e 0000 0000 | | .XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 e001 | | Load 0x0,0x1 ; Debug Table 0x7 = .DEBUG 0x0073,0x0100,0x1001,0x0000,0x0037,0x0994,0x0000,0x002f
; Debug Table 0x7.0x0 = 0x73,0x1
0074 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0075 0322 | " | Declare_Variable Record
0076 4809 |H | Short_Literal 0x9
0077 00d9 | | Load_Top At_Offset_1
0078 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0079 00db | | Load_Top At_Offset_3
007a 00d9 | | Load_Top At_Offset_1
007b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
007c 8210 | | Call 0x1,0x10
007d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
007e 0000 0000 | | .XXX[0x2]
0080 0000 0000 | | .LITERAL {0x00000000, 0x37099401}
0084 0000 0000 | | .BLANK 0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0003 0008 | | .CONST 0x0003,0x0008
008a 000b 00ca | | .DEBUG 0x000b,0x00ca,0x8000,0x0000,0x0037,0x0994,0x0000,0x0005
0092 0012 00d2 | | .DEBUG 0x0012,0x00d2,0x8000,0x0000,0x0037,0x0bf4,0x0000,0x0003
009a 0023 00d6 | # | .DEBUG 0x0023,0x00d6,0x4000,0x0000,0x0037,0x0994,0x0000,0x000d
00a2 002c 00e0 | , | .DEBUG 0x002c,0x00e0,0x4000,0x0000,0x0037,0x0bf4,0x0000,0x0006
00aa 0043 00ec | C | .DEBUG 0x0043,0x00ec,0x1001,0x0000,0x0037,0x0994,0x0000,0x0014
00b2 0053 00f6 | S | .DEBUG 0x0053,0x00f6,0x1002,0x0000,0x0037,0x0994,0x0000,0x001e
00ba 0063 00fc | c | .DEBUG 0x0063,0x00fc,0x1001,0x0000,0x0037,0x0994,0x0000,0x0025
00c2 0073 0100 | s | .DEBUG 0x0073,0x0100,0x1001,0x0000,0x0037,0x0994,0x0000,0x002f
00ca ; --------------------------------------------------------------------------------------
00ca ; Debug3 Subtable 0x0
00ca ; --------------------------------------------------------------------------------------
00ca 0003 0000 | | .DBG3TAB 0x0003,0x0000
00cc 000b ffff | | .CONST 0x000b,0xffff
00ce 000c fffe | | .CONST 0x000c,0xfffe
00d0 000d fffd | | .CONST 0x000d,0xfffd
00d2 ; --------------------------------------------------------------------------------------
00d2 ; Debug3 Subtable 0x1
00d2 ; --------------------------------------------------------------------------------------
00d2 0001 0000 | | .DBG3TAB 0x0001,0x0000
00d4 0012 ffff | | .CONST 0x0012,0xffff
00d6 ; --------------------------------------------------------------------------------------
00d6 ; Debug3 Subtable 0x2
00d6 ; --------------------------------------------------------------------------------------
00d6 0004 0000 | | .DBG3TAB 0x0004,0x0000
00d8 0023 ffff | # | .CONST 0x0023,0xffff
00da 0025 fffe | % | .CONST 0x0025,0xfffe
00dc 0027 fffd | ' | .CONST 0x0027,0xfffd
00de 0029 fffc | ) | .CONST 0x0029,0xfffc
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug3 Subtable 0x3
00e0 ; --------------------------------------------------------------------------------------
00e0 0005 0000 | | .DBG3TAB 0x0005,0x0000
00e2 002c ffff | , | .CONST 0x002c,0xffff
00e4 0036 fffe | 6 | .CONST 0x0036,0xfffe
00e6 0038 fffd | 8 | .CONST 0x0038,0xfffd
00e8 003a fffc | : | .CONST 0x003a,0xfffc
00ea 003c fffb | < | .CONST 0x003c,0xfffb
00ec ; --------------------------------------------------------------------------------------
00ec ; Debug3 Subtable 0x4
00ec ; --------------------------------------------------------------------------------------
00ec 0000 0004 | | .DBG3TAB 0x0000,0x0004
00ee 0043 0001 | C | .CONST 0x0043,0x0001
00f0 0046 0002 | F | .CONST 0x0046,0x0002
00f2 0047 0003 | G | .CONST 0x0047,0x0003
00f4 004c 0004 | L | .CONST 0x004c,0x0004
00f6 ; --------------------------------------------------------------------------------------
00f6 ; Debug3 Subtable 0x5
00f6 ; --------------------------------------------------------------------------------------
00f6 0000 0002 | | .DBG3TAB 0x0000,0x0002
00f8 0053 0001 | S | .CONST 0x0053,0x0001
00fa 0058 0002 | X | .CONST 0x0058,0x0002
00fc ; --------------------------------------------------------------------------------------
00fc ; Debug3 Subtable 0x6
00fc ; --------------------------------------------------------------------------------------
00fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
00fe 0063 0001 | c | .CONST 0x0063,0x0001
0100 ; --------------------------------------------------------------------------------------
0100 ; Debug3 Subtable 0x7
0100 ; --------------------------------------------------------------------------------------
0100 0000 0001 | | .DBG3TAB 0x0000,0x0001
0102 0073 0001 | s | .CONST 0x0073,0x0001
0104 0000 0000 | | .BLANK 0000[0xfc]