|
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_03bcfe
└─⟦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 00e0 | | .CONST 0x00e0 ; 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 0056 | V | .CONST 0x0056 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b e20e | | Load 0x1,0xe 000c 0007 | | Action Break_Optional 000d 00d8 | | Load_Top At_Offset_0 000e 03d8 | | Declare_Variable Float,Duplicate 000f 03d8 | | Declare_Variable Float,Duplicate 0010 03d8 | | Declare_Variable Float,Duplicate 0011 e22c | , | Load 0x1,0x2c 0012 03e9 | | Declare_Variable Discrete,Duplicate 0013 58c4 |X | Indirect_Literal Float,0xd8,0.6931471805599453 0014 e20e | | Load 0x1,0xe 0015 02bf | | Declare_Variable Float,With_Value,With_Constraint 0016 4806 |H | Short_Literal 0x6 0017 e20e | | Load 0x1,0xe 0018 0122 | " | Execute Any,Make_Root_Type 0019 1c01 | | Execute_Immediate Run_Utility,0x1 001a 0271 | q | Execute Discrete,Times 001b 0237 | 7 | Execute Float,Convert_From_Discrete 001c e20e | | Load 0x1,0xe 001d 0238 | 8 | Execute Float,Convert 001e 4ffd |O | Short_Literal -0x3 001f 4803 |H | Short_Literal 0x3 0020 e20e | | Load 0x1,0xe 0021 02a0 | | Declare_Subprogram Null_Subprogram 0022 4801 |H | Short_Literal 0x1 0023 035d | ] | Declare_Type Array,Defined 0024 00d8 | | Load_Top At_Offset_0 0025 0337 | 7 | Declare_Variable Array 0026 00d8 | | Load_Top At_Offset_0 0027 0335 | 5 | Declare_Variable Array,Duplicate 0028 00cd | | Action Spare6_Action 0029 58aa |X | Indirect_Literal Float,0xd4,0.125 002a 4ffd |O | Short_Literal -0x3 002b 00da | | Load_Top At_Offset_2 002c 01d6 | | Execute Vector,Field_Write 002d 58a2 |X | Indirect_Literal Float,0xd0,0.25 002e 4ffe |O | Short_Literal -0x2 002f 00da | | Load_Top At_Offset_2 0030 01d6 | | Execute Vector,Field_Write 0031 589a |X | Indirect_Literal Float,0xcc,0.5 0032 4fff |O | Short_Literal -0x1 0033 00da | | Load_Top At_Offset_2 0034 01d6 | | Execute Vector,Field_Write 0035 5892 |X | Indirect_Literal Float,0xc8,1.0 0036 4800 |H | Short_Literal 0x0 0037 00da | | Load_Top At_Offset_2 0038 01d6 | | Execute Vector,Field_Write 0039 588a |X | Indirect_Literal Float,0xc4,2.0 003a 4801 |H | Short_Literal 0x1 003b 00da | | Load_Top At_Offset_2 003c 01d6 | | Execute Vector,Field_Write 003d 5882 |X | Indirect_Literal Float,0xc0,4.0 003e 4802 |H | Short_Literal 0x2 003f 00da | | Load_Top At_Offset_2 0040 01d6 | | Execute Vector,Field_Write 0041 587a |Xz | Indirect_Literal Float,0xbc,8.0 0042 4803 |H | Short_Literal 0x3 0043 00da | | Load_Top At_Offset_2 0044 01d6 | | Execute Vector,Field_Write 0045 00d9 | | Load_Top At_Offset_1 0046 01d4 | | Execute Vector,Structure_Write 0047 5874 |Xt | Indirect_Literal Float,0xbc,8.0 0048 606f |`o | Indirect_Literal Discrete,0xb8,{0x00000000, 0x00000400} 0049 0237 | 7 | Execute Float,Convert_From_Discrete 004a e20e | | Load 0x1,0xe 004b 0238 | 8 | Execute Float,Convert 004c 023b | ; | Execute Float,Times 004d 5866 |Xf | Indirect_Literal Float,0xb4,0.6931471805999999 004e 023b | ; | Execute Float,Times 004f e20e | | Load 0x1,0xe 0050 02bf | | Declare_Variable Float,With_Value,With_Constraint 0051 00db | | Load_Top At_Offset_3 0052 5885 |X | Indirect_Literal Float,0xd8,0.6931471805599453 0053 023b | ; | Execute Float,Times 0054 e20e | | Load 0x1,0xe 0055 02bf | | Declare_Variable Float,With_Value,With_Constraint 0056 BODY_0008: 0056 e5ff | | Load 0x2,-0x1 0057 00d8 | | Load_Top At_Offset_0 0058 e20e | | Load 0x1,0xe 0059 0234 | 4 | Execute Float,In_Type 005a 7001 |p | Jump_Nonzero 0x5c 005b 0801 | | Execute_Immediate Raise,0x1 005c c403 | | Store 0x2,0x3 005d e403 | | Load 0x2,0x3 005e 023e | > | Execute Float,Absolute_Value 005f c404 | | Store 0x2,0x4 0060 e404 | | Load 0x2,0x4 0061 00da | | Load_Top At_Offset_2 0062 0243 | C | Execute Float,Greater_Equal 0063 6801 |h | Jump_Zero 0x65 0064 08e0 | | Execute_Immediate Raise,0xe0 0065 e20e | | Load 0x1,0xe 0066 00d8 | | Load_Top At_Offset_0 0067 e22c | , | Load 0x1,0x2c 0068 e404 | | Load 0x2,0x4 0069 e20e | | Load 0x1,0xe 006a 0232 | 2 | Execute Float,Check_In_Type 006b 824e | N | Call 0x1,0x4e 006c c407 | | Store 0x2,0x7 006d c405 | | Store 0x2,0x5 006e c406 | | Store 0x2,0x6 006f e407 | | Load 0x2,0x7 0070 0aff | | Execute_Immediate Plus,-0x1 0071 a407 | | Store_Unchecked 0x2,0x7 0072 e231 | 1 | Load 0x1,0x31 0073 0f02 | | Execute_Immediate Equal,0x2 0074 701a |p | Jump_Nonzero 0x8f 0075 e407 | | Load 0x2,0x7 0076 4804 |H | Short_Literal 0x4 0077 026f | o | Execute Discrete,Remainder 0078 a408 | | Store_Unchecked 0x2,0x8 0079 e407 | | Load 0x2,0x7 007a e408 | | Load 0x2,0x8 007b 0272 | r | Execute Discrete,Minus 007c 09fe | | Execute_Immediate Binary_Scale,-0x2 007d a407 | | Store_Unchecked 0x2,0x7 007e e405 | | Load 0x2,0x5 007f e408 | | Load 0x2,0x8 0080 e40c | | Load 0x2,0xc 0081 01d7 | | Execute Vector,Field_Read 0082 023b | ; | Execute Float,Times 0083 c405 | | Store 0x2,0x5 0084 e406 | | Load 0x2,0x6 0085 e408 | | Load 0x2,0x8 0086 e40c | | Load 0x2,0xc 0087 01d7 | | Execute Vector,Field_Read 0088 023b | ; | Execute Float,Times 0089 c406 | | Store 0x2,0x6 008a e405 | | Load 0x2,0x5 008b e406 | | Load 0x2,0x6 008c 023d | = | Execute Float,Plus 008d c403 | | Store 0x2,0x3 008e 7804 |x | Jump 0x93 008f e405 | | Load 0x2,0x5 0090 e406 | | Load 0x2,0x6 0091 023d | = | Execute Float,Plus 0092 c403 | | Store 0x2,0x3 0093 e407 | | Load 0x2,0x7 0094 e403 | | Load 0x2,0x3 0095 e20e | | Load 0x1,0xe 0096 0232 | 2 | Execute Float,Check_In_Type 0097 e00a | | Load 0x0,0xa 0098 e230 | 0 | Load 0x1,0x30 0099 0096 | | Execute Package,Entry 009a c402 | | Store 0x2,0x2 009b e404 | | Load 0x2,0x4 009c 00d9 | | Load_Top At_Offset_1 009d 0243 | C | Execute Float,Greater_Equal 009e 6807 |h | Jump_Zero 0xa6 009f e402 | | Load 0x2,0x2 00a0 00d8 | | Load_Top At_Offset_0 00a1 e20e | | Load 0x1,0xe 00a2 0234 | 4 | Execute Float,In_Type 00a3 7001 |p | Jump_Nonzero 0xa5 00a4 0801 | | Execute_Immediate Raise,0x1 00a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a6 e402 | | Load 0x2,0x2 00a7 5828 |X( | Indirect_Literal Float,0xd0,0.25 00a8 e402 | | Load 0x2,0x2 00a9 023a | : | Execute Float,Divide 00aa 023d | = | Execute Float,Plus 00ab 00d8 | | Load_Top At_Offset_0 00ac e20e | | Load 0x1,0xe 00ad 0234 | 4 | Execute Float,In_Type 00ae 7001 |p | Jump_Nonzero 0xb0 00af 0801 | | Execute_Immediate Raise,0x1 00b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b1 0000 0000 | | .XXX[0x3] 00b3 0000 | | 00b4 3fe6 2e42 |? .B| .DBL 0.6931471805999999 00b6 feff bb3b | ;| 00b8 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 00bc 4020 0000 |@ | .DBL 8.0 00be 0000 0000 | | 00c0 4010 0000 |@ | .DBL 4.0 00c2 0000 0000 | | 00c4 4000 0000 |@ | .DBL 2.0 00c6 0000 0000 | | 00c8 3ff0 0000 |? | .DBL 1.0 00ca 0000 0000 | | 00cc 3fe0 0000 |? | .DBL 0.5 00ce 0000 0000 | | 00d0 3fd0 0000 |? | .DBL 0.25 00d2 0000 0000 | | 00d4 3fc0 0000 |? | .DBL 0.125 00d6 0000 0000 | | 00d8 3fe6 2e42 |? .B| .DBL 0.6931471805599453 00da fefa 39ef | 9 | 00dc 0000 0000 | | .BLANK 0000[0x4] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug Table 00e0 ; -------------------------------------------------------------------------------------- 00e0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf272,0x0000,0x0001,0x0001 00e6 000b 00ea | | .DBG4T 0x000b,0x00ea,0x1002,0x4000 00ea ; -------------------------------------------------------------------------------------- 00ea ; Debug chain 00ea ; -------------------------------------------------------------------------------------- 00ea 0008 0011 | | .DBGLEN 0x0008,0x0011 00ec 000b 000d | | .DBGLNO 0x000b,0x000d,0x0011,0x0013,0x0016,0x001e,0x0047,0x0051,0x0056,0x005d,0x0060,0x0064,0x0065,0x006f,0x0072,0x0075,0x0079,0x007e,0x0084,0x008a,0x008f,0x0093,0x009b,0x009f,0x00a6 0105 0001 0002 | | .XXX[0x11] 0107 0003 0004 | | 0109 0005 0006 | | 010b 0007 0009 | | 010d 000a 000b | | 010f 000c 000d | | 0111 0008 000e | | 0113 000f 0010 | | 0115 0011 | | 0116 0000 0000 | | .BLANK 0000[0xea]