|
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_1c4cec
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00c8 | | .CONST 0x00c8 ; 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 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0033 | 3 | .CONST 0x0033 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0008 | | .CONST 0x0008 ; Number of locals
001b INIT_0018:
001b 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
001d 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call
001f 029f 00bb | | Declare_Subprogram INIT_00b8,For_Call
0021 a002 | | Store_Unchecked 0x0,0x2
0022 00c6 | | Action Check_Subprogram_Elaborated
0023 4803 |H | Short_Literal 0x3
0024 4802 |H | Short_Literal 0x2
0025 0099 | | Action Reference_Dynamic
0026 4804 |H | Short_Literal 0x4
0027 4802 |H | Short_Literal 0x2
0028 0099 | | Action Reference_Dynamic
0029 0093 0000 | | push_full_address 0x0
002b 601c |` | Indirect_Literal Discrete,0x48,{0x80000000, 0x00010000}
002c 0273 | s | Execute Discrete,Plus
002d e003 | | Load 0x0,0x3
002e 0273 | s | Execute Discrete,Plus
002f e004 | | Load 0x0,0x4
0030 0273 | s | Execute Discrete,Plus
0031 4808 |H | Short_Literal 0x8
0032 0007 | | Action Break_Optional
0033 BODY_0018:
0033 8005 | | Call 0x0,0x5
0034 8402 | | Call 0x2,0x2
0035 8006 | | Call 0x0,0x6
0036 8007 | | Call 0x0,0x7
0037 4fff |O | Short_Literal -0x1
0038 4805 |H | Short_Literal 0x5
0039 4802 |H | Short_Literal 0x2
003a 0099 | | Action Reference_Dynamic
003b 4806 |H | Short_Literal 0x6
003c 4802 |H | Short_Literal 0x2
003d 0099 | | Action Reference_Dynamic
003e 4807 |H | Short_Literal 0x7
003f 4802 |H | Short_Literal 0x2
0040 0099 | | Action Reference_Dynamic
0041 8002 | | Call 0x0,0x2
0042 8006 | | Call 0x0,0x6
0043 8007 | | Call 0x0,0x7
0044 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0045 0000 0000 | | .XXX[0x3]
0047 0000 | |
0048 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
004c 0000 0000 | | .BLANK 0000[0x4]
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 e008 | | Load 0x0,0x8
0054 0337 | 7 | Declare_Variable Array
0055 4801 |H | Short_Literal 0x1
0056 8009 | | Call 0x0,0x9
0057 4800 |H | Short_Literal 0x0
0058 00da | | Load_Top At_Offset_2
0059 01d6 | | Execute Vector,Field_Write
005a 4801 |H | Short_Literal 0x1
005b 8009 | | Call 0x0,0x9
005c 4801 |H | Short_Literal 0x1
005d 00da | | Load_Top At_Offset_2
005e 01d6 | | Execute Vector,Field_Write
005f e008 | | Load 0x0,0x8
0060 01c3 | | Execute Vector,Check_In_Type
0061 800a | | Call 0x0,0xa
0062 e008 | | Load 0x0,0x8
0063 0337 | 7 | Declare_Variable Array
0064 4805 |H | Short_Literal 0x5
0065 8009 | | Call 0x0,0x9
0066 4800 |H | Short_Literal 0x0
0067 00da | | Load_Top At_Offset_2
0068 01d6 | | Execute Vector,Field_Write
0069 4801 |H | Short_Literal 0x1
006a 8009 | | Call 0x0,0x9
006b 4801 |H | Short_Literal 0x1
006c 00da | | Load_Top At_Offset_2
006d 01d6 | | Execute Vector,Field_Write
006e e008 | | Load 0x0,0x8
006f 01c3 | | Execute Vector,Check_In_Type
0070 800a | | Call 0x0,0xa
0071 e008 | | Load 0x0,0x8
0072 0337 | 7 | Declare_Variable Array
0073 4802 |H | Short_Literal 0x2
0074 8009 | | Call 0x0,0x9
0075 4800 |H | Short_Literal 0x0
0076 00da | | Load_Top At_Offset_2
0077 01d6 | | Execute Vector,Field_Write
0078 4801 |H | Short_Literal 0x1
0079 8009 | | Call 0x0,0x9
007a 4801 |H | Short_Literal 0x1
007b 00da | | Load_Top At_Offset_2
007c 01d6 | | Execute Vector,Field_Write
007d e008 | | Load 0x0,0x8
007e 01c3 | | Execute Vector,Check_In_Type
007f 800a | | Call 0x0,0xa
0080 e008 | | Load 0x0,0x8
0081 0337 | 7 | Declare_Variable Array
0082 4802 |H | Short_Literal 0x2
0083 8009 | | Call 0x0,0x9
0084 4800 |H | Short_Literal 0x0
0085 00da | | Load_Top At_Offset_2
0086 01d6 | | Execute Vector,Field_Write
0087 4801 |H | Short_Literal 0x1
0088 8009 | | Call 0x0,0x9
0089 4801 |H | Short_Literal 0x1
008a 00da | | Load_Top At_Offset_2
008b 01d6 | | Execute Vector,Field_Write
008c e008 | | Load 0x0,0x8
008d 01c3 | | Execute Vector,Check_In_Type
008e 800a | | Call 0x0,0xa
008f e008 | | Load 0x0,0x8
0090 0337 | 7 | Declare_Variable Array
0091 4805 |H | Short_Literal 0x5
0092 8009 | | Call 0x0,0x9
0093 4800 |H | Short_Literal 0x0
0094 00da | | Load_Top At_Offset_2
0095 01d6 | | Execute Vector,Field_Write
0096 4801 |H | Short_Literal 0x1
0097 8009 | | Call 0x0,0x9
0098 4801 |H | Short_Literal 0x1
0099 00da | | Load_Top At_Offset_2
009a 01d6 | | Execute Vector,Field_Write
009b e008 | | Load 0x0,0x8
009c 01c3 | | Execute Vector,Check_In_Type
009d 800a | | Call 0x0,0xa
009e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
009f 0000 | | .XXX[0x1]
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 00db | | Load_Top At_Offset_3
00a4 00db | | Load_Top At_Offset_3
00a5 00d8 | | Load_Top At_Offset_0
00a6 00e3 | | Load_Encached Natural_Cache
00a7 0260 | ` | Execute Discrete,In_Type
00a8 7001 |p | Jump_Nonzero 0xaa
00a9 0801 | | Execute_Immediate Raise,0x1
00aa e00b | | Load 0x0,0xb
00ab e00c | | Load 0x0,0xc
00ac a00d | | Store_Unchecked 0x0,0xd
00ad a00e | | Store_Unchecked 0x0,0xe
00ae a00f | | Store_Unchecked 0x0,0xf
00af a010 | | Store_Unchecked 0x0,0x10
00b0 8011 | | Call 0x0,0x11
00b1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00b2 0000 0000 | | .BLANK 0000[0x6]
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 00db | | Load_Top At_Offset_3
00bc 00db | | Load_Top At_Offset_3
00bd 00d8 | | Load_Top At_Offset_0
00be 00e3 | | Load_Encached Natural_Cache
00bf 0260 | ` | Execute Discrete,In_Type
00c0 7001 |p | Jump_Nonzero 0xc2
00c1 0801 | | Execute_Immediate Raise,0x1
00c2 8012 | | Call 0x0,0x12
00c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; Debug Table
00c8 ; --------------------------------------------------------------------------------------
00c8 0004 0006 | | .DEBUG4 0x0004,0x0006,0xb289,0x0000,0x0001,0x0005
00ce 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
00d2 001b 00e2 | | .DBG4T 0x001b,0x00e2,0x8001,0x0000
00d6 0053 00eb | S | .DBG4T 0x0053,0x00eb,0x0001,0x0000
00da 00a3 0000 | | .DBG4T 0x00a3,0x0000,0x000b,0x0000
00de 00bb 0000 | | .DBG4T 0x00bb,0x0000,0x000b,0x0000
00e2 ; --------------------------------------------------------------------------------------
00e2 ; Debug chain
00e2 ; --------------------------------------------------------------------------------------
00e2 0002 0005 | | .DBGLEN 0x0002,0x0005
00e4 001b 001d | | .DBGLNO 0x001b,0x001d,0x0033,0x0034,0x0035,0x0037,0x0042
00eb ; --------------------------------------------------------------------------------------
00eb ; Debug chain
00eb ; --------------------------------------------------------------------------------------
00eb 0000 0005 | | .DBGLEN 0x0000,0x0005
00ed 0053 0062 | S b| .DBGLNO 0x0053,0x0062,0x0071,0x0080,0x008f
00f2 0000 0000 | | .BLANK 0000[0x10e]