|
|
1.1 ! root 1: #ifdef LIBC_SCCS ! 2: .asciz "@(#)fabs.s 5.2 (Berkeley) 3/9/86" ! 3: #endif LIBC_SCCS ! 4: ! 5: /* fabs - floating absolute value */ ! 6: ! 7: #include "DEFS.h" ! 8: ! 9: ENTRY(fabs, 0) ! 10: movd 4(ap),r0 ! 11: bgeq 1f ! 12: mnegd r0,r0 ! 13: 1: ! 14: ret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.