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

⟦2f6d89be5⟧

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

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 0098       |    |		.CONST	0x0098								; 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 8000       |    |		.CONST	0x8000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0025       | %  |		.CONST	0x0025								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0017       |    |		.CONST	0x0017								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 00bf       |    |		Action	Accept_Activation
0010 6043       |`C  |		Indirect_Literal	Discrete,0x54,{0x00000000, 0x00000400}
0011 00e4       |    |		Load_Encached	Positive_Cache
0012 03f1       |    |		Declare_Variable	Discrete,With_Value
0013 00e4       |    |		Load_Encached	Positive_Cache
0014 0266       | f  |		Execute	Discrete,Bounds
0015 e210       |    |		Load	0x1,0x10
0016 02a0       |    |		Declare_Subprogram	Null_Subprogram
0017 4801       |H   |		Short_Literal	0x1
0018 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
0019 00d8       |    |		Load_Top	At_Offset_0
001a 02a0       |    |		Declare_Subprogram	Null_Subprogram
001b 03ad       |    |		Declare_Type	Heap_Access,Defined
001c 4801       |H   |		Short_Literal	0x1
001d e214       |    |		Load	0x1,0x14
001e e216       |    |		Load	0x1,0x16
001f e211       |    |		Load	0x1,0x11
0020 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
0021 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0022 00c7       |    |		Action	Elaborate_Subprogram
0023 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0024 00c7       |    |		Action	Elaborate_Subprogram
0025			BODY_0008:
0025 00bc       |    |		Action	Signal_Activated
0026 00bb       |    |		Action	Signal_Completion
0027 0000       |    |		.XXX[0x1]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002d       | -  |		.CONST	0x002d								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0002       |    |		.CONST	0x0002								; Number of locals
002b			INIT_0028:
002b 029f 0073  |   s|		Declare_Subprogram	INIT_0070,For_Call
002d			BODY_0028:
002d e5ff       |    |		Load	0x2,-0x1
002e e214       |    |		Load	0x1,0x14
002f 027d       | }  |		Execute	Discrete,Greater
0030 6801       |h   |		Jump_Zero	0x32
0031 8402       |    |		Call	0x2,0x2
0032 e5ff       |    |		Load	0x2,-0x1
0033 e217       |    |		Load	0x1,0x17
0034 0217       |    |		Execute	Heap_Access,All_Reference
0035 01d7       |    |		Execute	Vector,Field_Read
0036 7013       |p   |		Jump_Nonzero	0x4a
0037 e20f       |    |		Load	0x1,0xf
0038 0124       | $  |		Execute	Any,Is_Constrained
0039 7006       |p   |		Jump_Nonzero	0x40
003a e20f       |    |		Load	0x1,0xf
003b 1c09       |    |		Execute_Immediate	Run_Utility,0x9
003c e210       |    |		Load	0x1,0x10
003d e211       |    |		Load	0x1,0x11
003e 0398       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Subtype
003f 7803       |x   |		Jump	0x43
0040 e210       |    |		Load	0x1,0x10
0041 e211       |    |		Load	0x1,0x11
0042 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0043 00d8       |    |		Load_Top	At_Offset_0
0044 0217       |    |		Execute	Heap_Access,All_Reference
0045 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0046 e5ff       |    |		Load	0x2,-0x1
0047 e217       |    |		Load	0x1,0x17
0048 0217       |    |		Execute	Heap_Access,All_Reference
0049 01d6       |    |		Execute	Vector,Field_Write
004a e5ff       |    |		Load	0x2,-0x1
004b e217       |    |		Load	0x1,0x17
004c 0217       |    |		Execute	Heap_Access,All_Reference
004d 01d7       |    |		Execute	Vector,Field_Read
004e e210       |    |		Load	0x1,0x10
004f 0213       |    |		Execute	Heap_Access,Check_In_Type
0050 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0051 0000 0000  |    |		.XXX[0x3]
0053 0000       |    |
0054 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0061       | a  |		.CONST	0x0061								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0002       |    |		.CONST	0x0002								; Number of locals
005b			INIT_0058:
005b e210       |    |		Load	0x1,0x10
005c e5fe       |    |		Load	0x2,-0x2
005d e217       |    |		Load	0x1,0x17
005e 0217       |    |		Execute	Heap_Access,All_Reference
005f 01d7       |    |		Execute	Vector,Field_Read
0060 c402       |    |		Store	0x2,0x2
0061			BODY_0058:
0061 e5ff       |    |		Load	0x2,-0x1
0062 e217       |    |		Load	0x1,0x17
0063 0217       |    |		Execute	Heap_Access,All_Reference
0064 01d7       |    |		Execute	Vector,Field_Read
0065 e5fe       |    |		Load	0x2,-0x2
0066 e217       |    |		Load	0x1,0x17
0067 0217       |    |		Execute	Heap_Access,All_Reference
0068 01d6       |    |		Execute	Vector,Field_Write
0069 00d8       |    |		Load_Top	At_Offset_0
006a e5ff       |    |		Load	0x2,-0x1
006b e217       |    |		Load	0x1,0x17
006c 0217       |    |		Execute	Heap_Access,All_Reference
006d 01d6       |    |		Execute	Vector,Field_Write
006e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
006f 0000       |    |		.XXX[0x1]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0076       | v  |		.CONST	0x0076								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0003       |    |		.CONST	0x0003								; Number of locals
0073			INIT_0070:
0073 e214       |    |		Load	0x1,0x14
0074 0007       |    |		Action	Break_Optional
0075 e217       |    |		Load	0x1,0x17
0076			BODY_0070:
0076 00cf       |    |		Action	Mark_Auxiliary
0077 e214       |    |		Load	0x1,0x14
0078 0903       |    |		Execute_Immediate	Binary_Scale,0x3
0079 c214       |    |		Store	0x1,0x14
007a e5ff       |    |		Load	0x2,-0x1
007b e214       |    |		Load	0x1,0x14
007c 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
007d 027a       | z  |		Execute	Discrete,Less_Equal
007e 7002       |p   |		Jump_Nonzero	0x81
007f 00c9       |    |		Action	Pop_Auxiliary_Loop
0080 7ff6       |    |		Jump	0x77
0081 00ce       |    |		Action	Pop_Auxiliary
0082 4801       |H   |		Short_Literal	0x1
0083 e214       |    |		Load	0x1,0x14
0084 e216       |    |		Load	0x1,0x16
0085 e211       |    |		Load	0x1,0x11
0086 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
0087 a217       |    |		Store_Unchecked	0x1,0x17
0088 4801       |H   |		Short_Literal	0x1
0089 e602       |    |		Load	0x3,0x2
008a e603       |    |		Load	0x3,0x3
008b 0217       |    |		Execute	Heap_Access,All_Reference
008c 01cf       |    |		Execute	Vector,Slice_Read
008d 4801       |H   |		Short_Literal	0x1
008e e602       |    |		Load	0x3,0x2
008f e217       |    |		Load	0x1,0x17
0090 0219       |    |		Execute	Heap_Access,All_Read
0091 01ce       |    |		Execute	Vector,Slice_Write
0092 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0093 0000 0000  |    |		.BLANK	0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; Debug Table
0098 ; --------------------------------------------------------------------------------------
0098 0004 000f  |    |		.DEBUG4	0x0004,0x000f,0x4307,0x0000,0x0001,0x0000
009e 3837 b93a  |87 :|		.XXX[0x91]
00a0 1696 b337  |   7|
00a2 b910 32bc  |  2 |
00a4 30b6 b836  |0  6|
00a6 3296 1031  |2  1|
00a8 3c90 32b7  |< 2 |
00aa 3a32 b934  |:2 4|
00ac b733 9030  | 3 0|
00ae b710 34b7  |  4 |
00b0 31b7 b939  |1  9|
00b2 32b1 ba10  |2   |
00b4 3830 b9b9  |80  |
00b6 bbb7 b932  |   2|
00b8 1037 b910  | 7  |
00ba 3ab7 3932  |: 92|
00bc b1b7 b3b7  |    |
00be 34bd 32b2  |4 2 |
00c0 0000 001a  |    |
00c2 0000 0025  |   %|
00c4 103a 3430  | :40|
00c6 ba10 3837  |  87|
00c8 b93a 1696  | :  |
00ca b337 b910  | 7  |
00cc 32bc 30b6  |2 0 |
00ce b836 3296  | 62 |
00d0 1031 3c90  | 1< |
00d2 32b7 3a32  |2 :2|
00d4 b934 b733  | 4 3|
00d6 9030 b710  | 0  |
00d8 34b7 31b7  |4 1 |
00da b939 32b1  | 92 |
00dc ba10 3830  |  80|
00de b9b9 bbb7  |    |
00e0 b932 1037  | 2 7|
00e2 b910 3ab7  |  : |
00e4 3932 b1b7  |92  |
00e6 b3b7 34bd  |  4 |
00e8 32b2 0000  |2   |
00ea 001a 0000  |    |
00ec 0025 103a  | % :|
00ee 3430 ba10  |40  |
00f0 3837 b93a  |87 :|
00f2 1696 b337  |   7|
00f4 b910 32bc  |  2 |
00f6 30b6 b836  |0  6|
00f8 3296 1031  |2  1|
00fa 3c90 32b7  |< 2 |
00fc 3a32 b934  |:2 4|
00fe b733 9030  | 3 0|
0100 b710 34b7  |  4 |
0102 31b7 b939  |1  9|
0104 32b1 ba10  |2   |
0106 3830 b9b9  |80  |
0108 bbb7 b932  |   2|
010a 1037 b910  | 7  |
010c 3ab7 3932  |: 92|
010e b1b7 b3b7  |    |
0110 34bd 32b2  |4 2 |
0112 0000 0040  |   @|
0114 0000 0004  |    |
0116 bab9 b2b9  |    |
0118 3730 b6b2  |70  |
011a 9700 0000  |    |
011c 3f80 0000  |?   |
011e 0510 3ab9  |  : |
0120 b2b9 3730  |  70|
0122 b6b2 9700  |    |
0124 0000 3f80  |  ? |
0126 0000 0510  |    |
0128 3ab9 b2b9  |:   |
012a 3730 b6b2  |70  |
012c 9700 0000  |    |
012e 0080       |    |
012f 0000 0000  |    |		.BLANK	0000[0x5]
0134 0500 0000  |    |		.XXX[0xcc]
0136 0000 0000  |    |
0138 0480 0000  |    |
013a 0600 0000  |    |
013c 2323 37b9  |##7 |
013e 1030 b710  | 0  |
0140 2929 9919  |))  |
0142 9910 3837  |  87|
0144 b93a 1610  | :  |
0146 30b7 1037  |0  7|
0148 baba 33b7  |  3 |
014a b4b7 3390  |  3 |
014c 3234 b9b1  |24  |
014e b7b7 3732  |  72|
0150 b1ba 1039  |   9|
0152 b4b3 b730  |   0|
0154 b610 37b1  |  7 |
0156 b1ba b939  |   9|
0158 903b b432  | ; 2|
015a b710 3a34  |  :4|
015c 3290 2918  |2 ) |
015e 9818 1800  |    |
0160 0000 0580  |    |
0162 0000 2390  |  # |
0164 2337 b910  |#7  |
0166 30b7 1029  |0  )|
0168 2999 1999  |)   |
016a 1038 37b9  | 87 |
016c 3a16 1030  |:  0|
016e b710 37ba  |  7 |
0170 ba33 b7b4  | 3  |
0172 b733 9032  | 3 2|
0174 34b9 b1b7  |4   |
0176 b737 32b1  | 72 |
0178 ba10 39b4  |  9 |
017a b3b7 30b6  |  0 |
017c 1037 b1b1  | 7  |
017e bab9 3990  |  9 |
0180 3bb4 32b7  |; 2 |
0182 103a 3432  | :42|
0184 9029 1898  | )  |
0186 1818 0000  |    |
0188 0005 8000  |    |
018a 0023 9023  | # #|
018c 37b9 1030  |7  0|
018e b710 2929  |  ))|
0190 9919 9910  |    |
0192 3837 b93a  |87 :|
0194 1610 30b7  |  0 |
0196 1037 baba  | 7  |
0198 33b7 b4b7  |3   |
019a 3390 3234  |3 24|
019c b9b1 b7b7  |    |
019e 3732 b1ba  |72  |
01a0 1039 b4b3  | 9  |
01a2 b730 b610  | 0  |
01a4 37b1 b1ba  |7   |
01a6 b939 903b  | 9 ;|
01a8 b432 b710  | 2  |
01aa 3a34 3290  |:42 |
01ac 2918 9818  |)   |
01ae 1800 0000  |    |
01b0 2a00 0000  |*   |
01b2 23ba 37b3  |# 7 |
01b4 b3b6 32b9  |  2 |
01b6 9032 30ba  | 20 |
01b8 3090 3a32  |0 :2|
01ba b936 b4b7  | 6  |
01bc 30b6 1039  |0  9|
01be 32b0 b23c  |2  <|
01c0 9014 222a  |  "*|
01c2 2914 9033  |)  3|
01c4 3937 b690  |97  |
01c6 37b7 103a  |7  :|
01c8 3790 37b3  |7 7 |
01ca 3310 3337  |3 37|
01cc b910 1990  |    |
01ce 39b2 b1b7  |9   |
01d0 b732 3990  | 29 |
01d2 30b7 3210  |0 2 |
01d4 3a34 32b7  |:42 |
01d6 0000 0029  |   )|
01d8 8000 0024  |   $|
01da 103a 37b3  | :7 |
01dc b3b6 32b9  |  2 |
01de 9032 30ba  | 20 |
01e0 3090 3a32  |0 :2|
01e2 b936 b4b7  | 6  |
01e4 30b6 1039  |0  9|
01e6 32b0 b23c  |2  <|
01e8 9014 222a  |  "*|
01ea 2914 9033  |)  3|
01ec 3937 b690  |97  |
01ee 37b7 103a  |7  :|
01f0 3790 37b3  |7 7 |
01f2 3310 3337  |3 37|
01f4 b910 1990  |    |
01f6 39b2 b1b7  |9   |
01f8 b732 3990  | 29 |
01fa 30b7 3210  |0 2 |
01fc 3a34 32b7  |:42 |
01fe 0000 0029  |   )|