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

⟦7ded9d238⟧

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

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 0068       | h  |		.CONST	0x0068								; 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 0012       |    |		.CONST	0x0012								; Address of begin
0009 0040       | @  |		.CONST	0x0040								; Address of exception handler
000a 0004       |    |		.CONST	0x0004								; Number of locals
000b			INIT_0008:
000b e009       |    |		Load	0x0,0x9
000c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
000d 0322       | "  |		Declare_Variable	Record
000e e018       |    |		Load	0x0,0x18
000f 02ab       |    |		Declare_Subprogram	For_Call,With_Address
0010 e019       |    |		Load	0x0,0x19
0011 02ab       |    |		Declare_Subprogram	For_Call,With_Address
0012			BODY_0008:
0012 e5fd       |    |		Load	0x2,-0x3
0013 00db       |    |		Load_Top	At_Offset_3
0014 e5ff       |    |		Load	0x2,-0x1
0015 e00a       |    |		Load	0x0,0xa
0016 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0017 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0018 e00a       |    |		Load	0x0,0xa
0019 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
001a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
001b e5fe       |    |		Load	0x2,-0x2
001c e009       |    |		Load	0x0,0x9
001d 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
001e 00d1       |    |		Pop_Control	Pop_Count_1
001f c5fd       |    |		Store	0x2,-0x3
0020 e5ff       |    |		Load	0x2,-0x1
0021 e00a       |    |		Load	0x0,0xa
0022 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0023 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0024 680d       |h   |		Jump_Zero	0x32
0025 e5fd       |    |		Load	0x2,-0x3
0026 4800       |H   |		Short_Literal	0x0
0027 4807       |H   |		Short_Literal	0x7
0028 0092 004e  |   N|		Action	Push_String_Extended,0x4e					; "Cannot resolve document database because "
002a e5ff       |    |		Load	0x2,-0x1
002b e00a       |    |		Load	0x0,0xa
002c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002d 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
002e 01cc       |    |		Execute	Vector,Catenate
002f e217       |    |		Load	0x1,0x17
0030 8233       | 3  |		Call	0x1,0x33
0031 c5fd       |    |		Store	0x2,-0x3
0032 4802       |H   |		Short_Literal	0x2
0033 e5fd       |    |		Load	0x2,-0x3
0034 e005       |    |		Load	0x0,0x5
0035 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0036 6801       |h   |		Jump_Zero	0x38
0037 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0038 00da       |    |		Load_Top	At_Offset_2
0039 e009       |    |		Load	0x0,0x9
003a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
003b 6802       |h   |		Jump_Zero	0x3e
003c 8404       |    |		Call	0x2,0x4
003d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
003e 8403       |    |		Call	0x2,0x3
003f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0040			TRAP_0008:
0040 e007       |    |		Load	0x0,0x7
0041 010f       |    |		Execute	Exception,Equal
0042 6801       |h   |		Jump_Zero	0x44
0043 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0044 e5fd       |    |		Load	0x2,-0x3
0045 4800       |H   |		Short_Literal	0x0
0046 4808       |H   |		Short_Literal	0x8
0047 e005       |    |		Load	0x0,0x5
0048 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0049 e005       |    |		Load	0x0,0x5
004a 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
004b 8233       | 3  |		Call	0x1,0x33
004c c5fd       |    |		Store	0x2,-0x3
004d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
004e ; --------------------------------------------------------------------------------------
004e ; STRING TABLE
004e ; --------------------------------------------------------------------------------------
004e 0004       |    |		.STRTAB	0x0004->0x0050							; "Cannot resolve document database because "
004f 002b       | +  |		.STREND 0x002b->0x0064
0050 4361 6e6e  |Cann|		.STRTAB_STRINGS
0065 0000 0000  |    |		.XXX[0x3]
0067 0000       |    |
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xc7a1,0x0000,0x0001,0x0000
006e 5b08 e558  |[  X|		.XXX[0x192]
0070 eb1e 287a  |  (z|
0072 6957 a726  |iW &|
0074 5c59 ab1e  |\Y  |
0076 5b67 baf1  |[g  |
0078 3c32 ac0f  |<2  |
007a 0588 d18b  |    |
007c 8b19 0c01  |    |
007e 5f1e 8d5b  |_  [|
0080 ed24 0c07  | $  |
0082 fe15 d47c  |   ||
0084 0618 2618  |  & |
0086 fe18 2e18  |  . |
0088 f218 9856  |   V|
008a 5028 fa19  |P(  |
008c d47d 0219  | }  |
008e ac7e f001  | ~  |
0090 5d65 6564  |]eed|
0092 8cb0 8280  |    |
0094 b6b3 6658  |  fX|
0096 beb1 9d66  |   f|
0098 0001 a566  |   f|
009a 2562 6e7d  |%bn}|
009c 1846 b001  | F  |
009e 8d86 867e  |   ~|
00a0 4563 cd6e  |Ec n|
00a2 927e 9e7d  | ~ }|
00a4 d4a8 dccc  |    |
00a6 3cb1 ac8c  |<   |
00a8 0003 717a  |  qz|
00aa 35f3 a97b  |5  {|
00ac e401 7003  |  p |
00ae 92b6 f068  |   h|
00b0 4438 086b  |D8 k|
00b2 c57a 9cf4  | z  |
00b4 3821 8c16  |8!  |
00b6 8513 613c  |  a<|
00b8 d01d 7402  |  t |
00ba b6fc dbac  |    |
00bc 902c 33a0  | ,3 |
00be 0182 701b  |  p |
00c0 300d d6eb  |0   |
00c2 1ca2 227c  |  "||
00c4 1d82 96dc  |    |
00c6 eba4 c5cb  |    |
00c8 a97c e80c  | |  |
00ca 160c 35ae  |  5 |
00cc 6337 3aea  |c7: |
00ce cd73 1019  | s  |
00d0 8c02 1cf4  |    |
00d2 f449 c187  | I  |
00d4 518d 0002  |Q   |
00d6 212a cd1e  |!*  |
00d8 ddb3 5926  |  Y&|
00da 3651 5d80  |6Q] |
00dc 0009 f59a  |    |
00de cc7d 77ac  | }w |
00e0 d529 40a0  | )@ |
00e2 7d6e e8a9  |}n  |
00e4 9bae d1c9  |    |
00e6 a7ac e54b  |   K|
00e8 067e cb24  | ~ $|
00ea d682 98ed  |    |
00ec 5044 9eb2  |PD  |
00ee 527d cbac  |R}  |
00f0 5f33 b722  |_3 "|
00f2 8d15 54c9  |  T |
00f4 5f5d 1da9  |_]  |
00f6 1dac c914  |    |
00f8 4722 d825  |G" %|
00fa 20a7 7974  |  yt|
00fc 5406 ec59  |T  Y|
00fe c006 6c02  |  l |
0100 9883 ebab  |    |
0102 69c3 509e  |i P |
0104 5b66 2794  |[f' |
0106 6851 5206  |hQR |
0108 542f 9805  |T/  |
010a 1801 b6bc  |    |
010c 4173 4923  |AsI#|
010e 8802 d580  |    |
0110 461a f00b  |F   |
0112 b986 1817  |    |
0114 452e bc0b  |E.  |
0116 e820 6981  |  i |
0118 5400 7c78  |T |x|
011a ca84 dc0f  |    |
011c 7881 b515  |x   |
011e f003 2402  |  $ |
0120 903f 9c03  | ?  |
0122 76c7 9801  |v   |
0124 2926 f830  |)& 0|
0126 20eb f9c5  |    |
0128 d25d f56c  | ] l|
012a 521e fd9a  |R   |
012c b1aa c001  |    |
012e ec24 0803  | $  |
0130 f1af d23d  |   =|
0132 1170 f40a  | p  |
0134 5c15 d25e  |\  ^|
0136 dbac 6982  |  i |
0138 e3af b098  |    |
013a 3261 2c6d  |2a,m|
013c 65c5 d25e  |e  ^|
013e 7cd1 7181  || q |
0140 29f1 b335  |)  5|
0142 1079 5183  | yQ |
0144 1bae 903d  |   =|
0146 940d d919  |    |
0148 7583 4d8e  |u M |
014a f014 1803  |    |
014c a888 8817  |    |
014e 47af 0f18  |G   |
0150 0806 e43c  |   <|
0152 1c01 8c58  |   X|
0154 844d 5c33  | M\3|
0156 4a63 6549  |JceI|
0158 877a da19  | z  |
015a 8182 84fe  |    |
015c 600a f0da  |`   |
015e 380b 486d  |8 Hm|
0160 2b32 cb25  |+2 %|
0162 021d 2059  |   Y|
0164 ba06 b19d  |    |
0166 037b cfa3  | {  |
0168 71af afad  |q   |
016a bf39 8c20  | 9  |
016c 2958 fee2  |)X  |
016e 78db 2008  |x   |
0170 1081 6c01  |  l |
0172 339e 1c10  |3   |
0174 0137 6463  | 7dc|
0176 8d87 61a4  |  a |
0178 5c0b e802  |\   |
017a 18c8 5012  |  P |
017c 0400 a403  |    |
017e cc08 0fb1  |    |
0180 0ed0 1523  |   #|
0182 1c6c b00e  | l  |
0184 1b96 2bac  |  + |
0186 739d 279b  |s ' |
0188 155e 1a62  | ^ b|
018a d314 d706  |    |
018c ac05 659e  |  e |
018e 6a77 5b56  |jw[V|
0190 c6f1 5334  |  S4|
0192 2942 f091  |)B  |
0194 b427 44ac  | 'D |
0196 e80c 317c  |  1||
0198 c7a7 323d  |  2=|
019a 3fa0 2d6a  |? -j|
019c 9406 6333  |  c3|
019e db18 298b  |  ) |
01a0 687a e277  |hz w|
01a2 dcf1 bd80  |    |
01a4 6c13 e921  |l  !|
01a6 e058 203f  | X ?|
01a8 1496 7c11  |  | |
01aa 12b5 94ac  |    |
01ac 20ad 6068  |  `h|
01ae e85f e16c  | _ l|
01b0 6fa9 457a  |o Ez|
01b2 7085 aa24  |p  $|
01b4 3401 189a  |4   |
01b6 8778 8d62  | x b|
01b8 8f79 460e  | yF |
01ba 9a06 19eb  |    |
01bc c944 6c10  | Dl |
01be 62b3 fd8a  |b   |
01c0 1982 5438  |  T8|
01c2 6808 2c02  |h , |
01c4 3fac 683e  |? h>|
01c6 a8cc a3b1  |    |
01c8 b980 400e  |  @ |
01ca 58b5 e180  |X   |
01cc b7b0 1898  |    |
01ce dc0e 8a68  |   h|
01d0 c7b0 0f8f  |    |
01d2 ad6f 6c22  | ol"|
01d4 d988 dfb1  |    |
01d6 d134 e7b0  | 4  |
01d8 58f0 f3b2  |X   |
01da ba7c ffb0  | |  |
01dc 5d58 e492  |]X  |
01de fdea 6fa1  |  o |
01e0 8361 1bb2  | a  |
01e2 6d89 23b0  |m # |
01e4 c049 2fb1  | I/ |
01e6 dee8 3d71  |  =q|
01e8 3fb2 8c4b  |?  K|
01ea 3d26 1469  |=& i|
01ec 57b3 6823  |W h#|
01ee 7808 201c  |x   |
01f0 3402 783c  |4 x<|
01f2 0802 8817  |    |
01f4 e85e 110a  | ^  |
01f6 e42b ec34  | + 4|
01f8 645c cfb3  |d\  |
01fa 940c e85f  |   _|
01fc c1b0 871f  |    |
01fe b26d 660c  | mf |