|
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_103ce1
└─⟦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 00b0 | | .CONST 0x00b0 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0017 | | .CONST 0x0017 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated 0011 c20f | | Store 0x1,0xf 0012 00bf | | Action Accept_Activation 0013 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0014 00c7 | | Action Elaborate_Subprogram 0015 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0016 00c7 | | Action Elaborate_Subprogram 0017 BODY_0008: 0017 00bc | | Action Signal_Activated 0018 00bb | | Action Signal_Completion 0019 0000 0000 | | .BLANK 0000[0x7] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0032 | 2 | .CONST 0x0032 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0004 | | .CONST 0x0004 ; Number of locals 0023 INIT_0020: 0023 e001 | | Load 0x0,0x1 0024 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0025 02ff | | Declare_Variable Variant_Record 0026 00d8 | | Load_Top At_Offset_0 0027 1c00 | | Execute_Immediate Run_Utility,0x0 0028 e002 | | Load 0x0,0x2 0029 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 002a 02ff | | Declare_Variable Variant_Record 002b 00d8 | | Load_Top At_Offset_0 002c 1c00 | | Execute_Immediate Run_Utility,0x0 002d e003 | | Load 0x0,0x3 002e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 002f 02ff | | Declare_Variable Variant_Record 0030 00d8 | | Load_Top At_Offset_0 0031 1c00 | | Execute_Immediate Run_Utility,0x0 0032 BODY_0020: 0032 480a |H | Short_Literal 0xa 0033 4800 |H | Short_Literal 0x0 0034 4801 |H | Short_Literal 0x1 0035 480a |H | Short_Literal 0xa 0036 e001 | | Load 0x0,0x1 0037 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0038 00db | | Load_Top At_Offset_3 0039 016d | m | Execute Variant_Record,Structure_Write 003a 00da | | Load_Top At_Offset_2 003b e001 | | Load 0x0,0x1 003c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 003d 00da | | Load_Top At_Offset_2 003e e001 | | Load 0x0,0x1 003f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0040 480a |H | Short_Literal 0xa 0041 4800 |H | Short_Literal 0x0 0042 4803 |H | Short_Literal 0x3 0043 4814 |H | Short_Literal 0x14 0044 e001 | | Load 0x0,0x1 0045 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0046 00db | | Load_Top At_Offset_3 0047 016d | m | Execute Variant_Record,Structure_Write 0048 480a |H | Short_Literal 0xa 0049 4800 |H | Short_Literal 0x0 004a 4803 |H | Short_Literal 0x3 004b 4822 |H" | Short_Literal 0x22 004c e001 | | Load 0x0,0x1 004d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 004e 00db | | Load_Top At_Offset_3 004f 016d | m | Execute Variant_Record,Structure_Write 0050 480a |H | Short_Literal 0xa 0051 4800 |H | Short_Literal 0x0 0052 4804 |H | Short_Literal 0x4 0053 482d |H- | Short_Literal 0x2d 0054 e001 | | Load 0x0,0x1 0055 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0056 00db | | Load_Top At_Offset_3 0057 016d | m | Execute Variant_Record,Structure_Write 0058 480a |H | Short_Literal 0xa 0059 4800 |H | Short_Literal 0x0 005a 4804 |H | Short_Literal 0x4 005b 482d |H- | Short_Literal 0x2d 005c e001 | | Load 0x0,0x1 005d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 005e 00db | | Load_Top At_Offset_3 005f 016d | m | Execute Variant_Record,Structure_Write 0060 480a |H | Short_Literal 0xa 0061 4800 |H | Short_Literal 0x0 0062 4800 |H | Short_Literal 0x0 0063 482d |H- | Short_Literal 0x2d 0064 e001 | | Load 0x0,0x1 0065 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0066 00db | | Load_Top At_Offset_3 0067 016d | m | Execute Variant_Record,Structure_Write 0068 480a |H | Short_Literal 0xa 0069 4800 |H | Short_Literal 0x0 006a 4802 |H | Short_Literal 0x2 006b 4a58 |JX | Short_Literal 0x258 006c e001 | | Load 0x0,0x1 006d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 006e 00db | | Load_Top At_Offset_3 006f 016d | m | Execute Variant_Record,Structure_Write 0070 4800 |H | Short_Literal 0x0 0071 4815 |H | Short_Literal 0x15 0072 e002 | | Load 0x0,0x2 0073 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0074 00da | | Load_Top At_Offset_2 0075 016d | m | Execute Variant_Record,Structure_Write 0076 4800 |H | Short_Literal 0x0 0077 480f |H | Short_Literal 0xf 0078 e002 | | Load 0x0,0x2 0079 1816 | | Execute Package,Field_Execute,Field_Number 0x16 007a 00da | | Load_Top At_Offset_2 007b 016d | m | Execute Variant_Record,Structure_Write 007c 4800 |H | Short_Literal 0x0 007d 4823 |H# | Short_Literal 0x23 007e e002 | | Load 0x0,0x2 007f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0080 00da | | Load_Top At_Offset_2 0081 016d | m | Execute Variant_Record,Structure_Write 0082 4800 |H | Short_Literal 0x0 0083 4830 |H0 | Short_Literal 0x30 0084 e002 | | Load 0x0,0x2 0085 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0086 00da | | Load_Top At_Offset_2 0087 016d | m | Execute Variant_Record,Structure_Write 0088 e002 | | Load 0x0,0x2 0089 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 008a e002 | | Load 0x0,0x2 008b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 008c 4800 |H | Short_Literal 0x0 008d 4801 |H | Short_Literal 0x1 008e e003 | | Load 0x0,0x3 008f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0090 00d9 | | Load_Top At_Offset_1 0091 016d | m | Execute Variant_Record,Structure_Write 0092 4800 |H | Short_Literal 0x0 0093 4803 |H | Short_Literal 0x3 0094 e003 | | Load 0x0,0x3 0095 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0096 00d9 | | Load_Top At_Offset_1 0097 016d | m | Execute Variant_Record,Structure_Write 0098 4800 |H | Short_Literal 0x0 0099 4804 |H | Short_Literal 0x4 009a e003 | | Load 0x0,0x3 009b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 009c 00d9 | | Load_Top At_Offset_1 009d 016d | m | Execute Variant_Record,Structure_Write 009e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 009f 0000 | | .XXX[0x1] 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 e001 | | Load 0x0,0x1 00a4 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00a5 e002 | | Load 0x0,0x2 00a6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00a7 e003 | | Load 0x0,0x3 00a8 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00aa 0000 0000 | | .BLANK 0000[0x6] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; Debug Table 00b0 ; -------------------------------------------------------------------------------------- 00b0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xe58d,0x0000,0x0001,0x0004 00b6 000b 00c6 | | .DBG4T 0x000b,0x00c6,0x8000,0x0000 00ba 0013 00ca | | .DBG4T 0x0013,0x00ca,0x8000,0x0000 00be 0023 00ce | # | .DBG4T 0x0023,0x00ce,0x0001,0x0000 00c2 00a3 00e5 | | .DBG4T 0x00a3,0x00e5,0x0001,0x0000 00c6 ; -------------------------------------------------------------------------------------- 00c6 ; Debug chain 00c6 ; -------------------------------------------------------------------------------------- 00c6 0002 0000 | | .DBGLEN 0x0002,0x0000 00c8 000b 000f | | .DBGLNO 0x000b,0x000f 00ca ; -------------------------------------------------------------------------------------- 00ca ; Debug chain 00ca ; -------------------------------------------------------------------------------------- 00ca 0002 0000 | | .DBGLEN 0x0002,0x0000 00cc 0013 0015 | | .DBGLNO 0x0013,0x0015 00ce ; -------------------------------------------------------------------------------------- 00ce ; Debug chain 00ce ; -------------------------------------------------------------------------------------- 00ce 0003 0012 | | .DBGLEN 0x0003,0x0012 00d0 0023 0028 | # (| .DBGLNO 0x0023,0x0028,0x002d,0x0032,0x003a,0x003d,0x0040,0x0048,0x0050,0x0058,0x0060,0x0068,0x0070,0x0076,0x007c,0x0082,0x0088,0x008a,0x008c,0x0092,0x0098 00e5 ; -------------------------------------------------------------------------------------- 00e5 ; Debug chain 00e5 ; -------------------------------------------------------------------------------------- 00e5 0000 0003 | | .DBGLEN 0x0000,0x0003 00e7 00a3 00a5 | | .DBGLNO 0x00a3,0x00a5,0x00a7 00ea 0000 0000 | | .BLANK 0000[0x116]