|
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, ELAB_segment_table, 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 0090 | | .CONST 0x0090 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0088 | | .CONST 0x0088 ; Offset to segment table (only in elab segments) 0007 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 000e | | .CONST 0x000e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029c 0013 | | Declare_Subprogram INIT_0010,For_Outer_Call,Visible 000d 00bf | | Action Accept_Activation 000e BODY_0008: 000e 00bc | | Action Signal_Activated 000f 00bb | | Action Signal_Completion 0010 ; -------------------------------------------------------------------------------------- 0010 ; SUBPROGRAM 0010 ; -------------------------------------------------------------------------------------- 0010 0015 | | .CONST 0x0015 ; Address of begin 0011 001a | | .CONST 0x001a ; Address of exception handler 0012 0002 | | .CONST 0x0002 ; Number of locals 0013 INIT_0010: 0013 029f 0023 | #| Declare_Subprogram INIT_0020,For_Call 0015 BODY_0010: 0015 8402 | | Call 0x2,0x2 0016 7801 |x | Jump 0x18 0017 0003 | | .XXX[0x1] 0018 006f | o | Action Break_Unconditional 0019 4501 |E | Exit_Suprogram New_Top_Offset 0x1 001a TRAP_0010: 001a 7801 |x | Jump 0x1c 001b 0003 | | .XXX[0x1] 001c 006f | o | Action Break_Unconditional 001d 00d8 | | Load_Top At_Offset_0 001e 0100 | | Execute Exception,Raise 001f 0000 | | .XXX[0x1] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 005e | ^ | .CONST 0x005e ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 000a | | .CONST 0x000a ; Number of locals 0023 INIT_0020: 0023 7801 |x | Jump 0x25 0024 0002 | | .XXX[0x1] 0025 006f | o | Action Break_Unconditional 0026 7830 |x0 | Jump 0x57 0027 4800 |H | Short_Literal 0x0 0028 605b |`[ | Indirect_Literal Discrete,0x84,{0x0014650b, 0x000000b0} 0029 02a0 | | Declare_Subprogram Null_Subprogram 002a 038e | | Declare_Type Package,Defined 002b 0387 | | Declare_Variable Package 002c 00d8 | | Load_Top At_Offset_0 002d 190d | | Execute Package,Field_Reference,Field_Number 0xd 002e 6051 |`Q | Indirect_Literal Discrete,0x80,{0x00000000, 0x003d6804} 002f e002 | | Load 0x0,0x2 0030 e001 | | Load 0x0,0x1 0031 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0032 6049 |`I | Indirect_Literal Discrete,0x7c,{0x00000000, 0x001a9404} 0033 e002 | | Load 0x0,0x2 0034 e001 | | Load 0x0,0x1 0035 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0036 6041 |`A | Indirect_Literal Discrete,0x78,{0x00000000, 0x003b6804} 0037 e002 | | Load 0x0,0x2 0038 e001 | | Load 0x0,0x1 0039 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003a 6039 |`9 | Indirect_Literal Discrete,0x74,{0x00000000, 0x000ca804} 003b e002 | | Load 0x0,0x2 003c e001 | | Load 0x0,0x1 003d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003e 6031 |`1 | Indirect_Literal Discrete,0x70,{0x00000000, 0x000cb004} 003f e002 | | Load 0x0,0x2 0040 e001 | | Load 0x0,0x1 0041 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0042 6029 |`) | Indirect_Literal Discrete,0x6c,{0x00000000, 0x000e3804} 0043 e002 | | Load 0x0,0x2 0044 e001 | | Load 0x0,0x1 0045 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0046 6021 |`! | Indirect_Literal Discrete,0x68,{0x00000000, 0x000e1804} 0047 e002 | | Load 0x0,0x2 0048 e001 | | Load 0x0,0x1 0049 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 004a e604 | | Load 0x3,0x4 004b e607 | | Load 0x3,0x7 004c e608 | | Load 0x3,0x8 004d e606 | | Load 0x3,0x6 004e e605 | | Load 0x3,0x5 004f e60a | | Load 0x3,0xa 0050 e609 | | Load 0x3,0x9 0051 4807 |H | Short_Literal 0x7 0052 e602 | | Load 0x3,0x2 0053 020e | | Execute Module,Augment_Imports 0054 e602 | | Load 0x3,0x2 0055 020f | | Execute Module,Activate 0056 7807 |x | Jump BODY_0020 0057 600c |` | Indirect_Literal Discrete,0x64,{0x00000000, 0x00001f40} 0058 6007 |` | Indirect_Literal Discrete,0x60,{0x00000000, 0x00190c04} 0059 e002 | | Load 0x0,0x2 005a e001 | | Load 0x0,0x1 005b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 005c 180d | | Execute Package,Field_Execute,Field_Number 0xd 005d 7fc9 | | Jump 0x27 005e BODY_0020: 005e 8603 | | Call 0x3,0x3 005f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0060 0000 0000 | | .LITERAL {0x00000000, 0x00190c04} 0064 0000 0000 | | .LITERAL {0x00000000, 0x00001f40} 0068 0000 0000 | | .LITERAL {0x00000000, 0x000e1804} 006c 0000 0000 | | .LITERAL {0x00000000, 0x000e3804} 0070 0000 0000 | | .LITERAL {0x00000000, 0x000cb004} 0074 0000 0000 | | .LITERAL {0x00000000, 0x000ca804} 0078 0000 0000 | | .LITERAL {0x00000000, 0x003b6804} 007c 0000 0000 | | .LITERAL {0x00000000, 0x001a9404} 0080 0000 0000 | | .LITERAL {0x00000000, 0x003d6804} 0084 0014 650b | e | .LITERAL {0x0014650b, 0x000000b0} 0088 ; -------------------------------------------------------------------------------------- 0088 ; Segment Table 0088 ; -------------------------------------------------------------------------------------- 0088 0028 | ( | .XXX[0x1] 0089 0000 0000 | | .BLANK 0000[0x7] 0090 ; -------------------------------------------------------------------------------------- 0090 ; Debug Table 0090 ; -------------------------------------------------------------------------------------- 0090 0004 000e | | .DEBUG4 0x0004,0x000e,0xa2eb,0x0000,0x0001,0x0000 0096 2020 2020 | | .BLANK 2020[0x5] 009b 2077 6865 | whe| .XXX[0xb] 009d 6e20 272f |n '/| 009f 2720 7c20 |' | | 00a1 273f 2720 |'?' | 00a3 3d3e 2900 |=>) | 00a5 3420 |4 | 00a6 2020 2020 | | .BLANK 2020[0xd] 00b3 2045 6469 | Edi| .XXX[0xe] 00b5 746f 722e |tor.| 00b7 5769 6e64 |Wind| 00b9 6f77 2e44 |ow.D| 00bb 6972 6563 |irec| 00bd 746f 7279 |tory| 00bf 3b34 0029 |;4 )| 00c1 2020 2020 | | .BLANK 2020[0xc] 00cd 7768 656e |when| .XXX[0xa] 00cf 2027 3227 | '2'| 00d1 207c 2027 | | '| 00d3 4027 203d |@' =| 00d5 3e29 0035 |>) 5| 00d7 2020 2020 | | .BLANK 2020[0xe] 00e5 4564 6974 |Edit| .XXX[0xe] 00e7 6f72 2e57 |or.W| 00e9 696e 646f |indo| 00eb 772e 4672 |w.Fr| 00ed 616d 6573 |ames| 00ef 2028 3229 | (2)| 00f1 3b35 0029 |;5 )| 00f3 2020 2020 | | .BLANK 2020[0xc] 00ff 7768 656e |when| .XXX[0xa] 0101 2027 3627 | '6'| 0103 207c 2027 | | '| 0105 5e27 203d |^' =| 0107 3e29 0035 |>) 5| 0109 2020 2020 | | .BLANK 2020[0xe] 0117 4564 6974 |Edit| .XXX[0xe] 0119 6f72 2e57 |or.W| 011b 696e 646f |indo| 011d 772e 4672 |w.Fr| 011f 616d 6573 |ames| 0121 2028 3629 | (6)| 0123 3b35 0035 |;5 5| 0125 2020 2020 | | .BLANK 2020[0xc] 0131 7768 656e |when| .XXX[0x10] 0133 2027 4127 | 'A'| 0135 207c 2027 | | '| 0137 6127 207c |a' || 0139 204e 756d | Num| 013b 6572 6963 |eric| 013d 5f37 203d |_7 =| 013f 3e35 0037 |>5 7| 0141 2020 2020 | | .BLANK 2020[0xe] 014f 4564 6974 |Edit| .XXX[0xf] 0151 6f72 2e57 |or.W| 0153 696e 646f |indo| 0155 772e 4265 |w.Be| 0157 6769 6e6e |ginn| 0159 696e 675f |ing_| 015b 4f66 3b37 |Of;7| 015d 0029 | ) | 015e 2020 2020 | | .BLANK 2020[0xc] 016a 7768 656e |when| .XXX[0xa] 016c 2027 4227 | 'B'| 016e 207c 2027 | | '| 0170 6227 203d |b' =| 0172 3e29 0037 |>) 7| 0174 2020 2020 | | .BLANK 2020[0xe] 0182 4564 6974 |Edit| .XXX[0xf] 0184 6f72 2e57 |or.W| 0186 696e 646f |indo| 0188 772e 4265 |w.Be| 018a 6769 6e6e |ginn| 018c 696e 675f |ing_| 018e 4f66 3b37 |Of;7| 0190 0029 | ) | 0191 2020 2020 | | .BLANK 2020[0xc] 019d 7768 656e |when| .XXX[0xa] 019f 2027 4327 | 'C'| 01a1 207c 2027 | | '| 01a3 6327 203d |c' =| 01a5 3e29 002f |>) /| 01a7 2020 2020 | | .BLANK 2020[0xe] 01b5 4564 6974 |Edit| .XXX[0xb] 01b7 6f72 2e57 |or.W| 01b9 696e 646f |indo| 01bb 772e 436f |w.Co| 01bd 7079 3b2f |py;/| 01bf 004d | M | 01c0 2020 2020 | | .BLANK 2020[0xc] 01cc 7768 656e |when| .XXX[0x1c] 01ce 2027 4427 | 'D'| 01d0 207c 2027 | | '| 01d2 4b27 207c |K' || 01d4 2027 5727 | 'W'| 01d6 207c 2027 | | '| 01d8 5827 207c |X' || 01da 2027 6427 | 'd'| 01dc 207c 2027 | | '| 01de 6b27 207c |k' || 01e0 2027 7727 | 'w'| 01e2 207c 2027 | | '| 01e4 7827 203d |x' =| 01e6 3e4d 002f |>M /| 01e8 2020 2020 | | .BLANK 2020[0xe] 01f6 4564 6974 |Edit| .XXX[0xa] 01f8 6f72 2e57 |or.W| 01fa 696e 646f |indo| 01fc 772e 4465 |w.De| 01fe 6c65 742f |let/|