|
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 0628 8045 | ( E| .XXX[0x4e]
0150 c594 0646 | F|
0152 c027 6124 | 'a$|
0154 0647 0053 | G S|
0156 f4f4 0665 | e|
0158 a047 4bc4 | GK |
015a 066a a04a | j J|
015c ae84 066b | k|
015e c05d 2e04 | ]. |
0160 068a 2022 | "|
0162 8f04 06a9 | |
0164 4010 da24 |@ $|
0166 06c3 4011 | @ |
0168 ab34 06d0 | 4 |
016a 8012 4c64 | Ld|
016c 06ec c037 | 7|
016e 1544 070f | D |
0170 6010 5ce4 |` \ |
0172 08a8 6065 | `e|
0174 6bd4 098e |k |
0176 e013 16b4 | |
0178 0a46 4083 | F@ |
017a e274 0a54 | t T|
017c 2011 9e74 | t|
017e 0a54 804f | T O|
0180 3714 0a54 |7 T|
0182 804f 3124 | O1$|
0184 0a7e 403b | ~@;|
0186 2924 0add |)$ |
0188 002a 9494 | * |
018a 0b92 0073 | s|
018c d764 0be8 | d |
018e a04a a3d4 | J |
0190 0c0f c03b | ;|
0192 f464 0c12 | d |
0194 606f dfc4 |`o |
0196 0c4d 6035 | M`5|
0198 ea24 0c4d | $ M|
019a 6022 7b10 |`"{ |
019c 0000 0000 | | .BLANK 0000[0x64]