|
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: »9235.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »9235.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »9235.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »9235.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »9235.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »9235.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 00d8 | | .CONST 0x00d8 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x00f2,0x8000,0x0000,0x0035,0xd824,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd 000e 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0xe,0xfffc 000f 4bff |K | Short_Literal 0x3ff 0010 00e3 | | Load_Encached Natural_Cache 0011 03f9 | | Declare_Type Discrete,Constrained,Visible 0012 0007 | | Action Break_Optional ; Debug Table 0x0.0x4 = 0x12,0xfffb 0013 0007 | | Action Break_Optional ; Debug Table 0x0.0x5 = 0x13,0xfffa 0014 4816 |H | Short_Literal 0x16 ; Debug Table 0x0.0x6 = 0x14,0xfff9 0015 4817 |H | Short_Literal 0x17 0016 00da | | Load_Top At_Offset_2 0017 03f9 | | Declare_Type Discrete,Constrained,Visible 0018 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x7 = 0x18,0xfff8 0019 4807 |H | Short_Literal 0x7 001a 029f 002b | +| Declare_Subprogram INIT_0028,For_Call 001c 03fe | | Declare_Type Discrete,Defined,Visible 001d 0007 | | Action Break_Optional ; Debug Table 0x0.0x8 = 0x1d,0xfff7 001e 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x9 = 0x1e,0xfff6 001f 480c |H | Short_Literal 0xc 0020 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call 0022 03fe | | Declare_Type Discrete,Defined,Visible 0023 00bf | | Action Accept_Activation ; Debug Table 0x0.0xa = 0x23,0xfff5 0024 BODY_0008: 0024 00bc | | Action Signal_Activated 0025 00bb | | Action Signal_Completion 0026 0000 0000 | | .XXX[0x2] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 002b | + | .CONST 0x002b ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0001 | | .CONST 0x0001 ; Number of locals 002b BODY_0028: 002b INIT_0028: 002b 4603 |F | Jump_Case 0x4 ; Debug Table 0x1 = .DEBUG 0x002b,0x010a,0x0005,0x0000,0x0035,0xd824,0x0000,0x0041 002c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 002d 7802 |x | Jump 0x30 ; case 0x1 002e 7805 |x | Jump 0x34 ; case 0x2 002f 7809 |x | Jump 0x39 ; case 0x3 0030 00da | | Load_Top At_Offset_2 0031 0091 0055 | U| Action Push_String_Extended_Indexed,0x55 ; "BAUD_300" 0033 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0034 00db | | Load_Top At_Offset_3 0035 00db | | Load_Top At_Offset_3 0036 00e0 | | Load_Encached Standard_Cache 0037 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0038 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0039 00da | | Load_Top At_Offset_2 003a 00e0 | | Load_Encached Standard_Cache 003b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 003c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 003d 0000 0000 | | .XXX[0x3] 003f 0000 | | 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 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x0043,0x010c,0x0005,0x0000,0x0035,0xd824,0x0000,0x005b 0044 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0045 7802 |x | Jump 0x48 ; case 0x1 0046 7805 |x | Jump 0x4c ; case 0x2 0047 7809 |x | Jump 0x51 ; case 0x3 0048 00da | | Load_Top At_Offset_2 0049 0091 005d | ]| Action Push_String_Extended_Indexed,0x5d ; "BYTES" 004b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 004c 00db | | Load_Top At_Offset_3 004d 00db | | Load_Top At_Offset_3 004e 00e0 | | Load_Encached Standard_Cache 004f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0050 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0051 00da | | Load_Top At_Offset_2 0052 00e0 | | Load_Encached Standard_Cache 0053 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0054 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0055 ; -------------------------------------------------------------------------------------- 0055 ; STRING TABLE 0055 ; -------------------------------------------------------------------------------------- 0055 002c | , | .STRTAB 0x002c->0x006b ; "BAUD_300" 0056 0032 | 2 | .STRTAB 0x0032->0x006f ; "BAUD_600" 0057 0038 | 8 | .STRTAB 0x0038->0x0073 ; "BAUD_1200" 0058 003f | ? | .STRTAB 0x003f->0x0077 ; "BAUD_2400" 0059 0046 | F | .STRTAB 0x0046->0x007c ; "BAUD_4800" 005a 004d | M | .STRTAB 0x004d->0x0080 ; "BAUD_9600" 005b 0054 | T | .STRTAB 0x0054->0x0085 ; "BAUD_19200" 005c 005c | \ | .STRTAB 0x005c->0x008a ; "EXT_REC_CLK" 005d 0065 | e | .STRTAB 0x0065->0x008f ; "BYTES" 005e 0068 | h | .STRTAB 0x0068->0x0092 ; "BREAK" 005f 006b | k | .STRTAB 0x006b->0x0094 ; "PARITY_ERROR" 0060 0075 | u | .STRTAB 0x0075->0x009a ; "OVERRUN" 0061 007a | z | .STRTAB 0x007a->0x009e ; "DISCONNECT" 0062 0082 | | .STRTAB 0x0082->0x00a3 ; "CONNECT" 0063 0087 | | .STRTAB 0x0087->0x00a6 ; "ALREADY_CONNECTED" 0064 0096 | | .STRTAB 0x0096->0x00af ; "INVALID_CONNECT" 0065 00a3 | | .STRTAB 0x00a3->0x00b6 ; "NO_DIAL_TONE" 0066 00ad | | .STRTAB 0x00ad->0x00bc ; "BUSY" 0067 00af | | .STRTAB 0x00af->0x00be ; "NO_ANSWER" 0068 00b6 | | .STRTAB 0x00b6->0x00c3 ; "OUTPUT_BUSY" 0069 00bf | | .STRTAB 0x00bf->0x00c8 ; "TRANSMISSION_COMPLETE" 006a 00d2 | | .STREND 0x00d2->0x00d3 006b 4241 5544 |BAUD| .STRTAB_STRINGS 00d3 0000 0000 | | .BLANK 0000[0x5] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; Debug Table 00d8 ; -------------------------------------------------------------------------------------- 00d8 0003 0003 | | .CONST 0x0003,0x0003 00da 000b 00f2 | | .DEBUG 0x000b,0x00f2,0x8000,0x0000,0x0035,0xd824,0x0000,0x0005 00e2 002b 010a | + | .DEBUG 0x002b,0x010a,0x0005,0x0000,0x0035,0xd824,0x0000,0x0041 00ea 0043 010c | C | .DEBUG 0x0043,0x010c,0x0005,0x0000,0x0035,0xd824,0x0000,0x005b 00f2 ; -------------------------------------------------------------------------------------- 00f2 ; Debug3 Subtable 0x0 00f2 ; -------------------------------------------------------------------------------------- 00f2 000b 0000 | | .DBG3TAB 0x000b,0x0000 00f4 000b ffff | | .CONST 0x000b,0xffff 00f6 000c fffe | | .CONST 0x000c,0xfffe 00f8 000d fffd | | .CONST 0x000d,0xfffd 00fa 000e fffc | | .CONST 0x000e,0xfffc 00fc 0012 fffb | | .CONST 0x0012,0xfffb 00fe 0013 fffa | | .CONST 0x0013,0xfffa 0100 0014 fff9 | | .CONST 0x0014,0xfff9 0102 0018 fff8 | | .CONST 0x0018,0xfff8 0104 001d fff7 | | .CONST 0x001d,0xfff7 0106 001e fff6 | | .CONST 0x001e,0xfff6 0108 0023 fff5 | # | .CONST 0x0023,0xfff5 010a ; -------------------------------------------------------------------------------------- 010a ; Debug3 Subtable 0x1 010a ; -------------------------------------------------------------------------------------- 010a 0000 0000 | | .DBG3TAB 0x0000,0x0000 010c ; -------------------------------------------------------------------------------------- 010c ; Debug3 Subtable 0x2 010c ; -------------------------------------------------------------------------------------- 010c 0000 0000 | | .DBG3TAB 0x0000,0x0000 010e 0000 0000 | | .BLANK 0000[0xf2]