|
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_0ea8df
└─⟦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 00d0 | | .CONST 0x00d0 ; 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 0029 | ) | .CONST 0x0029 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 480a |H | Short_Literal 0xa ; Debug Table 0x0 = .DEBUG 0x000b,0x012a,0x0000,0x0000,0x005a,0x6b85,0x0000,0x03da ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 6037 |`7 | Indirect_Literal Discrete,0x44,{0x0080580e, 0x000004b0} 000d 02a0 | | Declare_Subprogram Null_Subprogram 000e 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 000f 00bf | | Action Accept_Activation 0010 029d 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call ; Debug Table 0x1 = .DEBUG 0x0010,0x012e,0x0000,0x0000,0x005a,0x75e5,0x0000,0x0006 ; Debug Table 0x1.0x0 = 0x10,0xffff 0012 029d 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call 0014 602b |`+ | Indirect_Literal Discrete,0x40,{0x00000000, 0x005a75e5} 0015 4807 |H | Short_Literal 0x7 0016 00e1 | | Load_Encached Boolean_Cache 0017 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0018 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0019 e001 | | Load 0x0,0x1 001a 1918 | | Execute Package,Field_Reference,Field_Number 0x18 001b 0092 00c8 | | Action Push_String_Extended,0xc8 ; "Boolean" 001d 4804 |H | Short_Literal 0x4 001e e001 | | Load 0x0,0x1 001f 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0020 0387 | | Declare_Variable Package 0021 00d8 | | Load_Top At_Offset_0 0022 020f | | Execute Module,Activate 0023 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x1 = 0x23,0xfffe 0024 4801 |H | Short_Literal 0x1 0025 e20d | | Load 0x1,0xd 0026 020e | | Execute Module,Augment_Imports 0027 00db | | Load_Top At_Offset_3 0028 020d | | Execute Module,Elaborate 0029 BODY_0008: 0029 00bc | | Action Signal_Activated 002a 00bb | | Action Signal_Completion 002b 0000 0000 | | .BLANK 0000[0x5] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0033,0x0134,0x0007,0x0000,0x005a,0x75e5,0x0000,0x0000 0034 00e1 | | Load_Encached Boolean_Cache 0035 025e | ^ | Execute Discrete,Convert 0036 1c01 | | Execute_Immediate Run_Utility,0x1 0037 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 003b | ; | .CONST 0x003b ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0001 | | .CONST 0x0001 ; Number of locals 003b BODY_0038: 003b INIT_0038: 003b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x003b,0x0136,0x0007,0x0000,0x005a,0x75e5,0x0000,0x0000 003c 00e1 | | Load_Encached Boolean_Cache 003d 00e0 | | Load_Encached Standard_Cache 003e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 003f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0040 0000 0000 | | .LITERAL {0x00000000, 0x005a75e5} 0044 0080 580e | X | .LITERAL {0x0080580e, 0x000004b0} 0048 0083 0004 | | .XXX[0x3] 004a 001c | | 004b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4 = .DEBUG 0x004b,0x0138,0x4000,0x0000,0x005a,0x6b85,0x0000,0x03db ; Debug Table 0x4.0x0 = 0x4b,0xffff 004d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x1 = 0x4d,0xfffe 004f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x2 = 0x4f,0xfffd 0051 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x3 = 0x51,0xfffc 0053 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x4.0x4 = 0x53,0xfffb 0055 00bf | | Action Accept_Activation 0056 67e9 |g | Indirect_Literal Discrete,0x40,{0x00000000, 0x005a75e5} ; Debug Table 0x5 = .DEBUG 0x0056,0x0144,0x4000,0x0000,0x005a,0x75e5,0x0000,0x0022 ; Debug Table 0x5.0x0 = 0x56,0xffff 0057 4823 |H# | Short_Literal 0x23 0058 e20f | | Load 0x1,0xf 0059 e210 | | Load 0x1,0x10 005a e20f | | Load 0x1,0xf 005b 0266 | f | Execute Discrete,Bounds 005c e20f | | Load 0x1,0xf 005d 0265 | e | Execute Discrete,Reverse_Bounds 005e 00db | | Load_Top At_Offset_3 005f 027f | | Execute Discrete,Equal 0060 7002 |p | Jump_Nonzero 0x63 0061 48e0 |H | Short_Literal 0xe0 0062 0257 | W | Execute Discrete,Raise 0063 027f | | Execute Discrete,Equal 0064 7002 |p | Jump_Nonzero 0x67 0065 48e0 |H | Short_Literal 0xe0 0066 0257 | W | Execute Discrete,Raise 0067 00d1 | | Pop_Control Pop_Count_1 0068 e211 | | Load 0x1,0x11 0069 e212 | | Load 0x1,0x12 006a e213 | | Load 0x1,0x13 006b 0335 | 5 | Declare_Variable Array,Duplicate 006c 00d0 | | Action Swap_Control 006d 00d1 | | Pop_Control Pop_Count_1 006e e214 | | Load 0x1,0x14 006f 0335 | 5 | Declare_Variable Array,Duplicate 0070 00d0 | | Action Swap_Control 0071 00d1 | | Pop_Control Pop_Count_1 0072 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0073 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0074 e001 | | Load 0x0,0x1 0075 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0076 0387 | | Declare_Variable Package 0077 00d8 | | Load_Top At_Offset_0 0078 020f | | Execute Module,Activate 0079 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x5.0x1 = 0x79,0xfffe 007a 00c7 | | Action Elaborate_Subprogram 007b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x5.0x2 = 0x7b,0xfffd 007c 00c7 | | Action Elaborate_Subprogram 007d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x5.0x3 = 0x7d,0xfffc 007e 00c7 | | Action Elaborate_Subprogram 007f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x5.0x4 = 0x7f,0xfffb 0080 00c7 | | Action Elaborate_Subprogram 0081 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x5.0x5 = 0x81,0xfffa 0082 00c7 | | Action Elaborate_Subprogram 0083 00bc | | Action Signal_Activated 0084 00bb | | Action Signal_Completion 0085 0000 0000 | | .XXX[0x3] 0087 0000 | | 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b e5fd | | Load 0x2,-0x3 ; Debug Table 0x6 = .DEBUG 0x008b,0x0152,0x1002,0x0000,0x005a,0x6b85,0x0000,0x0420 ; Debug Table 0x6.0x0 = 0x8b,0x1 008c e5fe | | Load 0x2,-0x2 008d e5ff | | Load 0x2,-0x1 008e e21c | | Load 0x1,0x1c 008f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0090 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0091 0000 0000 | | .BLANK 0000[0x7] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b e5fc | | Load 0x2,-0x4 ; Debug Table 0x7 = .DEBUG 0x009b,0x0156,0x1001,0x0000,0x005a,0x6b85,0x0000,0x0439 ; Debug Table 0x7.0x0 = 0x9b,0x1 009c e5fd | | Load 0x2,-0x3 009d e5fe | | Load 0x2,-0x2 009e e5ff | | Load 0x2,-0x1 009f e21c | | Load 0x1,0x1c 00a0 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00a1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00a2 0000 0000 | | .BLANK 0000[0x6] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x00ab,0x015a,0x1002,0x0000,0x005a,0x6b85,0x0000,0x0455 ; Debug Table 0x8.0x0 = 0xab,0x1 00ac e21c | | Load 0x1,0x1c 00ad 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00af 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x00b3,0x015e,0x1002,0x0000,0x005a,0x6b85,0x0000,0x045e ; Debug Table 0x9.0x0 = 0xb3,0x1 00b4 e21c | | Load 0x1,0x1c 00b5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00b6 e211 | | Load 0x1,0x11 00b7 0213 | | Execute Heap_Access,Check_In_Type 00b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b9 0000 0000 | | .BLANK 0000[0x7] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 00db | | Load_Top At_Offset_3 ; Debug Table 0xa = .DEBUG 0x00c3,0x0162,0x1001,0x0000,0x005a,0x6b85,0x0000,0x0467 ; Debug Table 0xa.0x0 = 0xc3,0x1 00c4 00db | | Load_Top At_Offset_3 00c5 e21c | | Load 0x1,0x1c 00c6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00c7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; STRING TABLE 00c8 ; -------------------------------------------------------------------------------------- 00c8 0004 | | .STRTAB 0x0004->0x00ca ; "Boolean" 00c9 0009 | | .STREND 0x0009->0x00cd 00ca 426f 6f6c |Bool| .STRTAB_STRINGS 00ce 0000 0000 | | .XXX[0x2] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; Debug Table 00d0 ; -------------------------------------------------------------------------------------- 00d0 0003 000b | | .CONST 0x0003,0x000b 00d2 000b 012a | *| .DEBUG 0x000b,0x012a,0x0000,0x0000,0x005a,0x6b85,0x0000,0x03da 00da 0010 012e | .| .DEBUG 0x0010,0x012e,0x0000,0x0000,0x005a,0x75e5,0x0000,0x0006 00e2 0033 0134 | 3 4| .DEBUG 0x0033,0x0134,0x0007,0x0000,0x005a,0x75e5,0x0000,0x0000 00ea 003b 0136 | ; 6| .DEBUG 0x003b,0x0136,0x0007,0x0000,0x005a,0x75e5,0x0000,0x0000 00f2 004b 0138 | K 8| .DEBUG 0x004b,0x0138,0x4000,0x0000,0x005a,0x6b85,0x0000,0x03db 00fa 0056 0144 | V D| .DEBUG 0x0056,0x0144,0x4000,0x0000,0x005a,0x75e5,0x0000,0x0022 0102 008b 0152 | R| .DEBUG 0x008b,0x0152,0x1002,0x0000,0x005a,0x6b85,0x0000,0x0420 010a 009b 0156 | V| .DEBUG 0x009b,0x0156,0x1001,0x0000,0x005a,0x6b85,0x0000,0x0439 0112 00ab 015a | Z| .DEBUG 0x00ab,0x015a,0x1002,0x0000,0x005a,0x6b85,0x0000,0x0455 011a 00b3 015e | ^| .DEBUG 0x00b3,0x015e,0x1002,0x0000,0x005a,0x6b85,0x0000,0x045e 0122 00c3 0162 | b| .DEBUG 0x00c3,0x0162,0x1001,0x0000,0x005a,0x6b85,0x0000,0x0467 012a ; -------------------------------------------------------------------------------------- 012a ; Debug3 Subtable 0x0 012a ; -------------------------------------------------------------------------------------- 012a 0001 0000 | | .DBG3TAB 0x0001,0x0000 012c 000b ffff | | .CONST 0x000b,0xffff 012e ; -------------------------------------------------------------------------------------- 012e ; Debug3 Subtable 0x1 012e ; -------------------------------------------------------------------------------------- 012e 0002 0000 | | .DBG3TAB 0x0002,0x0000 0130 0010 ffff | | .CONST 0x0010,0xffff 0132 0023 fffe | # | .CONST 0x0023,0xfffe 0134 ; -------------------------------------------------------------------------------------- 0134 ; Debug3 Subtable 0x2 0134 ; -------------------------------------------------------------------------------------- 0134 0000 0000 | | .DBG3TAB 0x0000,0x0000 0136 ; -------------------------------------------------------------------------------------- 0136 ; Debug3 Subtable 0x3 0136 ; -------------------------------------------------------------------------------------- 0136 0000 0000 | | .DBG3TAB 0x0000,0x0000 0138 ; -------------------------------------------------------------------------------------- 0138 ; Debug3 Subtable 0x4 0138 ; -------------------------------------------------------------------------------------- 0138 0005 0000 | | .DBG3TAB 0x0005,0x0000 013a 004b ffff | K | .CONST 0x004b,0xffff 013c 004d fffe | M | .CONST 0x004d,0xfffe 013e 004f fffd | O | .CONST 0x004f,0xfffd 0140 0051 fffc | Q | .CONST 0x0051,0xfffc 0142 0053 fffb | S | .CONST 0x0053,0xfffb 0144 ; -------------------------------------------------------------------------------------- 0144 ; Debug3 Subtable 0x5 0144 ; -------------------------------------------------------------------------------------- 0144 0006 0000 | | .DBG3TAB 0x0006,0x0000 0146 0056 ffff | V | .CONST 0x0056,0xffff 0148 0079 fffe | y | .CONST 0x0079,0xfffe 014a 007b fffd | { | .CONST 0x007b,0xfffd 014c 007d fffc | } | .CONST 0x007d,0xfffc 014e 007f fffb | | .CONST 0x007f,0xfffb 0150 0081 fffa | | .CONST 0x0081,0xfffa 0152 ; -------------------------------------------------------------------------------------- 0152 ; Debug3 Subtable 0x6 0152 ; -------------------------------------------------------------------------------------- 0152 0000 0001 | | .DBG3TAB 0x0000,0x0001 0154 008b 0001 | | .CONST 0x008b,0x0001 0156 ; -------------------------------------------------------------------------------------- 0156 ; Debug3 Subtable 0x7 0156 ; -------------------------------------------------------------------------------------- 0156 0000 0001 | | .DBG3TAB 0x0000,0x0001 0158 009b 0001 | | .CONST 0x009b,0x0001 015a ; -------------------------------------------------------------------------------------- 015a ; Debug3 Subtable 0x8 015a ; -------------------------------------------------------------------------------------- 015a 0000 0001 | | .DBG3TAB 0x0000,0x0001 015c 00ab 0001 | | .CONST 0x00ab,0x0001 015e ; -------------------------------------------------------------------------------------- 015e ; Debug3 Subtable 0x9 015e ; -------------------------------------------------------------------------------------- 015e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0160 00b3 0001 | | .CONST 0x00b3,0x0001 0162 ; -------------------------------------------------------------------------------------- 0162 ; Debug3 Subtable 0xa 0162 ; -------------------------------------------------------------------------------------- 0162 0000 0001 | | .DBG3TAB 0x0000,0x0001 0164 00c3 0001 | | .CONST 0x00c3,0x0001 0166 0000 0000 | | .BLANK 0000[0x9a]