|
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 0068 | h | .CONST 0x0068 ; 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 0008 | | .CONST 0x0008 ; Number of locals 000b INIT_0008: 000b e20e | | Load 0x1,0xe 000c 03d8 | | Declare_Variable Float,Duplicate 000d e20e | | Load 0x1,0xe 000e 03d8 | | Declare_Variable Float,Duplicate 000f 03d8 | | Declare_Variable Float,Duplicate 0010 584f |XO | Indirect_Literal Float,0x60,0.6931471805599453 0011 e20e | | Load 0x1,0xe 0012 02bf | | Declare_Variable Float,With_Value,With_Constraint 0013 5848 |XH | Indirect_Literal Float,0x5c,1.3862943611198906 0014 e20e | | Load 0x1,0xe 0015 02bf | | Declare_Variable Float,With_Value,With_Constraint 0016 BODY_0008: 0016 e5ff | | Load 0x2,-0x1 0017 00d8 | | Load_Top At_Offset_0 0018 e20e | | Load 0x1,0xe 0019 0234 | 4 | Execute Float,In_Type 001a 7001 |p | Jump_Nonzero 0x1c 001b 0801 | | Execute_Immediate Raise,0x1 001c c404 | | Store 0x2,0x4 001d e404 | | Load 0x2,0x4 001e 023e | > | Execute Float,Absolute_Value 001f c405 | | Store 0x2,0x5 0020 00db | | Load_Top At_Offset_3 0021 5836 |X6 | Indirect_Literal Float,0x58,1.0 0022 0247 | G | Execute Float,Equal 0023 6801 |h | Jump_Zero 0x25 0024 08e0 | | Execute_Immediate Raise,0xe0 0025 00db | | Load_Top At_Offset_3 0026 5831 |X1 | Indirect_Literal Float,0x58,1.0 0027 0244 | D | Execute Float,Less 0028 6802 |h | Jump_Zero 0x2b 0029 e006 | | Load 0x0,0x6 002a 0257 | W | Execute Discrete,Raise 002b e404 | | Load 0x2,0x4 002c 014a | J | Execute Float,Greater_Equal_Zero 002d 6803 |h | Jump_Zero 0x31 002e 5829 |X) | Indirect_Literal Float,0x58,1.0 002f c403 | | Store 0x2,0x3 0030 7802 |x | Jump 0x33 0031 5822 |X" | Indirect_Literal Float,0x54,-1.0 0032 c403 | | Store 0x2,0x3 0033 581c |X | Indirect_Literal Float,0x50,2.0 0034 e405 | | Load 0x2,0x5 0035 5822 |X" | Indirect_Literal Float,0x58,1.0 0036 023c | < | Execute Float,Minus 0037 023a | : | Execute Float,Divide 0038 004b | K | Store_Top Float,At_Offset_3 0039 00da | | Load_Top At_Offset_2 003a e20e | | Load 0x1,0xe 003b 0232 | 2 | Execute Float,Check_In_Type 003c 824c | L | Call 0x1,0x4c 003d 004b | K | Store_Top Float,At_Offset_3 003e e403 | | Load 0x2,0x3 003f 580c |X | Indirect_Literal Float,0x4c,0.5 0040 023b | ; | Execute Float,Times 0041 00db | | Load_Top At_Offset_3 0042 023b | ; | Execute Float,Times 0043 c402 | | Store 0x2,0x2 0044 e402 | | Load 0x2,0x2 0045 00d8 | | Load_Top At_Offset_0 0046 e20e | | Load 0x1,0xe 0047 0234 | 4 | Execute Float,In_Type 0048 7001 |p | Jump_Nonzero 0x4a 0049 0801 | | Execute_Immediate Raise,0x1 004a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 004b 0000 | | .XXX[0x1] 004c 3fe0 0000 |? | .DBL 0.5 004e 0000 0000 | | 0050 4000 0000 |@ | .DBL 2.0 0052 0000 0000 | | 0054 bff0 0000 | | .DBL -1.0 0056 0000 0000 | | 0058 3ff0 0000 |? | .DBL 1.0 005a 0000 0000 | | 005c 3ff6 2e42 |? .B| .DBL 1.3862943611198906 005e fefa 39ef | 9 | 0060 3fe6 2e42 |? .B| .DBL 0.6931471805599453 0062 fefa 39ef | 9 | 0064 0000 0000 | | .BLANK 0000[0x4] 0068 ; -------------------------------------------------------------------------------------- 0068 ; Debug Table 0068 ; -------------------------------------------------------------------------------------- 0068 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf26c,0x0000,0x0001,0x0001 006e 000b 0072 | r| .DBG4T 0x000b,0x0072,0x1002,0x0000 0072 ; -------------------------------------------------------------------------------------- 0072 ; Debug chain 0072 ; -------------------------------------------------------------------------------------- 0072 0004 000d | | .DBGLEN 0x0004,0x000d 0074 000b 000d | | .DBGLNO 0x000b,0x000d,0x0010,0x0013,0x0016,0x001d,0x0020,0x0024,0x0025,0x0029,0x002b,0x002e,0x0031,0x0033,0x0039,0x003e,0x0044 0085 0000 0000 | | .BLANK 0000[0x17b]