Return to fabs.s CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / lib / libc / tahoe / gen

Annotation of cci/usr/src/lib/libc/tahoe/gen/fabs.s, revision 1.1

1.1     ! root        1: /* @(#)fabs.s  Tahoe version 1/28/83   */
        !             2: 
        !             3: #include "DEFS.h"
        !             4: 
        !             5: ENTRY(fabs)
        !             6: 
        !             7:        movl    8(fp),r1
        !             8:        movl    4(fp),r0
        !             9:        bgeq    fabsl
        !            10:        xorl2   $0x80000000,r0
        !            11: fabsl:
        !            12:        ret

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