|
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_01f83d
└─⟦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 0080 | | .CONST 0x0080 ; 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 0036 | 6 | .CONST 0x0036 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0012 | | .CONST 0x0012 ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
000f 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
0011 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 0093 0000 | | push_full_address 0x0
0016 602d |`- | Indirect_Literal Discrete,0x44,{0x80000000, 0x00010000}
0017 0273 | s | Execute Discrete,Plus
0018 e002 | | Load 0x0,0x2
0019 0273 | s | Execute Discrete,Plus
001a e003 | | Load 0x0,0x3
001b 0273 | s | Execute Discrete,Plus
001c e004 | | Load 0x0,0x4
001d 481e |H | Short_Literal 0x1e
001e e005 | | Load 0x0,0x5
001f a006 | | Store_Unchecked 0x0,0x6
0020 a007 | | Store_Unchecked 0x0,0x7
0021 e008 | | Load 0x0,0x8
0022 0387 | | Declare_Variable Package
0023 00d8 | | Load_Top At_Offset_0
0024 020f | | Execute Module,Activate
0025 e009 | | Load 0x0,0x9
0026 00d9 | | Load_Top At_Offset_1
0027 0098 | | Execute Package,Field_Read_Dynamic
0028 0322 | " | Declare_Variable Record
0029 e00a | | Load 0x0,0xa
002a 00da | | Load_Top At_Offset_2
002b 0098 | | Execute Package,Field_Read_Dynamic
002c 00d9 | | Load_Top At_Offset_1
002d 017d | } | Execute Record,Structure_Write
002e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
002f 00c7 | | Action Elaborate_Subprogram
0030 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0031 00c7 | | Action Elaborate_Subprogram
0032 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0033 00c7 | | Action Elaborate_Subprogram
0034 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0035 00c7 | | Action Elaborate_Subprogram
0036 BODY_0008:
0036 00bc | | Action Signal_Activated
0037 00bb | | Action Signal_Completion
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 00e1 | | Load_Encached Boolean_Cache
003c e212 | | Load 0x1,0x12
003d e5ff | | Load 0x2,-0x1
003e e00b | | Load 0x0,0xb
003f e211 | | Load 0x1,0x11
0040 0096 | | Execute Package,Entry
0041 00d1 | | Pop_Control Pop_Count_1
0042 c5fe | | Store 0x2,-0x2
0043 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0044 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 00e1 | | Load_Encached Boolean_Cache
004c e5fe | | Load 0x2,-0x2
004d e5ff | | Load 0x2,-0x1
004e e00c | | Load 0x0,0xc
004f e211 | | Load 0x1,0x11
0050 0098 | | Execute Package,Field_Read_Dynamic
0051 00d9 | | Load_Top At_Offset_1
0052 00d0 | | Action Swap_Control
0053 0260 | ` | Execute Discrete,In_Type
0054 7001 |p | Jump_Nonzero 0x56
0055 0801 | | Execute_Immediate Raise,0x1
0056 e212 | | Load 0x1,0x12
0057 e00d | | Load 0x0,0xd
0058 e211 | | Load 0x1,0x11
0059 0096 | | Execute Package,Entry
005a 00d1 | | Pop_Control Pop_Count_1
005b c5fd | | Store 0x2,-0x3
005c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e212 | | Load 0x1,0x12
0064 e00e | | Load 0x0,0xe
0065 e211 | | Load 0x1,0x11
0066 0096 | | Execute Package,Entry
0067 00ca | | Action Exit_Nullary_Function
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 0092 0074 | t| Action Push_String_Extended,0x74 ; "Message Array :"
006d e00f | | Load 0x0,0xf
006e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
006f e212 | | Load 0x1,0x12
0070 e010 | | Load 0x0,0x10
0071 e211 | | Load 0x1,0x11
0072 0096 | | Execute Package,Entry
0073 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0074 ; --------------------------------------------------------------------------------------
0074 ; STRING TABLE
0074 ; --------------------------------------------------------------------------------------
0074 0004 | | .STRTAB 0x0004->0x0076 ; "Message Array :"
0075 0011 | | .STREND 0x0011->0x007d
0076 4d65 7373 |Mess| .STRTAB_STRINGS
007e 0000 0000 | | .XXX[0x2]
0080 ; --------------------------------------------------------------------------------------
0080 ; Debug Table
0080 ; --------------------------------------------------------------------------------------
0080 0004 0008 | | .DEBUG4 0x0004,0x0008,0x7564,0x0000,0x0001,0x0006
0086 000b 009e | | .DBG4T 0x000b,0x009e,0x8000,0x0000
008a 0014 00a4 | | .DBG4T 0x0014,0x00a4,0x8000,0x0000
008e 003b 00ac | ; | .DBG4T 0x003b,0x00ac,0x0001,0x0000
0092 004b 00af | K | .DBG4T 0x004b,0x00af,0x0001,0x0000
0096 0063 00b2 | c | .DBG4T 0x0063,0x00b2,0x0002,0x0000
009a 006b 00b5 | k | .DBG4T 0x006b,0x00b5,0x0001,0x0000
009e ; --------------------------------------------------------------------------------------
009e ; Debug chain
009e ; --------------------------------------------------------------------------------------
009e 0004 0000 | | .DBGLEN 0x0004,0x0000
00a0 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011
00a4 ; --------------------------------------------------------------------------------------
00a4 ; Debug chain
00a4 ; --------------------------------------------------------------------------------------
00a4 0006 0000 | | .DBGLEN 0x0006,0x0000
00a6 0014 0025 | %| .DBGLNO 0x0014,0x0025,0x002e,0x0030,0x0032,0x0034
00ac ; --------------------------------------------------------------------------------------
00ac ; Debug chain
00ac ; --------------------------------------------------------------------------------------
00ac 0000 0001 | | .DBGLEN 0x0000,0x0001
00ae 003b | ; | .DBGLNO 0x003b
00af ; --------------------------------------------------------------------------------------
00af ; Debug chain
00af ; --------------------------------------------------------------------------------------
00af 0000 0001 | | .DBGLEN 0x0000,0x0001
00b1 004b | K | .DBGLNO 0x004b
00b2 ; --------------------------------------------------------------------------------------
00b2 ; Debug chain
00b2 ; --------------------------------------------------------------------------------------
00b2 0000 0001 | | .DBGLEN 0x0000,0x0001
00b4 0063 | c | .DBGLNO 0x0063
00b5 ; --------------------------------------------------------------------------------------
00b5 ; Debug chain
00b5 ; --------------------------------------------------------------------------------------
00b5 0000 0002 | | .DBGLEN 0x0000,0x0002
00b7 006b 006f | k o| .DBGLNO 0x006b,0x006f
00b9 0000 0000 | | .BLANK 0000[0x147]