|
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, 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 001b | | .CONST 0x001b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000d | | .CONST 0x000d ; 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 03d8 | | Declare_Variable Float,Duplicate 0011 03d8 | | Declare_Variable Float,Duplicate 0012 03d8 | | Declare_Variable Float,Duplicate 0013 e22c | , | Load 0x1,0x2c 0014 03e9 | | Declare_Variable Discrete,Duplicate 0015 58c2 |X | Indirect_Literal Float,0xd8,0.693115234375 0016 e20e | | Load 0x1,0xe 0017 02bf | | Declare_Variable Float,With_Value,With_Constraint 0018 58bb |X | Indirect_Literal Float,0xd4,3.1946184945309415e-05 0019 e20e | | Load 0x1,0xe 001a 02bf | | Declare_Variable Float,With_Value,With_Constraint 001b BODY_0008: 001b e5ff | | Load 0x2,-0x1 001c 0149 | I | Execute Float,Less_Equal_Zero 001d 6802 |h | Jump_Zero 0x20 001e e006 | | Load 0x0,0x6 001f 0257 | W | Execute Discrete,Raise 0020 e5ff | | Load 0x2,-0x1 0021 c402 | | Store 0x2,0x2 0022 e402 | | Load 0x2,0x2 0023 58ac |X | Indirect_Literal Float,0xd0,0.9394121170043945 0024 0243 | C | Execute Float,Greater_Equal 0025 e402 | | Load 0x2,0x2 0026 58a5 |X | Indirect_Literal Float,0xcc,1.0644950866699219 0027 0242 | B | Execute Float,Less_Equal 0028 0279 | y | Execute Discrete,And 0029 681b |h | Jump_Zero 0x45 002a e402 | | Load 0x2,0x2 002b 589c |X | Indirect_Literal Float,0xc8,1.0 002c 0243 | C | Execute Float,Greater_Equal 002d 6805 |h | Jump_Zero 0x33 002e e402 | | Load 0x2,0x2 002f 5898 |X | Indirect_Literal Float,0xc8,1.0 0030 023c | < | Execute Float,Minus 0031 c402 | | Store 0x2,0x2 0032 7808 |x | Jump 0x3b 0033 e402 | | Load 0x2,0x2 0034 588f |X | Indirect_Literal Float,0xc4,0.5 0035 023c | < | Execute Float,Minus 0036 c402 | | Store 0x2,0x2 0037 e402 | | Load 0x2,0x2 0038 588b |X | Indirect_Literal Float,0xc4,0.5 0039 023c | < | Execute Float,Minus 003a c402 | | Store 0x2,0x2 003b 5884 |X | Indirect_Literal Float,0xc0,0.0 003c c5fe | | Store 0x2,-0x2 003d e402 | | Load 0x2,0x2 003e e20e | | Load 0x1,0xe 003f 0232 | 2 | Execute Float,Check_In_Type 0040 8249 | I | Call 0x1,0x49 0041 c5fd | | Store 0x2,-0x3 0042 587d |X} | Indirect_Literal Float,0xc0,0.0 0043 c5fc | | Store 0x2,-0x4 0044 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0045 e230 | 0 | Load 0x1,0x30 0046 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0047 e230 | 0 | Load 0x1,0x30 0048 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0049 e402 | | Load 0x2,0x2 004a e20e | | Load 0x1,0xe 004b 0232 | 2 | Execute Float,Check_In_Type 004c e009 | | Load 0x0,0x9 004d e230 | 0 | Load 0x1,0x30 004e 0096 | | Execute Package,Entry 004f c403 | | Store 0x2,0x3 0050 005b | [ | Store_Top Discrete,At_Offset_3 0051 00da | | Load_Top At_Offset_2 0052 0237 | 7 | Execute Float,Convert_From_Discrete 0053 e20e | | Load 0x1,0xe 0054 0238 | 8 | Execute Float,Convert 0055 c407 | | Store 0x2,0x7 0056 780f |x | Jump 0x66 0057 e403 00d8 | | .XXX[0xf] 0059 023d c403 | = | 005b e407 586b | Xk| 005d 023c c407 | < | 005f 00c9 e403 | | 0061 5862 0244 |Xb D| 0063 77f3 00ce |w | 0065 7800 |x | 0066 5851 |XQ | Indirect_Literal Float,0xb8,128.0 0067 e403 | | Load 0x2,0x3 0068 023b | ; | Execute Float,Times 0069 0235 | 5 | Execute Float,Round_To_Discrete 006a e22c | , | Load 0x1,0x2c 006b 025e | ^ | Execute Discrete,Convert 006c a40a | | Store_Unchecked 0x2,0xa 006d 00db | | Load_Top At_Offset_3 006e 0237 | 7 | Execute Float,Convert_From_Discrete 006f e20e | | Load 0x1,0xe 0070 0238 | 8 | Execute Float,Convert 0071 5842 |XB | Indirect_Literal Float,0xb4,0.0078125 0072 023b | ; | Execute Float,Times 0073 c404 | | Store 0x2,0x4 0074 e403 | | Load 0x2,0x3 0075 e404 | | Load 0x2,0x4 0076 0243 | C | Execute Float,Greater_Equal 0077 6805 |h | Jump_Zero 0x7d 0078 e403 | | Load 0x2,0x3 0079 e404 | | Load 0x2,0x4 007a 023c | < | Execute Float,Minus 007b c408 | | Store 0x2,0x8 007c 780a |x | Jump 0x87 007d e404 | | Load 0x2,0x4 007e 5845 |XE | Indirect_Literal Float,0xc4,0.5 007f 023b | ; | Execute Float,Times 0080 c405 | | Store 0x2,0x5 0081 e403 | | Load 0x2,0x3 0082 e405 | | Load 0x2,0x5 0083 023c | < | Execute Float,Minus 0084 e405 | | Load 0x2,0x5 0085 023c | < | Execute Float,Minus 0086 c408 | | Store 0x2,0x8 0087 e404 | | Load 0x2,0x4 0088 00d8 | | Load_Top At_Offset_0 0089 023d | = | Execute Float,Plus 008a c404 | | Store 0x2,0x4 008b e408 | | Load 0x2,0x8 008c 00d8 | | Load_Top At_Offset_0 008d 023d | = | Execute Float,Plus 008e c405 | | Store 0x2,0x5 008f e407 | | Load 0x2,0x7 0090 5837 |X7 | Indirect_Literal Float,0xc8,1.0 0091 023c | < | Execute Float,Minus 0092 c407 | | Store 0x2,0x7 0093 e405 | | Load 0x2,0x5 0094 e404 | | Load 0x2,0x4 0095 e408 | | Load 0x2,0x8 0096 023d | = | Execute Float,Plus 0097 023a | : | Execute Float,Divide 0098 c406 | | Store 0x2,0x6 0099 e406 | | Load 0x2,0x6 009a e20e | | Load 0x1,0xe 009b 0232 | 2 | Execute Float,Check_In_Type 009c 824a | J | Call 0x1,0x4a 009d c409 | | Store 0x2,0x9 009e e407 | | Load 0x2,0x7 009f c5fe | | Store 0x2,-0x2 00a0 4800 |H | Short_Literal 0x0 00a1 e40a | | Load 0x2,0xa 00a2 e244 | D | Load 0x1,0x44 00a3 01a7 | | Execute Matrix,Field_Read 00a4 c5fd | | Store 0x2,-0x3 00a5 e406 | | Load 0x2,0x6 00a6 4801 |H | Short_Literal 0x1 00a7 e40a | | Load 0x2,0xa 00a8 e244 | D | Load 0x1,0x44 00a9 01a7 | | Execute Matrix,Field_Read 00aa e406 | | Load 0x2,0x6 00ab e409 | | Load 0x2,0x9 00ac 023b | ; | Execute Float,Times 00ad 023d | = | Execute Float,Plus 00ae 023d | = | Execute Float,Plus 00af c5fc | | Store 0x2,-0x4 00b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00b1 0000 0000 | | .XXX[0x3] 00b3 0000 | | 00b4 3f80 0000 |? | .DBL 0.0078125 00b6 0000 0000 | | 00b8 4060 0000 |@` | .DBL 128.0 00ba 0000 0000 | | 00bc 4010 0000 |@ | .XXX[0x4] 00be 0000 0000 | | 00c0 0000 0000 | | .DBL 0.0 00c2 0000 0000 | | 00c4 3fe0 0000 |? | .DBL 0.5 00c6 0000 0000 | | 00c8 3ff0 0000 |? | .DBL 1.0 00ca 0000 0000 | | 00cc 3ff1 082c |? ,| .DBL 1.0644950866699219 00ce 0000 0000 | | 00d0 3fee 0faa |? | .DBL 0.9394121170043945 00d2 0000 0000 | | 00d4 3f00 bfbe |? | .DBL 3.1946184945309415e-05 00d6 8e7b cd5e | { ^| 00d8 3fe6 2e00 |? . | .DBL 0.693115234375 00da 0000 0000 | | 00dc 0000 0000 | | .BLANK 0000[0x4] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug Table 00e0 ; -------------------------------------------------------------------------------------- 00e0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf28b,0x0000,0x0001,0x0001 00e6 000b 00ea | | .DBG4T 0x000b,0x00ea,0x1001,0xc000 00ea ; -------------------------------------------------------------------------------------- 00ea ; Debug chain 00ea ; -------------------------------------------------------------------------------------- 00ea 0004 0021 | !| .DBGLEN 0x0004,0x0021 00ec 000b 0013 | | .DBGLNO 0x000b,0x0013,0x0015,0x0018,0x001b,0x001e,0x0020,0x0022,0x002a,0x002e,0x0033,0x0037,0x003b,0x003d,0x0042,0x0044,0x0045,0x0051,0x0056,0x0057,0x005b,0x0060,0x0066,0x006d,0x0074,0x0078,0x007d,0x0081,0x0087,0x008b,0x008f,0x0093,0x0099,0x009e,0x00a0,0x00a5,0x00b0 0111 0001 0002 | | .XXX[0x25] 0113 0005 0006 | | 0115 0001 0002 | | 0117 0003 0004 | | 0119 0005 0006 | | 011b 0007 0008 | | 011d 0009 000a | | 011f 000b 000c | | 0121 000d 000e | | 0123 000f 0012 | | 0125 0013 0011 | | 0127 0016 0017 | | 0129 0018 0019 | | 012b 001a 001b | | 012d 001c 001d | | 012f 001e 001f | | 0131 0020 0021 | !| 0133 0022 0023 | " #| 0135 0024 | $ | 0136 0000 0000 | | .BLANK 0000[0xca]