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

⟦dafed1057⟧

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

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 0038       | 8  |		.CONST	0x0038								; 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 0028       | (  |		.CONST	0x0028								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b 00da       |    |		Load_Top	At_Offset_2
001c e001       |    |		Load	0x0,0x1
001d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
001e a5fe       |    |		Store_Unchecked	0x2,-0x2
001f 00da       |    |		Load_Top	At_Offset_2
0020 e001       |    |		Load	0x0,0x1
0021 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0022 a5fd       |    |		Store_Unchecked	0x2,-0x3
0023 00da       |    |		Load_Top	At_Offset_2
0024 e001       |    |		Load	0x0,0x1
0025 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0026 a5fc       |    |		Store_Unchecked	0x2,-0x4
0027 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0028			TRAP_0018:
0028 010e       |    |		Execute	Exception,Is_Constraint_Error
0029 6807       |h   |		Jump_Zero	0x31
002a 4800       |H   |		Short_Literal	0x0
002b a5fe       |    |		Store_Unchecked	0x2,-0x2
002c 4800       |H   |		Short_Literal	0x0
002d a5fd       |    |		Store_Unchecked	0x2,-0x3
002e 4800       |H   |		Short_Literal	0x0
002f a5fc       |    |		Store_Unchecked	0x2,-0x4
0030 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0031 0100       |    |		Execute	Exception,Raise
0032 0000 0000  |    |		.BLANK	0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x4a64,0x0000,0x0001,0x0000
003e b998 0247  |   G|		.XXX[0x1c2]
0040 1a12 0071  |   q|
0042 e1c0 0000  |    |
0044 0088 01c5  |    |
0046 4c00 9203  |L   |
0048 8440 0d73  | @ s|
004a 3004 9110  |0   |
004c 2400 e3c3  |$   |
004e 8000 0001  |    |
0050 2007 1e1c  |    |
0052 0000 0008  |    |
0054 801c 9f20  |    |
0056 0000 0044  |   D|
0058 00e2 a600  |    |
005a 494e 0220  |IN  |
005c 06b9 9802  |    |
005e 4aea 1100  |J   |
0060 393e 4000  |9>@ |
0062 0000 8801  |    |
0064 c9f2 0000  |    |
0066 0001 401b  |  @ |
0068 3d00 049a  |=   |
006a 980a 00db  |    |
006c d800 24dc  |  $ |
006e 6050 06f2  |`P  |
0070 ac01 2720  |  ' |
0072 0280 3811  |  8 |
0074 6009 3ae8  |` : |
0076 1401 c586  |    |
0078 0049 e680  | I  |
007a a00e 4b30  |  K0|
007c 024f ae05  | O  |
007e 0073 5180  | sQ |
0080 0000 0028  |   (|
0082 01b1 9a00  |    |
0084 9428 8140  | ( @|
0086 0dc4 d000  |    |
0088 0000 0a00  |    |
008a 6ba6 8000  |k   |
008c 0000 5003  |  P |
008e 5d34 0000  |]4  |
0090 0002 801b  |    |
0092 19a0 094a  |   J|
0094 2814 00dc  |(   |
0096 4d00 0000  |M   |
0098 00a0 06ba  |    |
009a 6800 0000  |h   |
009c 0500 35d3  |  5 |
009e 4000 0000  |@   |
00a0 2803 67a0  |( g |
00a2 0095 1c81  |    |
00a4 401b 7b00  |@ { |
00a6 04a9 d80a  |    |
00a8 00de 5580  |  U |
00aa 2556 6050  |%V`P|
00ac 0702 2c01  |  , |
00ae 2af0 0280  |*   |
00b0 38b0 c009  |8   |
00b2 5968 1401  |Yh  |
00b4 c966 004a  | f J|
00b6 da80 a00e  |    |
00b8 6a30 0000  |j0  |
00ba 0005 0036  |   6|
00bc 3340 12be  |3@  |
00be 4028 01b8  |@(  |
00c0 9a00 0000  |    |
00c2 0140 0d74  | @ t|
00c4 d000 0000  |    |
00c6 0a00 6ba6  |  k |
00c8 8000 0000  |    |
00ca 5003 6334  |P c4|
00cc 012c d802  | ,  |
00ce 801b 89a0  |    |
00d0 0000 0014  |    |
00d2 00d7 4d00  |  M |
00d4 0000 00a0  |    |
00d6 06ba 6800  |  h |
00d8 0000 0500  |    |
00da 3633 4012  |63@ |
00dc dcc0 2801  |  ( |
00de b89a 0000  |    |
00e0 0001 400d  |  @ |
00e2 74d0 0000  |t   |
00e4 000a 006b  |   k|
00e6 a680 0000  |    |
00e8 0050 0363  | P c|
00ea 3401 2ec0  |4 . |
00ec 0280 1b89  |    |
00ee a000 0000  |    |
00f0 1400 d74d  |   M|
00f2 0000 0000  |    |
00f4 a006 ba68  |   h|
00f6 0000 0013  |    |
00f8 0039 6d80  | 9m |
00fa 0000 0098  |    |
00fc 01cb 6c00  |  l |
00fe 0000 0500  |    |
0100 0cf6 a000  |    |
0102 0000 2800  |  ( |
0104 67b5 0000  |g   |
0106 0001 4003  |  @ |
0108 3da8 0000  |=   |
010a 000a 0019  |    |
010c ed40 0000  | @  |
010e 0054 00e2  | T  |
0110 a600 0000  |    |
0112 02a0 06b9  |    |
0114 9802 61ca  |  a |
0116 1500 38a9  |  8 |
0118 8000 0000  |    |
011a a801 ae66  |   f|
011c 0098 af85  |    |
011e 400e 2a60  |@ *`|
0120 0000 002a  |   *|
0122 006b 9980  | k  |
0124 263b 2150  |&;!P|
0126 038a 9800  |    |
0128 0000 0a80  |    |
012a 1ae6 6009  |  ` |
012c 9298 5400  |  T |
012e e2a6 0000  |    |
0130 0002 a006  |    |
0132 b998 0265  |   e|
0134 9a15 0038  |   8|
0136 a980 0000  |    |
0138 00a8 01ae  |    |
013a 6600 99a3  |f   |
013c 8540 0e2a  | @ *|
013e 6000 0000  |`   |
0140 2a00 6b99  |* k |
0142 8026 7821  | &x!|
0144 5003 8a98  |P   |
0146 0000 000a  |    |
0148 801a e660  |   `|
014a 09a1 d854  |   T|
014c 00e2 a600  |    |
014e 0000 02a0  |    |
0150 06b9 9802  |    |
0152 696a 1500  |ij  |
0154 38a9 8000  |8   |
0156 0000 a801  |    |
0158 ae66 009a  | f  |
015a 9785 400e  |  @ |
015c 2a60 0000  |*`  |
015e 002a 006b  | * k|
0160 9980 26b5  |  & |
0162 2150 038a  |!P  |
0164 9800 0000  |    |
0166 0a80 1ae6  |    |
0168 6009 b118  |`   |
016a 5400 e2a6  |T   |
016c 0000 0002  |    |
016e a006 b998  |    |
0170 026d 3b3b  | m;;|
0172 1700 4e01  |  N |
0174 4000 0000  |@   |
0176 0a20 0000  |    |
0178 0002 762e  |  v.|
017a 0000 0000  |    |
017c 0000 0008  |    |
017e 0000 0000  |    |
0180 04cc 4801  |  H |
0182 3f67 0000  |?g  |
0184 0000 139b  |    |
0186 a004 dc5c  |   \|
0188 0000 0000  |    |
018a 004e c5c0  | N  |
018c 139b a000  |    |
018e 0000 0100  |    |
0190 0000 0000  |    |
0192 9a85 8027  |   '|
0194 3740 0000  |7@  |
0196 0008 5000  |  P |
0198 0000 0000  |    |
019a 0000 0026  |   &|
019c 6240 09c0  |b@  |
019e 2800 0000  |(   |
01a0 009c 9000  |    |
01a2 2715 2000  |'   |
01a4 0000 0003  |    |
01a6 ff58 0000  | X  |
01a8 0000 0000  |    |
01aa 0001 3eab  |  > |
01ac 004f 0800  | O  |
01ae 13b6 7003  |  p |
01b0 3000 0831  |0  1|
01b2 8278 0000  | x  |
01b4 0000 0000  |    |
01b6 c703 204e  |   N|
01b8 004e c500  | N  |
01ba 1e4e c5c0  | N  |
01bc 13c2 0000  |    |
01be 0000 0128  |   (|
01c0 0000 0000  |    |
01c2 81d4 8027  |   '|
01c4 dda0 0000  |    |
01c6 0002 7752  |  wR|
01c8 009d 57c0  |  W |
01ca 13eb 8004  |    |
01cc f082 7d56  |  }V|
01ce 009f 1f80  |    |
01d0 27b0 c006  |'   |
01d2 6000 1063  |`  c|
01d4 04f0 0000  |    |
01d6 0000 0001  |    |
01d8 8e06 409c  |  @ |
01da 009e 9980  |    |
01dc 119d 8b80  |    |
01de 27c7 e000  |'   |
01e0 0000 0760  |   `|
01e2 0000 0001  |    |
01e4 03a9 004f  |   O|
01e6 bb40 0000  | @  |
01e8 0004 f720  |    |
01ea 013c ce80  | <  |
01ec 0000 0009  |    |
01ee f1fc 224c  |  "L|
01f0 013f 6700  | ?g |
01f2 0000 0013  |    |
01f4 c990 0000  |    |
01f6 0106 5b00  |  [ |
01f8 0000 0000  |    |
01fa 0000 04e0  |    |
01fc 1401 3eed  |  > |
01fe 0000 0000  |    |