|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0138 | 8 | .CONST 0x0138 ; 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 00ee | | .CONST 0x00ee ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002f | / | .CONST 0x002f ; Number of locals
000b INIT_0008:
000b a002 | | Store_Unchecked 0x0,0x2
000c 00c6 | | Action Check_Subprogram_Elaborated
000d e003 | | Load 0x0,0x3
000e 00d8 | | Load_Top At_Offset_0
000f 012c | , | Execute Any,Size
0010 00d9 | | Load_Top At_Offset_1
0011 0266 | f | Execute Discrete,Bounds
0012 00db | | Load_Top At_Offset_3
0013 0122 | " | Execute Any,Make_Root_Type
0014 00d8 | | Load_Top At_Offset_0
0015 012c | , | Execute Any,Size
0016 00d0 | | Action Swap_Control
0017 0266 | f | Execute Discrete,Bounds
0018 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
001a 03fa | | Declare_Type Discrete,Defined,With_Size
001b 03f7 | | QQ_Declare_Variable Discrete,XXX
001c 00cd | | Action Spare6_Action
001d 0129 | ) | Execute Any,Make_Visible
001e 0093 0000 | | push_full_address 0x0
0020 6113 |a | Indirect_Literal Discrete,0x134,{0x80000000, 0x00090000}
0021 0273 | s | Execute Discrete,Plus
0022 e004 | | Load 0x0,0x4
0023 0273 | s | Execute Discrete,Plus
0024 e005 | | Load 0x0,0x5
0025 0273 | s | Execute Discrete,Plus
0026 0129 | ) | Execute Any,Make_Visible
0027 4800 |H | Short_Literal 0x0
0028 0129 | ) | Execute Any,Make_Visible
0029 a006 | | Store_Unchecked 0x0,0x6
002a 00c6 | | Action Check_Subprogram_Elaborated
002b e007 | | Load 0x0,0x7
002c 0129 | ) | Execute Any,Make_Visible
002d 0093 0000 | | push_full_address 0x0
002f 6100 |a | Indirect_Literal Discrete,0x130,{0x80000000, 0x00080000}
0030 0273 | s | Execute Discrete,Plus
0031 e004 | | Load 0x0,0x4
0032 0273 | s | Execute Discrete,Plus
0033 e008 | | Load 0x0,0x8
0034 0273 | s | Execute Discrete,Plus
0035 0129 | ) | Execute Any,Make_Visible
0036 4800 |H | Short_Literal 0x0
0037 0129 | ) | Execute Any,Make_Visible
0038 a009 | | Store_Unchecked 0x0,0x9
0039 00c6 | | Action Check_Subprogram_Elaborated
003a e007 | | Load 0x0,0x7
003b 0129 | ) | Execute Any,Make_Visible
003c e00a | | Load 0x0,0xa
003d 00d8 | | Load_Top At_Offset_0
003e 012c | , | Execute Any,Size
003f 00d9 | | Load_Top At_Offset_1
0040 0266 | f | Execute Discrete,Bounds
0041 00db | | Load_Top At_Offset_3
0042 0122 | " | Execute Any,Make_Root_Type
0043 00d8 | | Load_Top At_Offset_0
0044 012c | , | Execute Any,Size
0045 00d0 | | Action Swap_Control
0046 0266 | f | Execute Discrete,Bounds
0047 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
0049 03fa | | Declare_Type Discrete,Defined,With_Size
004a 03f7 | | QQ_Declare_Variable Discrete,XXX
004b 00cd | | Action Spare6_Action
004c 0129 | ) | Execute Any,Make_Visible
004d e00b | | Load 0x0,0xb
004e 0129 | ) | Execute Any,Make_Visible
004f 0093 0000 | | push_full_address 0x0
0051 60da |` | Indirect_Literal Discrete,0x12c,{0x80000000, 0x00070000}
0052 0273 | s | Execute Discrete,Plus
0053 e004 | | Load 0x0,0x4
0054 0273 | s | Execute Discrete,Plus
0055 e00c | | Load 0x0,0xc
0056 0273 | s | Execute Discrete,Plus
0057 0129 | ) | Execute Any,Make_Visible
0058 4800 |H | Short_Literal 0x0
0059 0129 | ) | Execute Any,Make_Visible
005a a006 | | Store_Unchecked 0x0,0x6
005b 00c6 | | Action Check_Subprogram_Elaborated
005c e00d | | Load 0x0,0xd
005d 0129 | ) | Execute Any,Make_Visible
005e 0093 0000 | | push_full_address 0x0
0060 60c7 |` | Indirect_Literal Discrete,0x128,{0x80000000, 0x00060000}
0061 0273 | s | Execute Discrete,Plus
0062 e004 | | Load 0x0,0x4
0063 0273 | s | Execute Discrete,Plus
0064 e00e | | Load 0x0,0xe
0065 0273 | s | Execute Discrete,Plus
0066 0129 | ) | Execute Any,Make_Visible
0067 4800 |H | Short_Literal 0x0
0068 0129 | ) | Execute Any,Make_Visible
0069 a009 | | Store_Unchecked 0x0,0x9
006a 00c6 | | Action Check_Subprogram_Elaborated
006b e00d | | Load 0x0,0xd
006c 0129 | ) | Execute Any,Make_Visible
006d e00a | | Load 0x0,0xa
006e 00d8 | | Load_Top At_Offset_0
006f 012c | , | Execute Any,Size
0070 00d9 | | Load_Top At_Offset_1
0071 0266 | f | Execute Discrete,Bounds
0072 00db | | Load_Top At_Offset_3
0073 0122 | " | Execute Any,Make_Root_Type
0074 00d8 | | Load_Top At_Offset_0
0075 012c | , | Execute Any,Size
0076 00d0 | | Action Swap_Control
0077 0266 | f | Execute Discrete,Bounds
0078 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
007a 03fa | | Declare_Type Discrete,Defined,With_Size
007b 03f7 | | QQ_Declare_Variable Discrete,XXX
007c 00cd | | Action Spare6_Action
007d 0129 | ) | Execute Any,Make_Visible
007e e00f | | Load 0x0,0xf
007f 0129 | ) | Execute Any,Make_Visible
0080 0093 0000 | | push_full_address 0x0
0082 60a1 |` | Indirect_Literal Discrete,0x124,{0x80000000, 0x00050000}
0083 0273 | s | Execute Discrete,Plus
0084 e004 | | Load 0x0,0x4
0085 0273 | s | Execute Discrete,Plus
0086 e010 | | Load 0x0,0x10
0087 0273 | s | Execute Discrete,Plus
0088 0129 | ) | Execute Any,Make_Visible
0089 4800 |H | Short_Literal 0x0
008a 0129 | ) | Execute Any,Make_Visible
008b a006 | | Store_Unchecked 0x0,0x6
008c 00c6 | | Action Check_Subprogram_Elaborated
008d e011 | | Load 0x0,0x11
008e 0129 | ) | Execute Any,Make_Visible
008f 0093 0000 | | push_full_address 0x0
0091 608e |` | Indirect_Literal Discrete,0x120,{0x80000000, 0x00040000}
0092 0273 | s | Execute Discrete,Plus
0093 e004 | | Load 0x0,0x4
0094 0273 | s | Execute Discrete,Plus
0095 e012 | | Load 0x0,0x12
0096 0273 | s | Execute Discrete,Plus
0097 0129 | ) | Execute Any,Make_Visible
0098 4800 |H | Short_Literal 0x0
0099 0129 | ) | Execute Any,Make_Visible
009a a009 | | Store_Unchecked 0x0,0x9
009b 00c6 | | Action Check_Subprogram_Elaborated
009c e011 | | Load 0x0,0x11
009d 0129 | ) | Execute Any,Make_Visible
009e e00a | | Load 0x0,0xa
009f 00d8 | | Load_Top At_Offset_0
00a0 012c | , | Execute Any,Size
00a1 00d9 | | Load_Top At_Offset_1
00a2 0266 | f | Execute Discrete,Bounds
00a3 00db | | Load_Top At_Offset_3
00a4 0122 | " | Execute Any,Make_Root_Type
00a5 00d8 | | Load_Top At_Offset_0
00a6 012c | , | Execute Any,Size
00a7 00d0 | | Action Swap_Control
00a8 0266 | f | Execute Discrete,Bounds
00a9 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
00ab 03fa | | Declare_Type Discrete,Defined,With_Size
00ac 03f7 | | QQ_Declare_Variable Discrete,XXX
00ad 00cd | | Action Spare6_Action
00ae 0129 | ) | Execute Any,Make_Visible
00af e013 | | Load 0x0,0x13
00b0 0129 | ) | Execute Any,Make_Visible
00b1 0093 0000 | | push_full_address 0x0
00b3 6068 |`h | Indirect_Literal Discrete,0x11c,{0x80000000, 0x00030000}
00b4 0273 | s | Execute Discrete,Plus
00b5 e004 | | Load 0x0,0x4
00b6 0273 | s | Execute Discrete,Plus
00b7 e014 | | Load 0x0,0x14
00b8 0273 | s | Execute Discrete,Plus
00b9 0129 | ) | Execute Any,Make_Visible
00ba 4800 |H | Short_Literal 0x0
00bb 0129 | ) | Execute Any,Make_Visible
00bc a006 | | Store_Unchecked 0x0,0x6
00bd 00c6 | | Action Check_Subprogram_Elaborated
00be e015 | | Load 0x0,0x15
00bf 0129 | ) | Execute Any,Make_Visible
00c0 0093 0000 | | push_full_address 0x0
00c2 6055 |`U | Indirect_Literal Discrete,0x118,{0x80000000, 0x00020000}
00c3 0273 | s | Execute Discrete,Plus
00c4 e004 | | Load 0x0,0x4
00c5 0273 | s | Execute Discrete,Plus
00c6 e016 | | Load 0x0,0x16
00c7 0273 | s | Execute Discrete,Plus
00c8 0129 | ) | Execute Any,Make_Visible
00c9 4800 |H | Short_Literal 0x0
00ca 0129 | ) | Execute Any,Make_Visible
00cb a009 | | Store_Unchecked 0x0,0x9
00cc 00c6 | | Action Check_Subprogram_Elaborated
00cd e015 | | Load 0x0,0x15
00ce 0129 | ) | Execute Any,Make_Visible
00cf e00a | | Load 0x0,0xa
00d0 00d8 | | Load_Top At_Offset_0
00d1 012c | , | Execute Any,Size
00d2 00d9 | | Load_Top At_Offset_1
00d3 0266 | f | Execute Discrete,Bounds
00d4 00db | | Load_Top At_Offset_3
00d5 0122 | " | Execute Any,Make_Root_Type
00d6 00d8 | | Load_Top At_Offset_0
00d7 012c | , | Execute Any,Size
00d8 00d0 | | Action Swap_Control
00d9 0266 | f | Execute Discrete,Bounds
00da 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
00dc 03fa | | Declare_Type Discrete,Defined,With_Size
00dd 03f7 | | QQ_Declare_Variable Discrete,XXX
00de 00cd | | Action Spare6_Action
00df 0129 | ) | Execute Any,Make_Visible
00e0 e017 | | Load 0x0,0x17
00e1 0129 | ) | Execute Any,Make_Visible
00e2 0093 0000 | | push_full_address 0x0
00e4 602f |`/ | Indirect_Literal Discrete,0x114,{0x80000000, 0x00010000}
00e5 0273 | s | Execute Discrete,Plus
00e6 e004 | | Load 0x0,0x4
00e7 0273 | s | Execute Discrete,Plus
00e8 e018 | | Load 0x0,0x18
00e9 0273 | s | Execute Discrete,Plus
00ea 0129 | ) | Execute Any,Make_Visible
00eb 4800 |H | Short_Literal 0x0
00ec 0129 | ) | Execute Any,Make_Visible
00ed 00bf | | Action Accept_Activation
00ee BODY_0008:
00ee 00bc | | Action Signal_Activated
00ef 00bb | | Action Signal_Completion
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; SUBPROGRAM
00f0 ; SUBPROGRAM
00f0 ; SUBPROGRAM
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 BODY_00f0:
00f3 BODY_00f0:
00f3 BODY_00f0:
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 INIT_00f0:
00f3 INIT_00f0:
00f3 INIT_00f0:
00f3 INIT_00f0:
00f3 4607 |F | Jump_Case 0x8
00f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00f5 7807 |x | Jump 0xfd ; case 0x1
00f6 780a |x | Jump 0x101 ; case 0x2
00f7 780e |x | Jump 0x106 ; case 0x3
00f8 7811 |x | Jump 0x10a ; case 0x4
00f9 7810 |x | Jump 0x10a ; case 0x5
00fa 7811 |x | Jump 0x10c ; case 0x6
00fb 7814 |x | Jump 0x110 ; case 0x7
00fc 4302 |C | .XXX[0x1]
00fd 00da | | Load_Top At_Offset_2
00fe 00e0 | | Load_Encached Standard_Cache
00ff 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0100 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0101 00db | | Load_Top At_Offset_3
0102 00db | | Load_Top At_Offset_3
0103 00e0 | | Load_Encached Standard_Cache
0104 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0105 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0106 00da | | Load_Top At_Offset_2
0107 00e0 | | Load_Encached Standard_Cache
0108 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0109 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
010a 00db | | Load_Top At_Offset_3
010b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
010c 00e5 | | Load_Encached Long_Integer_Cache
010d 00dc | | Load_Top At_Offset_4
010e 0267 | g | Execute Discrete,Predecessor
010f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0110 00e5 | | Load_Encached Long_Integer_Cache
0111 00dc | | Load_Top At_Offset_4
0112 0268 | h | Execute Discrete,Successor
0113 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0114 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0118 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
011c 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
0120 8000 0000 | | .LITERAL {0x80000000, 0x00040000}
0124 8000 0000 | | .LITERAL {0x80000000, 0x00050000}
0128 8000 0000 | | .LITERAL {0x80000000, 0x00060000}
012c 8000 0000 | | .LITERAL {0x80000000, 0x00070000}
0130 8000 0000 | | .LITERAL {0x80000000, 0x00080000}
0134 8000 0000 | | .LITERAL {0x80000000, 0x00090000}
0138 ; --------------------------------------------------------------------------------------
0138 ; Debug Table
0138 ; --------------------------------------------------------------------------------------
0138 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68b3,0x0000,0x0001,0x0002
013e 000b 0146 | F| .DBG4T 0x000b,0x0146,0x8000,0x0000
0142 00f3 0000 | | .DBG4T 0x00f3,0x0000,0x0005,0x0000
0146 ; --------------------------------------------------------------------------------------
0146 ; Debug chain
0146 ; --------------------------------------------------------------------------------------
0146 0009 0000 | | .DBGLEN 0x0009,0x0000
0148 000b 0029 | )| .DBGLNO 0x000b,0x0029,0x0038,0x005a,0x0069,0x008b,0x009a,0x00bc,0x00cb
0151 0000 0000 | | .BLANK 0000[0xaf]