|
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 0100 | | .CONST 0x0100 ; 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 0040 | @ | .CONST 0x0040 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b e20e | | Load 0x1,0xe 000c 03d8 | | Declare_Variable Float,Duplicate 000d 03d8 | | Declare_Variable Float,Duplicate 000e 03d8 | | Declare_Variable Float,Duplicate 000f 03d8 | | Declare_Variable Float,Duplicate 0010 e20e | | Load 0x1,0xe 0011 03d8 | | Declare_Variable Float,Duplicate 0012 03d8 | | Declare_Variable Float,Duplicate 0013 e22c | , | Load 0x1,0x2c 0014 03e9 | | Declare_Variable Discrete,Duplicate 0015 03e9 | | Declare_Variable Discrete,Duplicate 0016 03e9 | | Declare_Variable Discrete,Duplicate 0017 4ffd |O | Short_Literal -0x3 0018 4803 |H | Short_Literal 0x3 0019 e20e | | Load 0x1,0xe 001a 02a0 | | Declare_Subprogram Null_Subprogram 001b 4801 |H | Short_Literal 0x1 001c 035d | ] | Declare_Type Array,Defined 001d 00d8 | | Load_Top At_Offset_0 001e 0337 | 7 | Declare_Variable Array 001f 00d8 | | Load_Top At_Offset_0 0020 0335 | 5 | Declare_Variable Array,Duplicate 0021 00cd | | Action Spare6_Action 0022 58d5 |X | Indirect_Literal Float,0xf8,0.125 0023 4ffd |O | Short_Literal -0x3 0024 00da | | Load_Top At_Offset_2 0025 01d6 | | Execute Vector,Field_Write 0026 58cd |X | Indirect_Literal Float,0xf4,0.25 0027 4ffe |O | Short_Literal -0x2 0028 00da | | Load_Top At_Offset_2 0029 01d6 | | Execute Vector,Field_Write 002a 58c5 |X | Indirect_Literal Float,0xf0,0.5 002b 4fff |O | Short_Literal -0x1 002c 00da | | Load_Top At_Offset_2 002d 01d6 | | Execute Vector,Field_Write 002e 58bd |X | Indirect_Literal Float,0xec,1.0 002f 4800 |H | Short_Literal 0x0 0030 00da | | Load_Top At_Offset_2 0031 01d6 | | Execute Vector,Field_Write 0032 58b5 |X | Indirect_Literal Float,0xe8,2.0 0033 4801 |H | Short_Literal 0x1 0034 00da | | Load_Top At_Offset_2 0035 01d6 | | Execute Vector,Field_Write 0036 58ad |X | Indirect_Literal Float,0xe4,4.0 0037 4802 |H | Short_Literal 0x2 0038 00da | | Load_Top At_Offset_2 0039 01d6 | | Execute Vector,Field_Write 003a 58a5 |X | Indirect_Literal Float,0xe0,8.0 003b 4803 |H | Short_Literal 0x3 003c 00da | | Load_Top At_Offset_2 003d 01d6 | | Execute Vector,Field_Write 003e 00d9 | | Load_Top At_Offset_1 003f 01d4 | | Execute Vector,Structure_Write 0040 BODY_0008: 0040 e5ff | | Load 0x2,-0x1 0041 c402 | | Store 0x2,0x2 0042 e20e | | Load 0x1,0xe 0043 0122 | " | Execute Any,Make_Root_Type 0044 1c01 | | Execute_Immediate Run_Utility,0x1 0045 005b | [ | Store_Top Discrete,At_Offset_3 0046 5895 |X | Indirect_Literal Float,0xdc,6.0 0047 00db | | Load_Top At_Offset_3 0048 0237 | 7 | Execute Float,Convert_From_Discrete 0049 e20e | | Load 0x1,0xe 004a 0238 | 8 | Execute Float,Convert 004b 023b | ; | Execute Float,Times 004c 588b |X | Indirect_Literal Float,0xd8,0.6931471805599453 004d 023b | ; | Execute Float,Times 004e 023f | ? | Execute Float,Unary_Minus 004f c408 | | Store 0x2,0x8 0050 e402 | | Load 0x2,0x2 0051 e408 | | Load 0x2,0x8 0052 0244 | D | Execute Float,Less 0053 6804 |h | Jump_Zero 0x58 0054 587f |X | Indirect_Literal Float,0xd4,-1.0 0055 e20e | | Load 0x1,0xe 0056 0232 | 2 | Execute Float,Check_In_Type 0057 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0058 e402 | | Load 0x2,0x2 0059 023e | > | Execute Float,Absolute_Value 005a 5875 |Xu | Indirect_Literal Float,0xd0,0.010830424696249145 005b 0244 | D | Execute Float,Less 005c 680c |h | Jump_Zero 0x69 005d 586e |Xn | Indirect_Literal Float,0xcc,0.0 005e c403 | | Store 0x2,0x3 005f e403 | | Load 0x2,0x3 0060 e20e | | Load 0x1,0xe 0061 0232 | 2 | Execute Float,Check_In_Type 0062 e402 | | Load 0x2,0x2 0063 e20e | | Load 0x1,0xe 0064 0232 | 2 | Execute Float,Check_In_Type 0065 824d | M | Call 0x1,0x4d 0066 e20e | | Load 0x1,0xe 0067 0232 | 2 | Execute Float,Check_In_Type 0068 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0069 e20e | | Load 0x1,0xe 006a 00d8 | | Load_Top At_Offset_0 006b e22c | , | Load 0x1,0x2c 006c e402 | | Load 0x2,0x2 006d e20e | | Load 0x1,0xe 006e 0232 | 2 | Execute Float,Check_In_Type 006f 824e | N | Call 0x1,0x4e 0070 c40a | | Store 0x2,0xa 0071 c404 | | Store 0x2,0x4 0072 c405 | | Store 0x2,0x5 0073 e40a | | Load 0x2,0xa 0074 a40b | | Store_Unchecked 0x2,0xb 0075 e404 | | Load 0x2,0x4 0076 c406 | | Store 0x2,0x6 0077 e405 | | Load 0x2,0x5 0078 c407 | | Store 0x2,0x7 0079 7800 |x | Jump 0x7a 007a e40a | | Load 0x2,0xa 007b 7007 |p | Jump_Nonzero 0x83 007c e406 | | Load 0x2,0x6 007d 586e |Xn | Indirect_Literal Float,0xec,1.0 007e 023c | < | Execute Float,Minus 007f e407 | | Load 0x2,0x7 0080 023d | = | Execute Float,Plus 0081 c409 | | Store 0x2,0x9 0082 7845 |xE | Jump 0xc8 0083 e40a | | Load 0x2,0xa 0084 0274 | t | Execute Discrete,Absolute_Value 0085 00db | | Load_Top At_Offset_3 0086 027a | z | Execute Discrete,Less_Equal 0087 6815 |h | Jump_Zero 0x9d 0088 e40b | | Load 0x2,0xb 0089 e407 | | Load 0x2,0x7 008a e20e | | Load 0x1,0xe 008b 0232 | 2 | Execute Float,Check_In_Type 008c e00a | | Load 0x0,0xa 008d e230 | 0 | Load 0x1,0x30 008e 0096 | | Execute Package,Entry 008f c409 | | Store 0x2,0x9 0090 e40b | | Load 0x2,0xb 0091 e406 | | Load 0x2,0x6 0092 e20e | | Load 0x1,0xe 0093 0232 | 2 | Execute Float,Check_In_Type 0094 e00a | | Load 0x0,0xa 0095 e230 | 0 | Load 0x1,0x30 0096 0096 | | Execute Package,Entry 0097 5854 |XT | Indirect_Literal Float,0xec,1.0 0098 023c | < | Execute Float,Minus 0099 e409 | | Load 0x2,0x9 009a 023d | = | Execute Float,Plus 009b c409 | | Store 0x2,0x9 009c 782b |x+ | Jump 0xc8 009d e40a | | Load 0x2,0xa 009e 00db | | Load_Top At_Offset_3 009f 0275 | u | Execute Discrete,Unary_Minus 00a0 027c | | | Execute Discrete,Less 00a1 680f |h | Jump_Zero 0xb1 00a2 e406 | | Load 0x2,0x6 00a3 e407 | | Load 0x2,0x7 00a4 023d | = | Execute Float,Plus 00a5 c409 | | Store 0x2,0x9 00a6 e40b | | Load 0x2,0xb 00a7 e409 | | Load 0x2,0x9 00a8 e20e | | Load 0x1,0xe 00a9 0232 | 2 | Execute Float,Check_In_Type 00aa e00a | | Load 0x0,0xa 00ab e230 | 0 | Load 0x1,0x30 00ac 0096 | | Execute Package,Entry 00ad 583e |X> | Indirect_Literal Float,0xec,1.0 00ae 023c | < | Execute Float,Minus 00af c409 | | Store 0x2,0x9 00b0 7817 |x | Jump 0xc8 00b1 e407 | | Load 0x2,0x7 00b2 e40b | | Load 0x2,0xb 00b3 0275 | u | Execute Discrete,Unary_Minus 00b4 5837 |X7 | Indirect_Literal Float,0xec,1.0 00b5 e20e | | Load 0x1,0xe 00b6 0232 | 2 | Execute Float,Check_In_Type 00b7 e00a | | Load 0x0,0xa 00b8 e230 | 0 | Load 0x1,0x30 00b9 0096 | | Execute Package,Entry 00ba 023c | < | Execute Float,Minus 00bb c409 | | Store 0x2,0x9 00bc e406 | | Load 0x2,0x6 00bd e409 | | Load 0x2,0x9 00be 023d | = | Execute Float,Plus 00bf c409 | | Store 0x2,0x9 00c0 e40b | | Load 0x2,0xb 00c1 e409 | | Load 0x2,0x9 00c2 e20e | | Load 0x1,0xe 00c3 0232 | 2 | Execute Float,Check_In_Type 00c4 e00a | | Load 0x0,0xa 00c5 e230 | 0 | Load 0x1,0x30 00c6 0096 | | Execute Package,Entry 00c7 c409 | | Store 0x2,0x9 00c8 e409 | | Load 0x2,0x9 00c9 e20e | | Load 0x1,0xe 00ca 0232 | 2 | Execute Float,Check_In_Type 00cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00cc 0000 0000 | | .DBL 0.0 00ce 0000 0000 | | 00d0 3f86 2e42 |? .B| .DBL 0.010830424696249145 00d2 fefa 39ef | 9 | 00d4 bff0 0000 | | .DBL -1.0 00d6 0000 0000 | | 00d8 3fe6 2e42 |? .B| .DBL 0.6931471805599453 00da fefa 39ef | 9 | 00dc 4018 0000 |@ | .DBL 6.0 00de 0000 0000 | | 00e0 4020 0000 |@ | .DBL 8.0 00e2 0000 0000 | | 00e4 4010 0000 |@ | .DBL 4.0 00e6 0000 0000 | | 00e8 4000 0000 |@ | .DBL 2.0 00ea 0000 0000 | | 00ec 3ff0 0000 |? | .DBL 1.0 00ee 0000 0000 | | 00f0 3fe0 0000 |? | .DBL 0.5 00f2 0000 0000 | | 00f4 3fd0 0000 |? | .DBL 0.25 00f6 0000 0000 | | 00f8 3fc0 0000 |? | .DBL 0.125 00fa 0000 0000 | | 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; Debug Table 0100 ; -------------------------------------------------------------------------------------- 0100 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf27e,0x0000,0x0001,0x0001 0106 000b 010a | | .DBG4T 0x000b,0x010a,0x1002,0x4000 010a ; -------------------------------------------------------------------------------------- 010a ; Debug chain 010a ; -------------------------------------------------------------------------------------- 010a 0004 0018 | | .DBGLEN 0x0004,0x0018 010c 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0013,0x0017,0x0040,0x0042,0x0046,0x0050,0x0054,0x0058,0x005d,0x005f,0x0069,0x0073,0x0075,0x0077,0x007a,0x007c,0x0083,0x0088,0x0090,0x009d,0x00a2,0x00a6,0x00b1,0x00bc,0x00c0,0x00c8 0128 0001 0002 | | .XXX[0x18] 012a 0003 0004 | | 012c 0005 0006 | | 012e 0007 0008 | | 0130 0009 000b | | 0132 000c 000d | | 0134 0012 0013 | | 0136 0014 0015 | | 0138 0016 0017 | | 013a 0018 0019 | | 013c 001a 001b | | 013e 001c 001d | | 0140 0000 0000 | | .BLANK 0000[0xc0]