|
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_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 0148 | H | .CONST 0x0148 ; 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 003f | ? | .CONST 0x003f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c e003 | | Load 0x0,0x3
000d e20e | | Load 0x1,0xe
000e 1d0f | | Execute_Immediate Reference_Lex_1,0xf
000f e210 | | Load 0x1,0x10
0010 e004 | | Load 0x0,0x4
0011 0386 | | Declare_Variable Package,Visible
0012 00d8 | | Load_Top At_Offset_0
0013 020f | | Execute Module,Activate
0014 0093 0000 | | push_full_address 0x0
0016 604d |`M | Indirect_Literal Discrete,0x64,{0x80000000, 0x00010000}
0017 0273 | s | Execute Discrete,Plus
0018 e20d | | Load 0x1,0xd
0019 6046 |`F | Indirect_Literal Discrete,0x60,{0x00000000, 0x0000ffff}
001a 0279 | y | Execute Discrete,And
001b 0273 | s | Execute Discrete,Plus
001c 0129 | ) | Execute Any,Make_Visible
001d e005 | | Load 0x0,0x5
001e e006 | | Load 0x0,0x6
001f e210 | | Load 0x1,0x10
0020 e20e | | Load 0x1,0xe
0021 e211 | | Load 0x1,0x11
0022 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0023 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0024 e007 | | Load 0x0,0x7
0025 0386 | | Declare_Variable Package,Visible
0026 00d8 | | Load_Top At_Offset_0
0027 020f | | Execute Module,Activate
0028 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0029 00d9 | | Load_Top At_Offset_1
002a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
002b 02a0 | | Declare_Subprogram Null_Subprogram
002c 4801 |H | Short_Literal 0x1
002d 032e | . | Declare_Type Record,Defined,Visible
002e 00d8 | | Load_Top At_Offset_0
002f 02a0 | | Declare_Subprogram Null_Subprogram
0030 00db | | Load_Top At_Offset_3
0031 03a3 | | Complete_Type Heap_Access,By_Defining
0032 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
0034 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
0036 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0038 00bf | | Action Accept_Activation
0039 1d16 | | Execute_Immediate Reference_Lex_1,0x16
003a 00c7 | | Action Elaborate_Subprogram
003b 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003c 00c7 | | Action Elaborate_Subprogram
003d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
003e 00c7 | | Action Elaborate_Subprogram
003f BODY_0008:
003f 00bc | | Action Signal_Activated
0040 00bb | | Action Signal_Completion
0041 0000 0000 | | .BLANK 0000[0x7]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004d | M | .CONST 0x004d ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0002 | | .CONST 0x0002 ; Number of locals
004b INIT_0048:
004b e214 | | Load 0x1,0x14
004c 0007 | | Action Break_Optional
004d BODY_0048:
004d e214 | | Load 0x1,0x14
004e e008 | | Load 0x0,0x8
004f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0050 e009 | | Load 0x0,0x9
0051 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0052 039c | | Declare_Variable Heap_Access,By_Allocation
0053 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0054 00d8 | | Load_Top At_Offset_0
0055 0219 | | Execute Heap_Access,All_Read
0056 e213 | | Load 0x1,0x13
0057 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0058 e213 | | Load 0x1,0x13
0059 181a | | Execute Package,Field_Execute,Field_Number 0x1a
005a 00d9 | | Load_Top At_Offset_1
005b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
005c 00d1 | | Pop_Control Pop_Count_1
005d 00d8 | | Load_Top At_Offset_0
005e a5ff | | Store_Unchecked 0x2,-0x1
005f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0060 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0064 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006e | n | .CONST 0x006e ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b 00e1 | | Load_Encached Boolean_Cache
006c e211 | | Load 0x1,0x11
006d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
006e BODY_0068:
006e 00e1 | | Load_Encached Boolean_Cache
006f 00d9 | | Load_Top At_Offset_1
0070 e5fe | | Load 0x2,-0x2
0071 e20e | | Load 0x1,0xe
0072 0119 | | Execute Any,Check_In_Formal_Type
0073 e5ff | | Load 0x2,-0x1
0074 0217 | | Execute Heap_Access,All_Reference
0075 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0076 e213 | | Load 0x1,0x13
0077 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0078 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0079 005a | Z | Store_Top Discrete,At_Offset_2
007a 00d9 | | Load_Top At_Offset_1
007b 7017 |p | Jump_Nonzero 0x93
007c e211 | | Load 0x1,0x11
007d 1b12 | | Execute Package,Field_Read,Field_Number 0x12
007e e008 | | Load 0x0,0x8
007f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0080 e009 | | Load 0x0,0x9
0081 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0082 e211 | | Load 0x1,0x11
0083 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0084 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0085 e5ff | | Load 0x2,-0x1
0086 0219 | | Execute Heap_Access,All_Read
0087 00d8 | | Load_Top At_Offset_0
0088 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0089 4800 |H | Short_Literal 0x0
008a 00db | | Load_Top At_Offset_3
008b e5fe | | Load 0x2,-0x2
008c e20e | | Load 0x1,0xe
008d 0119 | | Execute Any,Check_In_Formal_Type
008e e213 | | Load 0x1,0x13
008f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0090 00d9 | | Load_Top At_Offset_1
0091 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0092 00d1 | | Pop_Control Pop_Count_1
0093 00d8 | | Load_Top At_Offset_0
0094 e5fd | | Load 0x2,-0x3
0095 e20e | | Load 0x1,0xe
0096 0119 | | Execute Any,Check_In_Formal_Type
0097 e211 | | Load 0x1,0x11
0098 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0099 0031 | 1 | Store_Top Heap_Access,At_Offset_1
009a 00e1 | | Load_Encached Boolean_Cache
009b 00d9 | | Load_Top At_Offset_1
009c e5fd | | Load 0x2,-0x3
009d e20e | | Load 0x1,0xe
009e 0119 | | Execute Any,Check_In_Formal_Type
009f e5ff | | Load 0x2,-0x1
00a0 0217 | | Execute Heap_Access,All_Reference
00a1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00a2 e213 | | Load 0x1,0x13
00a3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00a4 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00a5 005a | Z | Store_Top Discrete,At_Offset_2
00a6 00d9 | | Load_Top At_Offset_1
00a7 7017 |p | Jump_Nonzero 0xbf
00a8 e211 | | Load 0x1,0x11
00a9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00aa e008 | | Load 0x0,0x8
00ab 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ac e009 | | Load 0x0,0x9
00ad 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ae e211 | | Load 0x1,0x11
00af 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b0 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00b1 e5ff | | Load 0x2,-0x1
00b2 0219 | | Execute Heap_Access,All_Read
00b3 00d8 | | Load_Top At_Offset_0
00b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00b5 4800 |H | Short_Literal 0x0
00b6 00db | | Load_Top At_Offset_3
00b7 e5fd | | Load 0x2,-0x3
00b8 e20e | | Load 0x1,0xe
00b9 0119 | | Execute Any,Check_In_Formal_Type
00ba e213 | | Load 0x1,0x13
00bb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00bc 00d9 | | Load_Top At_Offset_1
00bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00be 00d1 | | Pop_Control Pop_Count_1
00bf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cc | | .CONST 0x00cc ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0005 | | .CONST 0x0005 ; Number of locals
00c3 INIT_00c0:
00c3 e213 | | Load 0x1,0x13
00c4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00c5 0322 | " | Declare_Variable Record
00c6 e211 | | Load 0x1,0x11
00c7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00c8 e211 | | Load 0x1,0x11
00c9 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00ca 029f 0103 | | Declare_Subprogram INIT_0100,For_Call
00cc BODY_00c0:
00cc e211 | | Load 0x1,0x11
00cd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00ce e008 | | Load 0x0,0x8
00cf 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d0 e009 | | Load 0x0,0x9
00d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d2 e211 | | Load 0x1,0x11
00d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00d4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00d5 e211 | | Load 0x1,0x11
00d6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00d7 e008 | | Load 0x0,0x8
00d8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d9 e009 | | Load 0x0,0x9
00da 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00db e211 | | Load 0x1,0x11
00dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00dd 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00de 00db | | Load_Top At_Offset_3
00df e5ff | | Load 0x2,-0x1
00e0 0217 | | Execute Heap_Access,All_Reference
00e1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00e2 e213 | | Load 0x1,0x13
00e3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00e4 00d1 | | Pop_Control Pop_Count_1
00e5 00cf | | Action Mark_Auxiliary
00e6 780b |x | Jump 0xf2
00e7 e402 | | Load 0x2,0x2
00e8 e213 | | Load 0x1,0x13
00e9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00ea e20e | | Load 0x1,0xe
00eb 0119 | | Execute Any,Check_In_Formal_Type
00ec 8405 | | Call 0x2,0x5
00ed e402 | | Load 0x2,0x2
00ee e213 | | Load 0x1,0x13
00ef 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00f0 00d1 | | Pop_Control Pop_Count_1
00f1 00c9 | | Action Pop_Auxiliary_Loop
00f2 e402 | | Load 0x2,0x2
00f3 e213 | | Load 0x1,0x13
00f4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00f5 6ff1 |o | Jump_Zero 0xe7
00f6 00ce | | Action Pop_Auxiliary
00f7 00da | | Load_Top At_Offset_2
00f8 a5fe | | Store_Unchecked 0x2,-0x2
00f9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00fa 0000 0000 | | .BLANK 0000[0x6]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0108 | | .CONST 0x0108 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 e211 | | Load 0x1,0x11
0104 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0105 0322 | " | Declare_Variable Record
0106 00d8 | | Load_Top At_Offset_0
0107 1c00 | | Execute_Immediate Run_Utility,0x0
0108 BODY_0100:
0108 00db | | Load_Top At_Offset_3
0109 e20e | | Load 0x1,0xe
010a 0119 | | Execute Any,Check_In_Formal_Type
010b e403 | | Load 0x2,0x3
010c e211 | | Load 0x1,0x11
010d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
010e 6801 |h | Jump_Zero 0x110
010f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0110 00db | | Load_Top At_Offset_3
0111 e20e | | Load 0x1,0xe
0112 0119 | | Execute Any,Check_In_Formal_Type
0113 e404 | | Load 0x2,0x4
0114 e211 | | Load 0x1,0x11
0115 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0116 6802 |h | Jump_Zero 0x119
0117 e212 | | Load 0x1,0x12
0118 0257 | W | Execute Discrete,Raise
0119 00d8 | | Load_Top At_Offset_0
011a e7ff | | Load 0x3,-0x1
011b e20e | | Load 0x1,0xe
011c 0119 | | Execute Any,Check_In_Formal_Type
011d e5ff | | Load 0x2,-0x1
011e 0217 | | Execute Heap_Access,All_Reference
011f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0120 e213 | | Load 0x1,0x13
0121 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0122 e211 | | Load 0x1,0x11
0123 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0124 00d1 | | Pop_Control Pop_Count_1
0125 e404 | | Load 0x2,0x4
0126 e7ff | | Load 0x3,-0x1
0127 e20e | | Load 0x1,0xe
0128 0119 | | Execute Any,Check_In_Formal_Type
0129 e211 | | Load 0x1,0x11
012a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
012b c404 | | Store 0x2,0x4
012c 00cf | | Action Mark_Auxiliary
012d 780b |x | Jump 0x139
012e 00d9 | | Load_Top At_Offset_1
012f e211 | | Load 0x1,0x11
0130 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0131 e20e | | Load 0x1,0xe
0132 0119 | | Execute Any,Check_In_Formal_Type
0133 8405 | | Call 0x2,0x5
0134 00d9 | | Load_Top At_Offset_1
0135 e211 | | Load 0x1,0x11
0136 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0137 00d1 | | Pop_Control Pop_Count_1
0138 00c9 | | Action Pop_Auxiliary_Loop
0139 00d9 | | Load_Top At_Offset_1
013a e211 | | Load 0x1,0x11
013b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
013c 6ff1 |o | Jump_Zero 0x12e
013d 00ce | | Action Pop_Auxiliary
013e e403 | | Load 0x2,0x3
013f e7ff | | Load 0x3,-0x1
0140 e20e | | Load 0x1,0xe
0141 0119 | | Execute Any,Check_In_Formal_Type
0142 e211 | | Load 0x1,0x11
0143 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0144 c403 | | Store 0x2,0x3
0145 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0146 0000 0000 | | .XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; Debug Table
0148 ; --------------------------------------------------------------------------------------
0148 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b6a,0x0000,0x0001,0x0000
014e 0000 0000 | | .BLANK 0000[0x26]
0174 b904 000d | | .XXX[0x5a]
0176 8c00 1000 | |
0178 079f f39f | |
017a f79f fa00 | |
017c bd04 000d | |
017e ac00 1000 | |
0180 0403 6e00 | n |
0182 c104 0000 | |
0184 0000 000d | |
0186 cc00 1000 | |
0188 079f f39f | |
018a f79f fa00 | |
018c c504 000d | |
018e ec00 1000 | |
0190 079f f79f | |
0192 fa00 c904 | |
0194 0000 000e | |
0196 0c00 1000 | |
0198 0403 6e00 | n |
019a cd04 0000 | |
019c 0000 000e | |
019e 2c00 1000 |, |
01a0 0403 6e00 | n |
01a2 d104 0000 | |
01a4 0000 000e | |
01a6 4c00 1000 |L |
01a8 0403 6e00 | n |
01aa d504 0000 | |
01ac 0000 000e | |
01ae 6c00 1000 |l |
01b0 0403 6e00 | n |
01b2 d904 0000 | |
01b4 0000 000e | |
01b6 8c00 1000 | |
01b8 0403 6e00 | n |
01ba dd04 0000 | |
01bc 0000 000e | |
01be ac00 1000 | |
01c0 079f f79f | |
01c2 fa00 e104 | |
01c4 0000 000e | |
01c6 cc00 1000 | |
01c8 079f ef9f | |
01ca f39f f79f | |
01cc fa00 e504 | |
01ce 0000 0000 | | .BLANK 0000[0x7]
01d5 000f 0c00 | | .XXX[0x2b]
01d7 1000 0403 | |
01d9 6e00 e904 |n |
01db 0000 0000 | |
01dd 000f 2c00 | , |
01df 1000 079f | |
01e1 f79f fa00 | |
01e3 ed04 0000 | |
01e5 000f 4c00 | L |
01e7 1000 0403 | |
01e9 6f9f f600 |o |
01eb f104 0000 | |
01ed 000f 6c00 | l |
01ef 1000 079f | |
01f1 f39f f79f | |
01f3 fa00 f504 | |
01f5 000f 8c00 | |
01f7 1000 079f | |
01f9 f79f fa00 | |
01fb f904 0000 | |
01fd 000f ac00 | |
01ff 1000 | |