xref: /csrg-svn/lib/libc/tahoe/stdlib/abs.s (revision 61188)
134438Sbostic/*
2*61188Sbostic * Copyright (c) 1988, 1993
3*61188Sbostic *	The Regents of the University of California.  All rights reserved.
434438Sbostic *
542642Sbostic * %sccs.include.redist.c%
634824Sbostic *
734438Sbostic * This code is derived from software contributed to Berkeley by
834438Sbostic * Computer Consoles Inc.
934438Sbostic */
1029690Ssam
1134438Sbostic#if defined(LIBC_SCCS) && !defined(lint)
12*61188Sbostic	.asciz "@(#)abs.s	8.1 (Berkeley) 06/04/93"
1334438Sbostic#endif /* LIBC_SCCS and not lint */
1434438Sbostic
1529690Ssam/* abs - int absolute value */
1629690Ssam
1729690Ssam#include "DEFS.h"
1829690Ssam
1929690SsamENTRY(abs, 0)
2029690Ssam	movl	4(fp),r0
2129690Ssam	bgeq	1f
2229690Ssam	mnegl	r0,r0
2329690Ssam1:
2429690Ssam	ret
25