|
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_03f8e1
└─⟦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 002c | , | .CONST 0x002c ; 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 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0025 02ff | | Declare_Variable Variant_Record 0026 e002 | | Load 0x0,0x2 0027 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0028 02ff | | Declare_Variable Variant_Record 0029 e003 | | Load 0x0,0x3 002a 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 002b 02ff | | Declare_Variable Variant_Record 002c BODY_0020: 002c 480a |H | Short_Literal 0xa 002d 4800 |H | Short_Literal 0x0 002e 4801 |H | Short_Literal 0x1 002f 480a |H | Short_Literal 0xa 0030 e001 | | Load 0x0,0x1 0031 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0032 00db | | Load_Top At_Offset_3 0033 016d | m | Execute Variant_Record,Structure_Write 0034 00da | | Load_Top At_Offset_2 0035 e001 | | Load 0x0,0x1 0036 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0037 00da | | Load_Top At_Offset_2 0038 e001 | | Load 0x0,0x1 0039 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 003a 480a |H | Short_Literal 0xa 003b 4800 |H | Short_Literal 0x0 003c 4803 |H | Short_Literal 0x3 003d 4814 |H | Short_Literal 0x14 003e e001 | | Load 0x0,0x1 003f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0040 00db | | Load_Top At_Offset_3 0041 016d | m | Execute Variant_Record,Structure_Write 0042 480a |H | Short_Literal 0xa 0043 4800 |H | Short_Literal 0x0 0044 4803 |H | Short_Literal 0x3 0045 4822 |H" | Short_Literal 0x22 0046 e001 | | Load 0x0,0x1 0047 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0048 00db | | Load_Top At_Offset_3 0049 016d | m | Execute Variant_Record,Structure_Write 004a 480a |H | Short_Literal 0xa 004b 4800 |H | Short_Literal 0x0 004c 4804 |H | Short_Literal 0x4 004d 482d |H- | Short_Literal 0x2d 004e e001 | | Load 0x0,0x1 004f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0050 00db | | Load_Top At_Offset_3 0051 016d | m | Execute Variant_Record,Structure_Write 0052 480a |H | Short_Literal 0xa 0053 4800 |H | Short_Literal 0x0 0054 4804 |H | Short_Literal 0x4 0055 482d |H- | Short_Literal 0x2d 0056 e001 | | Load 0x0,0x1 0057 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0058 00db | | Load_Top At_Offset_3 0059 016d | m | Execute Variant_Record,Structure_Write 005a 480a |H | Short_Literal 0xa 005b 4800 |H | Short_Literal 0x0 005c 4800 |H | Short_Literal 0x0 005d 482d |H- | Short_Literal 0x2d 005e e001 | | Load 0x0,0x1 005f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0060 00db | | Load_Top At_Offset_3 0061 016d | m | Execute Variant_Record,Structure_Write 0062 480a |H | Short_Literal 0xa 0063 4800 |H | Short_Literal 0x0 0064 4802 |H | Short_Literal 0x2 0065 4a58 |JX | Short_Literal 0x258 0066 e001 | | Load 0x0,0x1 0067 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0068 00db | | Load_Top At_Offset_3 0069 016d | m | Execute Variant_Record,Structure_Write 006a 4800 |H | Short_Literal 0x0 006b 4815 |H | Short_Literal 0x15 006c e002 | | Load 0x0,0x2 006d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 006e 00da | | Load_Top At_Offset_2 006f 016d | m | Execute Variant_Record,Structure_Write 0070 4800 |H | Short_Literal 0x0 0071 480f |H | Short_Literal 0xf 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 4823 |H# | Short_Literal 0x23 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 4830 |H0 | Short_Literal 0x30 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 e002 | | Load 0x0,0x2 0083 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0084 e002 | | Load 0x0,0x2 0085 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0086 4800 |H | Short_Literal 0x0 0087 4801 |H | Short_Literal 0x1 0088 e003 | | Load 0x0,0x3 0089 1816 | | Execute Package,Field_Execute,Field_Number 0x16 008a 00d9 | | Load_Top At_Offset_1 008b 016d | m | Execute Variant_Record,Structure_Write 008c 4800 |H | Short_Literal 0x0 008d 4803 |H | Short_Literal 0x3 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 4804 |H | Short_Literal 0x4 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 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0099 0000 0000 | | .BLANK 0000[0x7] 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 181f | | Execute Package,Field_Execute,Field_Number 0x1f 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,0xdc91,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 0026 | # &| .DBGLNO 0x0023,0x0026,0x0029,0x002c,0x0034,0x0037,0x003a,0x0042,0x004a,0x0052,0x005a,0x0062,0x006a,0x0070,0x0076,0x007c,0x0082,0x0084,0x0086,0x008c,0x0092 00e5 ; -------------------------------------------------------------------------------------- 00e5 ; Debug chain 00e5 ; -------------------------------------------------------------------------------------- 00e5 0000 0003 | | .DBGLEN 0x0000,0x0003 00e7 00a3 00a5 | | .DBGLNO 0x00a3,0x00a5,0x00a7 00ea 0000 0000 | | .BLANK 0000[0x116]