|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00c0 | | .CONST 0x00c0 ; 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 0000 | | .CONST 0x0000 ; 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 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x00f2,0x8000,0x0000,0x0057,0x50d5,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xe,0xfffe
0010 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x10,0xfffd
0012 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x12,0xfffc
0014 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x14,0xfffb
; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 00bf | | Action Accept_Activation ; Debug Table 0x0.0x6 = 0x16,0xfff9
; Debug Table 0x0.0x7 = 0x16,0xfff8
0017 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1 = .DEBUG 0x0017,0x0104,0x8000,0x0000,0x0057,0x5155,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x17,0xffff
; Debug Table 0x1.0x1 = 0x17,0xfffe
; Debug Table 0x1.0x2 = 0x17,0xfffd
0018 00c7 | | Action Elaborate_Subprogram
0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x3 = 0x19,0xfffc
001a 00c7 | | Action Elaborate_Subprogram
001b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x4 = 0x1b,0xfffb
001c 00c7 | | Action Elaborate_Subprogram
001d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x5 = 0x1d,0xfffa
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 4805 |H | Short_Literal 0x5 ; Debug Table 0x2 = .DEBUG 0x002b,0x0112,0x0001,0x0000,0x0057,0x50d5,0x0000,0x000a
; Debug Table 0x2.0x0 = 0x2b,0x1
002c e001 | | Load 0x0,0x1
002d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
002e 00db | | Load_Top At_Offset_3
002f 017d | } | Execute Record,Structure_Write
0030 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0031 0000 0000 | | .BLANK 0000[0x7]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003d | = | .CONST 0x003d ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0002 | | .CONST 0x0002 ; Number of locals
003b INIT_0038:
003b e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x003b,0x0116,0x0001,0x0000,0x0057,0x50d5,0x0000,0x0012
; Debug Table 0x3.0x0 = 0x3b,0xffff
003c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
003d BODY_0038:
003d e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x1 = 0x3d,0x1
003e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
003f e5ff | | Load 0x2,-0x1
0040 e001 | | Load 0x0,0x1
0041 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0042 00d1 | | Pop_Control Pop_Count_1
0043 0059 | Y | Store_Top Discrete,At_Offset_1
0044 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x44,0x2
0045 7001 |p | Jump_Nonzero 0x47
0046 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x3.0x3 = 0x46,0x3
0047 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x4 = 0x47,0x4
0048 0f02 | | Execute_Immediate Equal,0x2
0049 681b |h | Jump_Zero 0x65
004a 0092 0094 | | Action Push_String_Extended,0x94 ; "Probable semaphore deadlock: "
; Debug Table 0x3.0x5 = 0x4a,0x5
004c e5ff | | Load 0x2,-0x1
004d e001 | | Load 0x0,0x1
004e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
004f 01cc | | Execute Vector,Catenate
0050 e002 | | Load 0x0,0x2
0051 180f | | Execute Package,Field_Execute,Field_Number 0xf
0052 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x6 = 0x52,0x6
0053 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0054 e5ff | | Load 0x2,-0x1
0055 480f |H | Short_Literal 0xf
0056 e001 | | Load 0x0,0x1
0057 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0058 00d1 | | Pop_Control Pop_Count_1
0059 0059 | Y | Store_Top Discrete,At_Offset_1
005a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x7 = 0x5a,0x7
005b 7009 |p | Jump_Nonzero 0x65
005c 0092 0095 | | Action Push_String_Extended,0x95 ; "No deadlock after all: "
; Debug Table 0x3.0x8 = 0x5c,0x8
005e e5ff | | Load 0x2,-0x1
005f e001 | | Load 0x0,0x1
0060 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0061 01cc | | Execute Vector,Catenate
0062 e002 | | Load 0x0,0x2
0063 180f | | Execute Package,Field_Execute,Field_Number 0xf
0064 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x3.0x9 = 0x64,0x9
0065 0092 0096 | | Action Push_String_Extended,0x96 ; "Semaphore error"
; Debug Table 0x3.0xa = 0x65,0xa
0067 00d9 | | Load_Top At_Offset_1
0068 00e0 | | Load_Encached Standard_Cache
0069 1818 | | Execute Package,Field_Execute,Field_Number 0x18
006a 01cc | | Execute Vector,Catenate
006b 0092 0097 | | Action Push_String_Extended,0x97 ; ": "
006d 01cc | | Execute Vector,Catenate
006e e5ff | | Load 0x2,-0x1
006f e001 | | Load 0x0,0x1
0070 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0071 01cc | | Execute Vector,Catenate
0072 e002 | | Load 0x0,0x2
0073 180f | | Execute Package,Field_Execute,Field_Number 0xf
0074 601b |` | Indirect_Literal Discrete,0x90,{0x00000000, 0x5750d501} ; Debug Table 0x3.0xb = 0x74,0xb
0075 0257 | W | Execute Discrete,Raise
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 007f | | .CONST 0x007f ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x007b,0x0130,0x0001,0x0000,0x0057,0x50d5,0x0000,0x001a
; Debug Table 0x4.0x0 = 0x7b,0x1
007c e001 | | Load 0x0,0x1
007d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
007e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
007f TRAP_0078:
007f 0007 | | Action Break_Optional
0080 600f |` | Indirect_Literal Discrete,0x90,{0x00000000, 0x5750d501} ; Debug Table 0x4.0x1 = 0x80,0x2
0081 0257 | W | Execute Discrete,Raise
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x008b,0x0136,0x0001,0x0000,0x0057,0x50d5,0x0000,0x0025
; Debug Table 0x5.0x0 = 0x8b,0x1
008c e001 | | Load 0x0,0x1
008d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
008e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
008f 0000 | | .XXX[0x1]
0090 0000 0000 | | .LITERAL {0x00000000, 0x5750d501}
0094 ; --------------------------------------------------------------------------------------
0094 ; STRING TABLE
0094 ; --------------------------------------------------------------------------------------
0094 000a | | .STRTAB 0x000a->0x0099 ; "Probable semaphore deadlock: "
0095 0025 | % | .STRTAB 0x0025->0x00a7 ; "No deadlock after all: "
0096 003a | : | .STRTAB 0x003a->0x00b3 ; "Semaphore error"
0097 0047 | G | .STRTAB 0x0047->0x00ba ; ": "
0098 0047 | G | .STREND 0x0047->0x00bb
0099 5072 6f62 |Prob| .STRTAB_STRINGS
00bc 0000 0000 | | .BLANK 0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; Debug Table
00c0 ; --------------------------------------------------------------------------------------
00c0 0003 0006 | | .CONST 0x0003,0x0006
00c2 000b 00f2 | | .DEBUG 0x000b,0x00f2,0x8000,0x0000,0x0057,0x50d5,0x0000,0x0005
00ca 0017 0104 | | .DEBUG 0x0017,0x0104,0x8000,0x0000,0x0057,0x5155,0x0000,0x0005
00d2 002b 0112 | + | .DEBUG 0x002b,0x0112,0x0001,0x0000,0x0057,0x50d5,0x0000,0x000a
00da 003b 0116 | ; | .DEBUG 0x003b,0x0116,0x0001,0x0000,0x0057,0x50d5,0x0000,0x0012
00e2 007b 0130 | { 0| .DEBUG 0x007b,0x0130,0x0001,0x0000,0x0057,0x50d5,0x0000,0x001a
00ea 008b 0136 | 6| .DEBUG 0x008b,0x0136,0x0001,0x0000,0x0057,0x50d5,0x0000,0x0025
00f2 ; --------------------------------------------------------------------------------------
00f2 ; Debug3 Subtable 0x0
00f2 ; --------------------------------------------------------------------------------------
00f2 0008 0000 | | .DBG3TAB 0x0008,0x0000
00f4 000b ffff | | .CONST 0x000b,0xffff
00f6 000e fffe | | .CONST 0x000e,0xfffe
00f8 0010 fffd | | .CONST 0x0010,0xfffd
00fa 0012 fffc | | .CONST 0x0012,0xfffc
00fc 0014 fffb | | .CONST 0x0014,0xfffb
00fe 0014 fffa | | .CONST 0x0014,0xfffa
0100 0016 fff9 | | .CONST 0x0016,0xfff9
0102 0016 fff8 | | .CONST 0x0016,0xfff8
0104 ; --------------------------------------------------------------------------------------
0104 ; Debug3 Subtable 0x1
0104 ; --------------------------------------------------------------------------------------
0104 0006 0000 | | .DBG3TAB 0x0006,0x0000
0106 0017 ffff | | .CONST 0x0017,0xffff
0108 0017 fffe | | .CONST 0x0017,0xfffe
010a 0017 fffd | | .CONST 0x0017,0xfffd
010c 0019 fffc | | .CONST 0x0019,0xfffc
010e 001b fffb | | .CONST 0x001b,0xfffb
0110 001d fffa | | .CONST 0x001d,0xfffa
0112 ; --------------------------------------------------------------------------------------
0112 ; Debug3 Subtable 0x2
0112 ; --------------------------------------------------------------------------------------
0112 0000 0001 | | .DBG3TAB 0x0000,0x0001
0114 002b 0001 | + | .CONST 0x002b,0x0001
0116 ; --------------------------------------------------------------------------------------
0116 ; Debug3 Subtable 0x3
0116 ; --------------------------------------------------------------------------------------
0116 0001 000b | | .DBG3TAB 0x0001,0x000b
0118 003b ffff | ; | .CONST 0x003b,0xffff
011a 003d 0001 | = | .CONST 0x003d,0x0001
011c 0044 0002 | D | .CONST 0x0044,0x0002
011e 0046 0003 | F | .CONST 0x0046,0x0003
0120 0047 0004 | G | .CONST 0x0047,0x0004
0122 004a 0005 | J | .CONST 0x004a,0x0005
0124 0052 0006 | R | .CONST 0x0052,0x0006
0126 005a 0007 | Z | .CONST 0x005a,0x0007
0128 005c 0008 | \ | .CONST 0x005c,0x0008
012a 0064 0009 | d | .CONST 0x0064,0x0009
012c 0065 000a | e | .CONST 0x0065,0x000a
012e 0074 000b | t | .CONST 0x0074,0x000b
0130 ; --------------------------------------------------------------------------------------
0130 ; Debug3 Subtable 0x4
0130 ; --------------------------------------------------------------------------------------
0130 0000 0002 | | .DBG3TAB 0x0000,0x0002
0132 007b 0001 | { | .CONST 0x007b,0x0001
0134 0080 0002 | | .CONST 0x0080,0x0002
0136 ; --------------------------------------------------------------------------------------
0136 ; Debug3 Subtable 0x5
0136 ; --------------------------------------------------------------------------------------
0136 0000 0001 | | .DBG3TAB 0x0000,0x0001
0138 008b 0001 | | .CONST 0x008b,0x0001
013a 0000 0000 | | .BLANK 0000[0xc6]