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

⟦99ce8dc3c⟧

    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
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0050       | P  |		.CONST	0x0050								; 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 00cf       |    |		Action	Mark_Auxiliary
001c 602b       |`+  |		Indirect_Literal	Discrete,0x48,{0x00000000, 0x00001388}
001d 4801       |H   |		Short_Literal	0x1
001e 0007       |    |		Action	Break_Optional
001f e5ff       |    |		Load	0x2,-0x1
0020 7010       |p   |		Jump_Nonzero	0x31
0021 e5fe       |    |		Load	0x2,-0x2
0022 6807       |h   |		Jump_Zero	0x2a
0023 4800       |H   |		Short_Literal	0x0
0024 4801       |H   |		Short_Literal	0x1
0025 e002       |    |		Load	0x0,0x2
0026 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0027 e003       |    |		Load	0x0,0x3
0028 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0029 7814       |x   |		Jump	0x3e
002a 4801       |H   |		Short_Literal	0x1
002b 4801       |H   |		Short_Literal	0x1
002c e002       |    |		Load	0x0,0x2
002d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
002e e003       |    |		Load	0x0,0x3
002f 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0030 780d       |x   |		Jump	0x3e
0031 4801       |H   |		Short_Literal	0x1
0032 4801       |H   |		Short_Literal	0x1
0033 e5ff       |    |		Load	0x2,-0x1
0034 00d8       |    |		Load_Top	At_Offset_0
0035 e004       |    |		Load	0x0,0x4
0036 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0037 0260       | `  |		Execute	Discrete,In_Type
0038 7001       |p   |		Jump_Nonzero	0x3a
0039 0801       |    |		Execute_Immediate	Raise,0x1
003a e002       |    |		Load	0x0,0x2
003b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
003c e003       |    |		Load	0x0,0x3
003d 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
003e e5fd       |    |		Load	0x2,-0x3
003f 7002       |p   |		Jump_Nonzero	0x42
0040 00d2       |    |		Pop_Control	Pop_Count_2
0041 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0042 e5fd       |    |		Load	0x2,-0x3
0043 00ba       |    |		Action	Initiate_Delay
0044 00c8       |    |		Action	Pop_Auxiliary_Range
0045 3fd9       |?   |		Loop_Increasing	0x1f
0046 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0047 0000       |    |		.XXX[0x1]
0048 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001388}
004c 0000 0000  |    |		.BLANK	0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0xd99b,0x0000,0x0001,0x0000
0056 6696 c655  |f  U|		.XXX[0x1aa]
0058 f547 2616  | G& |
005a e736 6657  | 6fW|
005c 22e5 3656  |" 6V|
005e e645 f536  | E 6|
0060 9746 55f4  | FU |
0062 36f6 d6d6  |6   |
0064 16e6 4000  |  @ |
0066 0000 9000  |    |
0068 0002 9215  |    |
006a 46f6 f6c7  |F   |
006c 32e4 e657  |2  W|
006e 4776 f726  |Gv &|
0070 b696 e672  |   r|
0072 e466 96c6  | f  |
0074 55f5 4726  |U G&|
0076 16e7 3666  |  6f|
0078 5722 e536  |W" 6|
007a 56e6 45f5  |V E |
007c 1756 9740  | V @|
007e 0000 0090  |    |
0080 0000 0292  |    |
0082 1546 f6f6  | F  |
0084 c732 e4e6  | 2  |
0086 5747 76f7  |WGv |
0088 26b6 96e6  |&   |
008a 72e4 6696  |r f |
008c c655 f547  | U G|
008e 2616 e736  |&  6|
0090 6657 22e5  |fW" |
0092 3656 e645  |6V E|
0094 f506 1737  |   7|
0096 6000 0000  |`   |
0098 9000 0002  |    |
009a d215 46f6  |  F |
009c f6c7 32e4  |  2 |
009e e657 4776  | WGv|
00a0 f726 b696  | &  |
00a2 e672 e466  | r f|
00a4 96c6 55f5  |  U |
00a6 4726 16e7  |G&  |
00a8 3666 5722  |6fW"|
00aa e536 56e6  | 6V |
00ac 45f5 0617  |E   |
00ae 3737 76f7  |77v |
00b0 2640 0000  |&@  |
00b2 0090 0000  |    |
00b4 0312 1546  |   F|
00b6 f6f6 c732  |   2|
00b8 e4e6 5747  |  WG|
00ba 76f7 26b6  |v & |
00bc 96e6 72e4  |  r |
00be 6696 c655  |f  U|
00c0 f547 2616  | G& |
00c2 e736 6657  | 6fW|
00c4 22e5 3656  |" 6V|
00c6 e645 f486  | E  |
00c8 56c7 05f5  |V   |
00ca 2657 1756  |&W V|
00cc 5737 4000  |W7@ |
00ce 0000 9000  |    |
00d0 0002 b215  |    |
00d2 46f6 f6c7  |F   |
00d4 32e4 e657  |2  W|
00d6 4776 f726  |Gv &|
00d8 b696 e672  |   r|
00da e466 96c6  | f  |
00dc 55f5 4726  |U G&|
00de 16e7 3666  |  6f|
00e0 5722 e536  |W" 6|
00e2 56e6 45f4  |V E |
00e4 4656 c657  |FV W|
00e6 4650 0000  |FP  |
00e8 0090 0000  |    |
00ea 02e2 1546  |   F|
00ec f6f6 c732  |   2|
00ee e4e6 5747  |  WG|
00f0 76f7 26b6  |v & |
00f2 96e6 72e4  |  r |
00f4 6696 c655  |f  U|
00f6 f547 2616  | G& |
00f8 e736 6657  | 6fW|
00fa 22e5 3656  |" 6V|
00fc e645 f446  | E F|
00fe 1746 15f5  | F  |
0100 06f7 2740  |  '@|
0102 0000 0090  |    |
0104 0000 0282  |    |
0106 1546 f6f6  | F  |
0108 c732 e4e6  | 2  |
010a 5747 76f7  |WGv |
010c 26b6 96e6  |&   |
010e 72e4 6696  |r f |
0110 c655 f547  | U G|
0112 2616 e736  |&  6|
0114 6657 22e5  |fW" |
0116 3656 e645  |6V E|
0118 f437 7640  | 7v@|
011a 0000 0090  |    |
011c 0000 02c2  |    |
011e 1546 f6f6  | F  |
0120 c732 e4e6  | 2  |
0122 5747 76f7  |WGv |
0124 26b6 96e6  |&   |
0126 72e4 6696  |r f |
0128 c655 f547  | U G|
012a 2616 e736  |&  6|
012c 6657 22e5  |fW" |
012e 3656 e645  |6V E|
0130 f416 3636  |  66|
0132 f756 e740  | V @|
0134 0000 0090  |    |
0136 0000 02e2  |    |
0138 1546 f6f6  | F  |
013a c732 e4e6  | 2  |
013c 5747 76f7  |WGv |
013e 26b6 96e6  |&   |
0140 72e4 6696  |r f |
0142 c655 f547  | U G|
0144 2616 e736  |&  6|
0146 6657 22e5  |fW" |
0148 2656 d6f7  |&V  |
014a 4655 f486  |FU  |
014c f737 45f4  | 7E |
014e 9640 0000  | @  |
0150 0090 0000  |    |
0152 02d2 1546  |   F|
0154 f6f6 c732  |   2|
0156 e4e6 5747  |  WG|
0158 76f7 26b6  |v & |
015a 96e6 72e4  |  r |
015c 6696 c655  |f  U|
015e f547 2616  | G& |
0160 e736 6657  | 6fW|
0162 22e5 2656  |" &V|
0164 1645 f526  | E &|
0166 5737 06f6  |W7  |
0168 e736 5000  | 6P |
016a 0000 9000  |    |
016c 0002 b215  |    |
016e 46f6 f6c7  |F   |
0170 32e4 e657  |2  W|
0172 4776 f726  |Gv &|
0174 b696 e672  |   r|
0176 e466 96c6  | f  |
0178 55f5 4726  |U G&|
017a 16e7 3666  |  6f|
017c 5722 e506  |W"  |
017e 96f5 f466  |   f|
0180 96c6 55f4  |  U |
0182 f660 0000  | `  |
0184 0090 0000  |    |
0186 0302 1546  |   F|
0188 f6f6 c732  |   2|
018a e4e6 5747  |  WG|
018c 76f7 26b6  |v & |
018e 96e6 72e4  |  r |
0190 6696 c655  |f  U|
0192 f547 2616  | G& |
0194 e736 6657  | 6fW|
0196 22e5 0617  |"   |
0198 3765 f446  |7e F|
019a 1746 15f5  | F  |
019c 36f6 36b6  |6 6 |
019e 5740 0000  |W@  |
01a0 0090 0000  |    |
01a2 02e2 1546  |   F|
01a4 f6f6 c732  |   2|
01a6 e4e6 5747  |  WG|
01a8 76f7 26b6  |v & |
01aa 96e6 72e4  |  r |
01ac 6696 c655  |f  U|
01ae f547 2616  | G& |
01b0 e736 6657  | 6fW|
01b2 22e5 0617  |"   |
01b4 3765 f446  |7e F|
01b6 1746 15f4  | F  |
01b8 86f7 3740  |  7@|
01ba 0000 0090  |    |
01bc 0000 0242  |   B|
01be 1546 f6f6  | F  |
01c0 c732 e4e6  | 2  |
01c2 5747 76f7  |WGv |
01c4 26b6 96e6  |&   |
01c6 72e4 6696  |r f |
01c8 c655 f547  | U G|
01ca 2616 e736  |&  6|
01cc 6657 22e4  |fW" |
01ce f706 56e0  |  V |
01d0 0000 0090  |    |
01d2 0000 02f2  |    |
01d4 1546 f6f6  | F  |
01d6 c732 e4e6  | 2  |
01d8 5747 76f7  |WGv |
01da 26b6 96e6  |&   |
01dc 72e4 6696  |r f |
01de c655 f547  | U G|
01e0 2616 e736  |&  6|
01e2 6657 22e4  |fW" |
01e4 e756 c6c5  | V  |
01e6 f436 f6e6  | 6  |
01e8 e656 3745  | V7E|
01ea f496 4000  |  @ |
01ec 0000 9000  |    |
01ee 0003 b215  |    |
01f0 46f6 f6c7  |F   |
01f2 32e4 e657  |2  W|
01f4 4776 f726  |Gv &|
01f6 b696 e672  |   r|
01f8 e466 96c6  | f  |
01fa 55f5 4726  |U G&|
01fc 16e7 3666  |  6f|
01fe 5722 e4d6  |W"  |