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

⟦c4eb38038⟧

    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
    └─ ⟦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 00e0       |    |		.CONST	0x00e0								; 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 0015       |    |		.CONST	0x0015								; Address of begin
0009 00b6       |    |		.CONST	0x00b6								; Address of exception handler
000a 0004       |    |		.CONST	0x0004								; Number of locals
000b			INIT_0008:
000b e00c       |    |		Load	0x0,0xc
000c 0007       |    |		Action	Break_Optional
000d e02d       | -  |		Load	0x0,0x2d
000e 02ff       |    |		Declare_Variable	Variant_Record
000f 00d8       |    |		Load_Top	At_Offset_0
0010 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0011 e02e       | .  |		Load	0x0,0x2e
0012 0322       | "  |		Declare_Variable	Record
0013 00d8       |    |		Load_Top	At_Offset_0
0014 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0015			BODY_0008:
0015 e5fc       |    |		Load	0x2,-0x4
0016 c236       | 6  |		Store	0x1,0x36
0017 e5ff       |    |		Load	0x2,-0x1
0018 8248       | H  |		Call	0x1,0x48
0019 e5fd       |    |		Load	0x2,-0x3
001a 01db       |    |		Execute	Vector,Length
001b 701e       |p   |		Jump_Nonzero	0x3a
001c 00d9       |    |		Load_Top	At_Offset_1
001d 00d9       |    |		Load_Top	At_Offset_1
001e 4800       |H   |		Short_Literal	0x0
001f 4803       |H   |		Short_Literal	0x3
0020 e00a       |    |		Load	0x0,0xa
0021 0334       | 4  |		Declare_Variable	Array,With_Constraint
0022 5099       |P   |		Indirect_Literal	Any,0xbc,{0x53697a65, 0x00000000}
0023 4800       |H   |		Short_Literal	0x0
0024 4805       |H   |		Short_Literal	0x5
0025 e00a       |    |		Load	0x0,0xa
0026 0334       | 4  |		Declare_Variable	Array,With_Constraint
0027 5098       |P   |		Indirect_Literal	Any,0xc0,{0x50757a7a, 0x6c650000}
0028 e20d       |    |		Load	0x1,0xd
0029 802f       | /  |		Call	0x0,0x2f
002a 00d2       |    |		Pop_Control	Pop_Count_2
002b 00d9       |    |		Load_Top	At_Offset_1
002c e030       | 0  |		Load	0x0,0x30
002d 016f       | o  |		Execute	Variant_Record,Equal
002e 6805       |h   |		Jump_Zero	0x34
002f 4804       |H   |		Short_Literal	0x4
0030 c011       |    |		Store	0x0,0x11
0031 4804       |H   |		Short_Literal	0x4
0032 c02c       | ,  |		Store	0x0,0x2c
0033 7808       |x   |		Jump	0x3c
0034 00d9       |    |		Load_Top	At_Offset_1
0035 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
0036 0227       | '  |		Execute	Access,All_Reference
0037 8015       |    |		Call	0x0,0x15
0038 825d       | ]  |		Call	0x1,0x5d
0039 7802       |x   |		Jump	0x3c
003a e5fd       |    |		Load	0x2,-0x3
003b 825d       | ]  |		Call	0x1,0x5d
003c e02c       | ,  |		Load	0x0,0x2c
003d 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
003e 0901       |    |		Execute_Immediate	Binary_Scale,0x1
003f 00d8       |    |		Load_Top	At_Offset_0
0040 e007       |    |		Load	0x0,0x7
0041 0260       | `  |		Execute	Discrete,In_Type
0042 7001       |p   |		Jump_Nonzero	0x44
0043 0801       |    |		Execute_Immediate	Raise,0x1
0044 e011       |    |		Load	0x0,0x11
0045 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0046 0901       |    |		Execute_Immediate	Binary_Scale,0x1
0047 00d8       |    |		Load_Top	At_Offset_0
0048 e007       |    |		Load	0x0,0x7
0049 0260       | `  |		Execute	Discrete,In_Type
004a 7001       |p   |		Jump_Nonzero	0x4c
004b 0801       |    |		Execute_Immediate	Raise,0x1
004c 8247       | G  |		Call	0x1,0x47
004d c031       | 1  |		Store	0x0,0x31
004e e236       | 6  |		Load	0x1,0x36
004f 7022       |p"  |		Jump_Nonzero	0x72
0050 00d9       |    |		Load_Top	At_Offset_1
0051 00d9       |    |		Load_Top	At_Offset_1
0052 4800       |H   |		Short_Literal	0x0
0053 4804       |H   |		Short_Literal	0x4
0054 e00a       |    |		Load	0x0,0xa
0055 0334       | 4  |		Declare_Variable	Array,With_Constraint
0056 506d       |Pm  |		Indirect_Literal	Any,0xc4,{0x53706565, 0x64000000}
0057 4800       |H   |		Short_Literal	0x0
0058 4805       |H   |		Short_Literal	0x5
0059 e00a       |    |		Load	0x0,0xa
005a 0334       | 4  |		Declare_Variable	Array,With_Constraint
005b 506c       |Pl  |		Indirect_Literal	Any,0xc8,{0x50757a7a, 0x6c650000}
005c e20d       |    |		Load	0x1,0xd
005d 802f       | /  |		Call	0x0,0x2f
005e 00d2       |    |		Pop_Control	Pop_Count_2
005f 00d9       |    |		Load_Top	At_Offset_1
0060 e030       | 0  |		Load	0x0,0x30
0061 016f       | o  |		Execute	Variant_Record,Equal
0062 7009       |p   |		Jump_Nonzero	0x6c
0063 00d9       |    |		Load_Top	At_Offset_1
0064 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0065 00d8       |    |		Load_Top	At_Offset_0
0066 e00c       |    |		Load	0x0,0xc
0067 0260       | `  |		Execute	Discrete,In_Type
0068 7001       |p   |		Jump_Nonzero	0x6a
0069 0801       |    |		Execute_Immediate	Raise,0x1
006a a236       | 6  |		Store_Unchecked	0x1,0x36
006b 7802       |x   |		Jump	0x6e
006c 4802       |H   |		Short_Literal	0x2
006d a236       | 6  |		Store_Unchecked	0x1,0x36
006e e236       | 6  |		Load	0x1,0x36
006f 7002       |p   |		Jump_Nonzero	0x72
0070 4801       |H   |		Short_Literal	0x1
0071 a236       | 6  |		Store_Unchecked	0x1,0x36
0072 e5fb       |    |		Load	0x2,-0x5
0073 a20e       |    |		Store_Unchecked	0x1,0xe
0074 e20e       |    |		Load	0x1,0xe
0075 7015       |p   |		Jump_Nonzero	0x8b
0076 00d9       |    |		Load_Top	At_Offset_1
0077 00d9       |    |		Load_Top	At_Offset_1
0078 4800       |H   |		Short_Literal	0x0
0079 4807       |H   |		Short_Literal	0x7
007a e00a       |    |		Load	0x0,0xa
007b 0334       | 4  |		Declare_Variable	Array,With_Constraint
007c 504f       |PO  |		Indirect_Literal	Any,0xcc,{0x436f6c6f, 0x726d6170}
007d 4800       |H   |		Short_Literal	0x0
007e 4805       |H   |		Short_Literal	0x5
007f e00a       |    |		Load	0x0,0xa
0080 0334       | 4  |		Declare_Variable	Array,With_Constraint
0081 504e       |PN  |		Indirect_Literal	Any,0xd0,{0x50757a7a, 0x6c650000}
0082 e20d       |    |		Load	0x1,0xd
0083 802f       | /  |		Call	0x0,0x2f
0084 00d2       |    |		Pop_Control	Pop_Count_2
0085 00d9       |    |		Load_Top	At_Offset_1
0086 e030       | 0  |		Load	0x0,0x30
0087 016f       | o  |		Execute	Variant_Record,Equal
0088 7002       |p   |		Jump_Nonzero	0x8b
0089 4801       |H   |		Short_Literal	0x1
008a a20e       |    |		Store_Unchecked	0x1,0xe
008b e5fe       |    |		Load	0x2,-0x2
008c 4800       |H   |		Short_Literal	0x0
008d 00e5       |    |		Load_Encached	Long_Integer_Cache
008e 00d9       |    |		Load_Top	At_Offset_1
008f 0267       | g  |		Execute	Discrete,Predecessor
0090 e00a       |    |		Load	0x0,0xa
0091 0334       | 4  |		Declare_Variable	Array,With_Constraint
0092 01df       |    |		Execute	Vector,Equal
0093 681d       |h   |		Jump_Zero	0xb1
0094 00d9       |    |		Load_Top	At_Offset_1
0095 00d9       |    |		Load_Top	At_Offset_1
0096 4800       |H   |		Short_Literal	0x0
0097 4807       |H   |		Short_Literal	0x7
0098 e00a       |    |		Load	0x0,0xa
0099 0334       | 4  |		Declare_Variable	Array,With_Constraint
009a 5039       |P9  |		Indirect_Literal	Any,0xd4,{0x47656f6d, 0x65747279}
009b 4800       |H   |		Short_Literal	0x0
009c 4805       |H   |		Short_Literal	0x5
009d e00a       |    |		Load	0x0,0xa
009e 0334       | 4  |		Declare_Variable	Array,With_Constraint
009f 5038       |P8  |		Indirect_Literal	Any,0xd8,{0x50757a7a, 0x6c650000}
00a0 e20d       |    |		Load	0x1,0xd
00a1 802f       | /  |		Call	0x0,0x2f
00a2 00d2       |    |		Pop_Control	Pop_Count_2
00a3 00d9       |    |		Load_Top	At_Offset_1
00a4 e030       | 0  |		Load	0x0,0x30
00a5 016f       | o  |		Execute	Variant_Record,Equal
00a6 7006       |p   |		Jump_Nonzero	0xad
00a7 00d9       |    |		Load_Top	At_Offset_1
00a8 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
00a9 0227       | '  |		Execute	Access,All_Reference
00aa e5ff       |    |		Load	0x2,-0x1
00ab 824f       | O  |		Call	0x1,0x4f
00ac 7807       |x   |		Jump	0xb4
00ad e5fe       |    |		Load	0x2,-0x2
00ae e5ff       |    |		Load	0x2,-0x1
00af 824f       | O  |		Call	0x1,0x4f
00b0 7803       |x   |		Jump	0xb4
00b1 e5fe       |    |		Load	0x2,-0x2
00b2 e5ff       |    |		Load	0x2,-0x1
00b3 824f       | O  |		Call	0x1,0x4f
00b4 825c       | \  |		Call	0x1,0x5c
00b5 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
00b6			TRAP_0008:
00b6 e21b       |    |		Load	0x1,0x1b
00b7 010f       |    |		Execute	Exception,Equal
00b8 6802       |h   |		Jump_Zero	0xbb
00b9 0008       |    |		Action	Idle
00ba 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
00bb 0100       |    |		Execute	Exception,Raise
00bc 5369 7a65  |Size|		.LITERAL	{0x53697a65, 0x00000000}
00c0 5075 7a7a  |Puzz|		.LITERAL	{0x50757a7a, 0x6c650000}
00c4 5370 6565  |Spee|		.LITERAL	{0x53706565, 0x64000000}
00c8 5075 7a7a  |Puzz|		.LITERAL	{0x50757a7a, 0x6c650000}
00cc 436f 6c6f  |Colo|		.LITERAL	{0x436f6c6f, 0x726d6170}
00d0 5075 7a7a  |Puzz|		.LITERAL	{0x50757a7a, 0x6c650000}
00d4 4765 6f6d  |Geom|		.LITERAL	{0x47656f6d, 0x65747279}
00d8 5075 7a7a  |Puzz|		.LITERAL	{0x50757a7a, 0x6c650000}
00dc 0000 0000  |    |		.BLANK	0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x688f,0x0000,0x0001,0x0001
00e6 000b 00ea  |    |		.DBG4T	0x000b,0x00ea,0x0001,0x0000
00ea ; --------------------------------------------------------------------------------------
00ea ; Debug chain
00ea ; --------------------------------------------------------------------------------------
00ea 0003 001e  |    |		.DBGLEN	0x0003,0x001e
00ec 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x0011,0x0015,0x0017,0x0019,0x001c,0x002b,0x002f,0x0031,0x0034,0x003a,0x003c,0x004e,0x0050,0x005f,0x0063,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0085,0x0089,0x008b,0x0094,0x00a3,0x00a7,0x00ad,0x00b1,0x00b4,0x00b9
010d 0000 0000  |    |		.BLANK	0000[0xf3]