|
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_0444f7
└─⟦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 00e8 | | .CONST 0x00e8 ; 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 00b8 | | .CONST 0x00b8 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0027 | ' | .CONST 0x0027 ; Number of locals 000b INIT_0008: 000b 0093 0000 | | push_full_address 0x0 000d 60d2 |` | Indirect_Literal Discrete,0xe0,{0x80000000, 0x00040000} 000e 0273 | s | Execute Discrete,Plus 000f e20d | | Load 0x1,0xd 0010 60cb |` | Indirect_Literal Discrete,0xdc,{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 e214 | | Load 0x1,0x14 0016 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0017 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0018 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0019 e003 | | Load 0x0,0x3 001a 0386 | | Declare_Variable Package,Visible 001b 00d8 | | Load_Top At_Offset_0 001c 020f | | Execute Module,Activate 001d 0093 0000 | | push_full_address 0x0 001f 60b8 |` | Indirect_Literal Discrete,0xd8,{0x80000000, 0x00030000} 0020 0273 | s | Execute Discrete,Plus 0021 e20d | | Load 0x1,0xd 0022 60b9 |` | Indirect_Literal Discrete,0xdc,{0x00000000, 0x0000ffff} 0023 0279 | y | Execute Discrete,And 0024 0273 | s | Execute Discrete,Plus 0025 e004 | | Load 0x0,0x4 0026 0273 | s | Execute Discrete,Plus 0027 e212 | | Load 0x1,0x12 0028 00d8 | | Load_Top At_Offset_0 0029 0269 | i | Execute Discrete,Last 002a 00d8 | | Load_Top At_Offset_0 002b e212 | | Load 0x1,0x12 002c 0260 | ` | Execute Discrete,In_Type 002d 7001 |p | Jump_Nonzero 0x2f 002e 0801 | | Execute_Immediate Raise,0x1 002f e20e | | Load 0x1,0xe 0030 e218 | | Load 0x1,0x18 0031 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0032 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0033 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0034 e005 | | Load 0x0,0x5 0035 e21d | | Load 0x1,0x1d 0036 0098 | | Execute Package,Field_Read_Dynamic 0037 e006 | | Load 0x0,0x6 0038 e21d | | Load 0x1,0x1d 0039 0095 | | Execute Package,Field_Reference_Dynamic 003a e007 | | Load 0x0,0x7 003b e21d | | Load 0x1,0x1d 003c 0095 | | Execute Package,Field_Reference_Dynamic 003d e008 | | Load 0x0,0x8 003e e21d | | Load 0x1,0x1d 003f 0095 | | Execute Package,Field_Reference_Dynamic 0040 e009 | | Load 0x0,0x9 0041 e21d | | Load 0x1,0x1d 0042 0095 | | Execute Package,Field_Reference_Dynamic 0043 e00a | | Load 0x0,0xa 0044 0386 | | Declare_Variable Package,Visible 0045 00d8 | | Load_Top At_Offset_0 0046 020f | | Execute Module,Activate 0047 0093 0000 | | push_full_address 0x0 0049 608a |` | Indirect_Literal Discrete,0xd4,{0x80000000, 0x00020000} 004a 0273 | s | Execute Discrete,Plus 004b e20d | | Load 0x1,0xd 004c 608f |` | Indirect_Literal Discrete,0xdc,{0x00000000, 0x0000ffff} 004d 0279 | y | Execute Discrete,And 004e 0273 | s | Execute Discrete,Plus 004f e00b | | Load 0x0,0xb 0050 0273 | s | Execute Discrete,Plus 0051 e211 | | Load 0x1,0x11 0052 e20f | | Load 0x1,0xf 0053 e210 | | Load 0x1,0x10 0054 e21c | | Load 0x1,0x1c 0055 e00c | | Load 0x0,0xc 0056 e00d | | Load 0x0,0xd 0057 e00e | | Load 0x0,0xe 0058 e21e | | Load 0x1,0x1e 0059 0098 | | Execute Package,Field_Read_Dynamic 005a 0098 | | Execute Package,Field_Read_Dynamic 005b e00f | | Load 0x0,0xf 005c e00e | | Load 0x0,0xe 005d e21e | | Load 0x1,0x1e 005e 0098 | | Execute Package,Field_Read_Dynamic 005f 0096 | | Execute Package,Entry 0060 e010 | | Load 0x0,0x10 0061 e00e | | Load 0x0,0xe 0062 e21e | | Load 0x1,0x1e 0063 0098 | | Execute Package,Field_Read_Dynamic 0064 0095 | | Execute Package,Field_Reference_Dynamic 0065 e011 | | Load 0x0,0x11 0066 e012 | | Load 0x0,0x12 0067 e21e | | Load 0x1,0x1e 0068 0098 | | Execute Package,Field_Read_Dynamic 0069 0098 | | Execute Package,Field_Read_Dynamic 006a e013 | | Load 0x0,0x13 006b e012 | | Load 0x0,0x12 006c e21e | | Load 0x1,0x1e 006d 0098 | | Execute Package,Field_Read_Dynamic 006e 0098 | | Execute Package,Field_Read_Dynamic 006f e014 | | Load 0x0,0x14 0070 e012 | | Load 0x0,0x12 0071 e21e | | Load 0x1,0x1e 0072 0098 | | Execute Package,Field_Read_Dynamic 0073 0098 | | Execute Package,Field_Read_Dynamic 0074 e015 | | Load 0x0,0x15 0075 e012 | | Load 0x0,0x12 0076 e21e | | Load 0x1,0x1e 0077 0098 | | Execute Package,Field_Read_Dynamic 0078 0098 | | Execute Package,Field_Read_Dynamic 0079 e016 | | Load 0x0,0x16 007a e017 | | Load 0x0,0x17 007b e21e | | Load 0x1,0x1e 007c 0098 | | Execute Package,Field_Read_Dynamic 007d 0095 | | Execute Package,Field_Reference_Dynamic 007e e018 | | Load 0x0,0x18 007f e012 | | Load 0x0,0x12 0080 e21e | | Load 0x1,0x1e 0081 0098 | | Execute Package,Field_Read_Dynamic 0082 0095 | | Execute Package,Field_Reference_Dynamic 0083 e019 | | Load 0x0,0x19 0084 0386 | | Declare_Variable Package,Visible 0085 00d8 | | Load_Top At_Offset_0 0086 020f | | Execute Module,Activate 0087 029c 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible 0089 e01a | | Load 0x0,0x1a 008a e017 | | Load 0x0,0x17 008b e21e | | Load 0x1,0x1e 008c 0098 | | Execute Package,Field_Read_Dynamic 008d 0095 | | Execute Package,Field_Reference_Dynamic 008e 00c6 | | Action Check_Subprogram_Elaborated 008f 00e3 | | Load_Encached Natural_Cache 0090 0129 | ) | Execute Any,Make_Visible 0091 e01b | | Load 0x0,0x1b 0092 e01c | | Load 0x0,0x1c 0093 e21f | | Load 0x1,0x1f 0094 0098 | | Execute Package,Field_Read_Dynamic 0095 0098 | | Execute Package,Field_Read_Dynamic 0096 0129 | ) | Execute Any,Make_Visible 0097 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0098 0129 | ) | Execute Any,Make_Visible 0099 e01d | | Load 0x0,0x1d 009a e01e | | Load 0x0,0x1e 009b e21f | | Load 0x1,0x1f 009c 0098 | | Execute Package,Field_Read_Dynamic 009d 0095 | | Execute Package,Field_Reference_Dynamic 009e 0129 | ) | Execute Any,Make_Visible 009f 0093 0000 | | push_full_address 0x0 00a1 602e |`. | Indirect_Literal Discrete,0xd0,{0x80000000, 0x00010000} 00a2 0273 | s | Execute Discrete,Plus 00a3 e20d | | Load 0x1,0xd 00a4 6037 |`7 | Indirect_Literal Discrete,0xdc,{0x00000000, 0x0000ffff} 00a5 0279 | y | Execute Discrete,And 00a6 0273 | s | Execute Discrete,Plus 00a7 e01f | | Load 0x0,0x1f 00a8 0273 | s | Execute Discrete,Plus 00a9 0129 | ) | Execute Any,Make_Visible 00aa 4800 |H | Short_Literal 0x0 00ab 0129 | ) | Execute Any,Make_Visible 00ac 0007 | | Action Break_Optional 00ad 0007 | | Action Break_Optional 00ae 0007 | | Action Break_Optional 00af 0007 | | Action Break_Optional 00b0 0007 | | Action Break_Optional 00b1 e00f | | Load 0x0,0xf 00b2 e00e | | Load 0x0,0xe 00b3 e21e | | Load 0x1,0x1e 00b4 0098 | | Execute Package,Field_Read_Dynamic 00b5 0096 | | Execute Package,Entry 00b6 0129 | ) | Execute Any,Make_Visible 00b7 00bf | | Action Accept_Activation 00b8 BODY_0008: 00b8 00bc | | Action Signal_Activated 00b9 00bb | | Action Signal_Completion 00ba 0000 0000 | | .BLANK 0000[0x6] 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 00db | | Load_Top At_Offset_3 00c4 00db | | Load_Top At_Offset_3 00c5 00d8 | | Load_Top At_Offset_0 00c6 00e3 | | Load_Encached Natural_Cache 00c7 0260 | ` | Execute Discrete,In_Type 00c8 7001 |p | Jump_Nonzero 0xca 00c9 0801 | | Execute_Immediate Raise,0x1 00ca e020 | | Load 0x0,0x20 00cb e01c | | Load 0x0,0x1c 00cc e21f | | Load 0x1,0x1f 00cd 0098 | | Execute Package,Field_Read_Dynamic 00ce 0096 | | Execute Package,Entry 00cf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00d0 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00d4 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 00d8 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 00dc 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00e0 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 00e4 0000 0000 | | .BLANK 0000[0x4] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; Debug Table 00e8 ; -------------------------------------------------------------------------------------- 00e8 0004 0006 | | .DEBUG4 0x0004,0x0006,0x9fac,0x0000,0x0001,0x0002 00ee 000b 00f6 | | .DBG4T 0x000b,0x00f6,0xc000,0x0000 00f2 00c3 0000 | | .DBG4T 0x00c3,0x0000,0x000c,0x0000 00f6 ; -------------------------------------------------------------------------------------- 00f6 ; Debug chain 00f6 ; -------------------------------------------------------------------------------------- 00f6 000b 0000 | | .DBGLEN 0x000b,0x0000 00f8 000b 001d | | .DBGLNO 0x000b,0x001d,0x0047,0x0087,0x00ac,0x00ad,0x00ae,0x00af,0x00b0,0x00b1,0x00b7 0103 0000 0000 | | .BLANK 0000[0xfd]