|
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
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0120 | | .CONST 0x0120 ; 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 001b | | .CONST 0x001b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0009 | | .CONST 0x0009 ; Number of locals 000b INIT_0008: 000b e00c | | Load 0x0,0xc 000c 0007 | | Action Break_Optional 000d e007 | | Load 0x0,0x7 000e 0007 | | Action Break_Optional 000f e007 | | Load 0x0,0x7 0010 0007 | | Action Break_Optional 0011 e007 | | Load 0x0,0x7 0012 0007 | | Action Break_Optional 0013 e007 | | Load 0x0,0x7 0014 0007 | | Action Break_Optional 0015 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0017 029f 0083 | | Declare_Subprogram INIT_0080,For_Call 0019 029f 00bb | | Declare_Subprogram INIT_00b8,For_Call 001b BODY_0008: 001b e232 | 2 | Load 0x1,0x32 001c 0227 | ' | Execute Access,All_Reference 001d 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 001e e232 | 2 | Load 0x1,0x32 001f 0227 | ' | Execute Access,All_Reference 0020 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0021 0273 | s | Execute Discrete,Plus 0022 00d8 | | Load_Top At_Offset_0 0023 e007 | | Load 0x0,0x7 0024 0260 | ` | Execute Discrete,In_Type 0025 7001 |p | Jump_Nonzero 0x27 0026 0801 | | Execute_Immediate Raise,0x1 0027 a404 | | Store_Unchecked 0x2,0x4 0028 e220 | | Load 0x1,0x20 0029 e404 | | Load 0x2,0x4 002a 0272 | r | Execute Discrete,Minus 002b 09ff | | Execute_Immediate Binary_Scale,-0x1 002c e232 | 2 | Load 0x1,0x32 002d 0227 | ' | Execute Access,All_Reference 002e 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 002f 0273 | s | Execute Discrete,Plus 0030 00d8 | | Load_Top At_Offset_0 0031 e007 | | Load 0x0,0x7 0032 0260 | ` | Execute Discrete,In_Type 0033 7001 |p | Jump_Nonzero 0x35 0034 0801 | | Execute_Immediate Raise,0x1 0035 a406 | | Store_Unchecked 0x2,0x6 0036 e232 | 2 | Load 0x1,0x32 0037 0227 | ' | Execute Access,All_Reference 0038 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0039 e20f | | Load 0x1,0xf 003a e20d | | Load 0x1,0xd 003b 8033 | 3 | Call 0x0,0x33 003c 4800 |H | Short_Literal 0x0 003d a402 | | Store_Unchecked 0x2,0x2 003e 00cf | | Action Mark_Auxiliary 003f e02c | , | Load 0x0,0x2c 0040 0aff | | Execute_Immediate Plus,-0x1 0041 4800 |H | Short_Literal 0x0 0042 0263 | c | Execute Discrete,Above_Bound 0043 700f |p | Jump_Nonzero 0x53 0044 00cf | | Action Mark_Auxiliary 0045 e011 | | Load 0x0,0x11 0046 0aff | | Execute_Immediate Plus,-0x1 0047 4800 |H | Short_Literal 0x0 0048 0263 | c | Execute Discrete,Above_Bound 0049 7006 |p | Jump_Nonzero 0x50 004a 8409 | | Call 0x2,0x9 004b e402 | | Load 0x2,0x2 004c 0a01 | | Execute_Immediate Plus,0x1 004d c402 | | Store 0x2,0x2 004e 00c8 | | Action Pop_Auxiliary_Range 004f 3ffa |? | Loop_Increasing 0x4a 0050 00ce | | Action Pop_Auxiliary 0051 00c8 | | Action Pop_Auxiliary_Range 0052 3ff1 |? | Loop_Increasing 0x44 0053 4501 |E | Exit_Suprogram New_Top_Offset 0x1 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 e7fc | | Load 0x3,-0x4 005c 00d8 | | Load_Top At_Offset_0 005d e00d | | Load 0x0,0xd 005e 0260 | ` | Execute Discrete,In_Type 005f 7001 |p | Jump_Nonzero 0x61 0060 0801 | | Execute_Immediate Raise,0x1 0061 e7fd | | Load 0x3,-0x3 0062 00d8 | | Load_Top At_Offset_0 0063 e00d | | Load 0x0,0xd 0064 0260 | ` | Execute Discrete,In_Type 0065 7001 |p | Jump_Nonzero 0x67 0066 0801 | | Execute_Immediate Raise,0x1 0067 e7fe | | Load 0x3,-0x2 0068 00d8 | | Load_Top At_Offset_0 0069 e00d | | Load 0x0,0xd 006a 0260 | ` | Execute Discrete,In_Type 006b 7001 |p | Jump_Nonzero 0x6d 006c 0801 | | Execute_Immediate Raise,0x1 006d e7ff | | Load 0x3,-0x1 006e 00d8 | | Load_Top At_Offset_0 006f e00d | | Load 0x0,0xd 0070 0260 | ` | Execute Discrete,In_Type 0071 7001 |p | Jump_Nonzero 0x73 0072 0801 | | Execute_Immediate Raise,0x1 0073 e20f | | Load 0x1,0xf 0074 e22c | , | Load 0x1,0x2c 0075 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0076 e20d | | Load 0x1,0xd 0077 8061 | a | Call 0x0,0x61 0078 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0079 0000 0000 | | .BLANK 0000[0x7] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 00db | | Load_Top At_Offset_3 0084 00db | | Load_Top At_Offset_3 0085 8243 | C | Call 0x1,0x43 0086 e7fe | | Load 0x3,-0x2 0087 e7ff | | Load 0x3,-0x1 0088 8240 | @ | Call 0x1,0x40 0089 e7fe | | Load 0x3,-0x2 008a e7ff | | Load 0x3,-0x1 008b 8242 | B | Call 0x1,0x42 008c e7fe | | Load 0x3,-0x2 008d e7ff | | Load 0x3,-0x1 008e 823e | > | Call 0x1,0x3e 008f 8407 | | Call 0x2,0x7 0090 00db | | Load_Top At_Offset_3 0091 00db | | Load_Top At_Offset_3 0092 8245 | E | Call 0x1,0x45 0093 e7fe | | Load 0x3,-0x2 0094 e7ff | | Load 0x3,-0x1 0095 8241 | A | Call 0x1,0x41 0096 e7fe | | Load 0x3,-0x2 0097 e7ff | | Load 0x3,-0x1 0098 8243 | C | Call 0x1,0x43 0099 e7fe | | Load 0x3,-0x2 009a e7ff | | Load 0x3,-0x1 009b 8240 | @ | Call 0x1,0x40 009c 8407 | | Call 0x2,0x7 009d 00db | | Load_Top At_Offset_3 009e 00db | | Load_Top At_Offset_3 009f 8244 | D | Call 0x1,0x44 00a0 e7fe | | Load 0x3,-0x2 00a1 e7ff | | Load 0x3,-0x1 00a2 823f | ? | Call 0x1,0x3f 00a3 e7fe | | Load 0x3,-0x2 00a4 e7ff | | Load 0x3,-0x1 00a5 8245 | E | Call 0x1,0x45 00a6 e7fe | | Load 0x3,-0x2 00a7 e7ff | | Load 0x3,-0x1 00a8 8241 | A | Call 0x1,0x41 00a9 8407 | | Call 0x2,0x7 00aa 00db | | Load_Top At_Offset_3 00ab 00db | | Load_Top At_Offset_3 00ac 8242 | B | Call 0x1,0x42 00ad e7fe | | Load 0x3,-0x2 00ae e7ff | | Load 0x3,-0x1 00af 823e | > | Call 0x1,0x3e 00b0 e7fe | | Load 0x3,-0x2 00b1 e7ff | | Load 0x3,-0x1 00b2 8244 | D | Call 0x1,0x44 00b3 e7fe | | Load 0x3,-0x2 00b4 e7ff | | Load 0x3,-0x1 00b5 823f | ? | Call 0x1,0x3f 00b6 8407 | | Call 0x2,0x7 00b7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00c1 | | .CONST 0x00c1 ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0002 | | .CONST 0x0002 ; Number of locals 00bb INIT_00b8: 00bb e402 | | Load 0x2,0x2 00bc e062 | b | Load 0x0,0x62 00bd 0227 | ' | Execute Access,All_Reference 00be 01d7 | | Execute Vector,Field_Read 00bf 00e0 | | Load_Encached Standard_Cache 00c0 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00c1 BODY_00b8: 00c1 e402 | | Load 0x2,0x2 00c2 e062 | b | Load 0x0,0x62 00c3 0227 | ' | Execute Access,All_Reference 00c4 01d7 | | Execute Vector,Field_Read 00c5 700c |p | Jump_Nonzero 0xd2 00c6 e226 | & | Load 0x1,0x26 00c7 e220 | | Load 0x1,0x20 00c8 e221 | ! | Load 0x1,0x21 00c9 e40c | | Load 0x2,0xc 00ca e40f | | Load 0x2,0xf 00cb 8242 | B | Call 0x1,0x42 00cc e40c | | Load 0x2,0xc 00cd e40f | | Load 0x2,0xf 00ce 823e | > | Call 0x1,0x3e 00cf e22c | , | Load 0x1,0x2c 00d0 824a | J | Call 0x1,0x4a 00d1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00d2 e227 | ' | Load 0x1,0x27 00d3 e220 | | Load 0x1,0x20 00d4 e221 | ! | Load 0x1,0x21 00d5 e40c | | Load 0x2,0xc 00d6 e40f | | Load 0x2,0xf 00d7 8242 | B | Call 0x1,0x42 00d8 e40c | | Load 0x2,0xc 00d9 e40f | | Load 0x2,0xf 00da 823e | > | Call 0x1,0x3e 00db e22c | , | Load 0x1,0x2c 00dc 824a | J | Call 0x1,0x4a 00dd e40c | | Load 0x2,0xc 00de e40f | | Load 0x2,0xf 00df 8408 | | Call 0x2,0x8 00e0 00d8 | | Load_Top At_Offset_0 00e1 01dd | | Execute Vector,First 00e2 0a01 | | Execute_Immediate Plus,0x1 00e3 00d8 | | Load_Top At_Offset_0 00e4 00e2 | | Load_Encached Integer_Cache 00e5 0260 | ` | Execute Discrete,In_Type 00e6 7001 |p | Jump_Nonzero 0xe8 00e7 0801 | | Execute_Immediate Raise,0x1 00e8 00d9 | | Load_Top At_Offset_1 00e9 01dc | | Execute Vector,Last 00ea 00da | | Load_Top At_Offset_2 00eb 01cf | | Execute Vector,Slice_Read 00ec 8063 | c | Call 0x0,0x63 00ed e232 | 2 | Load 0x1,0x32 00ee 8032 | 2 | Call 0x0,0x32 00ef a403 | | Store_Unchecked 0x2,0x3 00f0 e221 | ! | Load 0x1,0x21 00f1 e403 | | Load 0x2,0x3 00f2 0272 | r | Execute Discrete,Minus 00f3 09ff | | Execute_Immediate Binary_Scale,-0x1 00f4 c405 | | Store 0x2,0x5 00f5 00d8 | | Load_Top At_Offset_0 00f6 01dd | | Execute Vector,First 00f7 0a01 | | Execute_Immediate Plus,0x1 00f8 00d8 | | Load_Top At_Offset_0 00f9 00e2 | | Load_Encached Integer_Cache 00fa 0260 | ` | Execute Discrete,In_Type 00fb 7001 |p | Jump_Nonzero 0xfd 00fc 0801 | | Execute_Immediate Raise,0x1 00fd 00d9 | | Load_Top At_Offset_1 00fe 01dc | | Execute Vector,Last 00ff 00da | | Load_Top At_Offset_2 0100 01cf | | Execute Vector,Slice_Read 0101 8063 | c | Call 0x0,0x63 0102 e40c | | Load 0x2,0xc 0103 e40f | | Load 0x2,0xf 0104 8242 | B | Call 0x1,0x42 0105 e406 | | Load 0x2,0x6 0106 0273 | s | Execute Discrete,Plus 0107 00d8 | | Load_Top At_Offset_0 0108 e00d | | Load 0x0,0xd 0109 0260 | ` | Execute Discrete,In_Type 010a 7001 |p | Jump_Nonzero 0x10c 010b 0801 | | Execute_Immediate Raise,0x1 010c e40c | | Load 0x2,0xc 010d e40f | | Load 0x2,0xf 010e 823e | > | Call 0x1,0x3e 010f e405 | | Load 0x2,0x5 0110 0273 | s | Execute Discrete,Plus 0111 00d8 | | Load_Top At_Offset_0 0112 e00d | | Load 0x0,0xd 0113 0260 | ` | Execute Discrete,In_Type 0114 7001 |p | Jump_Nonzero 0x116 0115 0801 | | Execute_Immediate Raise,0x1 0116 e20f | | Load 0x1,0xf 0117 e22c | , | Load 0x1,0x2c 0118 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0119 e20d | | Load 0x1,0xd 011a 8034 | 4 | Call 0x0,0x34 011b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 011c 0000 0000 | | .BLANK 0000[0x4] 0120 ; -------------------------------------------------------------------------------------- 0120 ; Debug Table 0120 ; -------------------------------------------------------------------------------------- 0120 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6915,0x0000,0x0001,0x0004 0126 000b 0136 | 6| .DBG4T 0x000b,0x0136,0x0001,0x0000 012a 005b 0147 | [ G| .DBG4T 0x005b,0x0147,0x0001,0x0000 012e 0083 014a | J| .DBG4T 0x0083,0x014a,0x0001,0x0000 0132 00bb 0150 | P| .DBG4T 0x00bb,0x0150,0x0004,0x0000 0136 ; -------------------------------------------------------------------------------------- 0136 ; Debug chain 0136 ; -------------------------------------------------------------------------------------- 0136 0007 0008 | | .DBGLEN 0x0007,0x0008 0138 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x001b,0x0028,0x0036,0x003c,0x003f,0x0045,0x004a,0x004b 0147 ; -------------------------------------------------------------------------------------- 0147 ; Debug chain 0147 ; -------------------------------------------------------------------------------------- 0147 0000 0001 | | .DBGLEN 0x0000,0x0001 0149 005b | [ | .DBGLNO 0x005b 014a ; -------------------------------------------------------------------------------------- 014a ; Debug chain 014a ; -------------------------------------------------------------------------------------- 014a 0000 0004 | | .DBGLEN 0x0000,0x0004 014c 0083 0090 | | .DBGLNO 0x0083,0x0090,0x009d,0x00aa 0150 ; -------------------------------------------------------------------------------------- 0150 ; Debug chain 0150 ; -------------------------------------------------------------------------------------- 0150 0001 0007 | | .DBGLEN 0x0001,0x0007 0152 00bb 00c1 | | .DBGLNO 0x00bb,0x00c1,0x00c6,0x00d2,0x00dd,0x00e0,0x00f0,0x00f5 015a 0000 0000 | | .BLANK 0000[0xa6]