|
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_0ea8df
└─⟦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 00c8 | | .CONST 0x00c8 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 00c0 | | .CONST 0x00c0 ; 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 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 0082 | | .CONST 0x0082 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 000d | | .CONST 0x000d ; Number of locals 0023 INIT_0020: 0023 7801 |x | Jump 0x25 0024 0002 | | .XXX[0x1] 0025 006f | o | Action Break_Unconditional 0026 7854 |xT | Jump 0x7b 0027 4800 |H | Short_Literal 0x0 0028 6093 |` | Indirect_Literal Discrete,0xbc,{0x0007590a, 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 6089 |` | Indirect_Literal Discrete,0xb8,{0x00000000, 0x001fac04} 002f e002 | | Load 0x0,0x2 0030 e001 | | Load 0x0,0x1 0031 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0032 6081 |` | Indirect_Literal Discrete,0xb4,{0x00000000, 0x0036c804} 0033 e002 | | Load 0x0,0x2 0034 e001 | | Load 0x0,0x1 0035 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0036 6079 |`y | Indirect_Literal Discrete,0xb0,{0x00000000, 0x003d5804} 0037 e002 | | Load 0x0,0x2 0038 e001 | | Load 0x0,0x1 0039 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003a 6071 |`q | Indirect_Literal Discrete,0xac,{0x00000000, 0x00372004} 003b e002 | | Load 0x0,0x2 003c e001 | | Load 0x0,0x1 003d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003e 190d | | Execute Package,Field_Reference,Field_Number 0xd 003f 6068 |`h | Indirect_Literal Discrete,0xa8,{0x00000000, 0x000b6004} 0040 e002 | | Load 0x0,0x2 0041 e001 | | Load 0x0,0x1 0042 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0043 190d | | Execute Package,Field_Reference,Field_Number 0xd 0044 605f |`_ | Indirect_Literal Discrete,0xa4,{0x00000000, 0x0004bc04} 0045 e002 | | Load 0x0,0x2 0046 e001 | | Load 0x0,0x1 0047 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0048 6057 |`W | Indirect_Literal Discrete,0xa0,{0x00000000, 0x00010804} 0049 e002 | | Load 0x0,0x2 004a e001 | | Load 0x0,0x1 004b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 004c 604f |`O | Indirect_Literal Discrete,0x9c,{0x00000000, 0x003e1404} 004d e002 | | Load 0x0,0x2 004e e001 | | Load 0x0,0x1 004f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0050 6047 |`G | Indirect_Literal Discrete,0x98,{0x00000000, 0x003ed004} 0051 e002 | | Load 0x0,0x2 0052 e001 | | Load 0x0,0x1 0053 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0054 603f |`? | Indirect_Literal Discrete,0x94,{0x00000000, 0x003d5404} 0055 e002 | | Load 0x0,0x2 0056 e001 | | Load 0x0,0x1 0057 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0058 4801 |H | Short_Literal 0x1 0059 4800 |H | Short_Literal 0x0 005a 00e5 | | Load_Encached Long_Integer_Cache 005b 02a0 | | Declare_Subprogram Null_Subprogram 005c 4801 |H | Short_Literal 0x1 005d 035d | ] | Declare_Type Array,Defined 005e 0337 | 7 | Declare_Variable Array 005f 6030 |`0 | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 0060 4807 |H | Short_Literal 0x7 0061 e608 | | Load 0x3,0x8 0062 e605 | | Load 0x3,0x5 0063 602c |`, | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 0064 4806 |H | Short_Literal 0x6 0065 e607 | | Load 0x3,0x7 0066 6029 |`) | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 0067 4805 |H | Short_Literal 0x5 0068 6027 |`' | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 0069 4804 |H | Short_Literal 0x4 006a 6025 |`% | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 006b 4803 |H | Short_Literal 0x3 006c 6023 |`# | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 006d 4802 |H | Short_Literal 0x2 006e 6021 |`! | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db} 006f 4801 |H | Short_Literal 0x1 0070 e60d | | Load 0x3,0xd 0071 e609 | | Load 0x3,0x9 0072 e60b | | Load 0x3,0xb 0073 e60a | | Load 0x3,0xa 0074 e606 | | Load 0x3,0x6 0075 4817 |H | Short_Literal 0x17 0076 e602 | | Load 0x3,0x2 0077 020e | | Execute Module,Augment_Imports 0078 e602 | | Load 0x3,0x2 0079 020f | | Execute Module,Activate 007a 7807 |x | Jump BODY_0020 007b 6010 |` | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00001f40} 007c 600b |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00190c04} 007d e002 | | Load 0x0,0x2 007e e001 | | Load 0x0,0x1 007f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0080 180d | | Execute Package,Field_Execute,Field_Number 0xd 0081 7fa5 | | Jump 0x27 0082 BODY_0020: 0082 e5fe | | Load 0x2,-0x2 0083 e5ff | | Load 0x2,-0x1 0084 8603 | | Call 0x3,0x3 0085 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0086 0000 0000 | | .XXX[0x2] 0088 0000 0000 | | .LITERAL {0x00000000, 0x00190c04} 008c 0000 0000 | | .LITERAL {0x00000000, 0x00001f40} 0090 0000 0001 | | .LITERAL {0x00000001, 0x000206db} 0094 0000 0000 | | .LITERAL {0x00000000, 0x003d5404} 0098 0000 0000 | | .LITERAL {0x00000000, 0x003ed004} 009c 0000 0000 | | .LITERAL {0x00000000, 0x003e1404} 00a0 0000 0000 | | .LITERAL {0x00000000, 0x00010804} 00a4 0000 0000 | | .LITERAL {0x00000000, 0x0004bc04} 00a8 0000 0000 | | .LITERAL {0x00000000, 0x000b6004} 00ac 0000 0000 | | .LITERAL {0x00000000, 0x00372004} 00b0 0000 0000 | | .LITERAL {0x00000000, 0x003d5804} 00b4 0000 0000 | | .LITERAL {0x00000000, 0x0036c804} 00b8 0000 0000 | | .LITERAL {0x00000000, 0x001fac04} 00bc 0007 590a | Y | .LITERAL {0x0007590a, 0x000000b0} 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; Segment Table 00c0 ; -------------------------------------------------------------------------------------- 00c0 0028 | ( | .XXX[0x1] 00c1 0000 0000 | | .BLANK 0000[0x7] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; Debug Table 00c8 ; -------------------------------------------------------------------------------------- 00c8 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06db,0x0000,0x0001,0x0000 00ce 2020 2020 | | .BLANK 2020[0x8] 00d6 4564 6974 |Edit| .XXX[0xc] 00d8 6f72 2e4d |or.M| 00da 6172 6b2e |ark.| 00dc 5072 6576 |Prev| 00de 696f 7573 |ious| 00e0 3b31 002f |;1 /| 00e2 2020 2020 | | .BLANK 2020[0xc] 00ee 7768 656e |when| .XXX[0xd] 00f0 2052 6967 | Rig| 00f2 6874 207c |ht || 00f4 2053 5f52 | S_R| 00f6 6967 6874 |ight| 00f8 203d 3e2f | =>/| 00fa 002d | - | 00fb 2020 2020 | | .BLANK 2020[0xe] 0109 4564 6974 |Edit| .XXX[0xa] 010b 6f72 2e4d |or.M| 010d 6172 6b2e |ark.| 010f 4e65 7874 |Next| 0111 3b2d 0026 |;- &| 0113 2020 2020 | | .BLANK 2020[0xc] 011f 7768 656e |when| .XXX[0x9] 0121 206f 7468 | oth| 0123 6572 7320 |ers | 0125 3d3e 2600 |=>& | 0127 2120 |! | 0128 2020 2020 | | .BLANK 2020[0xd] 0135 206e 756c | nul| .XXX[0x5] 0137 6c3b 2100 |l;! | 0139 1d20 | | 013a 2020 2020 | | .BLANK 2020[0x9] 0143 2065 6e64 | end| .XXX[0x6] 0145 2063 6173 | cas| 0147 653b 1d00 |e; | 0149 2020 2020 | | .BLANK 2020[0x8] 0151 2077 6865 | whe| .XXX[0xa] 0153 6e20 4265 |n Be| 0155 6769 6e5f |gin_| 0157 4f66 203d |Of =| 0159 3e20 002d |> -| 015b 2020 2020 | | .BLANK 2020[0xa] 0165 4564 6974 |Edit| .XXX[0xe] 0167 6f72 2e4c |or.L| 0169 696e 652e |ine.| 016b 4265 6769 |Begi| 016d 6e6e 696e |nnin| 016f 675f 4f66 |g_Of| 0171 3b2d 001e |;- | 0173 2020 2020 | | .BLANK 2020[0x8] 017b 7768 656e |when| .XXX[0x9] 017d 2045 6e64 | End| 017f 5f4f 6620 |_Of | 0181 3d3e 1e00 |=> | 0183 2720 |' | 0184 2020 2020 | | .BLANK 2020[0x9] 018d 2045 6469 | Edi| .XXX[0xc] 018f 746f 722e |tor.| 0191 4c69 6e65 |Line| 0193 2e45 6e64 |.End| 0195 5f4f 663b |_Of;| 0197 2700 2920 |' ) | 0199 2020 2020 | | .BLANK 2020[0x7] 01a0 2077 6865 | whe| .XXX[0xf] 01a2 6e20 5072 |n Pr| 01a4 6f6d 6f74 |omot| 01a6 207c 2053 | | S| 01a8 5f50 726f |_Pro| 01aa 6d6f 7420 |mot | 01ac 3d3e 2900 |=>) | 01ae 2320 |# | 01af 2020 2020 | | .BLANK 2020[0x9] 01b8 2043 6f6d | Com| .XXX[0xa] 01ba 6d6f 6e2e |mon.| 01bc 5072 6f6d |Prom| 01be 6f74 653b |ote;| 01c0 2300 2920 |# ) | 01c2 2020 2020 | | .BLANK 2020[0x7] 01c9 2077 6865 | whe| .XXX[0xf] 01cb 6e20 436f |n Co| 01cd 6d70 6c74 |mplt| 01cf 207c 2053 | | S| 01d1 5f43 6f6d |_Com| 01d3 706c 7420 |plt | 01d5 3d3e 2900 |=>) | 01d7 2420 |$ | 01d8 2020 2020 | | .BLANK 2020[0x9] 01e1 2043 6f6d | Com| .XXX[0xa] 01e3 6d6f 6e2e |mon.| 01e5 436f 6d70 |Comp| 01e7 6c65 7465 |lete| 01e9 3b24 0029 |;$ )| 01eb 2020 2020 | | .BLANK 2020[0x8] 01f3 7768 656e |when| .XXX[0xd] 01f5 2046 6f72 | For| 01f7 6d61 7420 |mat | 01f9 7c20 535f || S_| 01fb 466f 726d |Form| 01fd 6174 203d |at =| 01ff 3e29 |>) |