|
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: »1052691.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »1052691.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »1052691.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »1052691.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »1052691.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »1052691.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 0100 | | .CONST 0x0100 ; 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 0040 | @ | .CONST 0x0040 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0016 | | .CONST 0x0016 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x0142,0x8000,0x0000,0x0037,0x16d4,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 4803 |H | Short_Literal 0x3
000f 00e2 | | Load_Encached Integer_Cache
0010 03f9 | | Declare_Type Discrete,Constrained,Visible
0011 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0015 0129 | ) | Execute Any,Make_Visible
0016 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x16,0xfffa
0018 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x6 = 0x18,0xfff9
0019 4801 |H | Short_Literal 0x1
001a 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
001c 03fe | | Declare_Type Discrete,Defined,Visible
001d 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x7 = 0x1d,0xfff8
001e 4807 |H | Short_Literal 0x7
001f 00e2 | | Load_Encached Integer_Cache
0020 03f9 | | Declare_Type Discrete,Constrained,Visible
0021 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x8 = 0x21,0xfff7
0022 480f |H | Short_Literal 0xf
0023 029f 007b | {| Declare_Subprogram INIT_0078,For_Call
0025 03fe | | Declare_Type Discrete,Defined,Visible
0026 00da | | Load_Top At_Offset_2 ; Debug Table 0x0.0x9 = 0x26,0xfff6
0027 00e7 | | Load_Encached Duration_Cache
0028 00e7 | | Load_Encached Duration_Cache
0029 00e7 | | Load_Encached Duration_Cache
002a 00e4 | | Load_Encached Positive_Cache
002b e213 | | Load 0x1,0x13
002c 00e1 | | Load_Encached Boolean_Cache
002d e212 | | Load 0x1,0x12
002e e212 | | Load 0x1,0x12
002f 00e4 | | Load_Encached Positive_Cache
0030 02a0 | | Declare_Subprogram Null_Subprogram
0031 480a |H | Short_Literal 0xa
0032 032e | . | Declare_Type Record,Defined,Visible
0033 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x33,0xfff5
0035 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x35,0xfff4
0037 00bf | | Action Accept_Activation
0038 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1 = .DEBUG 0x0038,0x015c,0x8000,0x0000,0x0037,0x17d4,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x38,0xffff
0039 00c7 | | Action Elaborate_Subprogram
003a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x1 = 0x3a,0xfffe
003b 00c7 | | Action Elaborate_Subprogram
003c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x2 = 0x3c,0xfffd
003d 00c7 | | Action Elaborate_Subprogram
003e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x3 = 0x3e,0xfffc
003f 00c7 | | Action Elaborate_Subprogram
0040 BODY_0008:
0040 00bc | | Action Signal_Activated
0041 00bb | | Action Signal_Completion
0042 0000 0000 | | .BLANK 0000[0x6]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x004b,0x0166,0x0002,0x0000,0x0037,0x16d4,0x0000,0x001e
; Debug Table 0x2.0x0 = 0x4b,0x1
004c e002 | | Load 0x0,0x2
004d 180e | | Execute Package,Field_Execute,Field_Number 0xe
004e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
004f 0000 | | .XXX[0x1]
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 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3 = .DEBUG 0x0053,0x016a,0x0001,0x0000,0x0037,0x16d4,0x0000,0x002f
; Debug Table 0x3.0x0 = 0x53,0x1
0054 e5fe | | Load 0x2,-0x2
0055 e5ff | | Load 0x2,-0x1
0056 e002 | | Load 0x0,0x2
0057 180f | | Execute Package,Field_Execute,Field_Number 0xf
0058 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0059 0000 0000 | | .BLANK 0000[0x7]
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 4603 |F | Jump_Case 0x4 ; Debug Table 0x4 = .DEBUG 0x0063,0x016e,0x0005,0x0000,0x0037,0x16d4,0x0000,0x0049
0064 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0065 7802 |x | Jump 0x68 ; case 0x1
0066 7805 |x | Jump 0x6c ; case 0x2
0067 7809 |x | Jump 0x71 ; case 0x3
0068 00da | | Load_Top At_Offset_2
0069 0091 00a0 | | Action Push_String_Extended_Indexed,0xa0 ; "DCE"
006b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
006c 00db | | Load_Top At_Offset_3
006d 00db | | Load_Top At_Offset_3
006e 00e0 | | Load_Encached Standard_Cache
006f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0070 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0071 00da | | Load_Top At_Offset_2
0072 00e0 | | Load_Encached Standard_Cache
0073 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0074 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0075 0000 0000 | | .XXX[0x3]
0077 0000 | |
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 4603 |F | Jump_Case 0x4 ; Debug Table 0x5 = .DEBUG 0x007b,0x0170,0x0005,0x0000,0x0037,0x16d4,0x0000,0x0056
007c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
007d 7802 |x | Jump 0x80 ; case 0x1
007e 7805 |x | Jump 0x84 ; case 0x2
007f 7809 |x | Jump 0x89 ; case 0x3
0080 00da | | Load_Top At_Offset_2
0081 0091 00a2 | | Action Push_String_Extended_Indexed,0xa2 ; "BPS_800"
0083 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0084 00db | | Load_Top At_Offset_3
0085 00db | | Load_Top At_Offset_3
0086 00e0 | | Load_Encached Standard_Cache
0087 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0088 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0089 00da | | Load_Top At_Offset_2
008a 00e0 | | Load_Encached Standard_Cache
008b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
008c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
008d 0000 0000 | | .XXX[0x3]
008f 0000 | |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x0093,0x0172,0x0001,0x0000,0x0037,0x16d4,0x0000,0x00a0
; Debug Table 0x6.0x0 = 0x93,0x1
0094 00db | | Load_Top At_Offset_3
0095 e002 | | Load 0x0,0x2
0096 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0097 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00db | | Load_Top At_Offset_3 ; Debug Table 0x7 = .DEBUG 0x009b,0x0176,0x0001,0x0000,0x0037,0x16d4,0x0000,0x00b0
; Debug Table 0x7.0x0 = 0x9b,0x1
009c 00db | | Load_Top At_Offset_3
009d e002 | | Load 0x0,0x2
009e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
009f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00a0 ; --------------------------------------------------------------------------------------
00a0 ; STRING TABLE
00a0 ; --------------------------------------------------------------------------------------
00a0 0026 | & | .STRTAB 0x0026->0x00b3 ; "DCE"
00a1 0027 | ' | .STRTAB 0x0027->0x00b4 ; "DTE"
00a2 0028 | ( | .STRTAB 0x0028->0x00b6 ; "BPS_800"
00a3 002d | - | .STRTAB 0x002d->0x00b9 ; "BPS_1200"
00a4 0033 | 3 | .STRTAB 0x0033->0x00bd ; "BPS_1760"
00a5 0039 | 9 | .STRTAB 0x0039->0x00c1 ; "BPS_2150"
00a6 003f | ? | .STRTAB 0x003f->0x00c5 ; "BPS_2400"
00a7 0045 | E | .STRTAB 0x0045->0x00c9 ; "BPS_4800"
00a8 004b | K | .STRTAB 0x004b->0x00cd ; "BPS_9600"
00a9 0051 | Q | .STRTAB 0x0051->0x00d1 ; "BPS_19200"
00aa 0058 | X | .STRTAB 0x0058->0x00d6 ; "BPS_28800"
00ab 005f | _ | .STRTAB 0x005f->0x00da ; "BPS_32100"
00ac 0066 | f | .STRTAB 0x0066->0x00df ; "BPS_38400"
00ad 006d | m | .STRTAB 0x006d->0x00e3 ; "BPS_57600"
00ae 0074 | t | .STRTAB 0x0074->0x00e8 ; "BPS_76800"
00af 007b | { | .STRTAB 0x007b->0x00ec ; "BPS_115200"
00b0 0083 | | .STRTAB 0x0083->0x00f1 ; "BPS_153600"
00b1 008b | | .STRTAB 0x008b->0x00f6 ; "BPS_316000"
00b2 0093 | | .STREND 0x0093->0x00fb
00b3 4443 4544 |DCED| .STRTAB_STRINGS
00fc 0000 0000 | | .BLANK 0000[0x4]
0100 ; --------------------------------------------------------------------------------------
0100 ; Debug Table
0100 ; --------------------------------------------------------------------------------------
0100 0003 0008 | | .CONST 0x0003,0x0008
0102 000b 0142 | B| .DEBUG 0x000b,0x0142,0x8000,0x0000,0x0037,0x16d4,0x0000,0x0009
010a 0038 015c | 8 \| .DEBUG 0x0038,0x015c,0x8000,0x0000,0x0037,0x17d4,0x0000,0x0005
0112 004b 0166 | K f| .DEBUG 0x004b,0x0166,0x0002,0x0000,0x0037,0x16d4,0x0000,0x001e
011a 0053 016a | S j| .DEBUG 0x0053,0x016a,0x0001,0x0000,0x0037,0x16d4,0x0000,0x002f
0122 0063 016e | c n| .DEBUG 0x0063,0x016e,0x0005,0x0000,0x0037,0x16d4,0x0000,0x0049
012a 007b 0170 | { p| .DEBUG 0x007b,0x0170,0x0005,0x0000,0x0037,0x16d4,0x0000,0x0056
0132 0093 0172 | r| .DEBUG 0x0093,0x0172,0x0001,0x0000,0x0037,0x16d4,0x0000,0x00a0
013a 009b 0176 | v| .DEBUG 0x009b,0x0176,0x0001,0x0000,0x0037,0x16d4,0x0000,0x00b0
0142 ; --------------------------------------------------------------------------------------
0142 ; Debug3 Subtable 0x0
0142 ; --------------------------------------------------------------------------------------
0142 000c 0000 | | .DBG3TAB 0x000c,0x0000
0144 000b ffff | | .CONST 0x000b,0xffff
0146 000c fffe | | .CONST 0x000c,0xfffe
0148 000d fffd | | .CONST 0x000d,0xfffd
014a 0011 fffc | | .CONST 0x0011,0xfffc
014c 0013 fffb | | .CONST 0x0013,0xfffb
014e 0016 fffa | | .CONST 0x0016,0xfffa
0150 0018 fff9 | | .CONST 0x0018,0xfff9
0152 001d fff8 | | .CONST 0x001d,0xfff8
0154 0021 fff7 | ! | .CONST 0x0021,0xfff7
0156 0026 fff6 | & | .CONST 0x0026,0xfff6
0158 0033 fff5 | 3 | .CONST 0x0033,0xfff5
015a 0035 fff4 | 5 | .CONST 0x0035,0xfff4
015c ; --------------------------------------------------------------------------------------
015c ; Debug3 Subtable 0x1
015c ; --------------------------------------------------------------------------------------
015c 0004 0000 | | .DBG3TAB 0x0004,0x0000
015e 0038 ffff | 8 | .CONST 0x0038,0xffff
0160 003a fffe | : | .CONST 0x003a,0xfffe
0162 003c fffd | < | .CONST 0x003c,0xfffd
0164 003e fffc | > | .CONST 0x003e,0xfffc
0166 ; --------------------------------------------------------------------------------------
0166 ; Debug3 Subtable 0x2
0166 ; --------------------------------------------------------------------------------------
0166 0000 0001 | | .DBG3TAB 0x0000,0x0001
0168 004b 0001 | K | .CONST 0x004b,0x0001
016a ; --------------------------------------------------------------------------------------
016a ; Debug3 Subtable 0x3
016a ; --------------------------------------------------------------------------------------
016a 0000 0001 | | .DBG3TAB 0x0000,0x0001
016c 0053 0001 | S | .CONST 0x0053,0x0001
016e ; --------------------------------------------------------------------------------------
016e ; Debug3 Subtable 0x4
016e ; --------------------------------------------------------------------------------------
016e 0000 0000 | | .DBG3TAB 0x0000,0x0000
0170 ; --------------------------------------------------------------------------------------
0170 ; Debug3 Subtable 0x5
0170 ; --------------------------------------------------------------------------------------
0170 0000 0000 | | .DBG3TAB 0x0000,0x0000
0172 ; --------------------------------------------------------------------------------------
0172 ; Debug3 Subtable 0x6
0172 ; --------------------------------------------------------------------------------------
0172 0000 0001 | | .DBG3TAB 0x0000,0x0001
0174 0093 0001 | | .CONST 0x0093,0x0001
0176 ; --------------------------------------------------------------------------------------
0176 ; Debug3 Subtable 0x7
0176 ; --------------------------------------------------------------------------------------
0176 0000 0001 | | .DBG3TAB 0x0000,0x0001
0178 009b 0001 | | .CONST 0x009b,0x0001
017a 0000 0000 | | .BLANK 0000[0x86]