|
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_0500e0
└─⟦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 00b8 | | .CONST 0x00b8 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 00b4 | | .CONST 0x00b4 ; 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 0073 | s | .CONST 0x0073 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 000f | | .CONST 0x000f ; Number of locals 0023 INIT_0020: 0023 7801 |x | Jump 0x25 0024 0002 | | .XXX[0x1] 0025 006f | o | Action Break_Unconditional 0026 7845 |xE | Jump 0x6c 0027 4800 |H | Short_Literal 0x0 0028 6087 |` | Indirect_Literal Discrete,0xb0,{0x0036710b, 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 607d |`} | Indirect_Literal Discrete,0xac,{0x00000000, 0x00096804} 002f e002 | | Load 0x0,0x2 0030 e001 | | Load 0x0,0x1 0031 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0032 6075 |`u | Indirect_Literal Discrete,0xa8,{0x00000000, 0x000cb004} 0033 e002 | | Load 0x0,0x2 0034 e001 | | Load 0x0,0x1 0035 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0036 606d |`m | Indirect_Literal Discrete,0xa4,{0x00000000, 0x003d4c04} 0037 e002 | | Load 0x0,0x2 0038 e001 | | Load 0x0,0x1 0039 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003a 6065 |`e | Indirect_Literal Discrete,0xa0,{0x00000000, 0x0036c804} 003b e002 | | Load 0x0,0x2 003c e001 | | Load 0x0,0x1 003d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 003e 605d |`] | Indirect_Literal Discrete,0x9c,{0x00000000, 0x001a9404} 003f e002 | | Load 0x0,0x2 0040 e001 | | Load 0x0,0x1 0041 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0042 6055 |`U | Indirect_Literal Discrete,0x98,{0x00000000, 0x00065c04} 0043 e002 | | Load 0x0,0x2 0044 e001 | | Load 0x0,0x1 0045 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0046 604d |`M | Indirect_Literal Discrete,0x94,{0x00000000, 0x003d7004} 0047 e002 | | Load 0x0,0x2 0048 e001 | | Load 0x0,0x1 0049 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 004a 6045 |`E | Indirect_Literal Discrete,0x90,{0x00000000, 0x003b6804} 004b e002 | | Load 0x0,0x2 004c e001 | | Load 0x0,0x1 004d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 004e 603d |`= | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00352404} 004f e002 | | Load 0x0,0x2 0050 e001 | | Load 0x0,0x1 0051 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0052 6035 |`5 | Indirect_Literal Discrete,0x88,{0x00000000, 0x003e1004} 0053 e002 | | Load 0x0,0x2 0054 e001 | | Load 0x0,0x1 0055 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0056 602d |`- | Indirect_Literal Discrete,0x84,{0x00000000, 0x000e3804} 0057 e002 | | Load 0x0,0x2 0058 e001 | | Load 0x0,0x1 0059 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 005a 6025 |`% | Indirect_Literal Discrete,0x80,{0x00000000, 0x000e1804} 005b e002 | | Load 0x0,0x2 005c e001 | | Load 0x0,0x1 005d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 005e 00db | | Load_Top At_Offset_3 005f e606 | | Load 0x3,0x6 0060 e60a | | Load 0x3,0xa 0061 e604 | | Load 0x3,0x4 0062 e605 | | Load 0x3,0x5 0063 e608 | | Load 0x3,0x8 0064 e60f | | Load 0x3,0xf 0065 e60e | | Load 0x3,0xe 0066 4808 |H | Short_Literal 0x8 0067 e602 | | Load 0x3,0x2 0068 020e | | Execute Module,Augment_Imports 0069 e602 | | Load 0x3,0x2 006a 020f | | Execute Module,Activate 006b 7807 |x | Jump BODY_0020 006c 600f |` | Indirect_Literal Discrete,0x7c,{0x00000000, 0x00001f40} 006d 600a |` | Indirect_Literal Discrete,0x78,{0x00000000, 0x00190c04} 006e e002 | | Load 0x0,0x2 006f e001 | | Load 0x0,0x1 0070 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0071 180d | | Execute Package,Field_Execute,Field_Number 0xd 0072 7fb4 | | Jump 0x27 0073 BODY_0020: 0073 8603 | | Call 0x3,0x3 0074 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 0000 0000 | | .LITERAL {0x00000000, 0x00190c04} 007c 0000 0000 | | .LITERAL {0x00000000, 0x00001f40} 0080 0000 0000 | | .LITERAL {0x00000000, 0x000e1804} 0084 0000 0000 | | .LITERAL {0x00000000, 0x000e3804} 0088 0000 0000 | | .LITERAL {0x00000000, 0x003e1004} 008c 0000 0000 | | .LITERAL {0x00000000, 0x00352404} 0090 0000 0000 | | .LITERAL {0x00000000, 0x003b6804} 0094 0000 0000 | | .LITERAL {0x00000000, 0x003d7004} 0098 0000 0000 | | .LITERAL {0x00000000, 0x00065c04} 009c 0000 0000 | | .LITERAL {0x00000000, 0x001a9404} 00a0 0000 0000 | | .LITERAL {0x00000000, 0x0036c804} 00a4 0000 0000 | | .LITERAL {0x00000000, 0x003d4c04} 00a8 0000 0000 | | .LITERAL {0x00000000, 0x000cb004} 00ac 0000 0000 | | .LITERAL {0x00000000, 0x00096804} 00b0 0036 710b | 6q | .LITERAL {0x0036710b, 0x000000b0} 00b4 ; -------------------------------------------------------------------------------------- 00b4 ; Segment Table 00b4 ; -------------------------------------------------------------------------------------- 00b4 0028 0000 | ( | .XXX[0x4] 00b6 0000 0000 | | 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; Debug Table 00b8 ; -------------------------------------------------------------------------------------- 00b8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x7705,0x0000,0x0001,0x0000 00be 7661 7465 |vate| .XXX[0x4] 00c0 3b27 001f |;' | 00c2 2020 2020 | | .BLANK 2020[0x8] 00ca 7768 656e |when| .XXX[0x9] 00cc 2043 6d73 | Cms| 00ce 5f46 3136 |_F16| 00d0 203d 3e1f | => | 00d2 0037 | 7 | 00d3 2020 2020 | | .BLANK 2020[0xa] 00dd 4164 612e |Ada.| .XXX[0x13] 00df 5368 6f77 |Show| 00e1 5f55 7361 |_Usa| 00e3 6765 2028 |ge (| 00e5 4e61 6d65 |Name| 00e7 203d 3e20 | => | 00e9 223c 4355 |"<CU| 00eb 5253 4f52 |RSOR| 00ed 3e22 2c37 |>",7| 00ef 0033 | 3 | 00f0 2020 2020 | | .BLANK 2020[0x12] 0102 476c 6f62 |Glob| .XXX[0x9] 0104 616c 203d |al =| 0106 3e20 5472 |> Tr| 0108 7565 2c33 |ue,3| 010a 003c | < | 010b 2020 2020 | | .BLANK 2020[0x12] 011d 4c69 6d69 |Limi| .XXX[0xe] 011f 7420 3d3e |t =>| 0121 2022 3c41 | "<A| 0123 4c4c 5f57 |LL_W| 0125 4f52 4c44 |ORLD| 0127 533e 222c |S>",| 0129 3c00 3520 |< 5 | 012b 2020 2020 | | .BLANK 2020[0x11] 013c 2043 6c6f | Clo| .XXX[0xb] 013e 7375 7265 |sure| 0140 203d 3e20 | => | 0142 5472 7565 |True| 0144 293b 3500 |);5 | 0146 1f20 | | 0147 2020 2020 | | .BLANK 2020[0x7] 014e 2077 6865 | whe| .XXX[0xa] 0150 6e20 436d |n Cm| 0152 735f 4631 |s_F1| 0154 3720 3d3e |7 =>| 0156 1f00 2420 | $ | 0158 2020 2020 | | .BLANK 2020[0x9] 0161 2041 6461 | Ada| .XXX[0xa] 0163 2e4d 616b |.Mak| 0165 655f 496e |e_In| 0167 6c69 6e65 |line| 0169 3b24 001f |;$ | 016b 2020 2020 | | .BLANK 2020[0x8] 0173 7768 656e |when| .XXX[0x9] 0175 2043 6d73 | Cms| 0177 5f46 3138 |_F18| 0179 203d 3e1f | => | 017b 0026 | & | 017c 2020 2020 | | .BLANK 2020[0xa] 0186 4164 612e |Ada.| .XXX[0xb] 0188 4d61 6b65 |Make| 018a 5f53 6570 |_Sep| 018c 6172 6174 |arat| 018e 653b 2600 |e;& | 0190 1f20 | | 0191 2020 2020 | | .BLANK 2020[0x7] 0198 2077 6865 | whe| .XXX[0xa] 019a 6e20 436d |n Cm| 019c 735f 4632 |s_F2| 019e 3020 3d3e |0 =>| 01a0 1f00 4320 | C | 01a2 2020 2020 | | .BLANK 2020[0x9] 01ab 2041 6363 | Acc| .XXX[0x1a] 01ad 6573 735f |ess_| 01af 4c69 7374 |List| 01b1 2e44 6973 |.Dis| 01b3 706c 6179 |play| 01b5 2028 466f | (Fo| 01b7 725f 4f62 |r_Ob| 01b9 6a65 6374 |ject| 01bb 203d 3e20 | => | 01bd 223c 4355 |"<CU| 01bf 5253 4f52 |RSOR| 01c1 3e22 293b |>");| 01c3 4300 2420 |C $ | 01c5 2020 2020 | | .BLANK 2020[0x7] 01cc 2077 6865 | whe| .XXX[0xc] 01ce 6e20 436d |n Cm| 01d0 735f 4265 |s_Be| 01d2 6769 6e5f |gin_| 01d4 4f66 203d |Of =| 01d6 3e24 0026 |>$ &| 01d8 2020 2020 | | .BLANK 2020[0xa] 01e2 4564 6974 |Edit| .XXX[0xb] 01e4 6f72 2e53 |or.S| 01e6 6372 6565 |cree| 01e8 6e2e 546f |n.To| 01ea 703b 2600 |p;& | 01ec 1e20 | | 01ed 2020 2020 | | .BLANK 2020[0x7] 01f4 2077 6865 | whe| .XXX[0xc] 01f6 6e20 436d |n Cm| 01f8 735f 5570 |s_Up| 01fa 203d 3e1e | => | 01fc 0005 2020 | | 01fe 2020 2005 | |