|
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_03bcfe
└─⟦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 0070 | p | .CONST 0x0070 ; 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 002c | , | .CONST 0x002c ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0005 | | .CONST 0x0005 ; Number of locals 001b INIT_0018: 001b 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 001d a002 | | Store_Unchecked 0x0,0x2 001e 00c6 | | Action Check_Subprogram_Elaborated 001f 4802 |H | Short_Literal 0x2 0020 4802 |H | Short_Literal 0x2 0021 0099 | | Action Reference_Dynamic 0022 0093 0000 | | push_full_address 0x0 0024 602f |`/ | Indirect_Literal Discrete,0x54,{0x80000000, 0x00010000} 0025 0273 | s | Execute Discrete,Plus 0026 e003 | | Load 0x0,0x3 0027 0273 | s | Execute Discrete,Plus 0028 e004 | | Load 0x0,0x4 0029 0273 | s | Execute Discrete,Plus 002a 4805 |H | Short_Literal 0x5 002b 0007 | | Action Break_Optional 002c BODY_0018: 002c e5fd | | Load 0x2,-0x3 002d 681b |h | Jump_Zero 0x49 002e 0092 0062 | b| Action Push_String_Extended,0x62 ; "<PROFILE>" 0030 00ea | | Load_Encached Null_String_Cache 0031 e5fa | | Load 0x2,-0x6 0032 e005 | | Load 0x0,0x5 0033 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0034 00d9 | | Load_Top At_Offset_1 0035 00d0 | | Action Swap_Control 0036 0260 | ` | Execute Discrete,In_Type 0037 7001 |p | Jump_Nonzero 0x39 0038 0801 | | Execute_Immediate Raise,0x1 0039 4800 |H | Short_Literal 0x0 003a e5ff | | Load 0x2,-0x1 003b e005 | | Load 0x0,0x5 003c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 003d 6012 |` | Indirect_Literal Discrete,0x50,{0x00000000, 0x00001000} 003e e5fb | | Load 0x2,-0x5 003f 4801 |H | Short_Literal 0x1 0040 e006 | | Load 0x0,0x6 0041 e5ff | | Load 0x2,-0x1 0042 4803 |H | Short_Literal 0x3 0043 4802 |H | Short_Literal 0x2 0044 0099 | | Action Reference_Dynamic 0045 4804 |H | Short_Literal 0x4 0046 4802 |H | Short_Literal 0x2 0047 0099 | | Action Reference_Dynamic 0048 8002 | | Call 0x0,0x2 0049 e5fe | | Load 0x2,-0x2 004a e5ff | | Load 0x2,-0x1 004b 8007 | | Call 0x0,0x7 004c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 004d 0000 0000 | | .XXX[0x3] 004f 0000 | | 0050 0000 0000 | | .LITERAL {0x00000000, 0x00001000} 0054 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 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 00da | | Load_Top At_Offset_2 005c 0f09 | | Execute_Immediate Equal,0x9 005d 6802 |h | Jump_Zero 0x60 005e e5fc | | Load 0x2,-0x4 005f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0060 4801 |H | Short_Literal 0x1 0061 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0062 ; -------------------------------------------------------------------------------------- 0062 ; STRING TABLE 0062 ; -------------------------------------------------------------------------------------- 0062 0004 | | .STRTAB 0x0004->0x0064 ; "<PROFILE>" 0063 000b | | .STREND 0x000b->0x0068 0064 3c50 524f |<PRO| .STRTAB_STRINGS 0069 0000 0000 | | .BLANK 0000[0x7] 0070 ; -------------------------------------------------------------------------------------- 0070 ; Debug Table 0070 ; -------------------------------------------------------------------------------------- 0070 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34c2,0x0000,0x0001,0x0000 0076 0949 0549 | I I| .XXX[0x18a] 0078 657d 3d09 |e}= | 007a 2915 0d51 |) Q| 007c 7d15 1125 |} %| 007e 513d 489d |Q=H | 0080 4d41 150c |MA | 0082 290d 0531 |) 1| 0084 1539 1105 | 9 | 0086 4828 8531 |H( 1| 0088 4934 b90d |I4 | 008a 0531 1539 | 1 9| 008c 1105 489d | H | 008e 4d41 150c |MA | 0090 2955 390d |)U9 | 0092 2115 0d2d |! -| 0094 1511 7d0d | } | 0096 3d39 5915 |=9Y | 0098 494d 253d |IM%=| 009a 3828 8531 |8( 1| 009c 4934 b955 |I4 U| 009e 390d 2115 |9 ! | 00a0 0d2d 1511 | - | 00a2 7d0d 3d39 |} =9| 00a4 5915 494d |Y IM| 00a6 253d 389d |%=8 | 00a8 4d41 150c |MA | 00aa 2931 254d |)1%M| 00ac 517d 1d15 |Q} | 00ae 3915 4925 |9 I%| 00b0 0c28 8551 | ( Q| 00b2 3d3d 314c |==1L| 00b4 b931 254d | 1%M| 00b6 517d 1d15 |Q} | 00b8 3915 4925 |9 I%| 00ba 0c9d 4d41 | MA| 00bc 150c 2931 | )1| 00be 2539 2d4d |%9-M| 00c0 7d25 3541 |}%5A| 00c2 3115 3515 |1 5 | 00c4 3951 0551 |9Q Q| 00c6 253d 3828 |%=8(| 00c8 8525 3541 | %5A| 00ca 3115 3515 |1 5 | 00cc 3951 0551 |9Q Q| 00ce 253d 38b9 |%=8 | 00d0 3125 392d |1%9-| 00d2 4d7d 2535 |M}%5| 00d4 4131 1535 |A1 5| 00d6 1539 5105 | 9Q | 00d8 5125 3d38 |Q%=8| 00da 9d4d 4115 | MA | 00dc 0c29 1105 | ) | 00de 1535 3d38 | 5=8| 00e0 2885 0d3d |( =| 00e2 3535 0539 |55 9| 00e4 114c b911 | L | 00e6 0515 353d | 5=| 00e8 389d 4d41 |8 MA| 00ea 150c 294d | )M| 00ec 1535 0539 | 5 9| 00ee 5125 0d7d |Q% }| 00f0 0551 5149 | QQI| 00f2 2509 5551 |% UQ| 00f4 154c 2885 | L( | 00f6 2535 4131 |%5A1| 00f8 1535 1539 | 5 9| 00fa 5105 5125 |Q Q%| 00fc 3d38 b94d |=8 M| 00fe 1535 0539 | 5 9| 0100 5125 0d7d |Q% }| 0102 0551 5149 | QQI| 0104 2509 5551 |% UQ| 0106 154c 9d4d | L M| 0108 4115 0c29 |A )| 010a 3505 417d |5 A}| 010c 1d15 3915 | 9 | 010e 4925 0c28 |I% (| 0110 8551 3d3d | Q==| 0112 314c b935 |1L 5| 0114 0541 7d1d | A} | 0116 1539 1549 | 9 I| 0118 250c 9d4d |% M| 011a 4115 0c29 |A )| 011c 1115 1905 | | 011e 5531 5028 |U1P(| 0120 8525 3541 | %5A| 0122 3115 3515 |1 5 | 0124 3951 0551 |9Q Q| 0126 253d 38b9 |%=8 | 0128 1115 1905 | | 012a 5531 509d |U1P | 012c 4d41 150c |MA | 012e 2911 254d |) %M| 0130 2d7d 4d41 |-}MA| 0132 050d 1428 | (| 0134 850d 3d35 | =5| 0136 3505 3911 |5 9 | 0138 4cb9 1125 |L %| 013a 4d2d 7d4d |M-}M| 013c 4105 0d14 |A | 013e 9d4d 4115 | MA | 0140 0c29 5539 | )U9| 0142 0d21 150d | ! | 0144 2d15 117d |- }| 0146 1115 0531 | 1| 0148 313d 0d05 |1= | 014a 5125 3d38 |Q%=8| 014c 2885 3149 |( 1I| 014e 34b9 5539 |4 U9| 0150 0d21 150d | ! | 0152 2d15 117d |- }| 0154 1115 0531 | 1| 0156 313d 0d05 |1= | 0158 5125 3d38 |Q%=8| 015a 9d4d 4115 | MA | 015c 0c29 4d51 | )MQ| 015e 050d 2d7d | -}| 0160 1d15 3915 | 9 | 0162 4925 0c28 |I% (| 0164 8551 3d3d | Q==| 0166 314c b94d |1L M| 0168 5105 0d2d |Q -| 016a 7d1d 1539 |} 9| 016c 1549 250c | I% | 016e 9d4d 4115 | MA | 0170 0c29 4955 | )IU| 0172 3828 8551 |8( Q| 0174 3d3d 314c |==1L| 0176 b90d 24b9 | $ | 0178 4915 58e5 |I X | 017a 7cc5 7d4d || }M| 017c 4115 0cb9 |A | 017e 5539 2551 |U9%Q| 0180 4cb9 0d3d |L =| 0182 3535 0539 |55 9| 0184 114c b949 | L I| 0186 5538 9d4d |U8 M| 0188 4115 0c29 |A )| 018a 5539 0d21 |U9 !| 018c 150d 2d15 | - | 018e 117d 0d3d | } =| 0190 3959 1549 |9Y I| 0192 4d25 3d39 |M%=9| 0194 4c28 8551 |L( Q| 0196 3d3d 314c |==1L| 0198 b955 390d | U9 | 019a 2115 0d2d |! -| 019c 1511 7d0d | } | 019e 3d39 5915 |=9Y | 01a0 494d 253d |IM%=| 01a2 394c 9d4d |9L M| 01a4 4115 0c29 |A )| 01a6 4d15 0549 |M I| 01a8 0d21 7d31 | !}1| 01aa 254d 5028 |%MP(| 01ac 850d 3d35 | =5| 01ae 3505 3911 |5 9 | 01b0 4cb9 4d15 |L M | 01b2 0549 0d21 | I !| 01b4 7d31 254d |}1%M| 01b6 509d 4d41 |P MA| 01b8 150c 294d | )M| 01ba 0d49 2541 | I%A| 01bc 5028 8551 |P( Q| 01be 3d3d 314c |==1L| 01c0 b94d 0d49 | M I| 01c2 2541 509d |%AP | 01c4 4d41 150c |MA | 01c6 2941 493d |)AI=| 01c8 1925 3114 | %1 | 01ca 2885 513d |( Q=| 01cc 3d31 4cb9 |=1L | 01ce 4149 3d19 |AI= | 01d0 2531 149d |%1 | 01d2 4d41 150c |MA | 01d4 2935 154d |)5 M| 01d6 4d05 1d14 |M | 01d8 2885 0d3d |( =| 01da 3535 0539 |55 9| 01dc 114c b935 | L 5| 01de 154d 4d05 | MM | 01e0 1d14 9d4d | M| 01e2 4115 0c29 |A )| 01e4 2539 1125 |%9 %| 01e6 4915 0d51 |I Q| 01e8 7d05 5151 |} QQ| 01ea 4925 0955 |I% U| 01ec 5115 4c28 |Q L(| 01ee 850d 3d35 | =5| 01f0 4125 3115 |A%1 | 01f2 497d 2539 |I}%9| 01f4 5115 4919 |Q I | 01f6 050d 14b9 | | 01f8 2539 1125 |%9 %| 01fa 4915 0d51 |I Q| 01fc 7d05 5151 |} QQ| 01fe 4925 0955 |I% U|