|
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_0ae4cb
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0100 | | .CONST 0x0100 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 004e | N | .CONST 0x004e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001d | | .CONST 0x001d ; Number of locals 000b INIT_0008: 000b 0093 0000 | | push_full_address 0x0 000d 6062 |`b | Indirect_Literal Discrete,0x70,{0x80000000, 0x00010000} 000e 0273 | s | Execute Discrete,Plus 000f 0129 | ) | Execute Any,Make_Visible 0010 0093 0000 | | push_full_address 0x0 0012 6059 |`Y | Indirect_Literal Discrete,0x6c,{0x80000000, 0x00020000} 0013 0273 | s | Execute Discrete,Plus 0014 0129 | ) | Execute Any,Make_Visible 0015 0093 0000 | | push_full_address 0x0 0017 6050 |`P | Indirect_Literal Discrete,0x68,{0x80000000, 0x00030000} 0018 0273 | s | Execute Discrete,Plus 0019 0129 | ) | Execute Any,Make_Visible 001a 0093 0000 | | push_full_address 0x0 001c 6047 |`G | Indirect_Literal Discrete,0x64,{0x80000000, 0x00040000} 001d 0273 | s | Execute Discrete,Plus 001e 0129 | ) | Execute Any,Make_Visible 001f 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated 0021 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0023 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 0025 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 0027 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 0029 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 002b 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated 002d 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 002f 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated 0031 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0033 00bf | | Action Accept_Activation 0034 00e1 | | Load_Encached Boolean_Cache 0035 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0036 029d 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call 0038 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call 003a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 003b 00c7 | | Action Elaborate_Subprogram 003c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 003d 00c7 | | Action Elaborate_Subprogram 003e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 003f 00c7 | | Action Elaborate_Subprogram 0040 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0041 00c7 | | Action Elaborate_Subprogram 0042 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0043 00c7 | | Action Elaborate_Subprogram 0044 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0045 00c7 | | Action Elaborate_Subprogram 0046 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0047 00c7 | | Action Elaborate_Subprogram 0048 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0049 00c7 | | Action Elaborate_Subprogram 004a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 004b 00c7 | | Action Elaborate_Subprogram 004c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 004d 00c7 | | Action Elaborate_Subprogram 004e BODY_0008: 004e 00bc | | Action Signal_Activated 004f 00bb | | Action Signal_Completion 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 00da | | Load_Top At_Offset_2 0054 821c | | Call 0x1,0x1c 0055 00cf | | Action Mark_Auxiliary 0056 7806 |x | Jump 0x5d 0057 8002 | | Call 0x0,0x2 0058 6802 |h | Jump_Zero 0x5b 0059 e20d | | Load 0x1,0xd 005a 0257 | W | Execute Discrete,Raise 005b 8003 | | Call 0x0,0x3 005c 00c9 | | Action Pop_Auxiliary_Loop 005d e5fe | | Load 0x2,-0x2 005e 8004 | | Call 0x0,0x4 005f 8005 | | Call 0x0,0x5 0060 6ff6 |o | Jump_Zero 0x57 0061 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0062 0000 0000 | | .XXX[0x2] 0064 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 0068 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 006c 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0070 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0074 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 007c 821c | | Call 0x1,0x1c 007d e20f | | Load 0x1,0xf 007e 0257 | W | Execute Discrete,Raise 007f 0000 | | .XXX[0x1] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 00da | | Load_Top At_Offset_2 0084 821c | | Call 0x1,0x1c 0085 e20e | | Load 0x1,0xe 0086 0257 | W | Execute Discrete,Raise 0087 0000 | | .XXX[0x1] 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 821c | | Call 0x1,0x1c 008d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 008e 0000 0000 | | .XXX[0x2] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 0094 821c | | Call 0x1,0x1c 0095 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0096 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 009c 821c | | Call 0x1,0x1c 009d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 009e 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 00a4 821c | | Call 0x1,0x1c 00a5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00a6 0000 0000 | | .XXX[0x2] 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 821c | | Call 0x1,0x1c 00ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00ae 0000 0000 | | .XXX[0x2] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b3 | | .CONST 0x00b3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0001 | | .CONST 0x0001 ; Number of locals 00b3 BODY_00b0: 00b3 INIT_00b0: 00b3 00da | | Load_Top At_Offset_2 00b4 821c | | Call 0x1,0x1c 00b5 e210 | | Load 0x1,0x10 00b6 0257 | W | Execute Discrete,Raise 00b7 0000 | | .XXX[0x1] 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 e21b | | Load 0x1,0x1b 00bc 00ca | | Action Exit_Nullary_Function 00bd 0000 0000 | | .XXX[0x3] 00bf 0000 | | 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 e006 | | Load 0x0,0x6 00c5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00c6 0092 00e7 | | Action Push_String_Extended,0xe7 ; " dans la ligne:" 00c8 e006 | | Load 0x0,0x6 00c9 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00ca 8007 | | Call 0x0,0x7 00cb 00e0 | | Load_Encached Standard_Cache 00cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cd e006 | | Load 0x0,0x6 00ce 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00cf 0092 00e8 | | Action Push_String_Extended,0xe8 ; " dans la colone:" 00d1 e006 | | Load 0x0,0x6 00d2 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00d3 8008 | | Call 0x0,0x8 00d4 00e0 | | Load_Encached Standard_Cache 00d5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00d6 e006 | | Load 0x0,0x6 00d7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00d8 4801 |H | Short_Literal 0x1 00d9 e006 | | Load 0x0,0x6 00da 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00db 4801 |H | Short_Literal 0x1 00dc a21b | | Store_Unchecked 0x1,0x1b 00dd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00de 0000 0000 | | .XXX[0x2] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 00da | | Load_Top At_Offset_2 00e4 821c | | Call 0x1,0x1c 00e5 e20d | | Load 0x1,0xd 00e6 0257 | W | Execute Discrete,Raise 00e7 ; -------------------------------------------------------------------------------------- 00e7 ; STRING TABLE 00e7 ; -------------------------------------------------------------------------------------- 00e7 0006 | | .STRTAB 0x0006->0x00ea ; " dans la ligne:" 00e8 0013 | | .STRTAB 0x0013->0x00f1 ; " dans la colone:" 00e9 0021 | ! | .STREND 0x0021->0x00f9 00ea 2064 616e | dan| .STRTAB_STRINGS 00fa 0000 0000 | | .BLANK 0000[0x6] 0100 ; -------------------------------------------------------------------------------------- 0100 ; Debug Table 0100 ; -------------------------------------------------------------------------------------- 0100 0004 0008 | | .DEBUG4 0x0004,0x0008,0xd05d,0x0000,0x0001,0x000e 0106 000b 013e | >| .DBG4T 0x000b,0x013e,0x8000,0x0000 010a 0034 014e | 4 N| .DBG4T 0x0034,0x014e,0x8000,0x0000 010e 0053 015d | S ]| .DBG4T 0x0053,0x015d,0x0001,0x4000 0112 007b 0169 | { i| .DBG4T 0x007b,0x0169,0x0001,0x0000 0116 0083 016d | m| .DBG4T 0x0083,0x016d,0x0001,0x0000 011a 008b 0171 | q| .DBG4T 0x008b,0x0171,0x0001,0x0000 011e 0093 0174 | t| .DBG4T 0x0093,0x0174,0x0001,0x0000 0122 009b 0177 | w| .DBG4T 0x009b,0x0177,0x0001,0x0000 0126 00a3 017a | z| .DBG4T 0x00a3,0x017a,0x0001,0x0000 012a 00ab 017d | }| .DBG4T 0x00ab,0x017d,0x0001,0x0000 012e 00b3 0180 | | .DBG4T 0x00b3,0x0180,0x0001,0x0000 0132 00bb 0184 | | .DBG4T 0x00bb,0x0184,0x0002,0x0000 0136 00c3 0187 | | .DBG4T 0x00c3,0x0187,0x0001,0x0000 013a 00e3 0190 | | .DBG4T 0x00e3,0x0190,0x0001,0x0000 013e ; -------------------------------------------------------------------------------------- 013e ; Debug chain 013e ; -------------------------------------------------------------------------------------- 013e 000e 0000 | | .DBGLEN 0x000e,0x0000 0140 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0015,0x001a,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031 014e ; -------------------------------------------------------------------------------------- 014e ; Debug chain 014e ; -------------------------------------------------------------------------------------- 014e 000d 0000 | | .DBGLEN 0x000d,0x0000 0150 0034 0036 | 4 6| .DBGLNO 0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c 015d ; -------------------------------------------------------------------------------------- 015d ; Debug chain 015d ; -------------------------------------------------------------------------------------- 015d 0000 0005 | | .DBGLEN 0x0000,0x0005 015f 0053 0057 | S W| .DBGLNO 0x0053,0x0057,0x0059,0x005b,0x005d 0164 0001 0003 | | .XXX[0x5] 0166 0004 0005 | | 0168 0002 | | 0169 ; -------------------------------------------------------------------------------------- 0169 ; Debug chain 0169 ; -------------------------------------------------------------------------------------- 0169 0000 0002 | | .DBGLEN 0x0000,0x0002 016b 007b 007d | { }| .DBGLNO 0x007b,0x007d 016d ; -------------------------------------------------------------------------------------- 016d ; Debug chain 016d ; -------------------------------------------------------------------------------------- 016d 0000 0002 | | .DBGLEN 0x0000,0x0002 016f 0083 0085 | | .DBGLNO 0x0083,0x0085 0171 ; -------------------------------------------------------------------------------------- 0171 ; Debug chain 0171 ; -------------------------------------------------------------------------------------- 0171 0000 0001 | | .DBGLEN 0x0000,0x0001 0173 008b | | .DBGLNO 0x008b 0174 ; -------------------------------------------------------------------------------------- 0174 ; Debug chain 0174 ; -------------------------------------------------------------------------------------- 0174 0000 0001 | | .DBGLEN 0x0000,0x0001 0176 0093 | | .DBGLNO 0x0093 0177 ; -------------------------------------------------------------------------------------- 0177 ; Debug chain 0177 ; -------------------------------------------------------------------------------------- 0177 0000 0001 | | .DBGLEN 0x0000,0x0001 0179 009b | | .DBGLNO 0x009b 017a ; -------------------------------------------------------------------------------------- 017a ; Debug chain 017a ; -------------------------------------------------------------------------------------- 017a 0000 0001 | | .DBGLEN 0x0000,0x0001 017c 00a3 | | .DBGLNO 0x00a3 017d ; -------------------------------------------------------------------------------------- 017d ; Debug chain 017d ; -------------------------------------------------------------------------------------- 017d 0000 0001 | | .DBGLEN 0x0000,0x0001 017f 00ab | | .DBGLNO 0x00ab 0180 ; -------------------------------------------------------------------------------------- 0180 ; Debug chain 0180 ; -------------------------------------------------------------------------------------- 0180 0000 0002 | | .DBGLEN 0x0000,0x0002 0182 00b3 00b5 | | .DBGLNO 0x00b3,0x00b5 0184 ; -------------------------------------------------------------------------------------- 0184 ; Debug chain 0184 ; -------------------------------------------------------------------------------------- 0184 0000 0001 | | .DBGLEN 0x0000,0x0001 0186 00bb | | .DBGLNO 0x00bb 0187 ; -------------------------------------------------------------------------------------- 0187 ; Debug chain 0187 ; -------------------------------------------------------------------------------------- 0187 0000 0007 | | .DBGLEN 0x0000,0x0007 0189 00c3 00c6 | | .DBGLNO 0x00c3,0x00c6,0x00ca,0x00cf,0x00d3,0x00d8,0x00db 0190 ; -------------------------------------------------------------------------------------- 0190 ; Debug chain 0190 ; -------------------------------------------------------------------------------------- 0190 0000 0002 | | .DBGLEN 0x0000,0x0002 0192 00e3 00e5 | | .DBGLNO 0x00e3,0x00e5 0194 0000 0000 | | .BLANK 0000[0x6c]