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

⟦afaf2528d⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

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 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0060       | `  |		.CONST	0x0060								; 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 0000       |    |		.CONST	0x0000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0044       | D  |		.CONST	0x0044								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0013       |    |		.CONST	0x0013								; Number of locals
000b			INIT_0008:
000b 0092 0046  |   F|		Action	Push_String_Extended,0x46					; "ada"
													; Debug Table 0x0 = .DEBUG	0x000b,0x006a,0x8000,0x0000,0x0057,0x7a45,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
000d e001       |    |		Load	0x0,0x1
000e 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
000f e001       |    |		Load	0x0,0x1
0010 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0011 011e       |    |		Execute	Any,Convert
0012 0129       | )  |		Execute	Any,Make_Visible
0013 0092 0047  |   G|		Action	Push_String_Extended,0x47					; "file"
													; Debug Table 0x0.0x2 = 0x13,0xfffd
0015 e001       |    |		Load	0x0,0x1
0016 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0017 e001       |    |		Load	0x0,0x1
0018 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0019 011e       |    |		Execute	Any,Convert
001a 0129       | )  |		Execute	Any,Make_Visible
001b 0092 0048  |   H|		Action	Push_String_Extended,0x48					; "user"
													; Debug Table 0x0.0x3 = 0x1b,0xfffc
001d e001       |    |		Load	0x0,0x1
001e 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
001f e001       |    |		Load	0x0,0x1
0020 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0021 011e       |    |		Execute	Any,Convert
0022 0129       | )  |		Execute	Any,Make_Visible
0023 0092 0049  |   I|		Action	Push_String_Extended,0x49					; "session"
													; Debug Table 0x0.0x4 = 0x23,0xfffb
0025 e001       |    |		Load	0x0,0x1
0026 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0027 e001       |    |		Load	0x0,0x1
0028 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0029 011e       |    |		Execute	Any,Convert
002a 0129       | )  |		Execute	Any,Make_Visible
002b 0092 004a  |   J|		Action	Push_String_Extended,0x4a					; "terminal"
													; Debug Table 0x0.0x5 = 0x2b,0xfffa
002d e001       |    |		Load	0x0,0x1
002e 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
002f e001       |    |		Load	0x0,0x1
0030 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0031 011e       |    |		Execute	Any,Convert
0032 0129       | )  |		Execute	Any,Make_Visible
0033 0092 004b  |   K|		Action	Push_String_Extended,0x4b					; "tape"
													; Debug Table 0x0.0x6 = 0x33,0xfff9
0035 e001       |    |		Load	0x0,0x1
0036 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0037 e001       |    |		Load	0x0,0x1
0038 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0039 011e       |    |		Execute	Any,Convert
003a 0129       | )  |		Execute	Any,Make_Visible
003b 0092 004c  |   L|		Action	Push_String_Extended,0x4c					; "pipe"
													; Debug Table 0x0.0x7 = 0x3b,0xfff8
003d e001       |    |		Load	0x0,0x1
003e 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
003f e001       |    |		Load	0x0,0x1
0040 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0041 011e       |    |		Execute	Any,Convert
0042 0129       | )  |		Execute	Any,Make_Visible
0043 00bf       |    |		Action	Accept_Activation
0044			BODY_0008:
0044 00bc       |    |		Action	Signal_Activated
0045 00bb       |    |		Action	Signal_Completion
0046 ; --------------------------------------------------------------------------------------
0046 ; STRING TABLE
0046 ; --------------------------------------------------------------------------------------
0046 0010       |    |		.STRTAB	0x0010->0x004e							; "ada"
0047 0011       |    |		.STRTAB	0x0011->0x004f							; "file"
0048 0013       |    |		.STRTAB	0x0013->0x0051							; "user"
0049 0015       |    |		.STRTAB	0x0015->0x0053							; "session"
004a 001a       |    |		.STRTAB	0x001a->0x0057							; "terminal"
004b 0020       |    |		.STRTAB	0x0020->0x005b							; "tape"
004c 0022       | "  |		.STRTAB	0x0022->0x005d							; "pipe"
004d 0024       | $  |		.STREND 0x0024->0x005f
004e 6164 6166  |adaf|		.STRTAB_STRINGS
005f 0000       |    |		.XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0003 0001  |    |		.CONST	0x0003,0x0001
0062 000b 006a  |   j|		.DEBUG	0x000b,0x006a,0x8000,0x0000,0x0057,0x7a45,0x0000,0x0005
006a ; --------------------------------------------------------------------------------------
006a ; Debug3 Subtable 0x0
006a ; --------------------------------------------------------------------------------------
006a 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
006c 000b ffff  |    |		.CONST	0x000b,0xffff
006e 000b fffe  |    |		.CONST	0x000b,0xfffe
0070 0013 fffd  |    |		.CONST	0x0013,0xfffd
0072 001b fffc  |    |		.CONST	0x001b,0xfffc
0074 0023 fffb  | #  |		.CONST	0x0023,0xfffb
0076 002b fffa  | +  |		.CONST	0x002b,0xfffa
0078 0033 fff9  | 3  |		.CONST	0x0033,0xfff9
007a 003b fff8  | ;  |		.CONST	0x003b,0xfff8
007c 0000 0000  |    |		.BLANK	0000[0x184]