|
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_06885f
└─⟦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 00f8 | | .CONST 0x00f8 ; 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 00ad | | .CONST 0x00ad ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 4801 |H | Short_Literal 0x1
000c 4806 |H | Short_Literal 0x6
000d 00e9 | | Load_Encached String_Cache
000e 0334 | 4 | Declare_Variable Array,With_Constraint
000f 50c8 |P | Indirect_Literal Any,0xd8,{0x5443502f, 0x49502020}
0010 0129 | ) | Execute Any,Make_Visible
0011 4800 |H | Short_Literal 0x0
0012 4801 |H | Short_Literal 0x1
0013 e002 | | Load 0x0,0x2
0014 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0015 035b | [ | Declare_Type Array,Constrained
0016 0337 | 7 | Declare_Variable Array
0017 480a |H | Short_Literal 0xa
0018 4800 |H | Short_Literal 0x0
0019 00da | | Load_Top At_Offset_2
001a 01d6 | | Execute Vector,Field_Write
001b 4828 |H( | Short_Literal 0x28
001c 4801 |H | Short_Literal 0x1
001d 00da | | Load_Top At_Offset_2
001e 01d6 | | Execute Vector,Field_Write
001f 0129 | ) | Execute Any,Make_Visible
0020 0092 00df | | Action Push_String_Extended,0xdf ; "ancolie"
0022 0129 | ) | Execute Any,Make_Visible
0023 00d8 | | Load_Top At_Offset_0
0024 00da | | Load_Top At_Offset_2
0025 8003 | | Call 0x0,0x3
0026 0129 | ) | Execute Any,Make_Visible
0027 4800 |H | Short_Literal 0x0
0028 4801 |H | Short_Literal 0x1
0029 e002 | | Load 0x0,0x2
002a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002b 035b | [ | Declare_Type Array,Constrained
002c 0337 | 7 | Declare_Variable Array
002d 4800 |H | Short_Literal 0x0
002e 4800 |H | Short_Literal 0x0
002f 00da | | Load_Top At_Offset_2
0030 01d6 | | Execute Vector,Field_Write
0031 4800 |H | Short_Literal 0x0
0032 4801 |H | Short_Literal 0x1
0033 00da | | Load_Top At_Offset_2
0034 01d6 | | Execute Vector,Field_Write
0035 0129 | ) | Execute Any,Make_Visible
0036 0092 00e0 | | Action Push_String_Extended,0xe0 ; "none"
0038 00d9 | | Load_Top At_Offset_1
0039 8003 | | Call 0x0,0x3
003a 0129 | ) | Execute Any,Make_Visible
003b 0092 00e0 | | Action Push_String_Extended,0xe0 ; "none"
003d 00da | | Load_Top At_Offset_2
003e 8003 | | Call 0x0,0x3
003f 0129 | ) | Execute Any,Make_Visible
0040 0092 00e1 | | Action Push_String_Extended,0xe1 ; "No content"
0042 0129 | ) | Execute Any,Make_Visible
0043 4800 |H | Short_Literal 0x0
0044 4802 |H | Short_Literal 0x2
0045 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
0047 03fe | | Declare_Type Discrete,Defined,Visible
0048 00d8 | | Load_Top At_Offset_0
0049 0266 | f | Execute Discrete,Bounds
004a 4801 |H | Short_Literal 0x1
004b 4804 |H | Short_Literal 0x4
004c e004 | | Load 0x0,0x4
004d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
004e 035c | \ | Declare_Type Array,Constrained,Visible
004f 02a0 | | Declare_Subprogram Null_Subprogram
0050 4801 |H | Short_Literal 0x1
0051 035e | ^ | Declare_Type Array,Defined,Visible
0052 00d8 | | Load_Top At_Offset_0
0053 0336 | 6 | Declare_Variable Array,Visible
0054 00d8 | | Load_Top At_Offset_0
0055 0335 | 5 | Declare_Variable Array,Duplicate
0056 00cd | | Action Spare6_Action
0057 00da | | Load_Top At_Offset_2
0058 01d8 | | Execute Vector,Element_Type
0059 0337 | 7 | Declare_Variable Array
005a 48c1 |H | Short_Literal 0xc1
005b 4801 |H | Short_Literal 0x1
005c 00da | | Load_Top At_Offset_2
005d 01d6 | | Execute Vector,Field_Write
005e 4836 |H6 | Short_Literal 0x36
005f 4802 |H | Short_Literal 0x2
0060 00da | | Load_Top At_Offset_2
0061 01d6 | | Execute Vector,Field_Write
0062 4892 |H | Short_Literal 0x92
0063 4803 |H | Short_Literal 0x3
0064 00da | | Load_Top At_Offset_2
0065 01d6 | | Execute Vector,Field_Write
0066 4884 |H | Short_Literal 0x84
0067 4804 |H | Short_Literal 0x4
0068 00da | | Load_Top At_Offset_2
0069 01d6 | | Execute Vector,Field_Write
006a 00db | | Load_Top At_Offset_3
006b 01d8 | | Execute Vector,Element_Type
006c 0119 | | Execute Any,Check_In_Formal_Type
006d 4800 |H | Short_Literal 0x0
006e 00da | | Load_Top At_Offset_2
006f 01d6 | | Execute Vector,Field_Write
0070 00da | | Load_Top At_Offset_2
0071 01d8 | | Execute Vector,Element_Type
0072 0337 | 7 | Declare_Variable Array
0073 48c1 |H | Short_Literal 0xc1
0074 4801 |H | Short_Literal 0x1
0075 00da | | Load_Top At_Offset_2
0076 01d6 | | Execute Vector,Field_Write
0077 4836 |H6 | Short_Literal 0x36
0078 4802 |H | Short_Literal 0x2
0079 00da | | Load_Top At_Offset_2
007a 01d6 | | Execute Vector,Field_Write
007b 4892 |H | Short_Literal 0x92
007c 4803 |H | Short_Literal 0x3
007d 00da | | Load_Top At_Offset_2
007e 01d6 | | Execute Vector,Field_Write
007f 4885 |H | Short_Literal 0x85
0080 4804 |H | Short_Literal 0x4
0081 00da | | Load_Top At_Offset_2
0082 01d6 | | Execute Vector,Field_Write
0083 00db | | Load_Top At_Offset_3
0084 01d8 | | Execute Vector,Element_Type
0085 0119 | | Execute Any,Check_In_Formal_Type
0086 4801 |H | Short_Literal 0x1
0087 00da | | Load_Top At_Offset_2
0088 01d6 | | Execute Vector,Field_Write
0089 00da | | Load_Top At_Offset_2
008a 01d8 | | Execute Vector,Element_Type
008b 0337 | 7 | Declare_Variable Array
008c 4800 |H | Short_Literal 0x0
008d 4801 |H | Short_Literal 0x1
008e 00da | | Load_Top At_Offset_2
008f 01d6 | | Execute Vector,Field_Write
0090 4800 |H | Short_Literal 0x0
0091 4802 |H | Short_Literal 0x2
0092 00da | | Load_Top At_Offset_2
0093 01d6 | | Execute Vector,Field_Write
0094 4800 |H | Short_Literal 0x0
0095 4803 |H | Short_Literal 0x3
0096 00da | | Load_Top At_Offset_2
0097 01d6 | | Execute Vector,Field_Write
0098 4800 |H | Short_Literal 0x0
0099 4804 |H | Short_Literal 0x4
009a 00da | | Load_Top At_Offset_2
009b 01d6 | | Execute Vector,Field_Write
009c 00db | | Load_Top At_Offset_3
009d 01d8 | | Execute Vector,Element_Type
009e 0119 | | Execute Any,Check_In_Formal_Type
009f 4802 |H | Short_Literal 0x2
00a0 00da | | Load_Top At_Offset_2
00a1 01d6 | | Execute Vector,Field_Write
00a2 00d9 | | Load_Top At_Offset_1
00a3 01d4 | | Execute Vector,Structure_Write
00a4 e005 | | Load 0x0,0x5
00a5 e006 | | Load 0x0,0x6
00a6 e215 | | Load 0x1,0x15
00a7 e007 | | Load 0x0,0x7
00a8 1b53 | S | Execute Package,Field_Read,Field_Number 0x53
00a9 0386 | | Declare_Variable Package,Visible
00aa 00d8 | | Load_Top At_Offset_0
00ab 020f | | Execute Module,Activate
00ac 00bf | | Action Accept_Activation
00ad BODY_0008:
00ad 00bc | | Action Signal_Activated
00ae 00bb | | Action Signal_Completion
00af 0000 | | .XXX[0x1]
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 4607 |F | Jump_Case 0x8
00b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00b5 7807 |x | Jump 0xbd ; case 0x1
00b6 780a |x | Jump 0xc1 ; case 0x2
00b7 780e |x | Jump 0xc6 ; case 0x3
00b8 7811 |x | Jump 0xca ; case 0x4
00b9 7812 |x | Jump 0xcc ; case 0x5
00ba 7813 |x | Jump 0xce ; case 0x6
00bb 7816 |x | Jump 0xd2 ; case 0x7
00bc 4302 |C | .XXX[0x1]
00bd 00da | | Load_Top At_Offset_2
00be 0091 00dc | | Action Push_String_Extended_Indexed,0xdc ; "ANCOLIE"
00c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00c1 00db | | Load_Top At_Offset_3
00c2 00db | | Load_Top At_Offset_3
00c3 00e0 | | Load_Encached Standard_Cache
00c4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00c6 00da | | Load_Top At_Offset_2
00c7 00e0 | | Load_Encached Standard_Cache
00c8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00c9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00ca 00db | | Load_Top At_Offset_3
00cb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00cc 00db | | Load_Top At_Offset_3
00cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00ce e215 | | Load 0x1,0x15
00cf 00dc | | Load_Top At_Offset_4
00d0 0267 | g | Execute Discrete,Predecessor
00d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00d2 e215 | | Load 0x1,0x15
00d3 00dc | | Load_Top At_Offset_4
00d4 0268 | h | Execute Discrete,Successor
00d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00d6 0000 0000 | | .XXX[0x2]
00d8 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
00dc ; --------------------------------------------------------------------------------------
00dc ; STRING TABLE
00dc ; --------------------------------------------------------------------------------------
00dc 000e | | .STRTAB 0x000e->0x00e3 ; "ANCOLIE"
00dd 0013 | | .STRTAB 0x0013->0x00e6 ; "FICUS"
00de 0016 | | .STRTAB 0x0016->0x00e9 ; "NONE"
00df 0018 | | .STRTAB 0x0018->0x00eb ; "ancolie"
00e0 001d | | .STRTAB 0x001d->0x00ee ; "none"
00e1 001f | | .STRTAB 0x001f->0x00f0 ; "No content"
00e2 0027 | ' | .STREND 0x0027->0x00f5
00e3 414e 434f |ANCO| .STRTAB_STRINGS
00f6 0000 0000 | | .XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; Debug Table
00f8 ; --------------------------------------------------------------------------------------
00f8 0004 0009 | | .DEBUG4 0x0004,0x0009,0xfc08,0x0000,0x0001,0x0002
00fe 000b 0106 | | .DBG4T 0x000b,0x0106,0x8000,0x8000
0102 00b3 0000 | | .DBG4T 0x00b3,0x0000,0x0005,0x0000
0106 ; --------------------------------------------------------------------------------------
0106 ; Debug chain
0106 ; --------------------------------------------------------------------------------------
0106 000c 0000 | | .DBGLEN 0x000c,0x0000
0108 000b 0011 | | .DBGLNO 0x000b,0x0011,0x0020,0x0023,0x0027,0x0036,0x003b,0x0040,0x0043,0x0048,0x0052,0x00a4
0114 0001 0002 | | .XXX[0xc]
0116 0003 0004 | |
0118 0005 0006 | |
011a 0007 0009 | |
011c 000a 000b | |
011e 000c 000d | |
0120 0000 0000 | | .BLANK 0000[0xe0]