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

⟦5bb315a41⟧

    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 00e0       |    |		.CONST	0x00e0								; 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 009d       |    |		.CONST	0x009d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0024       | $  |		.CONST	0x0024								; Number of locals
000b			INIT_0008:
000b 4808       |H   |		Short_Literal	0x8
000c 4800       |H   |		Short_Literal	0x0
000d 48ff       |H   |		Short_Literal	0xff
000e 00e5       |    |		Load_Encached	Long_Integer_Cache
000f 03fc       |    |		QQ_Declare_Type	Discrete,XXX
0010 4810       |H   |		Short_Literal	0x10
0011 4800       |H   |		Short_Literal	0x0
0012 60bd       |`   |		Indirect_Literal	Discrete,0xd0,{0x00000000, 0x0000ffff}
0013 00e5       |    |		Load_Encached	Long_Integer_Cache
0014 03fc       |    |		QQ_Declare_Type	Discrete,XXX
0015 4800       |H   |		Short_Literal	0x0
0016 480f       |H   |		Short_Literal	0xf
0017 00e5       |    |		Load_Encached	Long_Integer_Cache
0018 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0019 4801       |H   |		Short_Literal	0x1
001a 481e       |H   |		Short_Literal	0x1e
001b 00e9       |    |		Load_Encached	String_Cache
001c 035c       | \  |		Declare_Type	Array,Constrained,Visible
001d 00da       |    |		Load_Top	At_Offset_2
001e e20d       |    |		Load	0x1,0xd
001f 00d8       |    |		Load_Top	At_Offset_0
0020 02a0       |    |		Declare_Subprogram	Null_Subprogram
0021 4803       |H   |		Short_Literal	0x3
0022 032e       | .  |		Declare_Type	Record,Defined,Visible
0023 4807       |H   |		Short_Literal	0x7
0024 4800       |H   |		Short_Literal	0x0
0025 487f       |H   |		Short_Literal	0x7f
0026 00e5       |    |		Load_Encached	Long_Integer_Cache
0027 03fc       |    |		QQ_Declare_Type	Discrete,XXX
0028 4804       |H   |		Short_Literal	0x4
0029 4800       |H   |		Short_Literal	0x0
002a 480f       |H   |		Short_Literal	0xf
002b 00e5       |    |		Load_Encached	Long_Integer_Cache
002c 03fc       |    |		QQ_Declare_Type	Discrete,XXX
002d 4805       |H   |		Short_Literal	0x5
002e 4800       |H   |		Short_Literal	0x0
002f 481f       |H   |		Short_Literal	0x1f
0030 00e5       |    |		Load_Encached	Long_Integer_Cache
0031 03fc       |    |		QQ_Declare_Type	Discrete,XXX
0032 e20e       |    |		Load	0x1,0xe
0033 00db       |    |		Load_Top	At_Offset_3
0034 00db       |    |		Load_Top	At_Offset_3
0035 00db       |    |		Load_Top	At_Offset_3
0036 02a0       |    |		Declare_Subprogram	Null_Subprogram
0037 4804       |H   |		Short_Literal	0x4
0038 032e       | .  |		Declare_Type	Record,Defined,Visible
0039 480c       |H   |		Short_Literal	0xc
003a 4800       |H   |		Short_Literal	0x0
003b 6090       |`   |		Indirect_Literal	Discrete,0xcc,{0x00000000, 0x00000fff}
003c 00e5       |    |		Load_Encached	Long_Integer_Cache
003d 03fc       |    |		QQ_Declare_Type	Discrete,XXX
003e 00d8       |    |		Load_Top	At_Offset_0
003f 00e1       |    |		Load_Encached	Boolean_Cache
0040 00e1       |    |		Load_Encached	Boolean_Cache
0041 00e1       |    |		Load_Encached	Boolean_Cache
0042 00e1       |    |		Load_Encached	Boolean_Cache
0043 02a0       |    |		Declare_Subprogram	Null_Subprogram
0044 4805       |H   |		Short_Literal	0x5
0045 032e       | .  |		Declare_Type	Record,Defined,Visible
0046 4800       |H   |		Short_Literal	0x0
0047 4802       |H   |		Short_Literal	0x2
0048 029f 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Call
004a 03fe       |    |		Declare_Type	Discrete,Defined,Visible
004b 00e3       |    |		Load_Encached	Natural_Cache
004c 4801       |H   |		Short_Literal	0x1
004d 487e       |H~  |		Short_Literal	0x7e
004e 00e9       |    |		Load_Encached	String_Cache
004f 035c       | \  |		Declare_Type	Array,Constrained,Visible
0050 02a0       |    |		Declare_Subprogram	Null_Subprogram
0051 4802       |H   |		Short_Literal	0x2
0052 032e       | .  |		Declare_Type	Record,Defined,Visible
0053 4800       |H   |		Short_Literal	0x0
0054 6073       |`s  |		Indirect_Literal	Discrete,0xc8,{0x00000000, 0x00004000}
0055 00e5       |    |		Load_Encached	Long_Integer_Cache
0056 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0057 4800       |H   |		Short_Literal	0x0
0058 49ff       |I   |		Short_Literal	0x1ff
0059 00e5       |    |		Load_Encached	Long_Integer_Cache
005a 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
005b 4801       |H   |		Short_Literal	0x1
005c 4a00       |J   |		Short_Literal	0x200
005d 00e5       |    |		Load_Encached	Long_Integer_Cache
005e 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
005f 00e2       |    |		Load_Encached	Integer_Cache
0060 e20e       |    |		Load	0x1,0xe
0061 02a0       |    |		Declare_Subprogram	Null_Subprogram
0062 4802       |H   |		Short_Literal	0x2
0063 032e       | .  |		Declare_Type	Record,Defined,Visible
0064 e20e       |    |		Load	0x1,0xe
0065 00d8       |    |		Load_Top	At_Offset_0
0066 02a0       |    |		Declare_Subprogram	Null_Subprogram
0067 4802       |H   |		Short_Literal	0x2
0068 032e       | .  |		Declare_Type	Record,Defined,Visible
0069 4800       |H   |		Short_Literal	0x0
006a 4805       |H   |		Short_Literal	0x5
006b 00da       |    |		Load_Top	At_Offset_2
006c 02a0       |    |		Declare_Subprogram	Null_Subprogram
006d 4801       |H   |		Short_Literal	0x1
006e 035e       | ^  |		Declare_Type	Array,Defined,Visible
006f e20e       |    |		Load	0x1,0xe
0070 00d9       |    |		Load_Top	At_Offset_1
0071 e215       |    |		Load	0x1,0x15
0072 e217       |    |		Load	0x1,0x17
0073 02a0       |    |		Declare_Subprogram	Null_Subprogram
0074 4804       |H   |		Short_Literal	0x4
0075 032e       | .  |		Declare_Type	Record,Defined,Visible
0076 4801       |H   |		Short_Literal	0x1
0077 481e       |H   |		Short_Literal	0x1e
0078 e002       |    |		Load	0x0,0x2
0079 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
007a 035c       | \  |		Declare_Type	Array,Constrained,Visible
007b e20e       |    |		Load	0x1,0xe
007c 00da       |    |		Load_Top	At_Offset_2
007d 02a0       |    |		Declare_Subprogram	Null_Subprogram
007e 4803       |H   |		Short_Literal	0x3
007f 032e       | .  |		Declare_Type	Record,Defined,Visible
0080 4818       |H   |		Short_Literal	0x18
0081 03cf       |    |		Declare_Type	Access,Incomplete,Visible
0082 4801       |H   |		Short_Literal	0x1
0083 481e       |H   |		Short_Literal	0x1e
0084 e002       |    |		Load	0x0,0x2
0085 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0086 035c       | \  |		Declare_Type	Array,Constrained,Visible
0087 e20e       |    |		Load	0x1,0xe
0088 e220       |    |		Load	0x1,0x20
0089 e20e       |    |		Load	0x1,0xe
008a 00e2       |    |		Load_Encached	Integer_Cache
008b e222       | "  |		Load	0x1,0x22
008c e21a       |    |		Load	0x1,0x1a
008d 00e2       |    |		Load_Encached	Integer_Cache
008e 00e1       |    |		Load_Encached	Boolean_Cache
008f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0090 4809       |H   |		Short_Literal	0x9
0091 032e       | .  |		Declare_Type	Record,Defined,Visible
0092 00d8       |    |		Load_Top	At_Offset_0
0093 02a0       |    |		Declare_Subprogram	Null_Subprogram
0094 00db       |    |		Load_Top	At_Offset_3
0095 03c7       |    |		Complete_Type	Access,By_Defining
0096 4800       |H   |		Short_Literal	0x0
0097 480f       |H   |		Short_Literal	0xf
0098 e221       | !  |		Load	0x1,0x21
0099 02a0       |    |		Declare_Subprogram	Null_Subprogram
009a 4801       |H   |		Short_Literal	0x1
009b 035e       | ^  |		Declare_Type	Array,Defined,Visible
009c 00bf       |    |		Action	Accept_Activation
009d			BODY_0008:
009d 00bc       |    |		Action	Signal_Activated
009e 00bb       |    |		Action	Signal_Completion
009f 0000       |    |		.XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 4607       |F   |		Jump_Case	0x8
00a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00a5 7807       |x   |		Jump	0xad								; case 0x1
00a6 780a       |x   |		Jump	0xb1								; case 0x2
00a7 780e       |x   |		Jump	0xb6								; case 0x3
00a8 7811       |x   |		Jump	0xba								; case 0x4
00a9 7812       |x   |		Jump	0xbc								; case 0x5
00aa 7813       |x   |		Jump	0xbe								; case 0x6
00ab 7816       |x   |		Jump	0xc2								; case 0x7
00ac 4302       |C   |		.XXX[0x1]
00ad 00da       |    |		Load_Top	At_Offset_2
00ae 0091 00d4  |    |		Action	Push_String_Extended_Indexed,0xd4				; "UNKNOWN"
00b0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00b1 00db       |    |		Load_Top	At_Offset_3
00b2 00db       |    |		Load_Top	At_Offset_3
00b3 00e0       |    |		Load_Encached	Standard_Cache
00b4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00b5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 00e0       |    |		Load_Encached	Standard_Cache
00b8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00b9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00ba 00db       |    |		Load_Top	At_Offset_3
00bb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00be e218       |    |		Load	0x1,0x18
00bf 00dc       |    |		Load_Top	At_Offset_4
00c0 0267       | g  |		Execute	Discrete,Predecessor
00c1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c2 e218       |    |		Load	0x1,0x18
00c3 00dc       |    |		Load_Top	At_Offset_4
00c4 0268       | h  |		Execute	Discrete,Successor
00c5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00c6 0000 0000  |    |		.XXX[0x2]
00c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
00cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000fff}
00d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
00d4 ; --------------------------------------------------------------------------------------
00d4 ; STRING TABLE
00d4 ; --------------------------------------------------------------------------------------
00d4 0008       |    |		.STRTAB	0x0008->0x00d8							; "UNKNOWN"
00d5 000d       |    |		.STRTAB	0x000d->0x00db							; "M100"
00d6 000f       |    |		.STRTAB	0x000f->0x00dd							; "M200"
00d7 0011       |    |		.STREND 0x0011->0x00df
00d8 554e 4b4e  |UNKN|		.STRTAB_STRINGS
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0x3449,0x0000,0x0001,0x0000
00e6 6963 7469  |icti|		.XXX[0x11a]
00e8 6f6e 6172  |onar|
00ea 793a 206d  |y: m|
00ec 6445 6e64  |dEnd|
00ee 4469 6374  |Dict|
00f0 696f 6e61  |iona|
00f2 7279 3a25  |ry:%|
00f4 2550 6167  |%Pag|
00f6 653a 5061  |e:Pa|
00f8 6765 3a25  |ge:%|
00fa 2554 7261  |%Tra|
00fc 696c 6572  |iler|
00fe 656e 643c  |end<|
0100 5155 4945  |QUIE|
0102 543e 504f  |T>PO|
0104 5354 5343  |STSC|
0106 5249 5054  |RIPT|
0108 4146 4d20  |AFM |
010a 6669 6c65  |file|
010c 2064 6f65  | doe|
010e 7320 6e6f  |s no|
0110 7420 6265  |t be|
0112 6769 6e20  |gin |
0114 7769 7468  |with|
0116 2061 2053  | a S|
0118 7461 7274  |tart|
011a 466f 6e74  |Font|
011c 4d65 7472  |Metr|
011e 6963 7320  |ics |
0120 6c69 6e65  |line|
0122 4578 7065  |Expe|
0124 6374 6564  |cted|
0126 2063 6861  | cha|
0128 7261 6374  |ract|
012a 6572 206d  |er m|
012c 6574 7269  |etri|
012e 6373 206c  |cs l|
0130 696e 6573  |ines|
0132 2c20 6275  |, bu|
0134 7420 666f  |t fo|
0136 756e 6420  |und |
0138 6f66 2074  |of t|
013a 6865 6d41  |hemA|
013c 464d 2066  |FM f|
013e 696c 6520  |ile |
0140 636f 6e74  |cont|
0142 6169 6e73  |ains|
0144 206e 6f20  | no |
0146 466f 6e74  |Font|
0148 4e61 6d65  |Name|
014a 206c 696e  | lin|
014c 6541 464d  |eAFM|
014e 2066 696c  | fil|
0150 6520 636f  |e co|
0152 6e74 6169  |ntai|
0154 6e73 206e  |ns n|
0156 6f20 4675  |o Fu|
0158 6c6c 4e61  |llNa|
015a 6d65 206c  |me l|
015c 696e 6541  |ineA|
015e 464d 2066  |FM f|
0160 696c 6520  |ile |
0162 636f 6e74  |cont|
0164 6169 6e73  |ains|
0166 206e 6f20  | no |
0168 556e 6465  |Unde|
016a 726c 696e  |rlin|
016c 6550 6f73  |ePos|
016e 6974 696f  |itio|
0170 6e20 6c69  |n li|
0172 6e65 4146  |neAF|
0174 4d20 6669  |M fi|
0176 6c65 2063  |le c|
0178 6f6e 7461  |onta|
017a 696e 7320  |ins |
017c 6e6f 2055  |no U|
017e 6e64 6572  |nder|
0180 6c69 6e65  |line|
0182 5468 6963  |Thic|
0184 6b6e 6573  |knes|
0186 7320 6c69  |s li|
0188 6e65 5061  |nePa|
018a 7273 696e  |rsin|
018c 6720 6572  |g er|
018e 726f 7220  |ror |
0190 2829 2e50  |().P|
0192 6172 7369  |arsi|
0194 6e67 2046  |ng F|
0196 6f6e 744e  |ontN|
0198 616d 6520  |ame |
019a 3d3e 202c  |=> ,|
019c 2046 756c  | Ful|
019e 6c4e 616d  |lNam|
01a0 6520 3d3e  |e =>|
01a2 2027 2720  | '' |
01a4 6973 206d  |is m|
01a6 756c 7469  |ulti|
01a8 706c 7920  |ply |
01aa 6465 6669  |defi|
01ac 6e65 642e  |ned.|
01ae 4345 7272  |CErr|
01b0 6f72 2070  |or p|
01b2 6172 7369  |arsi|
01b4 6e67 2063  |ng c|
01b6 6861 7261  |hara|
01b8 6374 6572  |cter|
01ba 2063 6f64  | cod|
01bc 6520 6f6e  |e on|
01be 206c 696e  | lin|
01c0 653a 2022  |e: "|
01c2 3b20 4e20  |; N |
01c4 3b20 5758  |; WX|
01c6 2043 616e  | Can|
01c8 6e6f 7420  |not |
01ca 6669 6e64  |find|
01cc 2057 5820  | WX |
01ce 6f6e 206c  |on l|
01d0 696e 6543  |ineC|
01d2 616e 6e6f  |anno|
01d4 7420 6669  |t fi|
01d6 6e64 2073  |nd s|
01d8 656d 6963  |emic|
01da 6f6c 6f6e  |olon|
01dc 2066 6f72  | for|
01de 2077 6964  | wid|
01e0 7468 206f  |th o|
01e2 6e20 6c69  |n li|
01e4 6e65 4361  |neCa|
01e6 6e6e 6f74  |nnot|
01e8 2070 6172  | par|
01ea 7365 2063  |se c|
01ec 6861 7261  |hara|
01ee 6374 6572  |cter|
01f0 2077 6964  | wid|
01f2 7468 206f  |th o|
01f4 6e20 6c69  |n li|
01f6 6e65 556e  |neUn|
01f8 6465 726c  |derl|
01fa 696e 6550  |ineP|
01fc 6f73 6974  |osit|
01fe 696f 6e43  |ionC|