|
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 0098 | | .CONST 0x0098 ; 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 0016 | | .CONST 0x0016 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000c | | .CONST 0x000c ; 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 e22c | , | Load 0x1,0x2c 0012 03e9 | | Declare_Variable Discrete,Duplicate 0013 03e9 | | Declare_Variable Discrete,Duplicate 0014 03e9 | | Declare_Variable Discrete,Duplicate 0015 03e9 | | Declare_Variable Discrete,Duplicate 0016 BODY_0008: 0016 e5ff | | Load 0x2,-0x1 0017 c403 | | Store 0x2,0x3 0018 e403 | | Load 0x2,0x3 0019 5876 |Xv | Indirect_Literal Float,0x90,46.16624130844683 001a 023b | ; | Execute Float,Times 001b 0235 | 5 | Execute Float,Round_To_Discrete 001c e22c | , | Load 0x1,0x2c 001d 025e | ^ | Execute Discrete,Convert 001e a409 | | Store_Unchecked 0x2,0x9 001f 00db | | Load_Top At_Offset_3 0020 0274 | t | Execute Discrete,Absolute_Value 0021 4900 |I | Short_Literal 0x100 0022 027b | { | Execute Discrete,Greater_Equal 0023 6809 |h | Jump_Zero 0x2d 0024 00db | | Load_Top At_Offset_3 0025 483f |H? | Short_Literal 0x3f 0026 0279 | y | Execute Discrete,And 0027 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0028 00db | | Load_Top At_Offset_3 0029 00da | | Load_Top At_Offset_2 002a 0272 | r | Execute Discrete,Minus 002b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 002c 7804 |x | Jump 0x31 002d 4800 |H | Short_Literal 0x0 002e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 002f 00db | | Load_Top At_Offset_3 0030 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0031 00da | | Load_Top At_Offset_2 0032 0237 | 7 | Execute Float,Convert_From_Discrete 0033 e20e | | Load 0x1,0xe 0034 0238 | 8 | Execute Float,Convert 0035 e23d | = | Load 0x1,0x3d 0036 023b | ; | Execute Float,Times 0037 c407 | | Store 0x2,0x7 0038 e403 | | Load 0x2,0x3 0039 023e | > | Execute Float,Absolute_Value 003a e407 | | Load 0x2,0x7 003b 023e | > | Execute Float,Absolute_Value 003c 0243 | C | Execute Float,Greater_Equal 003d 6805 |h | Jump_Zero 0x43 003e e403 | | Load 0x2,0x3 003f e407 | | Load 0x2,0x7 0040 023c | < | Execute Float,Minus 0041 c404 | | Store 0x2,0x4 0042 780a |x | Jump 0x4d 0043 5848 |XH | Indirect_Literal Float,0x8c,0.5 0044 e407 | | Load 0x2,0x7 0045 023b | ; | Execute Float,Times 0046 c407 | | Store 0x2,0x7 0047 e403 | | Load 0x2,0x3 0048 e407 | | Load 0x2,0x7 0049 023c | < | Execute Float,Minus 004a e407 | | Load 0x2,0x7 004b 023c | < | Execute Float,Minus 004c c404 | | Store 0x2,0x4 004d 00d9 | | Load_Top At_Offset_1 004e 6809 |h | Jump_Zero 0x58 004f e404 | | Load 0x2,0x4 0050 00da | | Load_Top At_Offset_2 0051 0237 | 7 | Execute Float,Convert_From_Discrete 0052 e20e | | Load 0x1,0xe 0053 0238 | 8 | Execute Float,Convert 0054 e23d | = | Load 0x1,0x3d 0055 023b | ; | Execute Float,Times 0056 023c | < | Execute Float,Minus 0057 c404 | | Store 0x2,0x4 0058 00db | | Load_Top At_Offset_3 0059 0237 | 7 | Execute Float,Convert_From_Discrete 005a e20e | | Load 0x1,0xe 005b 0238 | 8 | Execute Float,Convert 005c e23e | > | Load 0x1,0x3e 005d 023b | ; | Execute Float,Times 005e 023f | ? | Execute Float,Unary_Minus 005f c405 | | Store 0x2,0x5 0060 00db | | Load_Top At_Offset_3 0061 481f |H | Short_Literal 0x1f 0062 0279 | y | Execute Discrete,And 0063 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0064 00db | | Load_Top At_Offset_3 0065 00d9 | | Load_Top At_Offset_1 0066 0272 | r | Execute Discrete,Minus 0067 09fb | | Execute_Immediate Binary_Scale,-0x5 0068 a5fe | | Store_Unchecked 0x2,-0x2 0069 e405 | | Load 0x2,0x5 006a e20e | | Load 0x1,0xe 006b 0232 | 2 | Execute Float,Check_In_Type 006c e404 | | Load 0x2,0x4 006d e20e | | Load 0x1,0xe 006e 0232 | 2 | Execute Float,Check_In_Type 006f 824d | M | Call 0x1,0x4d 0070 c406 | | Store 0x2,0x6 0071 4800 |H | Short_Literal 0x0 0072 00d9 | | Load_Top At_Offset_1 0073 e242 | B | Load 0x1,0x42 0074 01a7 | | Execute Matrix,Field_Read 0075 4801 |H | Short_Literal 0x1 0076 00da | | Load_Top At_Offset_2 0077 e242 | B | Load 0x1,0x42 0078 01a7 | | Execute Matrix,Field_Read 0079 023d | = | Execute Float,Plus 007a c402 | | Store 0x2,0x2 007b 4800 |H | Short_Literal 0x0 007c 00d9 | | Load_Top At_Offset_1 007d e242 | B | Load 0x1,0x42 007e 01a7 | | Execute Matrix,Field_Read 007f c5fd | | Store 0x2,-0x3 0080 4801 |H | Short_Literal 0x1 0081 00d9 | | Load_Top At_Offset_1 0082 e242 | B | Load 0x1,0x42 0083 01a7 | | Execute Matrix,Field_Read 0084 e402 | | Load 0x2,0x2 0085 e406 | | Load 0x2,0x6 0086 023b | ; | Execute Float,Times 0087 023d | = | Execute Float,Plus 0088 c5fc | | Store 0x2,-0x4 0089 4502 |E | Exit_Suprogram New_Top_Offset 0x2 008a 0000 0000 | | .XXX[0x2] 008c 3fe0 0000 |? | .DBL 0.5 008e 0000 0000 | | 0090 4047 1547 |@G G| .DBL 46.16624130844683 0092 652b 82fe |e+ | 0094 0000 0000 | | .BLANK 0000[0x4] 0098 ; -------------------------------------------------------------------------------------- 0098 ; Debug Table 0098 ; -------------------------------------------------------------------------------------- 0098 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf28a,0x0000,0x0001,0x0001 009e 000b 00a2 | | .DBG4T 0x000b,0x00a2,0x1001,0x8000 00a2 ; -------------------------------------------------------------------------------------- 00a2 ; Debug chain 00a2 ; -------------------------------------------------------------------------------------- 00a2 0002 0016 | | .DBGLEN 0x0002,0x0016 00a4 000b 0011 | | .DBGLNO 0x000b,0x0011,0x0016,0x0018,0x001f,0x0024,0x0028,0x002d,0x002f,0x0031,0x0038,0x003e,0x0043,0x0047,0x004d,0x004f,0x0058,0x0060,0x0064,0x0069,0x0071,0x007b,0x0080,0x0089 00bc 0001 0006 | | .XXX[0x2] 00be 0000 0000 | | .BLANK 0000[0x142]