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

⟦5410041f4⟧

    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 0078       | x  |		.CONST	0x0078								; 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 0010       |    |		.CONST	0x0010								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x009a,0x8000,0x0000,0x0056,0x6385,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xe,0xfffc
0010 00bf       |    |		Action	Accept_Activation
0011 0092 0064  |   d|		Action	Push_String_Extended,0x64					; "Default_Job_Page_Limit"
													; Debug Table 0x1 = .DEBUG	0x0011,0x00a4,0x8000,0x0000,0x0056,0x6395,0x0000,0x0009
													; Debug Table 0x1.0x0 = 0x11,0xffff
0013 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0015 02c7       |    |		Declare_Variable	Any
0016 00d8       |    |		Load_Top	At_Offset_0
0017 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0018 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x18,0xfffd
0019 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x3 = 0x19,0xfffc
001a 00c7       |    |		Action	Elaborate_Subprogram
001b 029f 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Call
001d			BODY_0008:
001d 8210       |    |		Call	0x1,0x10							; Debug Table 0x1.0x4 = 0x1d,0x1
001e 00bc       |    |		Action	Signal_Activated
001f 00bb       |    |		Action	Signal_Completion
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0028       | (  |		.CONST	0x0028								; Address of begin
0021 0031       | 1  |		.CONST	0x0031								; Address of exception handler
0022 0002       |    |		.CONST	0x0002								; Number of locals
0023			INIT_0020:
0023 e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x0023,0x00b0,0x0002,0x0000,0x0056,0x6385,0x0000,0x001b
													; Debug Table 0x2.0x0 = 0x23,0xffff
0024 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0025 02c7       |    |		Declare_Variable	Any
0026 00d8       |    |		Load_Top	At_Offset_0
0027 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0028			BODY_0020:
0028 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x28,0x1
0029 e20f       |    |		Load	0x1,0xf
002a e001       |    |		Load	0x0,0x1
002b 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
002c c402       |    |		Store	0x2,0x2
002d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0x2d,0x2
002e e001       |    |		Load	0x0,0x1
002f 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0030 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0031			TRAP_0020:
0031 0007       |    |		Action	Break_Optional
0032 602d       |`-  |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x00001f40}		; Debug Table 0x2.0x3 = 0x32,0x3
0033 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0034 0000 0000  |    |		.BLANK	0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003c       | <  |		.CONST	0x003c								; Address of begin
0039 0049       | I  |		.CONST	0x0049								; Address of exception handler
003a 0002       |    |		.CONST	0x0002								; Number of locals
003b			INIT_0038:
003b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3 = .DEBUG	0x003b,0x00ba,0x0004,0x0000,0x0056,0x6395,0x0000,0x006f
													; Debug Table 0x3.0x0 = 0x3b,0xffff
003c			BODY_0038:
003c e20f       |    |		Load	0x1,0xf								; Debug Table 0x3.0x1 = 0x3c,0x1
003d 0120       |    |		Execute	Any,Is_Value
003e 6803       |h   |		Jump_Zero	0x42
003f e001       |    |		Load	0x0,0x1
0040 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0041 7801       |x   |		Jump	0x43
0042 e20f       |    |		Load	0x1,0xf
0043 601c       |`   |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x00001f40}
0044 e20e       |    |		Load	0x1,0xe
0045 e001       |    |		Load	0x0,0x1
0046 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0047 c20f       |    |		Store	0x1,0xf
0048 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0049			TRAP_0038:
0049 e001       |    |		Load	0x0,0x1
004a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004b 010f       |    |		Execute	Exception,Equal
004c 6812       |h   |		Jump_Zero	0x5f
004d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x2 = 0x4d,0x2
004e e20f       |    |		Load	0x1,0xf
004f 0120       |    |		Execute	Any,Is_Value
0050 6803       |h   |		Jump_Zero	0x54
0051 e001       |    |		Load	0x0,0x1
0052 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0053 7801       |x   |		Jump	0x55
0054 e20f       |    |		Load	0x1,0xf
0055 e20e       |    |		Load	0x1,0xe
0056 e001       |    |		Load	0x0,0x1
0057 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0058 c20f       |    |		Store	0x1,0xf
0059 005a       | Z  |		Store_Top	Discrete,At_Offset_2
005a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x3 = 0x5a,0x3
005b 7002       |p   |		Jump_Nonzero	0x5e
005c 4887       |H   |		Short_Literal	0x87
005d 0257       | W  |		Execute	Discrete,Raise
005e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
005f 0100       |    |		Execute	Exception,Raise
0060 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
0064 ; --------------------------------------------------------------------------------------
0064 ; STRING TABLE
0064 ; --------------------------------------------------------------------------------------
0064 0004       |    |		.STRTAB	0x0004->0x0066							; "Default_Job_Page_Limit"
0065 0018       |    |		.STREND 0x0018->0x0071
0066 4465 6661  |Defa|		.STRTAB_STRINGS
0071 0000 0000  |    |		.BLANK	0000[0x7]
0078 ; --------------------------------------------------------------------------------------
0078 ; Debug Table
0078 ; --------------------------------------------------------------------------------------
0078 0003 0004  |    |		.CONST	0x0003,0x0004
007a 000b 009a  |    |		.DEBUG	0x000b,0x009a,0x8000,0x0000,0x0056,0x6385,0x0000,0x0009
0082 0011 00a4  |    |		.DEBUG	0x0011,0x00a4,0x8000,0x0000,0x0056,0x6395,0x0000,0x0009
008a 0023 00b0  | #  |		.DEBUG	0x0023,0x00b0,0x0002,0x0000,0x0056,0x6385,0x0000,0x001b
0092 003b 00ba  | ;  |		.DEBUG	0x003b,0x00ba,0x0004,0x0000,0x0056,0x6395,0x0000,0x006f
009a ; --------------------------------------------------------------------------------------
009a ; Debug3 Subtable 0x0
009a ; --------------------------------------------------------------------------------------
009a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
009c 000b ffff  |    |		.CONST	0x000b,0xffff
009e 000c fffe  |    |		.CONST	0x000c,0xfffe
00a0 000d fffd  |    |		.CONST	0x000d,0xfffd
00a2 000e fffc  |    |		.CONST	0x000e,0xfffc
00a4 ; --------------------------------------------------------------------------------------
00a4 ; Debug3 Subtable 0x1
00a4 ; --------------------------------------------------------------------------------------
00a4 0004 0001  |    |		.DBG3TAB	0x0004,0x0001
00a6 0011 ffff  |    |		.CONST	0x0011,0xffff
00a8 0013 fffe  |    |		.CONST	0x0013,0xfffe
00aa 0018 fffd  |    |		.CONST	0x0018,0xfffd
00ac 0019 fffc  |    |		.CONST	0x0019,0xfffc
00ae 001d 0001  |    |		.CONST	0x001d,0x0001
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Debug3 Subtable 0x2
00b0 ; --------------------------------------------------------------------------------------
00b0 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
00b2 0023 ffff  | #  |		.CONST	0x0023,0xffff
00b4 0028 0001  | (  |		.CONST	0x0028,0x0001
00b6 002d 0002  | -  |		.CONST	0x002d,0x0002
00b8 0032 0003  | 2  |		.CONST	0x0032,0x0003
00ba ; --------------------------------------------------------------------------------------
00ba ; Debug3 Subtable 0x3
00ba ; --------------------------------------------------------------------------------------
00ba 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
00bc 003b ffff  | ;  |		.CONST	0x003b,0xffff
00be 003c 0001  | <  |		.CONST	0x003c,0x0001
00c0 004d 0002  | M  |		.CONST	0x004d,0x0002
00c2 005a 0003  | Z  |		.CONST	0x005a,0x0003
00c4 0000 0000  |    |		.BLANK	0000[0x13c]