Return to negq.s CVS log

Up to [MW Coherent from dump] / coherent / b / lib / libc / old

Annotation of coherent/b/lib/libc/old/negq.s, revision 1.1

1.1     ! root        1: ////////
        !             2: /
        !             3: / negq( w0, w1, w2, w3 ) - negate a quad word.
        !             4: /
        !             5: /      Action: Negate a quad word.
        !             6: /
        !             7: /      Return: Negated result in _fpac_.
        !             8: /
        !             9: ////////
        !            10:        .globl  negq_
        !            11:        .shri
        !            12: 
        !            13: negq_: push    si
        !            14:        push    di
        !            15:        push    bp
        !            16:        mov     bp,sp
        !            17:        mov     ax,8(bp)
        !            18:        mov     bx,10(bp)
        !            19:        mov     cx,12(bp)
        !            20:        mov     dx,14(bp)
        !            21:        not     dx
        !            22:        not     cx
        !            23:        not     bx
        !            24:        neg     ax
        !            25:        sbb     bx,$0
        !            26:        sbb     cx,$0
        !            27:        sbb     dx,$0
        !            28:        mov     _fpac_+0,ax
        !            29:        mov     _fpac_+2,bx
        !            30:        mov     _fpac_+4,cx
        !            31:        mov     _fpac_+6,dx
        !            32:        pop     bp
        !            33:        pop     di
        !            34:        pop     si
        !            35:        ret

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