|
|
1.1 root 1: /* fabs.s 4.1 83/06/27 */
2: /* fabs - floating absolute value */
3:
4: #include "DEFS.h"
5:
6: ENTRY(fabs)
7: movd 4(ap),r0
8: bgeq 1f
9: mnegd r0,r0
10: 1:
11: ret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.