|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
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 0090 | | .CONST 0x0090 ; 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 0022 | " | .CONST 0x0022 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000b | | .CONST 0x000b ; Number of locals
000b INIT_0008:
000b 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call
000d e017 | | Load 0x0,0x17
000e 1917 | | Execute Package,Field_Reference,Field_Number 0x17
000f 00c6 | | Action Check_Subprogram_Elaborated
0010 4802 |H | Short_Literal 0x2
0011 4803 |H | Short_Literal 0x3
0012 0099 | | Action Reference_Dynamic
0013 e023 | # | Load 0x0,0x23
0014 e024 | $ | Load 0x0,0x24
0015 4806 |H | Short_Literal 0x6
0016 0007 | | Action Break_Optional
0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call
0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001a 00c6 | | Action Check_Subprogram_Elaborated
001b 4807 |H | Short_Literal 0x7
001c 4803 |H | Short_Literal 0x3
001d 0099 | | Action Reference_Dynamic
001e e025 | % | Load 0x0,0x25
001f e026 | & | Load 0x0,0x26
0020 480b |H | Short_Literal 0xb
0021 0007 | | Action Break_Optional
0022 BODY_0008:
0022 e7ff | | Load 0x3,-0x1
0023 4808 |H | Short_Literal 0x8
0024 4803 |H | Short_Literal 0x3
0025 0099 | | Action Reference_Dynamic
0026 4809 |H | Short_Literal 0x9
0027 4803 |H | Short_Literal 0x3
0028 0099 | | Action Reference_Dynamic
0029 820f | | Call 0x1,0xf
002a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
002b 0000 0000 | | .BLANK 0000[0x5]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0035 | 5 | .CONST 0x0035 ; Address of begin
0031 0004 | | .CONST 0x0004 ; Address of exception handler
0032 0002 | | .CONST 0x0002 ; Number of locals
0033 INIT_0030:
0033 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
0035 BODY_0030:
0035 00db | | Load_Top At_Offset_3
0036 8802 | | Call 0x4,0x2
0037 701a |p | Jump_Nonzero 0x52
0038 00db | | Load_Top At_Offset_3
0039 8219 | | Call 0x1,0x19
003a 6817 |h | Jump_Zero 0x52
003b e008 | | Load 0x0,0x8
003c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
003d e9ff | | Load 0x4,-0x1
003e 8218 | | Call 0x1,0x18
003f e406 | | Load 0x2,0x6
0040 e214 | | Load 0x1,0x14
0041 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0042 e9fe | | Load 0x4,-0x2
0043 e017 | | Load 0x0,0x17
0044 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0045 e9ff | | Load 0x4,-0x1
0046 8218 | | Call 0x1,0x18
0047 480b |H | Short_Literal 0xb
0048 4802 |H | Short_Literal 0x2
0049 0099 | | Action Reference_Dynamic
004a 480c |H | Short_Literal 0xc
004b 4802 |H | Short_Literal 0x2
004c 0099 | | Action Reference_Dynamic
004d 480d |H | Short_Literal 0xd
004e 4802 |H | Short_Literal 0x2
004f 0099 | | Action Reference_Dynamic
0050 e017 | | Load 0x0,0x17
0051 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0052 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0053 0000 0000 | | .BLANK 0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00ea | | Load_Encached Null_String_Cache
005c e9fc | | Load 0x4,-0x4
005d e9fd | | Load 0x4,-0x3
005e 4803 |H | Short_Literal 0x3
005f 4803 |H | Short_Literal 0x3
0060 0099 | | Action Reference_Dynamic
0061 4804 |H | Short_Literal 0x4
0062 4803 |H | Short_Literal 0x3
0063 0099 | | Action Reference_Dynamic
0064 e017 | | Load 0x0,0x17
0065 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0066 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0067 0000 | | .XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0072 | r | .CONST 0x0072 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b e008 | | Load 0x0,0x8
006c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
006d 02ff | | Declare_Variable Variant_Record
006e 00d8 | | Load_Top At_Offset_0
006f 1c00 | | Execute_Immediate Run_Utility,0x0
0070 e008 | | Load 0x0,0x8
0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0072 BODY_0068:
0072 e008 | | Load 0x0,0x8
0073 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0074 00da | | Load_Top At_Offset_2
0075 6012 |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00004000}
0076 e010 | | Load 0x0,0x10
0077 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0078 4800 |H | Short_Literal 0x0
0079 e9ff | | Load 0x4,-0x1
007a e008 | | Load 0x0,0x8
007b 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
007c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
007d 00d1 | | Pop_Control Pop_Count_1
007e 0059 | Y | Store_Top Discrete,At_Offset_1
007f 00d9 | | Load_Top At_Offset_1
0080 e008 | | Load 0x0,0x8
0081 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0082 7003 |p | Jump_Nonzero 0x86
0083 00d8 | | Load_Top At_Offset_0
0084 0f08 | | Execute_Immediate Equal,0x8
0085 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0086 4801 |H | Short_Literal 0x1
0087 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0088 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
008c 0000 0000 | | .BLANK 0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 0000 | | .DEBUG4 0x0004,0x0000,0x789b,0x0000,0x0001,0x0000
0096 0000 0000 | | .BLANK 0000[0x16a]