|
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 - metrics - 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 For_Outer_Call,Visible,Unelaborated,INIT_0018
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 For_Call,INIT_0058
001d a002 | | Reference 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 | | PushFullAddress InMicrocode
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_Subprogram 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_Result,0x1
0060 4801 |H | Short_Literal 0x1
0061 4401 |D | Exit_Subprogram With_Result,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|