|
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_5e40f2
└─⟦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 0068 | h | .CONST 0x0068 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 00da | | Load_Top At_Offset_2 001c 01db | | Execute Vector,Length 001d 7007 |p | Jump_Nonzero 0x25 001e 0092 0044 | D| Action Push_String_Extended,0x44 ; "<PROFILE>" 0020 0092 0045 | E| Action Push_String_Extended,0x45 ; "$$[D_@]" 0022 e001 | | Load 0x0,0x1 0023 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0024 7808 |x | Jump 0x2d 0025 0092 0044 | D| Action Push_String_Extended,0x44 ; "<PROFILE>" 0027 0092 0046 | F| Action Push_String_Extended,0x46 ; "!Machine.Release.Environment." 0029 e5ff | | Load 0x2,-0x1 002a 01cc | | Execute Vector,Catenate 002b e001 | | Load 0x0,0x1 002c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000} 002e e002 | | Load 0x0,0x2 002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0030 e003 | | Load 0x0,0x3 0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0032 e004 | | Load 0x0,0x4 0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0035 0092 0047 | G| Action Push_String_Extended,0x47 ; "$$" 0037 e004 | | Load 0x0,0x4 0038 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0039 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 003a e004 | | Load 0x0,0x4 003b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 003c 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003e 0000 0000 | | .XXX[0x2] 0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0044 ; -------------------------------------------------------------------------------------- 0044 ; STRING TABLE 0044 ; -------------------------------------------------------------------------------------- 0044 000a | | .STRTAB 0x000a->0x0049 ; "<PROFILE>" 0045 0011 | | .STRTAB 0x0011->0x004d ; "$$[D_@]" 0046 0016 | | .STRTAB 0x0016->0x0051 ; "!Machine.Release.Environment." 0047 0031 | 1 | .STRTAB 0x0031->0x005f ; "$$" 0048 0031 | 1 | .STREND 0x0031->0x0060 0049 3c50 524f |<PRO| .STRTAB_STRINGS 0061 0000 0000 | | .BLANK 0000[0x7] 0068 ; -------------------------------------------------------------------------------------- 0068 ; Debug Table 0068 ; -------------------------------------------------------------------------------------- 0068 0004 000d | | .DEBUG4 0x0004,0x000d,0x9718,0x0000,0x0001,0x0000 006e 4141 3125 |AA1%| .XXX[0x23] 0070 0c5c 0041 | \ A| 0072 4d51 0539 |MQ 9| 0074 1105 4910 | I | 0076 b925 3951 | %9Q| 0078 151d 1548 | H| 007a 2000 0000 | | 007c 0000 0000 | | 007e 0005 fa40 | @| 0080 8c00 2d11 | - | 0082 1551 0525 | Q %| 0084 317d 1931 |1} 1| 0086 051c 5c00 | \ | 0088 414d 5105 |AMQ | 008a 3911 0549 |9 I| 008c 10b9 2539 | %9| 008e 5115 1d15 |Q | 0090 4820 |H | 0091 0000 0000 | | .BLANK 0000[0x4] 0095 05fa 408c | @ | .XXX[0x29] 0097 002d 1115 | - | 0099 5105 2531 |Q %1| 009b 7d31 2539 |}1%9| 009d 2c5c 0041 |,\ A| 009f 4d51 0539 |MQ 9| 00a1 1105 4910 | I | 00a3 b925 3951 | %9Q| 00a5 151d 1548 | H| 00a7 2000 0000 | | 00a9 0000 0000 | | 00ab 0005 fa40 | @| 00ad 8c00 2d11 | - | 00af 1551 0525 | Q %| 00b1 317d 1949 |1} I| 00b3 3d34 5c00 |=4\ | 00b5 414d 5105 |AMQ | 00b7 3911 0549 |9 I| 00b9 10b9 2539 | %9| 00bb 5115 1d15 |Q | 00bd 4820 |H | 00be 0000 0000 | | .BLANK 0000[0x4] 00c2 05fa 408c | @ | .XXX[0x86] 00c4 0025 1115 | % | 00c6 5105 2531 |Q %1| 00c8 7d51 3c5c |}Q<\| 00ca 0041 4d51 | AMQ| 00cc 0539 1105 | 9 | 00ce 4910 b925 |I %| 00d0 3951 151d |9Q | 00d2 1548 2000 | H | 00d4 0000 0000 | | 00d6 0000 0005 | | 00d8 fa40 8c00 | @ | 00da 4111 1551 |A Q| 00dc 0525 317d | %1}| 00de 3125 392d |1%9-| 00e0 7d0d 3d35 |} =5| 00e2 345c 0041 |4\ A| 00e4 4d51 0539 |MQ 9| 00e6 1105 4910 | I | 00e8 b925 3951 | %9Q| 00ea 151d 1548 | H| 00ec 2000 0000 | | 00ee 0000 0000 | | 00f0 0004 0000 | | 00f2 0000 1000 | | 00f4 0002 c000 | | 00f6 9905 417d | A}| 00f8 0d3d 3535 | =55| 00fa 3d39 7d41 |=9}A| 00fc 493d 0d15 |I= | 00fe 1155 4915 | UI | 0100 4cb9 0531 |L 1| 0102 2505 4d7d |% M}| 0104 4915 0d3d |I =| 0106 4911 7d2d |I }-| 0108 2539 10ee |%9 | 010a 65c8 e640 |e @| 010c 7000 2905 |p ) | 010e 3125 054d |1% M| 0110 7d25 5115 |}%Q | 0112 3598 5c00 |5 \ | 0114 3d4d 5105 |=MQ | 0116 3911 0549 |9 I| 0118 10b9 4d51 | MQ| 011a 4925 391d |I%9 | 011c 8d84 2000 | | 011e 0000 0000 | | 0120 0000 0004 | | 0122 2000 0000 | | 0124 0000 0000 | | 0126 00c8 069e | | 0128 2a90 3000 |* 0 | 012a 594d 5105 |YMQ | 012c 3911 0549 |9 I| 012e 10b9 0d21 | !| 0130 0549 050d | I | 0132 5115 48b8 |Q H | 0134 9c80 9ce6 | | 0136 4070 0029 |@p )| 0138 0531 2505 | 1% | 013a 4d7d 4d25 |M}M%| 013c 6915 985c |i \| 013e 0041 4d51 | AMQ| 0140 0539 1105 | 9 | 0142 4910 b925 |I %| 0144 3951 151d |9Q | 0146 1548 0020 | H | 0148 0000 0000 | | .BLANK 0000[0x6] 014e 0001 9000 | | .XXX[0x2f] 0150 0011 9800 | | 0152 cd05 417d | A}| 0154 0d3d 3535 | =55| 0156 3d39 7d41 |=9}A| 0158 493d 0d15 |I= | 015a 1155 4915 | UI | 015c 4cb9 0541 |L A| 015e 7d15 6151 |} aQ| 0160 4905 0d51 |I Q| 0162 7d4d 497d |}MI}| 0164 513d 7d51 |Q=}Q| 0166 4905 394d |I 9M| 0168 1915 497d | I}| 016a 0549 1504 | I | 016c f5ee 51fa | Q | 016e 408c 0019 |@ | 0170 1949 3d35 | I=5| 0172 7d60 5c00 |}`\ | 0174 414d 5105 |AMQ | 0176 3911 0549 |9 I| 0178 10b9 2539 | %9| 017a 5115 1d15 |Q | 017c 4820 |H | 017d 0000 0000 | | .BLANK 0000[0x4] 0181 05fa 408c | @ | .XXX[0xf] 0183 0011 513d | Q=| 0185 7d60 5c00 |}`\ | 0187 414d 5105 |AMQ | 0189 3911 0549 |9 I| 018b 10b9 2539 | %9| 018d 5115 1d15 |Q | 018f 4820 |H | 0190 0000 0000 | | .BLANK 0000[0x4] 0194 09fa 408c | @ | .XXX[0x49] 0196 0035 0541 | 5 A| 0198 4131 250d |A1% | 019a 7d39 5535 |}9U5| 019c 0915 485c | H\| 019e 0041 4d51 | AMQ| 01a0 0539 1105 | 9 | 01a2 4910 b925 |I %| 01a4 3951 151d |9Q | 01a6 1548 2000 | H | 01a8 0000 0000 | | 01aa 0000 0005 | | 01ac fa40 8c00 | @ | 01ae 311d 1551 |1 Q| 01b0 7d55 4d15 |}UM | 01b2 497d 2d15 |I}- | 01b4 645c 0041 |d\ A| 01b6 4d51 0539 |MQ 9| 01b8 1105 4910 | I | 01ba b909 3d3d | ==| 01bc 3115 0538 |1 8| 01be 5800 554d |X UM| 01c0 5105 3911 |Q 9 | 01c2 0549 10b9 | I | 01c4 093d 3d31 | ==1| 01c6 1505 38b9 | 8 | 01c8 5149 5515 |QIU | 01ca fa40 8c00 | @ | 01cc 3511 1551 |5 Q| 01ce 0525 317d | %1}| 01d0 0541 4131 | AA1| 01d2 250c 5c00 |% \ | 01d4 414d 5105 |AMQ | 01d6 3911 0549 |9 I| 01d8 10b9 2539 | %9| 01da 5115 1d15 |Q | 01dc 4820 |H | 01dd 0000 0000 | | .BLANK 0000[0x4] 01e1 05fa 408c | @ | .XXX[0x1f] 01e3 002d 1115 | - | 01e5 5105 2531 |Q %1| 01e7 7d19 3105 |} 1 | 01e9 1c5c 0041 | \ A| 01eb 4d51 0539 |MQ 9| 01ed 1105 4910 | I | 01ef b925 3951 | %9Q| 01f1 151d 1548 | H| 01f3 2000 0000 | | 01f5 0000 0000 | | 01f7 0005 fa40 | @| 01f9 8c00 2d11 | - | 01fb 1551 0525 | Q %| 01fd 317d 3125 |1}1%| 01ff 392c |9, |