|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 001a | | .CONST 0x001a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0008 | | .CONST 0x0008 ; Number of locals
000b INIT_0008:
000b e00e | | Load 0x0,0xe
000c 0322 | " | Declare_Variable Record
000d 00d8 | | Load_Top At_Offset_0
000e 1c00 | | Execute_Immediate Run_Utility,0x0
000f 00e3 | | Load_Encached Natural_Cache
0010 e7ff | | Load 0x3,-0x1
0011 8086 | | Call 0x0,0x86
0012 e7ff | | Load 0x3,-0x1
0013 8087 | | Call 0x0,0x87
0014 e7ff | | Load 0x3,-0x1
0015 8088 | | Call 0x0,0x88
0016 e7ff | | Load 0x3,-0x1
0017 808b | | Call 0x0,0x8b
0018 029f 004b | K| Declare_Subprogram INIT_0048,For_Call
001a BODY_0008:
001a e7ff | | Load 0x3,-0x1
001b 8085 | | Call 0x0,0x85
001c a603 | | Store_Unchecked 0x3,0x3
001d e7ff | | Load 0x3,-0x1
001e e602 | | Load 0x3,0x2
001f 017d | } | Execute Record,Structure_Write
0020 e603 | | Load 0x3,0x3
0021 8036 | 6 | Call 0x0,0x36
0022 6815 |h | Jump_Zero 0x38
0023 e603 | | Load 0x3,0x3
0024 e604 | | Load 0x3,0x4
0025 8083 | | Call 0x0,0x83
0026 6811 |h | Jump_Zero 0x38
0027 00da | | Load_Top At_Offset_2
0028 e605 | | Load 0x3,0x5
0029 e604 | | Load 0x3,0x4
002a e603 | | Load 0x3,0x3
002b 8608 | | Call 0x3,0x8
002c 700b |p | Jump_Nonzero 0x38
002d e603 | | Load 0x3,0x3
002e 00da | | Load_Top At_Offset_2
002f e605 | | Load 0x3,0x5
0030 e606 | | Load 0x3,0x6
0031 e604 | | Load 0x3,0x4
0032 808c | | Call 0x0,0x8c
0033 e602 | | Load 0x3,0x2
0034 4805 |H | Short_Literal 0x5
0035 8017 | | Call 0x0,0x17
0036 00d1 | | Pop_Control Pop_Count_1
0037 7804 |x | Jump 0x3c
0038 e602 | | Load 0x3,0x2
0039 4803 |H | Short_Literal 0x3
003a 8017 | | Call 0x0,0x17
003b 00d1 | | Pop_Control Pop_Count_1
003c e7ff | | Load 0x3,-0x1
003d 8007 | | Call 0x0,0x7
003e e602 | | Load 0x3,0x2
003f 8214 | | Call 0x1,0x14
0040 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0041 0000 0000 | | .BLANK 0000[0x7]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004e | N | .CONST 0x004e ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0003 | | .CONST 0x0003 ; Number of locals
004b INIT_0048:
004b e039 | 9 | Load 0x0,0x39
004c 0322 | " | Declare_Variable Record
004d 00e1 | | Load_Encached Boolean_Cache
004e BODY_0048:
004e 4800 |H | Short_Literal 0x0
004f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0050 8064 | d | Call 0x0,0x64
0051 00da | | Load_Top At_Offset_2
0052 017d | } | Execute Record,Structure_Write
0053 00cf | | Action Mark_Auxiliary
0054 781f |x | Jump 0x74
0055 00da | | Load_Top At_Offset_2
0056 8078 | x | Call 0x0,0x78
0057 e9ff | | Load 0x4,-0x1
0058 027f | | Execute Discrete,Equal
0059 6815 |h | Jump_Zero 0x6f
005a 4800 |H | Short_Literal 0x0
005b 00db | | Load_Top At_Offset_3
005c 8079 | y | Call 0x0,0x79
005d e9fe | | Load 0x4,-0x2
005e 8089 | | Call 0x0,0x89
005f 680f |h | Jump_Zero 0x6f
0060 4800 |H | Short_Literal 0x0
0061 00db | | Load_Top At_Offset_3
0062 807a | z | Call 0x0,0x7a
0063 e9fd | | Load 0x4,-0x3
0064 8089 | | Call 0x0,0x89
0065 6809 |h | Jump_Zero 0x6f
0066 4800 |H | Short_Literal 0x0
0067 00db | | Load_Top At_Offset_3
0068 807b | { | Call 0x0,0x7b
0069 e9fc | | Load 0x4,-0x4
006a 8089 | | Call 0x0,0x89
006b 6803 |h | Jump_Zero 0x6f
006c 4801 |H | Short_Literal 0x1
006d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
006e 7808 |x | Jump 0x77
006f 00da | | Load_Top At_Offset_2
0070 8065 | e | Call 0x0,0x65
0071 00db | | Load_Top At_Offset_3
0072 017d | } | Execute Record,Structure_Write
0073 00c9 | | Action Pop_Auxiliary_Loop
0074 00da | | Load_Top At_Offset_2
0075 8066 | f | Call 0x0,0x66
0076 6fde |o | Jump_Zero 0x55
0077 00ce | | Action Pop_Auxiliary
0078 00d8 | | Load_Top At_Offset_0
0079 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
007a 0000 0000 | | .BLANK 0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; Debug Table
0080 ; --------------------------------------------------------------------------------------
0080 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1d4,0x0000,0x0001,0x0000
0086 3a80 8004 |: | .XXX[0x18]
0088 0005 e800 | |
008a 0000 67bc | g |
008c 0000 1000 | |
008e 0000 1801 | |
0090 4000 0000 |@ |
0092 4000 0010 |@ |
0094 0000 0088 | |
0096 0000 0000 | |
0098 4000 0002 |@ |
009a 9000 0081 | |
009c fc26 4000 | &@ |
009e 0000 0000 | | .BLANK 0000[0x1b]
00b9 03aa 37c0 | 7 | .XXX[0x21]
00bb e001 da70 | p|
00bd 000c 63f6 | c |
00bf 8750 1000 | P |
00c1 8000 bd00 | |
00c3 0000 0cf2 | |
00c5 8000 0200 | |
00c7 0000 0500 | |
00c9 2800 0000 |( |
00cb 0800 0002 | |
00cd 0000 0011 | |
00cf 0000 0000 | |
00d1 0800 0000 | |
00d3 5200 0010 |R |
00d5 3f82 9200 |? |
00d7 0010 3f82 | ? |
00d9 9800 | |
00da 0000 0000 | | .BLANK 0000[0x18]
00f2 0075 46f8 | uF | .XXX[0x30]
00f4 1c00 3b50 | ;P|
00f6 0001 8c7e | ~|
00f8 d0ea 0200 | |
00fa 1000 17a0 | |
00fc 0000 01a1 | |
00fe c800 0040 | @|
0100 0000 01e0 | |
0102 0500 0000 | |
0104 0100 0000 | |
0106 4000 0002 |@ |
0108 2000 0000 | |
010a 0100 0000 | |
010c 0a40 0002 | @ |
010e 07f2 d440 | @|
0110 0002 07f2 | |
0112 d540 0002 | @ |
0114 07f2 d640 | @|
0116 0002 07f2 | |
0118 d740 0002 | @ |
011a 07f2 d840 | @|
011c 0002 07f2 | |
011e d940 0002 | @ |
0120 07f2 da00 | |
0122 0000 0000 | | .BLANK 0000[0x9]
012b 000e a8df | | .XXX[0x2]
012d 0000 0000 | | .BLANK 0000[0xd]
013a 0004 00a0 | | .XXX[0xc]
013c 0000 0000 | |
013e 0000 0800 | |
0140 0000 4400 | D |
0142 0000 0020 | |
0144 0000 0140 | @|
0146 0000 0000 | | .BLANK 0000[0x2e]
0174 8014 0000 | | .XXX[0xb]
0176 0000 0000 | |
0178 0100 0000 | |
017a 0880 0000 | |
017c 0004 0000 | |
017e 0028 | ( |
017f 0000 0000 | | .BLANK 0000[0x2e]
01ad 1002 8000 | | .XXX[0xb]
01af 0000 0000 | |
01b1 0020 0000 | |
01b3 0110 0000 | |
01b5 0000 8000 | |
01b7 0005 | |
01b8 0000 0000 | | .BLANK 0000[0x48]