|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0230eb
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0130 | 0 | .CONST 0x0130 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005d | ] | .CONST 0x005d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c 0129 | ) | Execute Any,Make_Visible
000d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
000f 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
0011 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 4800 |H | Short_Literal 0x0
0015 0093 00e3 | | push_full_address INIT_00e0
0017 00f5 | | Load_Encached Unused21
0018 037d | } | Declare_Type Task,Defined
0019 036f | o | Declare_Variable Task
001a 4800 |H | Short_Literal 0x0
001b 0093 00bb | | push_full_address INIT_00b8
001d 00f5 | | Load_Encached Unused21
001e 037d | } | Declare_Type Task,Defined
001f 036f | o | Declare_Variable Task
0020 029b 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Unelaborated
0022 029b 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Unelaborated
0024 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0025 00c7 | | Action Elaborate_Subprogram
0026 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0027 00c7 | | Action Elaborate_Subprogram
0028 029d 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call
002a 029d 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call
002c a003 | | Store_Unchecked 0x0,0x3
002d 00c6 | | Action Check_Subprogram_Elaborated
002e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
002f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0030 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0031 0093 0000 | | push_full_address 0x0
0033 6038 |`8 | Indirect_Literal Discrete,0x6c,{0x80000000, 0x00010000}
0034 0273 | s | Execute Discrete,Plus
0035 e20d | | Load 0x1,0xd
0036 6031 |`1 | Indirect_Literal Discrete,0x68,{0x00000000, 0x0000ffff}
0037 0279 | y | Execute Discrete,And
0038 0273 | s | Execute Discrete,Plus
0039 e004 | | Load 0x0,0x4
003a 0273 | s | Execute Discrete,Plus
003b 4800 |H | Short_Literal 0x0
003c 0007 | | Action Break_Optional
003d e002 | | Load 0x0,0x2
003e a005 | | Store_Unchecked 0x0,0x5
003f e006 | | Load 0x0,0x6
0040 a007 | | Store_Unchecked 0x0,0x7
0041 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0042 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0043 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0044 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0045 a003 | | Store_Unchecked 0x0,0x3
0046 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0047 480a |H | Short_Literal 0xa
0048 e217 | | Load 0x1,0x17
0049 020e | | Execute Module,Augment_Imports
004a 0007 | | Action Break_Optional
004b e002 | | Load 0x0,0x2
004c a005 | | Store_Unchecked 0x0,0x5
004d e006 | | Load 0x0,0x6
004e a007 | | Store_Unchecked 0x0,0x7
004f a008 | | Store_Unchecked 0x0,0x8
0050 a009 | | Store_Unchecked 0x0,0x9
0051 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0052 e20e | | Load 0x1,0xe
0053 4808 |H | Short_Literal 0x8
0054 e216 | | Load 0x1,0x16
0055 020e | | Execute Module,Augment_Imports
0056 0007 | | Action Break_Optional
0057 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0058 00c7 | | Action Elaborate_Subprogram
0059 1d14 | | Execute_Immediate Reference_Lex_1,0x14
005a 00c7 | | Action Elaborate_Subprogram
005b 1d15 | | Execute_Immediate Reference_Lex_1,0x15
005c 00c7 | | Action Elaborate_Subprogram
005d BODY_0008:
005d 00be | | Action Activate_Tasks
005e 00bc | | Action Signal_Activated
005f 00bb | | Action Signal_Completion
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 4800 |H | Short_Literal 0x0
0064 e217 | | Load 0x1,0x17
0065 170d | | Execute Task,Entry_Call,Field_Number 0xd
0066 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0067 0000 | | .XXX[0x1]
0068 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
006c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 00da | | Load_Top At_Offset_2
0074 4801 |H | Short_Literal 0x1
0075 e216 | | Load 0x1,0x16
0076 170e | | Execute Task,Entry_Call,Field_Number 0xe
0077 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 e216 | | Load 0x1,0x16
007c 0209 | | Execute Task,Abort
007d 0007 | | Action Break_Optional
007e e217 | | Load 0x1,0x17
007f 0209 | | Execute Task,Abort
0080 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0081 0000 0000 | | .BLANK 0000[0x7]
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
008c 8210 | | Call 0x1,0x10
008d e20e | | Load 0x1,0xe
008e 6803 |h | Jump_Zero 0x92
008f 4800 |H | Short_Literal 0x0
0090 e216 | | Load 0x1,0x16
0091 170f | | Execute Task,Entry_Call,Field_Number 0xf
0092 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0093 0000 0000 | | .BLANK 0000[0x5]
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
009c 00db | | Load_Top At_Offset_3
009d 820f | | Call 0x1,0xf
009e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 8211 | | Call 0x1,0x11
00a4 4800 |H | Short_Literal 0x0
00a5 e216 | | Load 0x1,0x16
00a6 170d | | Execute Task,Entry_Call,Field_Number 0xd
00a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00db | | Load_Top At_Offset_3
00ac 00d8 | | Load_Top At_Offset_0
00ad 00e3 | | Load_Encached Natural_Cache
00ae 0260 | ` | Execute Discrete,In_Type
00af 7001 |p | Jump_Nonzero 0xb1
00b0 0801 | | Execute_Immediate Raise,0x1
00b1 00db | | Load_Top At_Offset_3
00b2 8219 | | Call 0x1,0x19
00b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00b4 0000 0000 | | .BLANK 0000[0x4]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c2 | | .CONST 0x00c2 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 000e | | .CONST 0x000e ; Number of locals
00bb INIT_00b8:
00bb 4800 |H | Short_Literal 0x0
00bc 02cb | | Declare_Variable Entry
00bd 00bf | | Action Accept_Activation
00be 480d |H | Short_Literal 0xd
00bf 0299 00db | | Declare_Subprogram INIT_00d8,For_Accept
00c1 00bc | | Action Signal_Activated
00c2 BODY_00b8:
00c2 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00c3 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00c4 0137 | 7 | Execute Entry,Rendezvous
00c5 e001 | | Load 0x0,0x1
00c6 8002 | | Call 0x0,0x2
00c7 00d8 | | Load_Top At_Offset_0
00c8 e003 | | Load 0x0,0x3
00c9 0260 | ` | Execute Discrete,In_Type
00ca 7001 |p | Jump_Nonzero 0xcc
00cb 0801 | | Execute_Immediate Raise,0x1
00cc 8004 | | Call 0x0,0x4
00cd a005 | | Store_Unchecked 0x0,0x5
00ce a006 | | Store_Unchecked 0x0,0x6
00cf a007 | | Store_Unchecked 0x0,0x7
00d0 a008 | | Store_Unchecked 0x0,0x8
00d1 8009 | | Call 0x0,0x9
00d2 c00a | | Store 0x0,0xa
00d3 00bb | | Action Signal_Completion
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 4100 |A | End_Rendezvous 0x0
00dc 0000 0000 | | .BLANK 0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f1 | | .CONST 0x00f1 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0011 | | .CONST 0x0011 ; Number of locals
00e3 INIT_00e0:
00e3 4800 |H | Short_Literal 0x0
00e4 02cb | | Declare_Variable Entry
00e5 4801 |H | Short_Literal 0x1
00e6 02cb | | Declare_Variable Entry
00e7 4800 |H | Short_Literal 0x0
00e8 02cb | | Declare_Variable Entry
00e9 00bf | | Action Accept_Activation
00ea 480d |H | Short_Literal 0xd
00eb 0299 0103 | | Declare_Subprogram INIT_0100,For_Accept
00ed 480e |H | Short_Literal 0xe
00ee 0299 010b | | Declare_Subprogram INIT_0108,For_Accept
00f0 00bc | | Action Signal_Activated
00f1 BODY_00e0:
00f1 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00f2 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00f3 0137 | 7 | Execute Entry,Rendezvous
00f4 00cf | | Action Mark_Auxiliary
00f5 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00f6 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00f7 0137 | 7 | Execute Entry,Rendezvous
00f8 00c9 | | Action Pop_Auxiliary_Loop
00f9 7ffb | | Jump 0xf5
00fa 0000 0000 | | .BLANK 0000[0x6]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 4100 |A | End_Rendezvous 0x0
0104 0000 0000 | | .BLANK 0000[0x4]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 480f |H | Short_Literal 0xf
010c 0299 012b | +| Declare_Subprogram INIT_0128,For_Accept
010e e001 | | Load 0x0,0x1
010f 6014 |` | Indirect_Literal Discrete,0x124,{0x00000000, 0x00000ccd}
0110 480a |H | Short_Literal 0xa
0111 8002 | | Call 0x0,0x2
0112 00d8 | | Load_Top At_Offset_0
0113 e003 | | Load 0x0,0x3
0114 0260 | ` | Execute Discrete,In_Type
0115 7001 |p | Jump_Nonzero 0x117
0116 0801 | | Execute_Immediate Raise,0x1
0117 8004 | | Call 0x0,0x4
0118 e5fe | | Load 0x2,-0x2
0119 8005 | | Call 0x0,0x5
011a 8006 | | Call 0x0,0x6
011b c007 | | Store 0x0,0x7
011c e008 | | Load 0x0,0x8
011d 6805 |h | Jump_Zero 0x123
011e 4802 |H | Short_Literal 0x2
011f 4802 |H | Short_Literal 0x2
0120 0099 | | Action Reference_Dynamic
0121 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0122 0137 | 7 | Execute Entry,Rendezvous
0123 4100 |A | End_Rendezvous 0x0
0124 0000 0000 | | .LITERAL {0x00000000, 0x00000ccd}
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 4100 |A | End_Rendezvous 0x0
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; Debug Table
0130 ; --------------------------------------------------------------------------------------
0130 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd8a0,0x0000,0x0001,0x0000
0136 a2a2 a2a2 | | .BLANK a2a2[0x1f]
0155 a2a0 0000 | | .XXX[0x19]
0157 0530 0000 | 0 |
0159 0502 a2a2 | |
015b a204 a6f6 | |
015d 2207 4657 |" FW|
015f 26d6 96e6 |& |
0161 1746 5642 | FVB|
0163 0627 9204 | ' |
0165 e415 4206 | B |
0167 1742 0343 | B C|
0169 a333 43a3 | 3C |
016b 2382 0504 |# |
016d d202 | |
016e 0202 0202 | | .BLANK 0202[0x12]
0180 02a2 a2a0 | | .XXX[0x6]
0182 0000 0a40 | @|
0184 0000 0502 | |
0186 a2a2 a2a2 | | .BLANK a2a2[0x27]
01ad a2ac b6fb | | .XXX[0xc]
01af 50b0 0000 |P |
01b1 0800 0052 | R|
01b3 7c90 0e80 || |
01b5 0000 0008 | |
01b7 0000 0190 | |
01b9 0000 0000 | | .BLANK 0000[0x18]
01d1 0004 0000 | | .XXX[0xd]
01d3 0320 0000 | |
01d5 0000 0000 | |
01d7 0400 0000 | |
01d9 3600 0000 |6 |
01db 0010 0000 | |
01dd 0640 | @ |
01de 0000 0000 | | .BLANK 0000[0x22]