|
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_03b8fe
└─⟦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 0110 | | .CONST 0x0110 ; 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 003c | < | .CONST 0x003c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001a | | .CONST 0x001a ; Number of locals 000b INIT_0008: 000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 000d 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 4800 |H | Short_Literal 0x0 0011 4be7 |K | Short_Literal 0x3e7 0012 e210 | | Load 0x1,0x10 0013 02a0 | | Declare_Subprogram Null_Subprogram 0014 4801 |H | Short_Literal 0x1 0015 035d | ] | Declare_Type Array,Defined 0016 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative 0017 00d9 | | Load_Top At_Offset_1 0018 02a0 | | Declare_Subprogram Null_Subprogram 0019 00da | | Load_Top At_Offset_2 001a 03a3 | | Complete_Type Heap_Access,By_Defining 001b 4800 |H | Short_Literal 0x0 001c 4863 |Hc | Short_Literal 0x63 001d 00da | | Load_Top At_Offset_2 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4801 |H | Short_Literal 0x1 0020 035d | ] | Declare_Type Array,Defined 0021 00d8 | | Load_Top At_Offset_0 0022 02a0 | | Declare_Subprogram Null_Subprogram 0023 03ad | | Declare_Type Heap_Access,Defined 0024 4800 |H | Short_Literal 0x0 0025 4863 |Hc | Short_Literal 0x63 0026 00da | | Load_Top At_Offset_2 0027 02a0 | | Declare_Subprogram Null_Subprogram 0028 4801 |H | Short_Literal 0x1 0029 035d | ] | Declare_Type Array,Defined 002a 00d8 | | Load_Top At_Offset_0 002b 0337 | 7 | Declare_Variable Array 002c 00d8 | | Load_Top At_Offset_0 002d 0335 | 5 | Declare_Variable Array,Duplicate 002e 00cd | | Action Spare6_Action 002f 4863 |Hc | Short_Literal 0x63 0030 4800 |H | Short_Literal 0x0 0031 e218 | | Load 0x1,0x18 0032 00d9 | | Load_Top At_Offset_1 0033 e21b | | Load 0x1,0x1b 0034 01d6 | | Execute Vector,Field_Write 0035 3ffb |? | Loop_Increasing 0x31 0036 00d9 | | Load_Top At_Offset_1 0037 01d4 | | Execute Vector,Structure_Write 0038 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0039 00c7 | | Action Elaborate_Subprogram 003a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 003b 00c7 | | Action Elaborate_Subprogram 003c BODY_0008: 003c 00bc | | Action Signal_Activated 003d 00bb | | Action Signal_Completion 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0053 | S | .CONST 0x0053 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0007 | | .CONST 0x0007 ; Number of locals 0043 INIT_0040: 0043 00e3 | | Load_Encached Natural_Cache 0044 00e3 | | Load_Encached Natural_Cache 0045 00e3 | | Load_Encached Natural_Cache 0046 e5ff | | Load 0x2,-0x1 0047 00d8 | | Load_Top At_Offset_0 0048 00e3 | | Load_Encached Natural_Cache 0049 0260 | ` | Execute Discrete,In_Type 004a 7001 |p | Jump_Nonzero 0x4c 004b 0801 | | Execute_Immediate Raise,0x1 004c 0aff | | Execute_Immediate Plus,-0x1 004d 00e3 | | Load_Encached Natural_Cache 004e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 004f e218 | | Load 0x1,0x18 0050 0007 | | Action Break_Optional 0051 e216 | | Load 0x1,0x16 0052 0007 | | Action Break_Optional 0053 BODY_0040: 0053 00da | | Load_Top At_Offset_2 0054 4be8 |K | Short_Literal 0x3e8 0055 026e | n | Execute Discrete,Modulo 0056 c404 | | Store 0x2,0x4 0057 00da | | Load_Top At_Offset_2 0058 4be8 |K | Short_Literal 0x3e8 0059 0270 | p | Execute Discrete,Divide 005a 005b | [ | Store_Top Discrete,At_Offset_3 005b 00da | | Load_Top At_Offset_2 005c 4864 |Hd | Short_Literal 0x64 005d 026e | n | Execute Discrete,Modulo 005e c403 | | Store 0x2,0x3 005f 00da | | Load_Top At_Offset_2 0060 4864 |Hd | Short_Literal 0x64 0061 0270 | p | Execute Discrete,Divide 0062 c402 | | Store 0x2,0x2 0063 e402 | | Load 0x2,0x2 0064 e21a | | Load 0x1,0x1a 0065 01d7 | | Execute Vector,Field_Read 0066 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0067 00d9 | | Load_Top At_Offset_1 0068 700a |p | Jump_Nonzero 0x73 0069 e218 | | Load 0x1,0x18 006a e212 | | Load 0x1,0x12 006b 039c | | Declare_Variable Heap_Access,By_Allocation 006c e402 | | Load 0x2,0x2 006d e21a | | Load 0x1,0x1a 006e 01d6 | | Execute Vector,Field_Write 006f e402 | | Load 0x2,0x2 0070 e21a | | Load 0x1,0x1a 0071 01d7 | | Execute Vector,Field_Read 0072 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0073 e403 | | Load 0x2,0x3 0074 00da | | Load_Top At_Offset_2 0075 0217 | | Execute Heap_Access,All_Reference 0076 01d7 | | Execute Vector,Field_Read 0077 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0078 00d8 | | Load_Top At_Offset_0 0079 700c |p | Jump_Nonzero 0x86 007a e216 | | Load 0x1,0x16 007b e212 | | Load 0x1,0x12 007c 039c | | Declare_Variable Heap_Access,By_Allocation 007d e403 | | Load 0x2,0x3 007e 00db | | Load_Top At_Offset_3 007f 0217 | | Execute Heap_Access,All_Reference 0080 01d6 | | Execute Vector,Field_Write 0081 e403 | | Load 0x2,0x3 0082 00da | | Load_Top At_Offset_2 0083 0217 | | Execute Heap_Access,All_Reference 0084 01d7 | | Execute Vector,Field_Read 0085 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0086 00db | | Load_Top At_Offset_3 0087 00d9 | | Load_Top At_Offset_1 0088 0217 | | Execute Heap_Access,All_Reference 0089 01d7 | | Execute Vector,Field_Read 008a 7013 |p | Jump_Nonzero 0x9e 008b e20f | | Load 0x1,0xf 008c 0124 | $ | Execute Any,Is_Constrained 008d 7006 |p | Jump_Nonzero 0x94 008e e20f | | Load 0x1,0xf 008f 1c09 | | Execute_Immediate Run_Utility,0x9 0090 e210 | | Load 0x1,0x10 0091 e212 | | Load 0x1,0x12 0092 0398 | | Declare_Variable Heap_Access,By_Allocation,With_Subtype 0093 7803 |x | Jump 0x97 0094 e210 | | Load 0x1,0x10 0095 e212 | | Load 0x1,0x12 0096 039c | | Declare_Variable Heap_Access,By_Allocation 0097 00d8 | | Load_Top At_Offset_0 0098 0217 | | Execute Heap_Access,All_Reference 0099 1c00 | | Execute_Immediate Run_Utility,0x0 009a e404 | | Load 0x2,0x4 009b 00da | | Load_Top At_Offset_2 009c 0217 | | Execute Heap_Access,All_Reference 009d 01d6 | | Execute Vector,Field_Write 009e 00db | | Load_Top At_Offset_3 009f 00d9 | | Load_Top At_Offset_1 00a0 0217 | | Execute Heap_Access,All_Reference 00a1 01d7 | | Execute Vector,Field_Read 00a2 e210 | | Load 0x1,0x10 00a3 0213 | | Execute Heap_Access,Check_In_Type 00a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00b8 | | .CONST 0x00b8 ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 000a | | .CONST 0x000a ; Number of locals 00ab INIT_00a8: 00ab 00e3 | | Load_Encached Natural_Cache 00ac 00e3 | | Load_Encached Natural_Cache 00ad 00e3 | | Load_Encached Natural_Cache 00ae 00e3 | | Load_Encached Natural_Cache 00af 00e3 | | Load_Encached Natural_Cache 00b0 e218 | | Load 0x1,0x18 00b1 0007 | | Action Break_Optional 00b2 e216 | | Load 0x1,0x16 00b3 0007 | | Action Break_Optional 00b4 00d8 | | Load_Top At_Offset_0 00b5 0007 | | Action Break_Optional 00b6 e210 | | Load 0x1,0x10 00b7 0007 | | Action Break_Optional 00b8 BODY_00a8: 00b8 e5ff | | Load 0x2,-0x1 00b9 00d8 | | Load_Top At_Offset_0 00ba 00e3 | | Load_Encached Natural_Cache 00bb 0260 | ` | Execute Discrete,In_Type 00bc 7001 |p | Jump_Nonzero 0xbe 00bd 0801 | | Execute_Immediate Raise,0x1 00be 0aff | | Execute_Immediate Plus,-0x1 00bf c406 | | Store 0x2,0x6 00c0 e406 | | Load 0x2,0x6 00c1 4be8 |K | Short_Literal 0x3e8 00c2 026e | n | Execute Discrete,Modulo 00c3 c404 | | Store 0x2,0x4 00c4 e406 | | Load 0x2,0x6 00c5 4be8 |K | Short_Literal 0x3e8 00c6 0270 | p | Execute Discrete,Divide 00c7 c406 | | Store 0x2,0x6 00c8 e406 | | Load 0x2,0x6 00c9 4864 |Hd | Short_Literal 0x64 00ca 026e | n | Execute Discrete,Modulo 00cb c403 | | Store 0x2,0x3 00cc e406 | | Load 0x2,0x6 00cd 4864 |Hd | Short_Literal 0x64 00ce 0270 | p | Execute Discrete,Divide 00cf c402 | | Store 0x2,0x2 00d0 e402 | | Load 0x2,0x2 00d1 e21a | | Load 0x1,0x1a 00d2 01d7 | | Execute Vector,Field_Read 00d3 a407 | | Store_Unchecked 0x2,0x7 00d4 e403 | | Load 0x2,0x3 00d5 e407 | | Load 0x2,0x7 00d6 0217 | | Execute Heap_Access,All_Reference 00d7 01d7 | | Execute Vector,Field_Read 00d8 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00d9 e5fe | | Load 0x2,-0x2 00da 00d8 | | Load_Top At_Offset_0 00db 00e3 | | Load_Encached Natural_Cache 00dc 0260 | ` | Execute Discrete,In_Type 00dd 7001 |p | Jump_Nonzero 0xdf 00de 0801 | | Execute_Immediate Raise,0x1 00df 0aff | | Execute_Immediate Plus,-0x1 00e0 c406 | | Store 0x2,0x6 00e1 e406 | | Load 0x2,0x6 00e2 4be8 |K | Short_Literal 0x3e8 00e3 026e | n | Execute Discrete,Modulo 00e4 c405 | | Store 0x2,0x5 00e5 e406 | | Load 0x2,0x6 00e6 4be8 |K | Short_Literal 0x3e8 00e7 0270 | p | Execute Discrete,Divide 00e8 c406 | | Store 0x2,0x6 00e9 e406 | | Load 0x2,0x6 00ea 4864 |Hd | Short_Literal 0x64 00eb 026e | n | Execute Discrete,Modulo 00ec c403 | | Store 0x2,0x3 00ed e406 | | Load 0x2,0x6 00ee 4864 |Hd | Short_Literal 0x64 00ef 0270 | p | Execute Discrete,Divide 00f0 c402 | | Store 0x2,0x2 00f1 e402 | | Load 0x2,0x2 00f2 e21a | | Load 0x1,0x1a 00f3 01d7 | | Execute Vector,Field_Read 00f4 a407 | | Store_Unchecked 0x2,0x7 00f5 e403 | | Load 0x2,0x3 00f6 e407 | | Load 0x2,0x7 00f7 0217 | | Execute Heap_Access,All_Reference 00f8 01d7 | | Execute Vector,Field_Read 00f9 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00fa e405 | | Load 0x2,0x5 00fb 00da | | Load_Top At_Offset_2 00fc 0217 | | Execute Heap_Access,All_Reference 00fd 01d7 | | Execute Vector,Field_Read 00fe 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00ff e404 | | Load 0x2,0x4 0100 00db | | Load_Top At_Offset_3 0101 0217 | | Execute Heap_Access,All_Reference 0102 01d7 | | Execute Vector,Field_Read 0103 e405 | | Load 0x2,0x5 0104 00db | | Load_Top At_Offset_3 0105 0217 | | Execute Heap_Access,All_Reference 0106 01d6 | | Execute Vector,Field_Write 0107 00d8 | | Load_Top At_Offset_0 0108 e404 | | Load 0x2,0x4 0109 e408 | | Load 0x2,0x8 010a 0217 | | Execute Heap_Access,All_Reference 010b 01d6 | | Execute Vector,Field_Write 010c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 010d 0000 0000 | | .XXX[0x3] 010f 0000 | | 0110 ; -------------------------------------------------------------------------------------- 0110 ; Debug Table 0110 ; -------------------------------------------------------------------------------------- 0110 0004 000c | | .DEBUG4 0x0004,0x000c,0xa085,0x0000,0x0001,0x0000 0116 0000 0000 | | .BLANK 0000[0x25] 013b 000e ba00 | | .XXX[0x2] 013d 0000 0000 | | .BLANK 0000[0xd] 014a ee80 0000 | | .XXX[0x6] 014c 0000 0000 | | 014e 000e 7a00 | z | 0150 0000 0000 | | .BLANK 0000[0x1d] 016d 003a c800 | : | .XXX[0x2] 016f 0000 0000 | | .BLANK 0000[0x91]