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

⟦31b1b8c6c⟧

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

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 0058       | X  |		.CONST	0x0058								; 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 e001       |    |		Load	0x0,0x1
001c 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
001d e001       |    |		Load	0x0,0x1
001e 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
001f 00db       |    |		Load_Top	At_Offset_3
0020 680a       |h   |		Jump_Zero	0x2b
0021 4801       |H   |		Short_Literal	0x1
0022 e001       |    |		Load	0x0,0x1
0023 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0024 0092 0038  |   8|		Action	Push_String_Extended,0x38					; "------- End of  step:   "
0026 00db       |    |		Load_Top	At_Offset_3
0027 01cc       |    |		Execute	Vector,Catenate
0028 e001       |    |		Load	0x0,0x1
0029 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
002a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
002b 4801       |H   |		Short_Literal	0x1
002c e001       |    |		Load	0x0,0x1
002d 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
002e 0092 0039  |   9|		Action	Push_String_Extended,0x39					; "------- Beginning step: "
0030 00db       |    |		Load_Top	At_Offset_3
0031 01cc       |    |		Execute	Vector,Catenate
0032 e001       |    |		Load	0x0,0x1
0033 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0034 4801       |H   |		Short_Literal	0x1
0035 e001       |    |		Load	0x0,0x1
0036 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0037 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0038 ; --------------------------------------------------------------------------------------
0038 ; STRING TABLE
0038 ; --------------------------------------------------------------------------------------
0038 0006       |    |		.STRTAB	0x0006->0x003b							; "------- End of  step:   "
0039 001c       |    |		.STRTAB	0x001c->0x0047							; "------- Beginning step: "
003a 0032       | 2  |		.STREND 0x0032->0x0053
003b 2d2d 2d2d  |----|		.STRTAB_STRINGS
0053 0000 0000  |    |		.BLANK	0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x7924,0x0000,0x0001,0x0000
005e 8d0d 2e64  |  .d|		.XXX[0xf4]
0060 0e0c 2c6d  |  ,m|
0062 6c2c eca4  |l,  |
0064 0eed 2d8d  |  - |
0066 840d cdee  |    |
0068 840c 6c2e  |  l.|
006a 8c6d 040e  | m  |
006c 8d0d ee6c  |   l|
006e a40e 6d2e  |  m.|
0070 8eac 2e8d  |  . |
0072 2ded ce65  |-  e|
0074 840c 4eae  |  N |
0076 840e 8d0c  |    |
0078 a40d 8dec  |    |
007a 2c8c ae44  |,  D|
007c 0eed 2d8d  |  - |
007e 8000 000e  |    |
0080 0000 0008  |    |
0082 6404 0e8d  |d   |
0084 0d2e 640e  | .d |
0086 0c2c 6d6c  | ,ml|
0088 2cec a40e  |,   |
008a ed2d 8d84  | -  |
008c 0dcd ee84  |    |
008e 0c6c 2e8c  | l. |
0090 6d04 0e8d  |m   |
0092 0dee 6ca4  |  l |
0094 0e6d 2e8e  | m. |
0096 ac2e 8d2d  | . -|
0098 edce 6584  |  e |
009a 0c4e ae84  | N  |
009c 0e8d 0ca4  |    |
009e 0d8d ec2c  |   ,|
00a0 8cae 440e  |  D |
00a2 ed2d 8d80  | -  |
00a4 0000 06c0  |    |
00a6 0000 07ec  |    |
00a8 6d0c ac6d  |m  m|
00aa 640c cdee  |d   |
00ac 440e 8d0d  |D   |
00ae 2e64 0c2d  |.d -|
00b0 cc84 0e4c  |   L|
00b2 ae0d ee4e  |   N|
00b4 840e 8d0c  |    |
00b6 ae6c a40e  | l  |
00b8 8f2e 0cae  | .  |
00ba 640d ecc4  |d   |
00bc 0e0e 4dec  |  M |
00be 4d8c adae  |M   |
00c0 640c 2e84  |d . |
00c2 0d8d ec2c  |   ,|
00c4 840e 8d2d  |   -|
00c6 aca5 c000  |    |
00c8 0006 8000  |    |
00ca 0008 2404  |  $ |
00cc 0c6d 0cac  | m  |
00ce 6d64 0ccd  |md  |
00d0 ee44 0e8d  | D  |
00d2 0d2e 640c  | .d |
00d4 2dcc 840e  |-   |
00d6 4cae 0dee  |L   |
00d8 4e84 0e8d  |N   |
00da 0cae 6ca4  |  l |
00dc 0e8f 2e0c  |  . |
00de ae64 0dec  | d  |
00e0 c40e 0e4d  |   M|
00e2 ec4d 8cad  | M  |
00e4 ae64 0c2e  | d .|
00e6 840d 8dec  |    |
00e8 2c84 0e8d  |,   |
00ea 2dac a5c0  |-   |
00ec 0000 0680  |    |
00ee 0000 0824  |   $|
00f0 040c 6d0c  |  m |
00f2 ac6d 640c  | md |
00f4 cdee 440e  |  D |
00f6 8d0d 2e64  |  .d|
00f8 0c2d cc84  | -  |
00fa 0e4c ae0d  | L  |
00fc ee4e 840e  | N  |
00fe 8d0c ae6c  |   l|
0100 a40e 8f2e  |   .|
0102 0cae 640d  |  d |
0104 ecc4 0e0e  |    |
0106 4dec 4d8c  |M M |
0108 adae 640c  |  d |
010a 2e84 0d8d  |.   |
010c ec2c 840e  | ,  |
010e 8d2d aca5  | -  |
0110 c000 000f  |    |
0112 0000 0006  |    |
0114 880d cdec  |    |
0116 8ca4 042a  |   *|
0118 8ded ed8e  |    |
011a 65c8 6ded  |e m |
011c ae0c 2e8d  |  . |
011e 2c4d 2d8d  |,M- |
0120 2e8f 25ca  |. % |
0122 4cae cdc5  |L   |
0124 caad cd2e  |   .|
0126 8e65 c86d  | e m|
0128 0cac 6d65  |  me|
012a c82c 6e8d  | ,n |
012c 2ecd 2e8f  |. . |
012e 2000 000f  |    |
0130 2000 0000  |    |
0132 8dcd ec8c  |    |
0134 a000 000f  |    |
0136 c000 0005  |    |
0138 c42a 8ded  | *  |
013a ed8e 65c8  |  e |
013c 6ded ae0c  |m   |
013e 2e8d 2c4d  |. ,M|
0140 2d8d 2e8f  |- . |
0142 25ca 4cae  |% L |
0144 cdc5 caad  |    |
0146 cd2e 8e65  | . e|
0148 c86d 0cac  | m  |
014a 6d65 c82c  |me ,|
014c 6e8d 2ecd  |n . |
014e 2e8f 2000  |.   |
0150 0000 2000  |    |
0152 0000 0000  |    |		.BLANK	0000[0x4]
0156 0005 a000  |    |		.XXX[0x72]
0158 0000 0000  |    |
015a 0005 8000  |    |
015c 0006 0000  |    |
015e 0007 6e0e  |  n |
0160 4dec 6cac  |M l |
0162 8eae 4ca4  |  L |
0164 082c 6e8d  | ,n |
0166 2ecd 2e8f  |. . |
0168 2405 0a8d  |$   |
016a 0cab e82c  |   ,|
016c 6e8d 2ecd  |n . |
016e 2e8f 2407  |. $ |
0170 440a 6e8e  |D n |
0172 4d2d cce4  |M-  |
0174 0407 47a4  |  G |
0176 0447 8828  | G (|
0178 6a89 2ac9  |j * |
017a 2a8b 27c4  |* ' |
017c 4760 0000  |G`  |
017e 05c0 0000  |    |
0180 07a4 040e  |    |
0182 0e4d ec6c  | M l|
0184 ac8e ae4c  |   L|
0186 a408 2c6e  |  ,n|
0188 8d2e cd2e  | . .|
018a 8f24 050a  | $  |
018c 8d0c abe8  |    |
018e 2c6e 8d2e  |,n .|
0190 cd2e 8f24  | . $|
0192 0744 0a6e  | D n|
0194 8e4d 2dcc  | M- |
0196 e404 0747  |   G|
0198 a404 4788  |  G |
019a 286a 892a  |(j *|
019c c92a 8b27  | * '|
019e c447 6000  | G` |
01a0 0005 c000  |    |
01a2 0007 a404  |    |
01a4 0e0e 4dec  |  M |
01a6 6cac 8eae  |l   |
01a8 4ca4 082c  |L  ,|
01aa 6e8d 2ecd  |n . |
01ac 2e8f 2405  |. $ |
01ae 0a8d 0cab  |    |
01b0 e82c 6e8d  | ,n |
01b2 2ecd 2e8f  |. . |
01b4 2407 440a  |$ D |
01b6 6e8e 4d2d  |n M-|
01b8 cce4 0407  |    |
01ba 47a4 0447  |G  G|
01bc 8828 6a89  | (j |
01be 2ac9 2a8b  |* * |
01c0 27c4 4760  |' G`|
01c2 0000 1020  |    |
01c4 0000 0409  |    |
01c6 acad cea4  |    |
01c8 0404 0404  |    |		.BLANK	0404[0x4]
01cc 0744 084d  | D M|		.XXX[0xe]
01ce eded 8cac  |    |
01d0 2dc4 0747  |-  G|
01d2 a408 cc2d  |   -|
01d4 8e6c a760  | l `|
01d6 0000 0d80  |    |
01d8 0000 06a4  |    |
01da 0404 0404  |    |		.BLANK	0404[0xa]
01e4 09ac adce  |    |		.XXX[0x15]
01e6 a404 0404  |    |
01e8 0404 0404  |    |
01ea 0407 4408  |  D |
01ec 4ded ed8c  |M   |
01ee ac2d c407  | -  |
01f0 47a4 08cc  |G   |
01f2 2d8e 6ca7  |- l |
01f4 6000 000d  |`   |
01f6 8000 0006  |    |
01f8 a404       |    |
01f9 0404 0404  |    |		.BLANK	0404[0x7]