|
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_0698fd
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00c8 | | .CONST 0x00c8 ; 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 0059 | Y | .CONST 0x0059 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001c | | .CONST 0x001c ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 0129 | ) | Execute Any,Make_Visible
000d e002 | | Load 0x0,0x2
000e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000f 0129 | ) | Execute Any,Make_Visible
0010 e002 | | Load 0x0,0x2
0011 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0012 0129 | ) | Execute Any,Make_Visible
0013 00e5 | | Load_Encached Long_Integer_Cache
0014 0129 | ) | Execute Any,Make_Visible
0015 6086 |` | Indirect_Literal Discrete,0x9c,{0xffffffff, 0x80000000}
0016 6081 |` | Indirect_Literal Discrete,0x98,{0x00000000, 0x7fffffff}
0017 00da | | Load_Top At_Offset_2
0018 03f9 | | Declare_Type Discrete,Constrained,Visible
0019 4800 |H | Short_Literal 0x0
001a 6079 |`y | Indirect_Literal Discrete,0x94,{0x00000000, 0xffffffff}
001b 00db | | Load_Top At_Offset_3
001c 03f9 | | Declare_Type Discrete,Constrained,Visible
001d 5872 |Xr | Indirect_Literal Float,0x90,-3.402823669209385e+38
001e 586d |Xm | Indirect_Literal Float,0x8c,3.402823669209385e+38
001f 00e6 | | Load_Encached Float_Cache
0020 03e4 | | Declare_Type Float,Constrained,Visible
0021 00e6 | | Load_Encached Float_Cache
0022 0129 | ) | Execute Any,Make_Visible
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 4805 |H | Short_Literal 0x5
0026 e003 | | Load 0x0,0x3
0027 02a0 | | Declare_Subprogram Null_Subprogram
0028 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0029 00b6 | | Action Make_Scope
002a 4801 |H | Short_Literal 0x1
002b 00da | | Load_Top At_Offset_2
002c 020e | | Execute Module,Augment_Imports
002d c216 | | Store 0x1,0x16
002e 00bf | | Action Accept_Activation
002f 4801 |H | Short_Literal 0x1
0030 4804 |H | Short_Literal 0x4
0031 e20f | | Load 0x1,0xf
0032 035b | [ | Declare_Type Array,Constrained
0033 4801 |H | Short_Literal 0x1
0034 4808 |H | Short_Literal 0x8
0035 e20f | | Load 0x1,0xf
0036 035b | [ | Declare_Type Array,Constrained
0037 4f80 |O | Short_Literal -0x80
0038 487f |H | Short_Literal 0x7f
0039 00e5 | | Load_Encached Long_Integer_Cache
003a 03f8 | | Declare_Type Discrete,Constrained
003b 00da | | Load_Top At_Offset_2
003c 0337 | 7 | Declare_Variable Array
003d 00d8 | | Load_Top At_Offset_0
003e 0335 | 5 | Declare_Variable Array,Duplicate
003f 00cd | | Action Spare6_Action
0040 4804 |H | Short_Literal 0x4
0041 4801 |H | Short_Literal 0x1
0042 4800 |H | Short_Literal 0x0
0043 00d9 | | Load_Top At_Offset_1
0044 e21b | | Load 0x1,0x1b
0045 01d6 | | Execute Vector,Field_Write
0046 3ffb |? | Loop_Increasing 0x42
0047 00d9 | | Load_Top At_Offset_1
0048 01d4 | | Execute Vector,Structure_Write
0049 029d 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call
004b 029d 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call
004d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
004e e217 | | Load 0x1,0x17
004f 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0050 e004 | | Load 0x0,0x4
0051 e218 | | Load 0x1,0x18
0052 e005 | | Load 0x0,0x5
0053 e21a | | Load 0x1,0x1a
0054 4807 |H | Short_Literal 0x7
0055 e216 | | Load 0x1,0x16
0056 020e | | Execute Module,Augment_Imports
0057 e216 | | Load 0x1,0x16
0058 020d | | Execute Module,Elaborate
0059 BODY_0008:
0059 00bc | | Action Signal_Activated
005a 00bb | | Action Signal_Completion
005b 0000 0000 | | .BLANK 0000[0x5]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0067 | g | .CONST 0x0067 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0004 | | .CONST 0x0004 ; Number of locals
0063 INIT_0060:
0063 e217 | | Load 0x1,0x17
0064 0337 | 7 | Declare_Variable Array
0065 e210 | | Load 0x1,0x10
0066 03e9 | | Declare_Variable Discrete,Duplicate
0067 BODY_0060:
0067 e5ff | | Load 0x2,-0x1
0068 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0069 00cf | | Action Mark_Auxiliary
006a 00db | | Load_Top At_Offset_3
006b 01da | | Execute Vector,Bounds
006c 0007 | | Action Break_Optional
006d e403 | | Load 0x2,0x3
006e 48ff |H | Short_Literal 0xff
006f 0279 | y | Execute Discrete,And
0070 a404 | | Store_Unchecked 0x2,0x4
0071 00db | | Load_Top At_Offset_3
0072 00d8 | | Load_Top At_Offset_0
0073 e005 | | Load 0x0,0x5
0074 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0075 0260 | ` | Execute Discrete,In_Type
0076 7001 |p | Jump_Nonzero 0x78
0077 0801 | | Execute_Immediate Raise,0x1
0078 00d9 | | Load_Top At_Offset_1
0079 e402 | | Load 0x2,0x2
007a 01d6 | | Execute Vector,Field_Write
007b 00d8 | | Load_Top At_Offset_0
007c 0f01 | | Execute_Immediate Equal,0x1
007d 6802 |h | Jump_Zero 0x80
007e 00d2 | | Pop_Control Pop_Count_2
007f 7807 |x | Jump 0x87
0080 e403 | | Load 0x2,0x3
0081 e404 | | Load 0x2,0x4
0082 0272 | r | Execute Discrete,Minus
0083 09f8 | | Execute_Immediate Binary_Scale,-0x8
0084 a403 | | Store_Unchecked 0x2,0x3
0085 00c8 | | Action Pop_Auxiliary_Range
0086 37e6 |7 | Loop_Decreasing 0x6d
0087 00ce | | Action Pop_Auxiliary
0088 00da | | Load_Top At_Offset_2
0089 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
008a 0000 0000 | | .XXX[0x2]
008c 47f0 0000 |G | .DBL 3.402823669209385e+38
008e 0000 0000 | |
0090 c7f0 0000 | | .DBL -3.402823669209385e+38
0092 0000 0000 | |
0094 0000 0000 | | .LITERAL {0x00000000, 0xffffffff}
0098 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
009c ffff ffff | | .LITERAL {0xffffffff, 0x80000000}
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a5 | | .CONST 0x00a5 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0002 | | .CONST 0x0002 ; Number of locals
00a3 INIT_00a0:
00a3 e210 | | Load 0x1,0x10
00a4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a5 BODY_00a0:
00a5 00cf | | Action Mark_Auxiliary
00a6 e5ff | | Load 0x2,-0x1
00a7 01d9 | | Execute Vector,Reverse_Bounds
00a8 0007 | | Action Break_Optional
00a9 00db | | Load_Top At_Offset_3
00aa 0908 | | Execute_Immediate Binary_Scale,0x8
00ab 00d9 | | Load_Top At_Offset_1
00ac e5ff | | Load 0x2,-0x1
00ad 01d7 | | Execute Vector,Field_Read
00ae 0273 | s | Execute Discrete,Plus
00af a402 | | Store_Unchecked 0x2,0x2
00b0 00c8 | | Action Pop_Auxiliary_Range
00b1 3ff7 |? | Loop_Increasing 0xa9
00b2 00ce | | Action Pop_Auxiliary
00b3 e5fe | | Load 0x2,-0x2
00b4 7009 |p | Jump_Nonzero 0xbe
00b5 00d8 | | Load_Top At_Offset_0
00b6 67e1 |g | Indirect_Literal Discrete,0x98,{0x00000000, 0x7fffffff}
00b7 027d | } | Execute Discrete,Greater
00b8 6805 |h | Jump_Zero 0xbe
00b9 6006 |` | Indirect_Literal Discrete,0xc0,{0x00000001, 0x00000000}
00ba 00d9 | | Load_Top At_Offset_1
00bb 0272 | r | Execute Discrete,Minus
00bc 0275 | u | Execute Discrete,Unary_Minus
00bd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
00be 00d8 | | Load_Top At_Offset_0
00bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c0 0000 0001 | | .LITERAL {0x00000001, 0x00000000}
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; Debug Table
00c8 ; --------------------------------------------------------------------------------------
00c8 0004 0001 | | .DEBUG4 0x0004,0x0001,0xc88b,0x0000,0x0001,0x0000
00ce 0000 0000 | | .BLANK 0000[0x132]