|
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: 580c_R1K_CODE Names: »2203656.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »2203656.SEG« └─ ⟦this⟧ »2203656.SEG« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »2203656.SEG« └─ ⟦this⟧ »2203656.SEG« └─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288 └─ ⟦this⟧ »2203656.SEG« └─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5 └─ ⟦this⟧ »2203656.SEG« └─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000 └─ ⟦this⟧ »2203656.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code 0001 580c |X | .CONST 0x580c ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00a0 | | .CONST 0x00a0 ; 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 001f | | .CONST 0x001f ; 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,0x00d2,0x8000,0x0000,0x000d,0xfa94,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd 000f 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc 0011 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb 0013 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa 0015 00bf | | Action Accept_Activation 0016 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0016,0x00e0,0x8000,0x0000,0x0012,0x2704,0x0000,0x000d ; Debug Table 0x1.0x0 = 0x16,0xffff 0017 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1 = 0x17,0xfffe 0018 00c7 | | Action Elaborate_Subprogram 0019 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x19,0xfffd 001a 00c7 | | Action Elaborate_Subprogram 001b 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x3 = 0x1b,0xfffc 001c 00c7 | | Action Elaborate_Subprogram 001d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x4 = 0x1d,0xfffb 001e 00c7 | | Action Elaborate_Subprogram 001f BODY_0008: 001f 00bc | | Action Signal_Activated 0020 00bb | | Action Signal_Completion 0021 0000 0000 | | .BLANK 0000[0x7] 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 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x002b,0x00ec,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0015 ; Debug Table 0x2.0x0 = 0x2b,0x1 002c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 002d 00ca | | Action Exit_Nullary_Function 002e 0000 0000 | | .XXX[0x2] 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 e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x0033,0x00f0,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001a ; Debug Table 0x3.0x0 = 0x33,0x1 0034 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0035 00ca | | Action Exit_Nullary_Function 0036 0000 0000 | | .XXX[0x2] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 004b | K | .CONST 0x004b ; Address of begin 0039 008f | | .CONST 0x008f ; Address of exception handler 003a 0008 | | .CONST 0x0008 ; Number of locals 003b INIT_0038: 003b e002 | | Load 0x0,0x2 ; Debug Table 0x4 = .DEBUG 0x003b,0x00f4,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001f ; Debug Table 0x4.0x0 = 0x3b,0xffff 003c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 003e e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x1 = 0x3e,0xfffe 003f 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0040 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x2 = 0x40,0xfffd 0041 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0042 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x4.0x3 = 0x42,0xfffc 0043 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x4 = 0x43,0xfffb 0044 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0045 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x5 = 0x45,0xfffa 0046 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x6 = 0x46,0xfff9 0047 1b5a | Z | Execute Package,Field_Read,Field_Number 0x5a 0048 0322 | " | Declare_Variable Record 0049 0007 | | Action Break_Optional ; Debug Table 0x4.0x7 = 0x49,0xfff8 004a 0007 | | Action Break_Optional ; Debug Table 0x4.0x8 = 0x4a,0xfff7 004b BODY_0038: 004b 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x9 = 0x4b,0x1 004c a407 | | Store_Unchecked 0x2,0x7 004d 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xa = 0x4d,0x2 004e e002 | | Load 0x0,0x2 004f 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0050 e002 | | Load 0x0,0x2 0051 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0052 a403 | | Store_Unchecked 0x2,0x3 0053 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xb = 0x53,0x3 0054 e403 | | Load 0x2,0x3 0055 e002 | | Load 0x0,0x2 0056 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0057 a404 | | Store_Unchecked 0x2,0x4 0058 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0xc = 0x58,0x4 0059 e002 | | Load 0x0,0x2 005a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 005b a406 | | Store_Unchecked 0x2,0x6 005c 4fff |O | Short_Literal -0x1 ; Debug Table 0x4.0xd = 0x5c,0x5 005d a405 | | Store_Unchecked 0x2,0x5 005e 0007 | | Action Break_Optional ; Debug Table 0x4.0xe = 0x5e,0x6 005f e405 | | Load 0x2,0x5 ; Debug Table 0x4.0xf = 0x5f,0x7 0060 e406 | | Load 0x2,0x6 0061 0275 | u | Execute Discrete,Unary_Minus 0062 027a | z | Execute Discrete,Less_Equal 0063 7025 |p% | Jump_Nonzero 0x89 0064 e406 | | Load 0x2,0x6 ; Debug Table 0x4.0x10 = 0x64,0x8 0065 e405 | | Load 0x2,0x5 0066 0273 | s | Execute Discrete,Plus 0067 e002 | | Load 0x0,0x2 0068 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0069 025b | [ | Execute Discrete,Check_In_Type 006a e403 | | Load 0x2,0x3 006b e002 | | Load 0x0,0x2 006c 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 006d e408 | | Load 0x2,0x8 006e 017d | } | Execute Record,Structure_Write 006f e408 | | Load 0x2,0x8 ; Debug Table 0x4.0x11 = 0x6f,0x9 0070 e002 | | Load 0x0,0x2 0071 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 0072 0b7e | ~ | Execute_Immediate Case_Compare,0x7e 0073 7005 |p | Jump_Nonzero 0x79 0074 e405 | | Load 0x2,0x5 ; Debug Table 0x4.0x12 = 0x74,0xd 0075 0aff | | Execute_Immediate Plus,-0x1 0076 0248 | H | Execute Discrete,Check_In_Integer 0077 a405 | | Store_Unchecked 0x2,0x5 0078 780e |x | Jump 0x87 0079 0007 | | Action Break_Optional ; Debug Table 0x4.0x13 = 0x79,0xa 007a e405 | | Load 0x2,0x5 ; Debug Table 0x4.0x14 = 0x7a,0x401 007b 0007 | | Action Break_Optional 007c 4802 |H | Short_Literal 0x2 ; Debug Table 0x4.0x15 = 0x7c,0x402 007d 0007 | | Action Break_Optional 007e 009c | | Action Load_Dynamic ; Debug Table 0x4.0x16 = 0x7e,0x403 007f 0007 | | Action Break_Optional 0080 0106 | | Execute Exception,Address ; Debug Table 0x4.0x17 = 0x80,0x404 0081 0007 | | Action Break_Optional 0082 c402 | | Store 0x2,0x2 ; Debug Table 0x4.0x18 = 0x82,0x405 0083 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x19 = 0x83,0xb 0084 a407 | | Store_Unchecked 0x2,0x7 0085 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x4.0x1a = 0x85,0xc 0086 7802 |x | Jump 0x89 0087 00d1 | | Pop_Control Pop_Count_1 0088 7fd6 | | Jump 0x5f 0089 e407 | | Load 0x2,0x7 ; Debug Table 0x4.0x1b = 0x89,0xe 008a 6802 |h | Jump_Zero 0x8d 008b e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x1c = 0x8b,0xf 008c 00ca | | Action Exit_Nullary_Function 008d 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1d = 0x8d,0x10 008e 00ca | | Action Exit_Nullary_Function 008f TRAP_0038: 008f 0007 | | Action Break_Optional 0090 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1e = 0x90,0x11 0091 00ca | | Action Exit_Nullary_Function 0092 0000 0000 | | .BLANK 0000[0x6] 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 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5 = .DEBUG 0x009b,0x0134,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0026 ; Debug Table 0x5.0x0 = 0x9b,0x1 009c e001 | | Load 0x0,0x1 009d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 009e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009f 0000 | | .XXX[0x1] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; Debug Table 00a0 ; -------------------------------------------------------------------------------------- 00a0 0003 0006 | | .CONST 0x0003,0x0006 00a2 000b 00d2 | | .DEBUG 0x000b,0x00d2,0x8000,0x0000,0x000d,0xfa94,0x0000,0x0007 00aa 0016 00e0 | | .DEBUG 0x0016,0x00e0,0x8000,0x0000,0x0012,0x2704,0x0000,0x000d 00b2 002b 00ec | + | .DEBUG 0x002b,0x00ec,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0015 00ba 0033 00f0 | 3 | .DEBUG 0x0033,0x00f0,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001a 00c2 003b 00f4 | ; | .DEBUG 0x003b,0x00f4,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001f 00ca 009b 0134 | 4| .DEBUG 0x009b,0x0134,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0026 00d2 ; -------------------------------------------------------------------------------------- 00d2 ; Debug3 Subtable 0x0 00d2 ; -------------------------------------------------------------------------------------- 00d2 0006 0000 | | .DBG3TAB 0x0006,0x0000 00d4 000b ffff | | .CONST 0x000b,0xffff 00d6 000c fffe | | .CONST 0x000c,0xfffe 00d8 000d fffd | | .CONST 0x000d,0xfffd 00da 000f fffc | | .CONST 0x000f,0xfffc 00dc 0011 fffb | | .CONST 0x0011,0xfffb 00de 0013 fffa | | .CONST 0x0013,0xfffa 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug3 Subtable 0x1 00e0 ; -------------------------------------------------------------------------------------- 00e0 0005 0000 | | .DBG3TAB 0x0005,0x0000 00e2 0016 ffff | | .CONST 0x0016,0xffff 00e4 0017 fffe | | .CONST 0x0017,0xfffe 00e6 0019 fffd | | .CONST 0x0019,0xfffd 00e8 001b fffc | | .CONST 0x001b,0xfffc 00ea 001d fffb | | .CONST 0x001d,0xfffb 00ec ; -------------------------------------------------------------------------------------- 00ec ; Debug3 Subtable 0x2 00ec ; -------------------------------------------------------------------------------------- 00ec 0000 0001 | | .DBG3TAB 0x0000,0x0001 00ee 002b 0001 | + | .CONST 0x002b,0x0001 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; Debug3 Subtable 0x3 00f0 ; -------------------------------------------------------------------------------------- 00f0 0000 0001 | | .DBG3TAB 0x0000,0x0001 00f2 0033 0001 | 3 | .CONST 0x0033,0x0001 00f4 ; -------------------------------------------------------------------------------------- 00f4 ; Debug3 Subtable 0x4 00f4 ; -------------------------------------------------------------------------------------- 00f4 0009 0016 | | .DBG3TAB 0x0009,0x0016 00f6 003b ffff | ; | .CONST 0x003b,0xffff 00f8 003e fffe | > | .CONST 0x003e,0xfffe 00fa 0040 fffd | @ | .CONST 0x0040,0xfffd 00fc 0042 fffc | B | .CONST 0x0042,0xfffc 00fe 0043 fffb | C | .CONST 0x0043,0xfffb 0100 0045 fffa | E | .CONST 0x0045,0xfffa 0102 0046 fff9 | F | .CONST 0x0046,0xfff9 0104 0049 fff8 | I | .CONST 0x0049,0xfff8 0106 004a fff7 | J | .CONST 0x004a,0xfff7 0108 004b 0001 | K | .CONST 0x004b,0x0001 010a 004d 0002 | M | .CONST 0x004d,0x0002 010c 0053 0003 | S | .CONST 0x0053,0x0003 010e 0058 0004 | X | .CONST 0x0058,0x0004 0110 005c 0005 | \ | .CONST 0x005c,0x0005 0112 005e 0006 | ^ | .CONST 0x005e,0x0006 0114 005f 0007 | _ | .CONST 0x005f,0x0007 0116 0064 0008 | d | .CONST 0x0064,0x0008 0118 006f 0009 | o | .CONST 0x006f,0x0009 011a 0074 000d | t | .CONST 0x0074,0x000d 011c 0079 000a | y | .CONST 0x0079,0x000a 011e 007a 0401 | z | .CONST 0x007a,0x0401 0120 007c 0402 | | | .CONST 0x007c,0x0402 0122 007e 0403 | ~ | .CONST 0x007e,0x0403 0124 0080 0404 | | .CONST 0x0080,0x0404 0126 0082 0405 | | .CONST 0x0082,0x0405 0128 0083 000b | | .CONST 0x0083,0x000b 012a 0085 000c | | .CONST 0x0085,0x000c 012c 0089 000e | | .CONST 0x0089,0x000e 012e 008b 000f | | .CONST 0x008b,0x000f 0130 008d 0010 | | .CONST 0x008d,0x0010 0132 0090 0011 | | .CONST 0x0090,0x0011 0134 ; -------------------------------------------------------------------------------------- 0134 ; Debug3 Subtable 0x5 0134 ; -------------------------------------------------------------------------------------- 0134 0000 0001 | | .DBG3TAB 0x0000,0x0001 0136 009b 0001 | | .CONST 0x009b,0x0001 0138 0000 0000 | | .BLANK 0000[0xc8]