1#ifndef lint 2 .asciz "@(#)fabs.s 5.1 (Berkeley) 06/05/85" 3#endif not lint 4 5/* fabs - floating absolute value */ 6 7#include "DEFS.h" 8 9ENTRY(fabs, 0) 10 movd 4(ap),r0 11 bgeq 1f 12 mnegd r0,r0 131: 14 ret 15