|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1060f5
└─⟦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 5800 |X | .CONST 0x5800 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0059 | Y | .CONST 0x0059 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000e 0129 | ) | Execute Any,Make_Visible
000f e001 | | Load 0x0,0x1
0010 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0011 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0012 0129 | ) | Execute Any,Make_Visible
0013 00e9 | | Load_Encached String_Cache
0014 0129 | ) | Execute Any,Make_Visible
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 e002 | | Load 0x0,0x2
0028 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0029 0129 | ) | Execute Any,Make_Visible
002a c216 | | Store 0x1,0x16
002b e001 | | Load 0x0,0x1
002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002d 192a | * | Execute Package,Field_Reference,Field_Number 0x2a
002e 0129 | ) | Execute Any,Make_Visible
002f c217 | | Store 0x1,0x17
0030 e001 | | Load 0x0,0x1
0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0032 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24
0033 0129 | ) | Execute Any,Make_Visible
0034 c220 | | Store 0x1,0x20
0035 e001 | | Load 0x0,0x1
0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0037 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
0038 0129 | ) | Execute Any,Make_Visible
0039 c221 | ! | Store 0x1,0x21
003a e001 | | Load 0x0,0x1
003b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003c 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29
003d 0129 | ) | Execute Any,Make_Visible
003e c218 | | Store 0x1,0x18
003f e001 | | Load 0x0,0x1
0040 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0041 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0042 0129 | ) | Execute Any,Make_Visible
0043 c212 | | Store 0x1,0x12
0044 e001 | | Load 0x0,0x1
0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0046 192a | * | Execute Package,Field_Reference,Field_Number 0x2a
0047 0129 | ) | Execute Any,Make_Visible
0048 c213 | | Store 0x1,0x13
0049 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
004b c21c | | Store 0x1,0x1c
004c 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
004e c21e | | Store 0x1,0x1e
004f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0051 c21f | | Store 0x1,0x1f
0052 00bf | | Action Accept_Activation
0053 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0054 00c7 | | Action Elaborate_Subprogram
0055 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0056 00c7 | | Action Elaborate_Subprogram
0057 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0058 00c7 | | Action Elaborate_Subprogram
0059 BODY_0008:
0059 00bc | | Action Signal_Activated
005a 00bb | | Action Signal_Completion
005b 0000 0000 | | .BLANK 0000[0x5]
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 00da | | Load_Top At_Offset_2
0064 e001 | | Load 0x0,0x1
0065 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0067 e003 | | Load 0x0,0x3
0068 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0069 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
006a 0000 0000 | | .BLANK 0000[0x6]
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 e001 | | Load 0x0,0x1
0075 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0076 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0077 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 4800 |H | Short_Literal 0x0
007c 00ea | | Load_Encached Null_String_Cache
007d 6006 |` | Indirect_Literal Discrete,0x84,{0x00000000, 0x7fffffff}
007e e5ff | | Load 0x2,-0x1
007f 8212 | | Call 0x1,0x12
0080 e001 | | Load 0x0,0x1
0081 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0082 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0083 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0084 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0e56,0x0000,0x0001,0x0000
008e 0000 2f81 | / | .XXX[0x13]
0090 000c 21f0 | ! |
0092 6800 0000 |h |
0094 07b4 52c2 | R |
0096 24c0 f655 |$ U|
0098 4000 0000 |@ |
009a 0f69 2400 | i$ |
009c 01ed 14a0 | |
009e 0000 0476 | v|
00a0 3400 |4 |
00a1 0000 0000 | | .BLANK 0000[0x4]
00a5 003d a6e2 | = | .XXX[0x13]
00a7 6a16 07b5 |j |
00a9 8400 0000 | |
00ab 000b 4000 | @ |
00ad 0000 0000 | |
00af 0000 0099 | |
00b1 8901 ecd3 | |
00b3 8000 0000 | |
00b5 1ed4 dc07 | |
00b7 b3a0 | |
00b8 0000 0000 | | .BLANK 0000[0x4]
00bc 0106 5b00 | [ | .XXX[0x4c]
00be 0000 0000 | |
00c0 0000 3db1 | = |
00c2 ac0f 6fcc | o |
00c4 03dc 1a00 | |
00c6 0033 3120 | 31 |
00c8 3daf 1c00 |= |
00ca 0000 03db | |
00cc 43c0 f6ea |C |
00ce 1000 0000 | |
00d0 0001 3312 | 3 |
00d2 03db 1ac0 | |
00d4 0000 003d | =|
00d6 c5ec 0f6e | n|
00d8 2a00 0000 |* |
00da 0000 13b1 | |
00dc 703d c5ec |p= |
00de 0000 0000 | |
00e0 4c05 0033 |L 3|
00e2 d427 62e0 | 'b |
00e4 7b68 7800 |{hx |
00e6 0000 0280 | |
00e8 0a02 74ec | t |
00ea cec5 c0f6 | |
00ec c6b0 0000 | |
00ee 0005 a014 | |
00f0 0532 1397 | 2 |
00f2 0401 edf9 | |
00f4 8000 0000 | |
00f6 05f0 2001 | |
00f8 843e 0d00 | > |
00fa 0000 00f6 | |
00fc f188 4498 | D |
00fe 1ed7 8e00 | |
0100 0000 01ed | |
0102 f2e0 003d | =|
0104 bc60 0000 | ` |
0106 008e c680 | |
0108 0000 0000 | | .BLANK 0000[0x4]
010c 0007 b815 | | .XXX[0x63]
010e cd42 c0f7 | B |
0110 17b0 0000 | |
0112 0001 6800 | h |
0114 0000 0000 | |
0116 0000 0013 | |
0118 3120 3db4 |1 = |
011a 3c00 0000 |< |
011c 03dc 3840 | 8@|
011e f6db 3000 | 0 |
0120 0000 0000 | |
0122 0000 0020 | |
0124 cb60 0000 | ` |
0126 0000 0000 | |
0128 07b9 6f01 | o |
012a eec7 e07b | {|
012c b6d8 0006 | |
012e 6624 07b9 |f$ |
0130 1d00 0000 | |
0132 007b 9c10 | { |
0134 1eea 2800 | ( |
0136 0000 0000 | |
0138 2662 407b |&b@{|
013a 96f0 0000 | |
013c 0007 bbf7 | |
013e 01ee 93a0 | |
0140 0000 0000 | |
0142 0276 2e07 | v. |
0144 bbf7 0000 | |
0146 0000 0980 | |
0148 a006 7a84 | z |
014a ec5c 0f73 | \ s|
014c 8200 0000 | |
014e 0050 0140 | P @|
0150 4e9d 99d8 |N |
0152 b81e e5bc | |
0154 0000 0000 | |
0156 b402 80a6 | |
0158 4272 e080 |Br |
015a 3dd8 fc00 |= |
015c 0000 0126 | &|
015e 0400 3087 | 0 |
0160 c1e0 0000 | |
0162 001e eb17 | |
0164 0893 03dc | |
0166 8e80 0000 | |
0168 003d d828 | = (|
016a 0007 bac5 | |
016c 8000 0011 | |
016e d8d0 | |
016f 0000 0000 | | .BLANK 0000[0x5]
0174 f769 e9a8 | i | .XXX[0x62]
0176 581e efdc |X |
0178 0000 0000 | |
017a 2d00 0000 |- |
017c 0000 0000 | |
017e 0002 6624 | f$|
0180 07b9 c100 | |
0182 0000 007b | {|
0184 baa0 1ee8 | |
0186 4c00 0000 |L |
0188 0000 0000 | |
018a 0004 196c | l|
018c 0000 0000 | |
018e 0000 00f7 | |
0190 9510 3df2 | = |
0192 c80f 7d4e | }N|
0194 0000 ccc4 | |
0196 80f7 8ad0 | |
0198 0000 000f | |
019a 79f5 03de |y |
019c e1c0 0000 | |
019e 0000 04cc | |
01a0 480f 7951 |H yQ|
01a2 0000 0000 | |
01a4 f7e6 103d | =|
01a6 ec40 0000 | @ |
01a8 0000 004e | N|
01aa c5c0 f7e6 | |
01ac 1000 0000 | |
01ae 0130 1400 | 0 |
01b0 cf50 9d8b | P |
01b2 81ef 3ea0 | > |
01b4 0000 000a | |
01b6 0028 09d3 | ( |
01b8 b33b 1703 | ; |
01ba de54 4000 | T@ |
01bc 0000 1680 | |
01be 5014 c84e |P N|
01c0 5c10 07be |\ |
01c2 5900 0000 |Y |
01c4 0024 c080 | $ |
01c6 0610 f83c | <|
01c8 0000 0003 | |
01ca deff a112 | |
01cc 607b c568 |`{ h|
01ce 0000 0007 | |
01d0 be3e 8000 | > |
01d2 f7bf e000 | |
01d4 0002 3b1a | ; |
01d6 0000 0000 | | .BLANK 0000[0x5]
01db 1efa 2335 | #5| .XXX[0x7]
01dd 0b03 df98 | |
01df 4000 0000 |@ |
01e1 05a0 | |
01e2 0000 0000 | | .BLANK 0000[0x4]
01e6 4cc4 80f7 |L | .XXX[0x8]
01e8 9f50 0000 | P |
01ea 000f 7dc7 | } |
01ec 03de a640 | @|
01ee 0000 0000 | | .BLANK 0000[0x4]
01f2 832d 8000 | - | .XXX[0xe]
01f4 0000 0000 | |
01f6 001e ff88 | |
01f8 07c1 9281 | |
01fa f078 2000 | x |
01fc 1998 901e | |
01fe fe40 0000 | @ |