|
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 - metrics - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0bf8df
└─⟦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 00e0 | | .CONST 0x00e0 ; 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 006a | j | .CONST 0x006a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 0093 0000 | | PushFullAddress InMicrocode
000d 6076 |`v | Indirect_Literal Discrete,0x84,{0x80000000, 0x00020000}
000e 0273 | s | Execute Discrete,Plus
000f 00db | | Load_Top At_Offset_3
0010 606f |`o | Indirect_Literal Discrete,0x80,{0x00000000, 0x0000ffff}
0011 0279 | y | Execute Discrete,And
0012 0273 | s | Execute Discrete,Plus
0013 e002 | | Load 0x0,0x2
0014 0273 | s | Execute Discrete,Plus
0015 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0016 00da | | Load_Top At_Offset_2
0017 e003 | | Load 0x0,0x3
0018 0386 | | Declare_Variable Package,Visible
0019 00d8 | | Load_Top At_Offset_0
001a 020f | | Execute Module,Activate
001b 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070
001d 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
001f 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8
0021 029a 00bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00b8
0023 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0
0025 029c 00cb | | Declare_Subprogram For_Outer_Call,Visible,INIT_00c8
0027 0093 0000 | | PushFullAddress InMicrocode
0029 6052 |`R | Indirect_Literal Discrete,0x7c,{0x80000000, 0x00010000}
002a 0273 | s | Execute Discrete,Plus
002b e20d | | Load 0x1,0xd
002c 6053 |`S | Indirect_Literal Discrete,0x80,{0x00000000, 0x0000ffff}
002d 0279 | y | Execute Discrete,And
002e 0273 | s | Execute Discrete,Plus
002f e004 | | Load 0x0,0x4
0030 0273 | s | Execute Discrete,Plus
0031 e005 | | Load 0x0,0x5
0032 e210 | | Load 0x1,0x10
0033 0098 | | Execute Package,Field_Read_Dynamic
0034 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0035 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0036 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0037 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0038 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0039 482f |H/ | Short_Literal 0x2f
003a 603d |`= | Indirect_Literal Discrete,0x78,{0x7fffffff, 0xffffffff}
003b e006 | | Load 0x0,0x6
003c 0386 | | Declare_Variable Package,Visible
003d 00d8 | | Load_Top At_Offset_0
003e 020f | | Execute Module,Activate
003f 00bf | | Action Accept_Activation
0040 e007 | | Load 0x0,0x7
0041 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0042 0266 | f | Execute Discrete,Bounds
0043 e008 | | Load 0x0,0x8
0044 e210 | | Load 0x1,0x10
0045 0098 | | Execute Package,Field_Read_Dynamic
0046 02a0 | | Declare_Subprogram Null_Subprogram
0047 4801 |H | Short_Literal 0x1
0048 035d | ] | Declare_Type Array,Defined
0049 00d8 | | Load_Top At_Offset_0
004a 0337 | 7 | Declare_Variable Array
004b 00d8 | | Load_Top At_Offset_0
004c 0335 | 5 | Declare_Variable Array,Duplicate
004d 00cd | | Action Spare6_Action
004e 4800 |H | Short_Literal 0x0
004f 4800 |H | Short_Literal 0x0
0050 00da | | Load_Top At_Offset_2
0051 01d6 | | Execute Vector,Field_Write
0052 4801 |H | Short_Literal 0x1
0053 4801 |H | Short_Literal 0x1
0054 00da | | Load_Top At_Offset_2
0055 01d6 | | Execute Vector,Field_Write
0056 4802 |H | Short_Literal 0x2
0057 4802 |H | Short_Literal 0x2
0058 00da | | Load_Top At_Offset_2
0059 01d6 | | Execute Vector,Field_Write
005a 4801 |H | Short_Literal 0x1
005b 4803 |H | Short_Literal 0x3
005c 00da | | Load_Top At_Offset_2
005d 01d6 | | Execute Vector,Field_Write
005e 00d9 | | Load_Top At_Offset_1
005f 01d4 | | Execute Vector,Structure_Write
0060 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0061 00c7 | | Action Elaborate_Subprogram
0062 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0063 00c7 | | Action Elaborate_Subprogram
0064 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0065 00c7 | | Action Elaborate_Subprogram
0066 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0067 00c7 | | Action Elaborate_Subprogram
0068 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0069 00c7 | | Action Elaborate_Subprogram
006a BODY_0008:
006a 00bc | | Action Signal_Activated
006b 00bb | | Action Signal_Completion
006c 0000 0000 | | .BLANK 0000[0x4]
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 e009 | | Load 0x0,0x9
0075 e210 | | Load 0x1,0x10
0076 0096 | | Execute Package,Field_Execute_Dynamic
0077 4401 |D | Exit_Subprogram With_Result,0x1
0078 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
007c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0080 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0084 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008f | | .CONST 0x008f ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0002 | | .CONST 0x0002 ; Number of locals
008b INIT_0088:
008b e005 | | Load 0x0,0x5
008c e210 | | Load 0x1,0x10
008d 0098 | | Execute Package,Field_Read_Dynamic
008e 0007 | | Action Break_Optional
008f BODY_0088:
008f e005 | | Load 0x0,0x5
0090 e210 | | Load 0x1,0x10
0091 0098 | | Execute Package,Field_Read_Dynamic
0092 e5fd | | Load 0x2,-0x3
0093 00ea | | Load_Encached Null_String_Cache
0094 e5fe | | Load 0x2,-0x2
0095 e5ff | | Load 0x2,-0x1
0096 e219 | | Load 0x1,0x19
0097 01d7 | | Execute Vector,Field_Read
0098 e00a | | Load 0x0,0xa
0099 e210 | | Load 0x1,0x10
009a 0096 | | Execute Package,Field_Execute_Dynamic
009b 0031 | 1 | Store_Top Heap_Access,At_Offset_1
009c 00d8 | | Load_Top At_Offset_0
009d a5fc | | Store_Unchecked 0x2,-0x4
009e 00d8 | | Load_Top At_Offset_0
009f e00b | | Load 0x0,0xb
00a0 e210 | | Load 0x1,0x10
00a1 0096 | | Execute Package,Field_Execute_Dynamic
00a2 a5fb | | Store_Unchecked 0x2,-0x5
00a3 4504 |E | Exit_Subprogram 0x4
00a4 0000 0000 | | .BLANK 0000[0x4]
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 00da | | Load_Top At_Offset_2
00ac e00c | | Load 0x0,0xc
00ad e210 | | Load 0x1,0x10
00ae 0096 | | Execute Package,Field_Execute_Dynamic
00af 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00b0 4501 |E | Exit_Subprogram 0x1
00b1 0000 0000 | | .BLANK 0000[0x7]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb 00da | | Load_Top At_Offset_2
00bc e00d | | Load 0x0,0xd
00bd e210 | | Load 0x1,0x10
00be 0096 | | Execute Package,Field_Execute_Dynamic
00bf 4401 |D | Exit_Subprogram With_Result,0x1
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2
00c4 e00e | | Load 0x0,0xe
00c5 e210 | | Load 0x1,0x10
00c6 0096 | | Execute Package,Field_Execute_Dynamic
00c7 4401 |D | Exit_Subprogram With_Result,0x1
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb e00f | | Load 0x0,0xf
00cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00cd e005 | | Load 0x0,0x5
00ce e210 | | Load 0x1,0x10
00cf 0098 | | Execute Package,Field_Read_Dynamic
00d0 e5fd | | Load 0x2,-0x3
00d1 e010 | | Load 0x0,0x10
00d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d3 0119 | | Execute Any,Check_In_Formal_Type
00d4 e5fe | | Load 0x2,-0x2
00d5 e5ff | | Load 0x2,-0x1
00d6 8212 | | Call 0x1,0x12
00d7 c5fc | | Store 0x2,-0x4
00d8 c5fb | | Store 0x2,-0x5
00d9 4504 |E | Exit_Subprogram 0x4
00da 0000 0000 | | .BLANK 0000[0x6]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b9c,0x0000,0x0001,0x0000
00e6 4000 6248 |@ bH| .XXX[0x11a]
00e8 8900 45ff | E |
00ea fffe e404 | |
00ec 0000 0207 | |
00ee 1f80 2207 | " |
00f0 a000 0277 | w|
00f2 8efe 8300 | |
00f4 9882 b300 | |
00f6 d883 d9ff | |
00f8 fffc 7a40 | z@|
00fa 4000 6207 |@ b |
00fc 1f80 2207 | " |
00fe a000 0277 | w|
0100 8efe 8240 | @|
0102 1881 e348 | H|
0104 0882 c348 | H|
0106 9900 0350 | P|
0108 0882 b248 | H|
010a 1980 3b50 | ;P|
010c 9980 13c0 | |
010e 1889 0250 | P|
0110 4080 13c0 |@ |
0112 9980 2361 | #a|
0114 2885 d360 |( `|
0116 b980 3369 | 3i|
0118 2885 d640 |( @|
011a 0885 c100 | |
011c 0751 2b68 | Q+h|
011e b980 3607 | 6 |
0120 1f80 2207 | " |
0122 a000 0277 | w|
0124 8efe 82e8 | |
0126 1881 e248 | H|
0128 1d85 c240 | @|
012a 1980 3900 | 9 |
012c 0751 0a50 | Q P|
012e 4080 1349 |@ I|
0130 3980 3084 |9 0 |
0132 000c c348 | H|
0134 bd85 d351 | Q|
0136 3980 3750 |9 7P|
0138 bd85 d758 | X|
013a 1889 0258 | X|
013c 2bff 6358 |+ cX|
013e 9889 0360 | `|
0140 1980 2378 | #x|
0142 1889 0260 | `|
0144 2c80 9e78 |, x|
0146 4f00 3378 |O 3x|
0148 9889 0381 | |
014a 308f 5202 |0 R |
014c 4000 400a |@ @ |
014e 0000 1348 | H|
0150 1900 0042 | B|
0152 0000 1640 | @|
0154 4000 7788 |@ w |
0156 1d82 f240 | @|
0158 4000 7648 |@ vH|
015a 8900 4750 | GP|
015c 1980 11ff | |
015e fffc 0358 | X|
0160 1889 0207 | |
0162 1f80 2207 | " |
0164 a000 0000 | |
0166 0000 0277 | w|
0168 8efe 43d0 | C |
016a 1883 33e8 | 3 |
016c 1882 e360 | `|
016e 1882 72d0 | r |
0170 8000 6a02 | j |
0172 4000 300a |@ 0 |
0174 0000 12e8 | |
0176 9d00 69ff | i |
0178 ffe5 1c04 | |
017a 0000 0368 | h|
017c 1885 e202 | |
017e 4000 3412 |@ 4 |
0180 0001 6fe0 | o |
0182 1885 f378 | x|
0184 1883 03d8 | |
0186 1882 f3c8 | |
0188 1883 0350 | P|
018a 1882 e3b0 | |
018c 1885 e2c8 | |
018e 9900 72c8 | r |
0190 1980 06b0 | |
0192 8a00 5ab0 | Z |
0194 1680 06c8 | |
0196 1900 6ad8 | j |
0198 8f00 6ed8 | n |
019a 9b00 7202 | r |
019c 9900 5812 | X |
019e 0000 0ed8 | |
01a0 1b80 06c8 | |
01a2 4000 5b78 |@ [x|
01a4 1883 1202 | |
01a6 4000 3c8a |@ < |
01a8 0000 afb8 | |
01aa 1882 f381 | |
01ac 3883 d202 |8 |
01ae 4000 40ca |@ @ |
01b0 0000 9fb8 | |
01b2 1882 f388 | |
01b4 1882 f202 | |
01b6 4000 44ca |@ D |
01b8 0000 8fb8 | |
01ba 1882 f2d8 | |
01bc 1b00 6a02 | j |
01be 9b00 5812 | X |
01c0 0000 0eb8 | |
01c2 4080 02d8 |@ |
01c4 4000 5b90 |@ [ |
01c6 1883 0290 | |
01c8 9200 7602 | v |
01ca 4000 4892 |@ H |
01cc 0000 27e8 | ' |
01ce 1883 43a0 | C |
01d0 1885 e2e0 | |
01d2 9c00 4a02 | J |
01d4 9c00 50da | P |
01d6 0000 13e8 | |
01d8 1883 43e0 | C |
01da 1885 e3e8 | |
01dc 1883 43a8 | C |
01de 1883 5202 | R |
01e0 9d00 54da | T |
01e2 0001 0602 | |
01e4 4000 6f40 |@ o@|
01e6 1885 e348 | H|
01e8 1883 52e8 | R |
01ea 1d00 2202 | " |
01ec 9d00 2492 | $ |
01ee 0000 13e8 | |
01f0 9883 43e8 | C |
01f2 1883 53e8 | S |
01f4 9883 4100 | A |
01f6 0031 6b40 | 1k@|
01f8 1883 1042 | B|
01fa 0000 d602 | |
01fc 4000 6f60 |@ o`|
01fe 1883 0368 | h|