DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦dc41a0420⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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|