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

⟦8a9a393e9⟧

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

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 0000       |    |		.CONST	0x0000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0060       | `  |		.CONST	0x0060								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0023       | #  |		.CONST	0x0023								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f 00c4       |    |		Action	Make_Default
0020 00c4       |    |		Action	Make_Default
0021 00c4       |    |		Action	Make_Default
0022 4800       |H   |		Short_Literal	0x0
0023 e001       |    |		Load	0x0,0x1
0024 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
0025 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0026 0129       | )  |		Execute	Any,Make_Visible
0027 00d8       |    |		Load_Top	At_Offset_0
0028 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0029 c219       |    |		Store	0x1,0x19
002a e001       |    |		Load	0x0,0x1
002b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
002c 0129       | )  |		Execute	Any,Make_Visible
002d c21a       |    |		Store	0x1,0x1a
002e e001       |    |		Load	0x0,0x1
002f 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0030 0129       | )  |		Execute	Any,Make_Visible
0031 c21b       |    |		Store	0x1,0x1b
0032 e001       |    |		Load	0x0,0x1
0033 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0034 0129       | )  |		Execute	Any,Make_Visible
0035 c21c       |    |		Store	0x1,0x1c
0036 4801       |H   |		Short_Literal	0x1
0037 4809       |H   |		Short_Literal	0x9
0038 e001       |    |		Load	0x0,0x1
0039 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
003a 035b       | [  |		Declare_Type	Array,Constrained
003b 0336       | 6  |		Declare_Variable	Array,Visible
003c c21d       |    |		Store	0x1,0x1d
003d e001       |    |		Load	0x0,0x1
003e 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
003f 0336       | 6  |		Declare_Variable	Array,Visible
0040 c21e       |    |		Store	0x1,0x1e
0041 e001       |    |		Load	0x0,0x1
0042 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0043 0321       | !  |		Declare_Variable	Record,Visible
0044 c21f       |    |		Store	0x1,0x1f
0045 4801       |H   |		Short_Literal	0x1
0046 4802       |H   |		Short_Literal	0x2
0047 00e9       |    |		Load_Encached	String_Cache
0048 035b       | [  |		Declare_Type	Array,Constrained
0049 0336       | 6  |		Declare_Variable	Array,Visible
004a c214       |    |		Store	0x1,0x14
004b 4801       |H   |		Short_Literal	0x1
004c 4803       |H   |		Short_Literal	0x3
004d e001       |    |		Load	0x0,0x1
004e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
004f 035b       | [  |		Declare_Type	Array,Constrained
0050 0336       | 6  |		Declare_Variable	Array,Visible
0051 c220       |    |		Store	0x1,0x20
0052 e001       |    |		Load	0x0,0x1
0053 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0054 0321       | !  |		Declare_Variable	Record,Visible
0055 c221       | !  |		Store	0x1,0x21
0056 e001       |    |		Load	0x0,0x1
0057 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0058 0129       | )  |		Execute	Any,Make_Visible
0059 c222       | "  |		Store	0x1,0x22
005a e001       |    |		Load	0x0,0x1
005b 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
005c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
005d 0321       | !  |		Declare_Variable	Record,Visible
005e c223       | #  |		Store	0x1,0x23
005f 00bf       |    |		Action	Accept_Activation
0060			BODY_0008:
0060 00be       |    |		Action	Activate_Tasks
0061 00bc       |    |		Action	Signal_Activated
0062 00bb       |    |		Action	Signal_Completion
0063 0000 0000  |    |		.BLANK	0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0004 0001  |    |		.DEBUG4	0x0004,0x0001,0x6eb6,0x0000,0x0001,0x0001
006e 000b 0072  |   r|		.DBG4T	0x000b,0x0072,0x8000,0x8000
0072 ; --------------------------------------------------------------------------------------
0072 ; Debug chain
0072 ; --------------------------------------------------------------------------------------
0072 000c 0000  |    |		.DBGLEN	0x000c,0x0000
0074 0022 002a  | " *|		.DBGLNO	0x0022,0x002a,0x002e,0x0032,0x0036,0x003d,0x0041,0x0045,0x004b,0x0052,0x0056,0x005a
0080 0001 0003  |    |		.XXX[0xc]
0082 0004 0005  |    |
0084 0007 0008  |    |
0086 0009 000a  |    |
0088 000b 000c  |    |
008a 000d 000e  |    |
008c 0000 0000  |    |		.BLANK	0000[0x174]