Return to sqrt.s CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.lib / libm

Annotation of cci/usr/src/usr.lib/libm/sqrt.s, revision 1.1.1.1

1.1       root        1:        .data
                      2:        .text
                      3: LL0:   .align  1
                      4:        .globl  _sqrt
                      5:        .data
                      6:        .align  2
                      7: L18:   .long   0x40000000, 0x00000000 # .double .5
                      8:        .text
                      9:        .data
                     10:        .align  2
                     11: L19:   .long   0x40000000, 0x00000000 # .double .5
                     12:        .text
                     13:        .data
                     14:        .align  2
                     15: L20:   .long   0x40000000, 0x00000000 # .double .5
                     16:        .text
                     17:        .set    L12,0x0
                     18:        .data
                     19:        .text
                     20: _sqrt: .word   L12
                     21:        subl3   $64,fp,sp
                     22:        tstl    4(fp)
                     23:        jgtr    L16
                     24:        jgeq    L17
                     25:        movl    $33,-64(fp)
                     26: L17:   clrl    r1
                     27:        clrl    r0
                     28:        ret
                     29: L16:
                     30:        ldf     4(fp)
                     31:        sqrtf
                     32:        stf     -60(fp)
                     33:        clrl    -56(fp)
                     34:        ldd     4(fp)
                     35:        divd    -60(fp)
                     36:        addd    -60(fp)
                     37:        muld    L18
                     38:        std     -60(fp)
                     39:        ldd     4(fp)
                     40:        divd    -60(fp)
                     41:        addd    -60(fp)
                     42:        muld    L19
                     43:        std     -60(fp)
                     44:        ldd     4(fp)
                     45:        divd    -60(fp)
                     46:        addd    -60(fp)
                     47:        muld    L20
                     48:        std     -60(fp)
                     49:        movl    -56(fp),r1
                     50:        movl    -60(fp),r0
                     51:        ret
                     52: 

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