|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00c0 | | .CONST 0x00c0 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x00da,0x8000,0x0000,0x0057,0x7a75,0x0000,0x000b 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0034 | 4 | .CONST 0x0034 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0007 | | .CONST 0x0007 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x001b,0x00dc,0x8002,0x0000,0x0057,0x7a75,0x0000,0x000b ; Debug Table 0x1.0x0 = 0x1b,0xffff ; Debug Table 0x1.0x1 = 0x1b,0xfffe ; Debug Table 0x1.0x2 = 0x1b,0xfffd 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 001e e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x1e,0xfffc 001f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0020 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0021 e001 | | Load 0x0,0x1 0022 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0023 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0024 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0025 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x25,0xfffb 0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0027 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0028 e001 | | Load 0x0,0x1 0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 002b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 002c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x2c,0xfffa 002d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 002e 1b17 | | Execute Package,Field_Read,Field_Number 0x17 002f e5fe | | Load 0x2,-0x2 0030 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0031 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x1.0x6 = 0x31,0xfff9 0032 029f 0073 | s| Declare_Subprogram INIT_0070,For_Call ; Debug Table 0x1.0x7 = 0x32,0xfff8 0034 BODY_0018: 0034 e403 | | Load 0x2,0x3 ; Debug Table 0x1.0x8 = 0x34,0x1 0035 e404 | | Load 0x2,0x4 0036 e001 | | Load 0x0,0x1 0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0038 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0039 e5fb | | Load 0x2,-0x5 003a e5fc | | Load 0x2,-0x4 003b e001 | | Load 0x0,0x1 003c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 003e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 003f e001 | | Load 0x0,0x1 0040 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0041 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0042 a402 | | Store_Unchecked 0x2,0x2 0043 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1.0x9 = 0x43,0x2 0044 e402 | | Load 0x2,0x2 0045 e001 | | Load 0x0,0x1 0046 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0047 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0048 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0049 00cf | | Action Mark_Auxiliary 004a 780a |x | Jump 0x55 004b e404 | | Load 0x2,0x4 ; Debug Table 0x1.0xa = 0x4b,0x4 004c e405 | | Load 0x2,0x5 ; Debug Table 0x1.0xb = 0x4c,0x401 004d 0217 | | Execute Heap_Access,All_Reference 004e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 004f 8407 | | Call 0x2,0x7 ; Debug Table 0x1.0xc = 0x4f,0x4 0050 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0xd = 0x50,0x5 ; Debug Table 0x1.0xe = 0x50,0x801 0051 0217 | | Execute Heap_Access,All_Reference 0052 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0053 a405 | | Store_Unchecked 0x2,0x5 ; Debug Table 0x1.0xf = 0x53,0x5 0054 00c9 | | Action Pop_Auxiliary_Loop 0055 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0x10 = 0x55,0x3 ; Debug Table 0x1.0x11 = 0x55,0xc01 0056 021d | | Execute Heap_Access,Is_Null 0057 6ff3 |o | Jump_Zero 0x4b ; Debug Table 0x1.0x12 = 0x57,0x3 0058 00c9 | | Action Pop_Auxiliary_Loop 0059 780a |x | Jump 0x64 005a e403 | | Load 0x2,0x3 ; Debug Table 0x1.0x13 = 0x5a,0x7 005b 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0x14 = 0x5b,0x1001 005c 0217 | | Execute Heap_Access,All_Reference 005d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 005e 8407 | | Call 0x2,0x7 ; Debug Table 0x1.0x15 = 0x5e,0x7 005f 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x16 = 0x5f,0x8 ; Debug Table 0x1.0x17 = 0x5f,0x1401 0060 0217 | | Execute Heap_Access,All_Reference 0061 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0062 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0x1.0x18 = 0x62,0x8 0063 00c9 | | Action Pop_Auxiliary_Loop 0064 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x19 = 0x64,0x6 ; Debug Table 0x1.0x1a = 0x64,0x1801 0065 021d | | Execute Heap_Access,Is_Null 0066 6ff3 |o | Jump_Zero 0x5a ; Debug Table 0x1.0x1b = 0x66,0x6 0067 00ce | | Action Pop_Auxiliary 0068 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x1c = 0x68,0x9 0069 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 006a 0000 0000 | | .BLANK 0000[0x6] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0078 | x | .CONST 0x0078 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0004 | | .CONST 0x0004 ; Number of locals 0073 INIT_0070: 0073 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2 = .DEBUG 0x0073,0x0118,0x0001,0x0000,0x0057,0x7a85,0x0000,0x006a ; Debug Table 0x2.0x0 = 0x73,0xffff 0074 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x1 = 0x74,0xfffe 0075 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0076 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0077 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x2 = 0x77,0xfffd 0078 BODY_0070: 0078 e7ff | | Load 0x3,-0x1 ; Debug Table 0x2.0x3 = 0x78,0x1 0079 00eb | | Load_Encached Diana_Cache 007a 18ec | | Execute Package,Field_Execute,Field_Number 0xec 007b 4976 |Iv | Short_Literal 0x176 007c 00eb | | Load_Encached Diana_Cache 007d 0098 | | Execute Package,Field_Read_Dynamic 007e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 007f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0080 e7ff | | Load 0x3,-0x1 ; Debug Table 0x2.0x4 = 0x80,0x2 0081 00d9 | | Load_Top At_Offset_1 0082 021f | | Execute Heap_Access,Equal 0083 6816 |h | Jump_Zero 0x9a 0084 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x5 = 0x84,0x3 0085 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0086 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0087 180e | | Execute Package,Field_Execute,Field_Number 0xe 0088 e7ff | | Load 0x3,-0x1 0089 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x6 = 0x89,0x401 008a e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x7 = 0x8a,0x3 008b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 008c e002 | | Load 0x0,0x2 008d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 008e e002 | | Load 0x0,0x2 008f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0090 00ea | | Load_Encached Null_String_Cache 0091 e001 | | Load 0x0,0x1 0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0093 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0094 e001 | | Load 0x0,0x1 0095 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0096 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0097 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0098 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0099 7815 |x | Jump 0xaf 009a e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x8 = 0x9a,0x4 009b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009c 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 009d 180e | | Execute Package,Field_Execute,Field_Number 0xe 009e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x9 = 0x9e,0x801 009f e7ff | | Load 0x3,-0x1 ; Debug Table 0x2.0xa = 0x9f,0x4 00a0 e002 | | Load 0x0,0x2 00a1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00a2 e002 | | Load 0x0,0x2 00a3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00a4 e002 | | Load 0x0,0x2 00a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a6 00ea | | Load_Encached Null_String_Cache 00a7 e001 | | Load 0x0,0x1 00a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a9 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 00aa e001 | | Load 0x0,0x1 00ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ac 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 00ad 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00ae 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00af 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0xb = 0xaf,0x5 00b0 e001 | | Load 0x0,0x1 00b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b2 180e | | Execute Package,Field_Execute,Field_Number 0xe 00b3 00db | | Load_Top At_Offset_3 00b4 e403 | | Load 0x2,0x3 00b5 e001 | | Load 0x0,0x1 00b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00b8 005b | [ | Store_Top Discrete,At_Offset_3 00b9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00ba 0000 0000 | | .BLANK 0000[0x6] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; Debug Table 00c0 ; -------------------------------------------------------------------------------------- 00c0 0003 0003 | | .CONST 0x0003,0x0003 00c2 000b 00da | | .DEBUG 0x000b,0x00da,0x8000,0x0000,0x0057,0x7a75,0x0000,0x000b 00ca 001b 00dc | | .DEBUG 0x001b,0x00dc,0x8002,0x0000,0x0057,0x7a75,0x0000,0x000b 00d2 0073 0118 | s | .DEBUG 0x0073,0x0118,0x0001,0x0000,0x0057,0x7a85,0x0000,0x006a 00da ; -------------------------------------------------------------------------------------- 00da ; Debug3 Subtable 0x0 00da ; -------------------------------------------------------------------------------------- 00da 0000 0000 | | .DBG3TAB 0x0000,0x0000 00dc ; -------------------------------------------------------------------------------------- 00dc ; Debug3 Subtable 0x1 00dc ; -------------------------------------------------------------------------------------- 00dc 0008 0015 | | .DBG3TAB 0x0008,0x0015 00de 001b ffff | | .CONST 0x001b,0xffff 00e0 001b fffe | | .CONST 0x001b,0xfffe 00e2 001b fffd | | .CONST 0x001b,0xfffd 00e4 001e fffc | | .CONST 0x001e,0xfffc 00e6 0025 fffb | % | .CONST 0x0025,0xfffb 00e8 002c fffa | , | .CONST 0x002c,0xfffa 00ea 0031 fff9 | 1 | .CONST 0x0031,0xfff9 00ec 0032 fff8 | 2 | .CONST 0x0032,0xfff8 00ee 0034 0001 | 4 | .CONST 0x0034,0x0001 00f0 0043 0002 | C | .CONST 0x0043,0x0002 00f2 004b 0004 | K | .CONST 0x004b,0x0004 00f4 004c 0401 | L | .CONST 0x004c,0x0401 00f6 004f 0004 | O | .CONST 0x004f,0x0004 00f8 0050 0005 | P | .CONST 0x0050,0x0005 00fa 0050 0801 | P | .CONST 0x0050,0x0801 00fc 0053 0005 | S | .CONST 0x0053,0x0005 00fe 0055 0003 | U | .CONST 0x0055,0x0003 0100 0055 0c01 | U | .CONST 0x0055,0x0c01 0102 0057 0003 | W | .CONST 0x0057,0x0003 0104 005a 0007 | Z | .CONST 0x005a,0x0007 0106 005b 1001 | [ | .CONST 0x005b,0x1001 0108 005e 0007 | ^ | .CONST 0x005e,0x0007 010a 005f 0008 | _ | .CONST 0x005f,0x0008 010c 005f 1401 | _ | .CONST 0x005f,0x1401 010e 0062 0008 | b | .CONST 0x0062,0x0008 0110 0064 0006 | d | .CONST 0x0064,0x0006 0112 0064 1801 | d | .CONST 0x0064,0x1801 0114 0066 0006 | f | .CONST 0x0066,0x0006 0116 0068 0009 | h | .CONST 0x0068,0x0009 0118 ; -------------------------------------------------------------------------------------- 0118 ; Debug3 Subtable 0x2 0118 ; -------------------------------------------------------------------------------------- 0118 0003 0009 | | .DBG3TAB 0x0003,0x0009 011a 0073 ffff | s | .CONST 0x0073,0xffff 011c 0074 fffe | t | .CONST 0x0074,0xfffe 011e 0077 fffd | w | .CONST 0x0077,0xfffd 0120 0078 0001 | x | .CONST 0x0078,0x0001 0122 0080 0002 | | .CONST 0x0080,0x0002 0124 0084 0003 | | .CONST 0x0084,0x0003 0126 0089 0401 | | .CONST 0x0089,0x0401 0128 008a 0003 | | .CONST 0x008a,0x0003 012a 009a 0004 | | .CONST 0x009a,0x0004 012c 009e 0801 | | .CONST 0x009e,0x0801 012e 009f 0004 | | .CONST 0x009f,0x0004 0130 00af 0005 | | .CONST 0x00af,0x0005 0132 0000 0000 | | .BLANK 0000[0xce]