Return to cmpd.s CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / lib / libc / tahoe / fpe

Annotation of 43BSDTahoe/lib/libc/tahoe/fpe/cmpd.s, revision 1.1

1.1     ! root        1: #ifdef LIBC_SCCS
        !             2:        .asciz  "@(#)cmpd.s     1.2 (Berkeley/CCI) 7/2/86"
        !             3: #endif LIBC_SCCS
        !             4: 
        !             5: #include "DEFS.h"
        !             6: 
        !             7: XENTRY(cmpd, R12|R11|R10|R9)
        !             8:        movl    4(fp),r12
        !             9:        movl    8(fp),r10
        !            10:        movl    12(fp),r11
        !            11:        movl    16(fp),r9
        !            12:        tstl    r12
        !            13:        jgeq    L16
        !            14:        xorl2   $-2147483648,r12
        !            15:        tstl    r10
        !            16:        jeql    L17
        !            17:        mnegl   r10,r10
        !            18:        mcoml   r12,r12
        !            19:        jbr     L16
        !            20: L17:   mnegl   r12,r12
        !            21: L16:   tstl    r11
        !            22:        jgeq    L19
        !            23:        xorl2   $-2147483648,r11
        !            24:        tstl    r9
        !            25:        jeql    L20
        !            26:        mnegl   r9,r9
        !            27:        mcoml   r11,r11
        !            28:        jbr     L19
        !            29: L20:   mnegl   r11,r11
        !            30: L19:   cmpl    r12,r11
        !            31:        jeql    L22
        !            32:        cmpl    r12,r11
        !            33:        jleq    L9999
        !            34:        movl    $1,r0
        !            35:        jbr     L9998
        !            36: L9999: mnegl   $1,r0
        !            37: L9998: ret
        !            38: L22:   cmpl    r10,r9
        !            39:        jeql    L23
        !            40:        cmpl    r10,r9
        !            41:        jlequ   L9997
        !            42:        movl    $1,r0
        !            43:        jbr     L9996
        !            44: L9997: mnegl   $1,r0
        !            45: L9996: ret
        !            46: L23:   clrl    r0
        !            47:        ret

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