|
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_0a7cf5
└─⟦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 00e8 | | .CONST 0x00e8 ; 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 004c | L | .CONST 0x004c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 4818 |H | Short_Literal 0x18
000c 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected
000d 4801 |H | Short_Literal 0x1
000e 49f4 |I | Short_Literal 0x1f4
000f 00e2 | | Load_Encached Integer_Cache
0010 03f9 | | Declare_Type Discrete,Constrained,Visible
0011 e001 | | Load 0x0,0x1
0012 0129 | ) | Execute Any,Make_Visible
0013 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
0015 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated
0017 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
0019 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
001b 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
001d 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
001f 4803 |H | Short_Literal 0x3
0020 032a | * | Declare_Type Record,Incomplete
0021 00d8 | | Load_Top At_Offset_0
0022 02a0 | | Declare_Subprogram Null_Subprogram
0023 e20d | | Load 0x1,0xd
0024 03c7 | | Complete_Type Access,By_Defining
0025 00bf | | Action Accept_Activation
0026 e002 | | Load 0x0,0x2
0027 e003 | | Load 0x0,0x3
0028 49f4 |I | Short_Literal 0x1f4
0029 00e2 | | Load_Encached Integer_Cache
002a 4801 |H | Short_Literal 0x1
002b e004 | | Load 0x0,0x4
002c 0387 | | Declare_Variable Package
002d 00d8 | | Load_Top At_Offset_0
002e 020f | | Execute Module,Activate
002f 00e9 | | Load_Encached String_Cache
0030 02a0 | | Declare_Subprogram Null_Subprogram
0031 4818 |H | Short_Literal 0x18
0032 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0033 4801 |H | Short_Literal 0x1
0034 49f4 |I | Short_Literal 0x1f4
0035 00da | | Load_Top At_Offset_2
0036 02a0 | | Declare_Subprogram Null_Subprogram
0037 4801 |H | Short_Literal 0x1
0038 035d | ] | Declare_Type Array,Defined
0039 00da | | Load_Top At_Offset_2
003a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
003b 00d9 | | Load_Top At_Offset_1
003c e20e | | Load 0x1,0xe
003d 02a0 | | Declare_Subprogram Null_Subprogram
003e e216 | | Load 0x1,0x16
003f 0326 | & | Complete_Type Record,By_Defining
0040 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0041 00c7 | | Action Elaborate_Subprogram
0042 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0043 00c7 | | Action Elaborate_Subprogram
0044 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0045 00c7 | | Action Elaborate_Subprogram
0046 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0047 00c7 | | Action Elaborate_Subprogram
0048 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0049 00c7 | | Action Elaborate_Subprogram
004a 1d15 | | Execute_Immediate Reference_Lex_1,0x15
004b 00c7 | | Action Elaborate_Subprogram
004c BODY_0008:
004c 00bc | | Action Signal_Activated
004d 00bb | | Action Signal_Completion
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 00da | | Load_Top At_Offset_2
0054 7003 |p | Jump_Nonzero 0x58
0055 e20d | | Load 0x1,0xd
0056 03bc | | Declare_Variable Access,By_Allocation
0057 003b | ; | Store_Top Access,At_Offset_3
0058 00da | | Load_Top At_Offset_2
0059 0229 | ) | Execute Access,All_Read
005a e217 | | Load 0x1,0x17
005b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
005c e217 | | Load 0x1,0x17
005d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
005e 00d9 | | Load_Top At_Offset_1
005f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0060 00d1 | | Pop_Control Pop_Count_1
0061 4801 |H | Short_Literal 0x1
0062 00db | | Load_Top At_Offset_3
0063 0227 | ' | Execute Access,All_Reference
0064 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0065 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0066 0000 0000 | | .XXX[0x2]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006e | n | .CONST 0x006e ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b 00e2 | | Load_Encached Integer_Cache
006c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006d 00e1 | | Load_Encached Boolean_Cache
006e BODY_0068:
006e 00e1 | | Load_Encached Boolean_Cache
006f 00da | | Load_Top At_Offset_2
0070 e5ff | | Load 0x2,-0x1
0071 e5fe | | Load 0x2,-0x2
0072 0227 | ' | Execute Access,All_Reference
0073 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0074 e217 | | Load 0x1,0x17
0075 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0076 005b | [ | Store_Top Discrete,At_Offset_3
0077 0059 | Y | Store_Top Discrete,At_Offset_1
0078 00d8 | | Load_Top At_Offset_0
0079 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
007a 0000 0000 | | .BLANK 0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0085 | | .CONST 0x0085 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0003 | | .CONST 0x0003 ; Number of locals
0083 INIT_0080:
0083 00e2 | | Load_Encached Integer_Cache
0084 00e1 | | Load_Encached Boolean_Cache
0085 BODY_0080:
0085 00e1 | | Load_Encached Boolean_Cache
0086 00da | | Load_Top At_Offset_2
0087 e5ff | | Load 0x2,-0x1
0088 e5fe | | Load 0x2,-0x2
0089 0227 | ' | Execute Access,All_Reference
008a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
008b e217 | | Load 0x1,0x17
008c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
008d 005b | [ | Store_Top Discrete,At_Offset_3
008e 0059 | Y | Store_Top Discrete,At_Offset_1
008f 00d8 | | Load_Top At_Offset_0
0090 6807 |h | Jump_Zero 0x98
0091 00d9 | | Load_Top At_Offset_1
0092 00d8 | | Load_Top At_Offset_0
0093 e20e | | Load 0x1,0xe
0094 0260 | ` | Execute Discrete,In_Type
0095 7001 |p | Jump_Nonzero 0x97
0096 0801 | | Execute_Immediate Raise,0x1
0097 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0098 e20f | | Load 0x1,0xf
0099 0257 | W | Execute Discrete,Raise
009a 0000 0000 | | .BLANK 0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2
00a4 e5fe | | Load 0x2,-0x2
00a5 0227 | ' | Execute Access,All_Reference
00a6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00a7 01d7 | | Execute Vector,Field_Read
00a8 0227 | ' | Execute Access,All_Reference
00a9 0335 | 5 | Declare_Variable Array,Duplicate
00aa 00cd | | Action Spare6_Action
00ab 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 e5fd | | Load 0x2,-0x3
00b4 0229 | ) | Execute Access,All_Read
00b5 00d8 | | Load_Top At_Offset_0
00b6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00b7 4800 |H | Short_Literal 0x0
00b8 e5fd | | Load 0x2,-0x3
00b9 0227 | ' | Execute Access,All_Reference
00ba 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00bb e5ff | | Load 0x2,-0x1
00bc e217 | | Load 0x1,0x17
00bd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00be 00d9 | | Load_Top At_Offset_1
00bf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00c0 00d1 | | Pop_Control Pop_Count_1
00c1 00db | | Load_Top At_Offset_3
00c2 e218 | | Load 0x1,0x18
00c3 03b6 | | Declare_Variable Access,By_Allocation,With_Value
00c4 e5fd | | Load 0x2,-0x3
00c5 0227 | ' | Execute Access,All_Reference
00c6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00c7 e5fd | | Load 0x2,-0x3
00c8 0227 | ' | Execute Access,All_Reference
00c9 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
00ca 01d6 | | Execute Vector,Field_Write
00cb e5fd | | Load 0x2,-0x3
00cc 0227 | ' | Execute Access,All_Reference
00cd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00ce 0a01 | | Execute_Immediate Plus,0x1
00cf e5fd | | Load 0x2,-0x3
00d0 0227 | ' | Execute Access,All_Reference
00d1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00d3 0000 0000 | | .BLANK 0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 00da | | Load_Top At_Offset_2
00dc 0227 | ' | Execute Access,All_Reference
00dd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00de 0aff | | Execute_Immediate Plus,-0x1
00df 00d8 | | Load_Top At_Offset_0
00e0 00e3 | | Load_Encached Natural_Cache
00e1 0260 | ` | Execute Discrete,In_Type
00e2 7001 |p | Jump_Nonzero 0xe4
00e3 0801 | | Execute_Immediate Raise,0x1
00e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; Debug Table
00e8 ; --------------------------------------------------------------------------------------
00e8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc78c,0x0000,0x0001,0x0000
00ee 0000 0000 | | .XXX[0x3]
00f0 0000 | |
00f1 0018 0005 | | .XXX[0x22]
00f3 992a 1709 | * |
00f5 702e 0000 |p. |
00f7 66de d132 |f 2|
00f9 0200 2000 | |
00fb 13a0 0000 | |
00fd 109c e000 | |
00ff 00c0 0000 | |
0101 2ae0 0500 |* |
0103 0000 a200 | |
0105 0000 4000 | @ |
0107 0002 2000 | |
0109 0000 0100 | |
010b 0000 0a40 | @|
010d 0006 03ad | |
010f 4140 0004 |A@ |
0111 00f8 7d00 | } |
0113 0000 0000 | | .BLANK 0000[0x17]
012a 0003 0000 | | .XXX[0x22]
012c b325 42e1 | %B |
012e 2e05 c000 |. |
0130 0cdb da26 | &|
0132 4040 0400 |@@ |
0134 0274 0000 | t |
0136 0213 9c00 | |
0138 0018 0000 | |
013a 055c 00a0 | \ |
013c 0000 1440 | @|
013e 0000 0800 | |
0140 0000 4400 | D |
0142 0000 0020 | |
0144 0000 0148 | H|
0146 0000 c075 | u|
0148 a828 0000 | ( |
014a 801f 0fa0 | |
014c 0000 0000 | | .BLANK 0000[0x18]
0164 6000 1664 |` d| .XXX[0x21]
0166 a85c 25c0 | \% |
0168 b800 019b | |
016a 7b44 c808 |{D |
016c 0080 004e | N|
016e 8000 0042 | B|
0170 7380 0003 |s |
0172 0000 00ab | |
0174 8014 0000 | |
0176 0288 0000 | |
0178 0100 0000 | |
017a 0880 0000 | |
017c 0004 0000 | |
017e 0029 0000 | ) |
0180 180e b505 | |
0182 0000 1003 | |
0184 e1f4 | |
0185 0000 0000 | | .BLANK 0000[0x18]
019d 0c00 02cc | | .XXX[0x22]
019f 950b 84b8 | |
01a1 1700 0033 | 3|
01a3 6f68 9901 |oh |
01a5 0010 0009 | |
01a7 d000 0008 | |
01a9 4e70 0000 |Np |
01ab 6000 0015 |` |
01ad 7002 8000 |p |
01af 0051 0000 | Q |
01b1 0020 0000 | |
01b3 0110 0000 | |
01b5 0000 8000 | |
01b7 0005 2000 | |
01b9 0301 d6a0 | |
01bb a000 0200 | |
01bd 7c3e 8000 ||> |
01bf 0000 0000 | | .BLANK 0000[0x17]
01d6 0180 0059 | Y| .XXX[0x3]
01d8 9280 | |
01d9 0000 0000 | | .BLANK 0000[0x27]