|
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_0230eb
└─⟦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 00e0 | | .CONST 0x00e0 ; 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 003e | > | .CONST 0x003e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache
000c 0400 | | Execute_Immediate Set_Value_Visible_Unchecked,0x0
000d 00d8 | | Load_Top At_Offset_0
000e 0129 | ) | Execute Any,Make_Visible
000f 4800 |H | Short_Literal 0x0
0010 603f |`? | Indirect_Literal Discrete,0x50,{0x00000000, 0x0000ffff}
0011 00e3 | | Load_Encached Natural_Cache
0012 03f9 | | Declare_Type Discrete,Constrained,Visible
0013 6038 |`8 | Indirect_Literal Discrete,0x4c,{0x00000000, 0x00008000}
0014 00e7 | | Load_Encached Duration_Cache
0015 03f0 | | Declare_Variable Discrete,Visible,With_Value
0016 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
0018 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
001a 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
001c 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
001e 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated
0020 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
0022 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0024 00bf | | Action Accept_Activation
0025 4801 |H | Short_Literal 0x1
0026 4820 |H | Short_Literal 0x20
0027 00e4 | | Load_Encached Positive_Cache
0028 03f8 | | Declare_Type Discrete,Constrained
0029 00d8 | | Load_Top At_Offset_0
002a 0007 | | Action Break_Optional
002b 4801 |H | Short_Literal 0x1
002c 4820 |H | Short_Literal 0x20
002d 00e9 | | Load_Encached String_Cache
002e 035b | [ | Declare_Type Array,Constrained
002f 0337 | 7 | Declare_Variable Array
0030 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0031 00c7 | | Action Elaborate_Subprogram
0032 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0033 00c7 | | Action Elaborate_Subprogram
0034 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0035 00c7 | | Action Elaborate_Subprogram
0036 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0037 00c7 | | Action Elaborate_Subprogram
0038 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0039 00c7 | | Action Elaborate_Subprogram
003a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003b 00c7 | | Action Elaborate_Subprogram
003c 1d12 | | Execute_Immediate Reference_Lex_1,0x12
003d 00c7 | | Action Elaborate_Subprogram
003e BODY_0008:
003e 00bc | | Action Signal_Activated
003f 00bb | | Action Signal_Completion
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 6004 |` | Indirect_Literal Discrete,0x48,{0x00000000, 0x00000414}
0044 00ca | | Action Exit_Nullary_Function
0045 0000 0000 | | .XXX[0x3]
0047 0000 | |
0048 0000 0000 | | .LITERAL {0x00000000, 0x00000414}
004c 0000 0000 | | .LITERAL {0x00000000, 0x00008000}
0050 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff}
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 0092 00d2 | | Action Push_String_Extended,0xd2 ; "enter orb host name: "
005d e002 | | Load 0x0,0x2
005e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
005f 00e3 | | Load_Encached Natural_Cache
0060 e21a | | Load 0x1,0x1a
0061 e002 | | Load 0x0,0x2
0062 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0063 00d1 | | Pop_Control Pop_Count_1
0064 c219 | | Store 0x1,0x19
0065 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0066 0000 0000 | | .XXX[0x2]
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 4801 |H | Short_Literal 0x1
006c e219 | | Load 0x1,0x19
006d 00d8 | | Load_Top At_Offset_0
006e 00e2 | | Load_Encached Integer_Cache
006f 0260 | ` | Execute Discrete,In_Type
0070 7001 |p | Jump_Nonzero 0x72
0071 0801 | | Execute_Immediate Raise,0x1
0072 e21a | | Load 0x1,0x1a
0073 01cf | | Execute Vector,Slice_Read
0074 0335 | 5 | Declare_Variable Array,Duplicate
0075 00cd | | Action Spare6_Action
0076 00ca | | Action Exit_Nullary_Function
0077 0000 | | .XXX[0x1]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 0081 | | .CONST 0x0081 ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b 4800 |H | Short_Literal 0x0
007c 4803 |H | Short_Literal 0x3
007d e003 | | Load 0x0,0x3
007e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
007f 035b | [ | Declare_Type Array,Constrained
0080 0337 | 7 | Declare_Variable Array
0081 BODY_0078:
0081 e21a | | Load 0x1,0x1a
0082 e004 | | Load 0x0,0x4
0083 180e | | Execute Package,Field_Execute,Field_Number 0xe
0084 00d9 | | Load_Top At_Offset_1
0085 01d4 | | Execute Vector,Structure_Write
0086 4800 |H | Short_Literal 0x0
0087 00d9 | | Load_Top At_Offset_1
0088 01d7 | | Execute Vector,Field_Read
0089 00ca | | Action Exit_Nullary_Function
008a 0000 0000 | | .BLANK 0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0099 | | .CONST 0x0099 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0002 | | .CONST 0x0002 ; Number of locals
0093 INIT_0090:
0093 4800 |H | Short_Literal 0x0
0094 4803 |H | Short_Literal 0x3
0095 e003 | | Load 0x0,0x3
0096 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0097 035b | [ | Declare_Type Array,Constrained
0098 0337 | 7 | Declare_Variable Array
0099 BODY_0090:
0099 e21a | | Load 0x1,0x1a
009a e004 | | Load 0x0,0x4
009b 180e | | Execute Package,Field_Execute,Field_Number 0xe
009c 00d9 | | Load_Top At_Offset_1
009d 01d4 | | Execute Vector,Structure_Write
009e 4801 |H | Short_Literal 0x1
009f 00d9 | | Load_Top At_Offset_1
00a0 01d7 | | Execute Vector,Field_Read
00a1 00ca | | Action Exit_Nullary_Function
00a2 0000 0000 | | .BLANK 0000[0x6]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b1 | | .CONST 0x00b1 ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab 4800 |H | Short_Literal 0x0
00ac 4803 |H | Short_Literal 0x3
00ad e003 | | Load 0x0,0x3
00ae 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00af 035b | [ | Declare_Type Array,Constrained
00b0 0337 | 7 | Declare_Variable Array
00b1 BODY_00a8:
00b1 e21a | | Load 0x1,0x1a
00b2 e004 | | Load 0x0,0x4
00b3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b4 00d9 | | Load_Top At_Offset_1
00b5 01d4 | | Execute Vector,Structure_Write
00b6 4802 |H | Short_Literal 0x2
00b7 00d9 | | Load_Top At_Offset_1
00b8 01d7 | | Execute Vector,Field_Read
00b9 00ca | | Action Exit_Nullary_Function
00ba 0000 0000 | | .BLANK 0000[0x6]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c9 | | .CONST 0x00c9 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 4800 |H | Short_Literal 0x0
00c4 4803 |H | Short_Literal 0x3
00c5 e003 | | Load 0x0,0x3
00c6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00c7 035b | [ | Declare_Type Array,Constrained
00c8 0337 | 7 | Declare_Variable Array
00c9 BODY_00c0:
00c9 e21a | | Load 0x1,0x1a
00ca e004 | | Load 0x0,0x4
00cb 180e | | Execute Package,Field_Execute,Field_Number 0xe
00cc 00d9 | | Load_Top At_Offset_1
00cd 01d4 | | Execute Vector,Structure_Write
00ce 4803 |H | Short_Literal 0x3
00cf 00d9 | | Load_Top At_Offset_1
00d0 01d7 | | Execute Vector,Field_Read
00d1 00ca | | Action Exit_Nullary_Function
00d2 ; --------------------------------------------------------------------------------------
00d2 ; STRING TABLE
00d2 ; --------------------------------------------------------------------------------------
00d2 0004 | | .STRTAB 0x0004->0x00d4 ; "enter orb host name: "
00d3 0017 | | .STREND 0x0017->0x00de
00d4 656e 7465 |ente| .STRTAB_STRINGS
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd8af,0x0000,0x0001,0x0000
00e6 0000 0000 | | .BLANK 0000[0xa]
00f0 0010 0000 | | .XXX[0xd]
00f2 0280 0000 | |
00f4 0000 0000 | |
00f6 1000 0000 | |
00f8 3800 0000 |8 |
00fa 0040 0000 | @ |
00fc 0500 | |
00fd 0000 0000 | | .BLANK 0000[0x9]
0106 0020 0000 | | .XXX[0xd]
0108 0c80 0000 | |
010a 0000 0000 | |
010c 2000 0000 | |
010e e800 0000 | |
0110 0080 0000 | |
0112 1900 | |
0113 0000 0000 | | .BLANK 0000[0x18]
012b 0040 0000 | @ | .XXX[0xd]
012d 0a00 0000 | |
012f 0000 0000 | |
0131 4000 0000 |@ |
0133 e000 0000 | |
0135 0100 0000 | |
0137 1400 | |
0138 0000 0000 | | .BLANK 0000[0x9]
0141 0080 0000 | | .XXX[0xd]
0143 3200 0000 |2 |
0145 0000 0000 | |
0147 8000 0003 | |
0149 a000 0000 | |
014b 0200 0000 | |
014d 6400 |d |
014e 0000 0000 | | .BLANK 0000[0x18]
0166 0100 0000 | | .XXX[0xd]
0168 2800 0000 |( |
016a 0000 0001 | |
016c 0000 0003 | |
016e 8000 0000 | |
0170 0400 0000 | |
0172 5000 |P |
0173 0000 0000 | | .BLANK 0000[0x9]
017c 0200 0000 | | .XXX[0xd]
017e c800 0000 | |
0180 0000 0002 | |
0182 0000 000e | |
0184 8000 0000 | |
0186 0800 0001 | |
0188 9000 | |
0189 0000 0000 | | .BLANK 0000[0x18]
01a1 0400 0000 | | .XXX[0xd]
01a3 a000 0000 | |
01a5 0000 0004 | |
01a7 0000 000e | |
01a9 0000 0000 | |
01ab 1000 0001 | |
01ad 4000 |@ |
01ae 0000 0000 | | .BLANK 0000[0x9]
01b7 0800 0003 | | .XXX[0xd]
01b9 2000 0000 | |
01bb 0000 0008 | |
01bd 0000 003a | :|
01bf 0000 0000 | |
01c1 2000 0006 | |
01c3 4000 |@ |
01c4 0000 0000 | | .BLANK 0000[0x18]
01dc 1000 0002 | | .XXX[0xc]
01de 8000 0000 | |
01e0 0000 0010 | |
01e2 0000 0038 | 8|
01e4 0000 0000 | |
01e6 4000 0005 |@ |
01e8 0000 0000 | | .BLANK 0000[0xa]
01f2 2000 000c | | .XXX[0xe]
01f4 8000 0000 | |
01f6 0000 0020 | |
01f8 0000 00e8 | |
01fa 0000 0000 | |
01fc 8000 0019 | |
01fe 0000 0000 | |