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

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.