|
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 - metrics - 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 00d8 | | .CONST 0x00d8 ; 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 001c | | .CONST 0x001c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x00fa,0x8000,0x0000,0x005a,0x3c95,0x0000,0x0009 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd 000e 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xe,0xfffc 0010 00bf | | Action Accept_Activation 0011 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0011,0x0104,0x8000,0x0000,0x005a,0x3ce5,0x0000,0x0005 ; Debug Table 0x1.0x0 = 0x11,0xffff 0012 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x12,0xfffe 0013 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x13,0xfffd 0014 60bb |` | Indirect_Literal Discrete,0xd0,{0x00000000, 0x00006000} ; Debug Table 0x1.0x3 = 0x14,0xfffc 0015 60b6 |` | Indirect_Literal Discrete,0xcc,{0x00000000, 0x000067ff} 0016 e001 | | Load 0x0,0x1 0017 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0018 03f8 | | Declare_Type Discrete,Constrained 0019 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x19,0xfffb 001a 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x5 = 0x1a,0xfffa 001b 00c7 | | Action Elaborate_Subprogram 001c BODY_0008: 001c 00bc | | Action Signal_Activated 001d 00bb | | Action Signal_Completion 001e 0000 0000 | | .XXX[0x2] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0030 | 0 | .CONST 0x0030 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0008 | | .CONST 0x0008 ; Number of locals 0023 INIT_0020: 0023 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0023,0x0112,0x2801,0x0002,0x005a,0x3c95,0x0000,0x001d ; Debug Table 0x2.0x0 = 0x23,0xffff 0024 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0025 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x1 = 0x25,0xfffe 0026 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0027 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x2 = 0x27,0xfffd 0028 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0029 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x3 = 0x29,0xfffc 002a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 002b e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x4 = 0x2b,0xfffb 002c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 002d 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x2.0x5 = 0x2d,0xfffa 002e 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call ; Debug Table 0x2.0x6 = 0x2e,0xfff9 0030 BODY_0020: 0030 e5fa | | Load 0x2,-0x6 ; Debug Table 0x2.0x7 = 0x30,0x1 0031 6815 |h | Jump_Zero 0x47 0032 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x8 = 0x32,0x2 0033 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0034 e5f9 | | Load 0x2,-0x7 0035 4807 |H | Short_Literal 0x7 0036 85fc | | Call 0x2,-0x4 0037 c5f9 | | Store 0x2,-0x7 0038 c402 | | Store 0x2,0x2 0039 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x39,0x3 003a 608d |` | Indirect_Literal Discrete,0xc8,{0x00000000, 0x00008000} 003b 027c | | | Execute Discrete,Less 003c 680a |h | Jump_Zero 0x47 003d e5f9 | | Load 0x2,-0x7 ; Debug Table 0x2.0xa = 0x3d,0x4 003e e402 | | Load 0x2,0x2 003f 6088 |` | Indirect_Literal Discrete,0xc8,{0x00000000, 0x00008000} 0040 0273 | s | Execute Discrete,Plus 0041 e002 | | Load 0x0,0x2 0042 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0043 025b | [ | Execute Discrete,Check_In_Type 0044 4807 |H | Short_Literal 0x7 0045 85fd | | Call 0x2,-0x3 0046 c5f9 | | Store 0x2,-0x7 0047 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0xb = 0x47,0x5 0048 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0049 e5f9 | | Load 0x2,-0x7 004a 4806 |H | Short_Literal 0x6 004b 85fc | | Call 0x2,-0x4 004c c5f9 | | Store 0x2,-0x7 004d c403 | | Store 0x2,0x3 004e e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xc = 0x4e,0x6 004f 6859 |hY | Jump_Zero 0xa9 0050 00cf | | Action Mark_Auxiliary 0051 0007 | | Action Break_Optional ; Debug Table 0x2.0xd = 0x51,0x7 0052 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xe = 0x52,0x8 0053 8408 | | Call 0x2,0x8 0054 a404 | | Store_Unchecked 0x2,0x4 0055 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0xf = 0x55,0x9 0056 6851 |hQ | Jump_Zero 0xa8 0057 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x10 = 0x57,0xa 0058 0a01 | | Execute_Immediate Plus,0x1 0059 c403 | | Store 0x2,0x3 005a e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x11 = 0x5a,0xb 005b 8408 | | Call 0x2,0x8 005c a405 | | Store_Unchecked 0x2,0x5 005d e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x12 = 0x5d,0xc 005e e20e | | Load 0x1,0xe 005f 0260 | ` | Execute Discrete,In_Type 0060 6809 |h | Jump_Zero 0x6a 0061 e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x13 = 0x61,0xd 0062 6061 |`a | Indirect_Literal Discrete,0xc4,{0xffffffff, 0xffffa000} 0063 0273 | s | Execute Discrete,Plus 0064 e404 | | Load 0x2,0x4 0065 0273 | s | Execute Discrete,Plus 0066 0248 | H | Execute Discrete,Check_In_Integer 0067 0a01 | | Execute_Immediate Plus,0x1 0068 c406 | | Store 0x2,0x6 0069 780d |x | Jump 0x77 006a e405 | | Load 0x2,0x5 ; Debug Table 0x2.0x14 = 0x6a,0xe 006b 0fa2 | | Execute_Immediate Equal,-0x5e 006c 6808 |h | Jump_Zero 0x75 006d e404 | | Load 0x2,0x4 ; Debug Table 0x2.0x15 = 0x6d,0xf 006e 0a01 | | Execute_Immediate Plus,0x1 006f e002 | | Load 0x0,0x2 0070 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0071 025b | [ | Execute Discrete,Check_In_Type 0072 8408 | | Call 0x2,0x8 0073 a406 | | Store_Unchecked 0x2,0x6 0074 7802 |x | Jump 0x77 0075 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x2.0x16 = 0x75,0x10 0076 0257 | W | Execute Discrete,Raise 0077 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x17 = 0x77,0x11 0078 4803 |H | Short_Literal 0x3 0079 0279 | y | Execute Discrete,And 007a 6802 |h | Jump_Zero 0x7d 007b 4887 |H | Short_Literal 0x87 007c 0257 | W | Execute Discrete,Raise 007d 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x18 = 0x7d,0x12 007e 8408 | | Call 0x2,0x8 007f 0910 | | Execute_Immediate Binary_Scale,0x10 0080 0248 | H | Execute Discrete,Check_In_Integer 0081 e406 | | Load 0x2,0x6 0082 0a01 | | Execute_Immediate Plus,0x1 0083 e002 | | Load 0x0,0x2 0084 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0085 025b | [ | Execute Discrete,Check_In_Type 0086 8408 | | Call 0x2,0x8 0087 0273 | s | Execute Discrete,Plus 0088 e003 | | Load 0x0,0x3 0089 1b16 | | Execute Package,Field_Read,Field_Number 0x16 008a 025b | [ | Execute Discrete,Check_In_Type 008b 85fe | | Call 0x2,-0x2 008c 00e4 | | Load_Encached Positive_Cache 008d 025b | [ | Execute Discrete,Check_In_Type 008e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 008f e5f9 | | Load 0x2,-0x7 ; Debug Table 0x2.0x19 = 0x8f,0x13 0090 00db | | Load_Top At_Offset_3 0091 09f0 | | Execute_Immediate Binary_Scale,-0x10 0092 e002 | | Load 0x0,0x2 0093 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0094 025b | [ | Execute Discrete,Check_In_Type 0095 e406 | | Load 0x2,0x6 0096 85fd | | Call 0x2,-0x3 0097 c5f9 | | Store 0x2,-0x7 0098 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x2.0x1a = 0x98,0x14 0099 00db | | Load_Top At_Offset_3 009a 6025 |`% | Indirect_Literal Discrete,0xc0,{0x00000000, 0x0000ffff} 009b 0279 | y | Execute Discrete,And 009c e002 | | Load 0x0,0x2 009d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 009e 025b | [ | Execute Discrete,Check_In_Type 009f e406 | | Load 0x2,0x6 00a0 0a01 | | Execute_Immediate Plus,0x1 00a1 e002 | | Load 0x0,0x2 00a2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00a3 025b | [ | Execute Discrete,Check_In_Type 00a4 85fd | | Call 0x2,-0x3 00a5 c5f9 | | Store 0x2,-0x7 00a6 00c9 | | Action Pop_Auxiliary_Loop 00a7 7faa | | Jump 0x52 00a8 00ce | | Action Pop_Auxiliary 00a9 4507 |E | Exit_Suprogram New_Top_Offset 0x7 00aa 0000 0000 | | .BLANK 0000[0x6] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b5 | | .CONST 0x00b5 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0002 | | .CONST 0x0002 ; Number of locals 00b3 INIT_00b0: 00b3 e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x00b3,0x014a,0x0802,0x0002,0x005a,0x3ce5,0x0000,0x0068 ; Debug Table 0x3.0x0 = 0xb3,0xffff 00b4 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00b5 BODY_00b0: 00b5 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x1 = 0xb5,0x1 00b6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00b7 e5f9 | | Load 0x2,-0x7 00b8 e7ff | | Load 0x3,-0x1 00b9 85fc | | Call 0x2,-0x4 00ba c5f9 | | Store 0x2,-0x7 00bb 0059 | Y | Store_Top Discrete,At_Offset_1 00bc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0xbc,0x2 00bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00be 0000 0000 | | .XXX[0x2] 00c0 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00c4 ffff ffff | | .LITERAL {0xffffffff, 0xffffa000} 00c8 0000 0000 | | .LITERAL {0x00000000, 0x00008000} 00cc 0000 0000 | | .LITERAL {0x00000000, 0x000067ff} 00d0 0000 0000 | | .LITERAL {0x00000000, 0x00006000} 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; Debug Table 00d8 ; -------------------------------------------------------------------------------------- 00d8 0003 0004 | | .CONST 0x0003,0x0004 00da 000b 00fa | | .DEBUG 0x000b,0x00fa,0x8000,0x0000,0x005a,0x3c95,0x0000,0x0009 00e2 0011 0104 | | .DEBUG 0x0011,0x0104,0x8000,0x0000,0x005a,0x3ce5,0x0000,0x0005 00ea 0023 0112 | # | .DEBUG 0x0023,0x0112,0x2801,0x0002,0x005a,0x3c95,0x0000,0x001d 00f2 00b3 014a | J| .DEBUG 0x00b3,0x014a,0x0802,0x0002,0x005a,0x3ce5,0x0000,0x0068 00fa ; -------------------------------------------------------------------------------------- 00fa ; Debug3 Subtable 0x0 00fa ; -------------------------------------------------------------------------------------- 00fa 0004 0000 | | .DBG3TAB 0x0004,0x0000 00fc 000b ffff | | .CONST 0x000b,0xffff 00fe 000c fffe | | .CONST 0x000c,0xfffe 0100 000d fffd | | .CONST 0x000d,0xfffd 0102 000e fffc | | .CONST 0x000e,0xfffc 0104 ; -------------------------------------------------------------------------------------- 0104 ; Debug3 Subtable 0x1 0104 ; -------------------------------------------------------------------------------------- 0104 0006 0000 | | .DBG3TAB 0x0006,0x0000 0106 0011 ffff | | .CONST 0x0011,0xffff 0108 0012 fffe | | .CONST 0x0012,0xfffe 010a 0013 fffd | | .CONST 0x0013,0xfffd 010c 0014 fffc | | .CONST 0x0014,0xfffc 010e 0019 fffb | | .CONST 0x0019,0xfffb 0110 001a fffa | | .CONST 0x001a,0xfffa 0112 ; -------------------------------------------------------------------------------------- 0112 ; Debug3 Subtable 0x2 0112 ; -------------------------------------------------------------------------------------- 0112 0007 0014 | | .DBG3TAB 0x0007,0x0014 0114 0023 ffff | # | .CONST 0x0023,0xffff 0116 0025 fffe | % | .CONST 0x0025,0xfffe 0118 0027 fffd | ' | .CONST 0x0027,0xfffd 011a 0029 fffc | ) | .CONST 0x0029,0xfffc 011c 002b fffb | + | .CONST 0x002b,0xfffb 011e 002d fffa | - | .CONST 0x002d,0xfffa 0120 002e fff9 | . | .CONST 0x002e,0xfff9 0122 0030 0001 | 0 | .CONST 0x0030,0x0001 0124 0032 0002 | 2 | .CONST 0x0032,0x0002 0126 0039 0003 | 9 | .CONST 0x0039,0x0003 0128 003d 0004 | = | .CONST 0x003d,0x0004 012a 0047 0005 | G | .CONST 0x0047,0x0005 012c 004e 0006 | N | .CONST 0x004e,0x0006 012e 0051 0007 | Q | .CONST 0x0051,0x0007 0130 0052 0008 | R | .CONST 0x0052,0x0008 0132 0055 0009 | U | .CONST 0x0055,0x0009 0134 0057 000a | W | .CONST 0x0057,0x000a 0136 005a 000b | Z | .CONST 0x005a,0x000b 0138 005d 000c | ] | .CONST 0x005d,0x000c 013a 0061 000d | a | .CONST 0x0061,0x000d 013c 006a 000e | j | .CONST 0x006a,0x000e 013e 006d 000f | m | .CONST 0x006d,0x000f 0140 0075 0010 | u | .CONST 0x0075,0x0010 0142 0077 0011 | w | .CONST 0x0077,0x0011 0144 007d 0012 | } | .CONST 0x007d,0x0012 0146 008f 0013 | | .CONST 0x008f,0x0013 0148 0098 0014 | | .CONST 0x0098,0x0014 014a ; -------------------------------------------------------------------------------------- 014a ; Debug3 Subtable 0x3 014a ; -------------------------------------------------------------------------------------- 014a 0001 0002 | | .DBG3TAB 0x0001,0x0002 014c 00b3 ffff | | .CONST 0x00b3,0xffff 014e 00b5 0001 | | .CONST 0x00b5,0x0001 0150 00bc 0002 | | .CONST 0x00bc,0x0002 0152 0000 0000 | | .BLANK 0000[0xae]