1/* fabs.s 4.1 83/06/27 */ 2/* fabs - floating absolute value */ 3 4#include "DEFS.h" 5 6ENTRY(fabs) 7 movd 4(ap),r0 8 bgeq 1f 9 mnegd r0,r0 101: 11 ret 12