1d5e4728dSbostic/* 2*967dd0d9Sbostic * Copyright (c) 1988, 1993 3*967dd0d9Sbostic * The Regents of the University of California. All rights reserved. 4d5e4728dSbostic * 5d5e4728dSbostic * This code is derived from software contributed to Berkeley by 6d5e4728dSbostic * Computer Consoles Inc. 7eaffa01aSbostic * 8eaffa01aSbostic * %sccs.include.redist.c% 9d5e4728dSbostic */ 10d5e4728dSbostic 11d5e4728dSbostic#if defined(LIBC_SCCS) && !defined(lint) 12*967dd0d9Sbostic .asciz "@(#)fabs.s 8.1 (Berkeley) 06/04/93" 13d5e4728dSbostic#endif /* LIBC_SCCS and not lint */ 14cf7d8765Ssam 15cf7d8765Ssam#include "DEFS.h" 16cf7d8765Ssam 17cf7d8765SsamENTRY(fabs, 0) 18cf7d8765Ssam movl 8(fp),r1 19cf7d8765Ssam movl 4(fp),r0 20cf7d8765Ssam bgeq 1f 21cf7d8765Ssam xorl2 $0x80000000,r0 22cf7d8765Ssam1: 23cf7d8765Ssam ret 24