|
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: »994323.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »994323.SEG« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »994323.SEG« └─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288 └─ ⟦this⟧ »994323.SEG« └─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5 └─ ⟦this⟧ »994323.SEG« └─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000 └─ ⟦this⟧ »994323.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 001d | | .CONST 0x001d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b 4806 |H | Short_Literal 0x6 ; Debug Table 0x0 = .DEBUG 0x000b,0x00ca,0x8000,0x0000,0x0037,0x0694,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 6017 |` | Indirect_Literal Discrete,0x24,{0x000f2c13, 0x00000330} ; 0xf2c13 = ARRAY_QUEUE_MANAGER 000d 02a0 | | Declare_Subprogram Null_Subprogram 000e 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 000f e001 | | Load 0x0,0x1 0010 4801 |H | Short_Literal 0x1 0011 00da | | Load_Top At_Offset_2 0012 020e | | Execute Module,Augment_Imports 0013 0007 | | Action Break_Optional 0014 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1 = 0x14,0xfffe 0015 600a |` | Indirect_Literal Discrete,0x20,{0x000f2c13, 0x000002b0} ; 0xf2c13 = ARRAY_QUEUE_MANAGER 0016 02a0 | | Declare_Subprogram Null_Subprogram 0017 037e | ~ | Declare_Type Task,Defined,Visible 0018 036e | n | Declare_Variable Task,Visible 0019 00bf | | Action Accept_Activation 001a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1 = .DEBUG 0x001a,0x00d0,0x8000,0x0000,0x0037,0x14d4,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x1a,0xffff 001b 020d | | Execute Module,Elaborate 001c 0007 | | Action Break_Optional 001d BODY_0008: 001d 00be | | Action Activate_Tasks ; Debug Table 0x1.0x1 = 0x1d,0xfffe 001e 00bc | | Action Signal_Activated 001f 00bb | | Action Signal_Completion 0020 000f 2c13 | , | .LITERAL {0x000f2c13, 0x000002b0} 0024 000f 2c13 | , | .LITERAL {0x000f2c13, 0x00000330} 0028 002d 0004 | - | .XXX[0x3] 002a 000c | | 002b 00bf | | Action Accept_Activation ; Debug Table 0x2 = .DEBUG 0x002b,0x00d6,0x0000,0x0000,0x0037,0x0694,0x0000,0x0086 002c 00bc | | Action Signal_Activated ; Debug Table 0x3 = .DEBUG 0x002c,0x00d8,0x0000,0x0000,0x0037,0x14d4,0x0000,0x003e 002d 00bb | | Action Signal_Completion ; Debug Table 0x3.0x0 = 0x2d,0x1 002e 0000 0000 | | .XXX[0x5] 0030 005f 0004 | _ | 0032 001a | | 0033 6050 |`P | Indirect_Literal Discrete,0x84,{0x00000000, 0x00370694} ; Debug Table 0x4 = .DEBUG 0x0033,0x00dc,0x4000,0x0000,0x0037,0x0694,0x0000,0x0006 ; Debug Table 0x4.0x0 = 0x33,0xffff 0034 4818 |H | Short_Literal 0x18 0035 e20f | | Load 0x1,0xf 0036 e210 | | Load 0x1,0x10 0037 e20f | | Load 0x1,0xf 0038 025b | [ | Execute Discrete,Check_In_Type 0039 e211 | | Load 0x1,0x11 003a e212 | | Load 0x1,0x12 003b 00d8 | | Load_Top At_Offset_0 003c 0120 | | Execute Any,Is_Value 003d 7002 |p | Jump_Nonzero 0x40 003e 00d8 | | Load_Top At_Offset_0 003f 011e | | Execute Any,Convert 0040 e211 | | Load 0x1,0x11 0041 0119 | | Execute Any,Check_In_Formal_Type 0042 e001 | | Load 0x0,0x1 0043 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0044 0386 | | Declare_Variable Package,Visible 0045 00d8 | | Load_Top At_Offset_0 0046 020f | | Execute Module,Activate 0047 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0x47,0xfffe 0048 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0049 0129 | ) | Execute Any,Make_Visible 004a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0x4a,0xfffd 004b 1915 | | Execute Package,Field_Reference,Field_Number 0x15 004c 0129 | ) | Execute Any,Make_Visible 004d 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x3 = 0x4d,0xfffc 004e 1916 | | Execute Package,Field_Reference,Field_Number 0x16 004f 0129 | ) | Execute Any,Make_Visible 0050 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x4 = 0x50,0xfffb 0051 1917 | | Execute Package,Field_Reference,Field_Number 0x17 0052 0129 | ) | Execute Any,Make_Visible 0053 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x5 = 0x53,0xfffa 0055 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x6 = 0x55,0xfff9 0057 e213 | | Load 0x1,0x13 ; Debug Table 0x4.0x7 = 0x57,0xfff8 0058 191a | | Execute Package,Field_Reference,Field_Number 0x1a 0059 0129 | ) | Execute Any,Make_Visible 005a 00bf | | Action Accept_Activation 005b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x5 = .DEBUG 0x005b,0x00ee,0x4000,0x0000,0x0037,0x14d4,0x0000,0x0004 ; Debug Table 0x5.0x0 = 0x5b,0xffff 005c 00c7 | | Action Elaborate_Subprogram 005d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x5.0x1 = 0x5d,0xfffe 005e 00c7 | | Action Elaborate_Subprogram 005f 00bc | | Action Signal_Activated 0060 00bb | | Action Signal_Completion 0061 0000 0000 | | .BLANK 0000[0x7] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006b | k | .CONST 0x006b ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0001 | | .CONST 0x0001 ; Number of locals 006b BODY_0068: 006b INIT_0068: 006b 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x006b,0x00f4,0x1001,0x0000,0x0037,0x0694,0x0000,0x005f ; Debug Table 0x6.0x0 = 0x6b,0x1 006c 4800 |H | Short_Literal 0x0 006d e5ff | | Load 0x2,-0x1 006e e211 | | Load 0x1,0x11 006f 0119 | | Execute Any,Check_In_Formal_Type 0070 e213 | | Load 0x1,0x13 0071 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0072 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0073 0000 0000 | | .BLANK 0000[0x5] 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 00db | | Load_Top At_Offset_3 ; Debug Table 0x7 = .DEBUG 0x007b,0x00f8,0x1001,0x0000,0x0037,0x0694,0x0000,0x006b ; Debug Table 0x7.0x0 = 0x7b,0x1 007c 4801 |H | Short_Literal 0x1 007d e5ff | | Load 0x2,-0x1 007e e211 | | Load 0x1,0x11 007f 0119 | | Execute Any,Check_In_Formal_Type 0080 e213 | | Load 0x1,0x13 0081 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0082 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0083 0000 | | .XXX[0x1] 0084 0000 0000 | | .LITERAL {0x00000000, 0x00370694} 0088 ; -------------------------------------------------------------------------------------- 0088 ; Debug Table 0088 ; -------------------------------------------------------------------------------------- 0088 0003 0008 | | .CONST 0x0003,0x0008 008a 000b 00ca | | .DEBUG 0x000b,0x00ca,0x8000,0x0000,0x0037,0x0694,0x0000,0x0005 0092 001a 00d0 | | .DEBUG 0x001a,0x00d0,0x8000,0x0000,0x0037,0x14d4,0x0000,0x0003 009a 002b 00d6 | + | .DEBUG 0x002b,0x00d6,0x0000,0x0000,0x0037,0x0694,0x0000,0x0086 00a2 002c 00d8 | , | .DEBUG 0x002c,0x00d8,0x0000,0x0000,0x0037,0x14d4,0x0000,0x003e 00aa 0033 00dc | 3 | .DEBUG 0x0033,0x00dc,0x4000,0x0000,0x0037,0x0694,0x0000,0x0006 00b2 005b 00ee | [ | .DEBUG 0x005b,0x00ee,0x4000,0x0000,0x0037,0x14d4,0x0000,0x0004 00ba 006b 00f4 | k | .DEBUG 0x006b,0x00f4,0x1001,0x0000,0x0037,0x0694,0x0000,0x005f 00c2 007b 00f8 | { | .DEBUG 0x007b,0x00f8,0x1001,0x0000,0x0037,0x0694,0x0000,0x006b 00ca ; -------------------------------------------------------------------------------------- 00ca ; Debug3 Subtable 0x0 00ca ; -------------------------------------------------------------------------------------- 00ca 0002 0000 | | .DBG3TAB 0x0002,0x0000 00cc 000b ffff | | .CONST 0x000b,0xffff 00ce 0014 fffe | | .CONST 0x0014,0xfffe 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; Debug3 Subtable 0x1 00d0 ; -------------------------------------------------------------------------------------- 00d0 0002 0000 | | .DBG3TAB 0x0002,0x0000 00d2 001a ffff | | .CONST 0x001a,0xffff 00d4 001d fffe | | .CONST 0x001d,0xfffe 00d6 ; -------------------------------------------------------------------------------------- 00d6 ; Debug3 Subtable 0x2 00d6 ; -------------------------------------------------------------------------------------- 00d6 0000 0000 | | .DBG3TAB 0x0000,0x0000 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; Debug3 Subtable 0x3 00d8 ; -------------------------------------------------------------------------------------- 00d8 0000 0001 | | .DBG3TAB 0x0000,0x0001 00da 002d 0001 | - | .CONST 0x002d,0x0001 00dc ; -------------------------------------------------------------------------------------- 00dc ; Debug3 Subtable 0x4 00dc ; -------------------------------------------------------------------------------------- 00dc 0008 0000 | | .DBG3TAB 0x0008,0x0000 00de 0033 ffff | 3 | .CONST 0x0033,0xffff 00e0 0047 fffe | G | .CONST 0x0047,0xfffe 00e2 004a fffd | J | .CONST 0x004a,0xfffd 00e4 004d fffc | M | .CONST 0x004d,0xfffc 00e6 0050 fffb | P | .CONST 0x0050,0xfffb 00e8 0053 fffa | S | .CONST 0x0053,0xfffa 00ea 0055 fff9 | U | .CONST 0x0055,0xfff9 00ec 0057 fff8 | W | .CONST 0x0057,0xfff8 00ee ; -------------------------------------------------------------------------------------- 00ee ; Debug3 Subtable 0x5 00ee ; -------------------------------------------------------------------------------------- 00ee 0002 0000 | | .DBG3TAB 0x0002,0x0000 00f0 005b ffff | [ | .CONST 0x005b,0xffff 00f2 005d fffe | ] | .CONST 0x005d,0xfffe 00f4 ; -------------------------------------------------------------------------------------- 00f4 ; Debug3 Subtable 0x6 00f4 ; -------------------------------------------------------------------------------------- 00f4 0000 0001 | | .DBG3TAB 0x0000,0x0001 00f6 006b 0001 | k | .CONST 0x006b,0x0001 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; Debug3 Subtable 0x7 00f8 ; -------------------------------------------------------------------------------------- 00f8 0000 0001 | | .DBG3TAB 0x0000,0x0001 00fa 007b 0001 | { | .CONST 0x007b,0x0001 00fc 0000 0000 | | .BLANK 0000[0x104]