Return to ldexp.s CVS log

Up to [Research Unix] / researchv9 / libc / sun

Annotation of researchv9/libc/sun/ldexp.s, revision 1.1.1.1

1.1       root        1:        .data
                      2: /*     .asciz  "@(#)ldexp.s 1.1 86/02/03 SMI"  */
                      3:        .text
                      4: 
                      5: #include "fpcrtdefs.h"
                      6: 
                      7: /*
                      8:  * double
                      9:  * ldexp( value, exp)
                     10:  *      double value;
                     11:  *      int exp;
                     12:  *
                     13:  * return a value v s.t. v == value * (2**exp)
                     14:  */
                     15: 
                     16: ENTER(_ldexp)
                     17:        moveml  sp@( 4),d0/d1   | suck parameters into registers
                     18:        lea     sp@(12),a0      | a0 gets address of i.
                     19:        jmp     Fscaleid
                     20:        

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.