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

⟦1a2fd0181⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0080       |    |		.CONST	0x0080								; 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 001d       |    |		.CONST	0x001d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0004       |    |		.CONST	0x0004								; Number of locals
000b			INIT_0008:
000b 00da       |    |		Load_Top	At_Offset_2
000c 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
000d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
000e e211       |    |		Load	0x1,0x11
000f 8024       | $  |		Call	0x0,0x24
0010 801f       |    |		Call	0x0,0x1f
0011 00db       |    |		Load_Top	At_Offset_3
0012 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0013 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0014 e211       |    |		Load	0x1,0x11
0015 8024       | $  |		Call	0x0,0x24
0016 801f       |    |		Call	0x0,0x1f
0017 e5ff       |    |		Load	0x2,-0x1
0018 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0019 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
001a e211       |    |		Load	0x1,0x11
001b 8024       | $  |		Call	0x0,0x24
001c 801f       |    |		Call	0x0,0x1f
001d			BODY_0008:
001d 0092 005d  |   ]|		Action	Push_String_Extended,0x5d					; "    selection="
001f e010       |    |		Load	0x0,0x10
0020 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0021 e5ff       |    |		Load	0x2,-0x1
0022 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0023 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0024 8215       |    |		Call	0x1,0x15
0025 0092 005e  |   ^|		Action	Push_String_Extended,0x5e					; " ("
0027 e010       |    |		Load	0x0,0x10
0028 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0029 00da       |    |		Load_Top	At_Offset_2
002a e010       |    |		Load	0x0,0x10
002b 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
002c 0092 005f  |   _|		Action	Push_String_Extended,0x5f					; "), target="
002e e010       |    |		Load	0x0,0x10
002f 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0030 e5ff       |    |		Load	0x2,-0x1
0031 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0032 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0033 8215       |    |		Call	0x1,0x15
0034 0092 005e  |   ^|		Action	Push_String_Extended,0x5e					; " ("
0036 e010       |    |		Load	0x0,0x10
0037 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0038 00d9       |    |		Load_Top	At_Offset_1
0039 e010       |    |		Load	0x0,0x10
003a 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
003b 0092 0060  |   `|		Action	Push_String_Extended,0x60					; "),"
003d e010       |    |		Load	0x0,0x10
003e 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
003f 4801       |H   |		Short_Literal	0x1
0040 e010       |    |		Load	0x0,0x10
0041 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0042 0092 0061  |   a|		Action	Push_String_Extended,0x61					; "    property="
0044 e010       |    |		Load	0x0,0x10
0045 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0046 e5ff       |    |		Load	0x2,-0x1
0047 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0048 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0049 8215       |    |		Call	0x1,0x15
004a 0092 005e  |   ^|		Action	Push_String_Extended,0x5e					; " ("
004c e010       |    |		Load	0x0,0x10
004d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
004e 00d8       |    |		Load_Top	At_Offset_0
004f e010       |    |		Load	0x0,0x10
0050 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0051 0092 0062  |   b|		Action	Push_String_Extended,0x62					; "), time="
0053 e010       |    |		Load	0x0,0x10
0054 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0055 e5ff       |    |		Load	0x2,-0x1
0056 261e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e
0057 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0058 822a       | *  |		Call	0x1,0x2a
0059 4801       |H   |		Short_Literal	0x1
005a e010       |    |		Load	0x0,0x10
005b 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
005c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
005d ; --------------------------------------------------------------------------------------
005d ; STRING TABLE
005d ; --------------------------------------------------------------------------------------
005d 000e       |    |		.STRTAB	0x000e->0x0064							; "    selection="
005e 001a       |    |		.STRTAB	0x001a->0x006b							; " ("
005f 001a       |    |		.STRTAB	0x001a->0x006c							; "), target="
0060 0022       | "  |		.STRTAB	0x0022->0x0071							; "),"
0061 0022       | "  |		.STRTAB	0x0022->0x0072							; "    property="
0062 002d       | -  |		.STRTAB	0x002d->0x0078							; "), time="
0063 0033       | 3  |		.STREND 0x0033->0x007c
0064 2020 2020  |    |		.STRTAB_STRINGS
007d 0000 0000  |    |		.XXX[0x3]
007f 0000       |    |
0080 ; --------------------------------------------------------------------------------------
0080 ; Debug Table
0080 ; --------------------------------------------------------------------------------------
0080 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x6881,0x0000,0x0001,0x0001
0086 000b 008a  |    |		.DBG4T	0x000b,0x008a,0x0001,0x0000
008a ; --------------------------------------------------------------------------------------
008a ; Debug chain
008a ; --------------------------------------------------------------------------------------
008a 0003 0011  |    |		.DBGLEN	0x0003,0x0011
008c 000b 0011  |    |		.DBGLNO	0x000b,0x0011,0x0017,0x001d,0x0021,0x0025,0x0029,0x002c,0x0030,0x0034,0x0038,0x003b,0x003f,0x0042,0x0046,0x004a,0x004e,0x0051,0x0055,0x0059
00a0 0000 0000  |    |		.BLANK	0000[0x160]