xref: /minix3/lib/libc/arch/m68k/stdlib/llabs.S (revision 2fe8fb192fe7e8720e3e7a77f928da545e872a6a)
1*2fe8fb19SBen Gras/*	$NetBSD: llabs.S,v 1.4 2008/08/04 21:29:28 matt Exp $	*/
2*2fe8fb19SBen Gras
3*2fe8fb19SBen Gras/*-
4*2fe8fb19SBen Gras * Copyright (c) 1990 The Regents of the University of California.
5*2fe8fb19SBen Gras * All rights reserved.
6*2fe8fb19SBen Gras *
7*2fe8fb19SBen Gras * This code is derived from software contributed to Berkeley by
8*2fe8fb19SBen Gras * the Systems Programming Group of the University of Utah Computer
9*2fe8fb19SBen Gras * Science Department.
10*2fe8fb19SBen Gras *
11*2fe8fb19SBen Gras * Redistribution and use in source and binary forms, with or without
12*2fe8fb19SBen Gras * modification, are permitted provided that the following conditions
13*2fe8fb19SBen Gras * are met:
14*2fe8fb19SBen Gras * 1. Redistributions of source code must retain the above copyright
15*2fe8fb19SBen Gras *    notice, this list of conditions and the following disclaimer.
16*2fe8fb19SBen Gras * 2. Redistributions in binary form must reproduce the above copyright
17*2fe8fb19SBen Gras *    notice, this list of conditions and the following disclaimer in the
18*2fe8fb19SBen Gras *    documentation and/or other materials provided with the distribution.
19*2fe8fb19SBen Gras * 3. Neither the name of the University nor the names of its contributors
20*2fe8fb19SBen Gras *    may be used to endorse or promote products derived from this software
21*2fe8fb19SBen Gras *    without specific prior written permission.
22*2fe8fb19SBen Gras *
23*2fe8fb19SBen Gras * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24*2fe8fb19SBen Gras * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25*2fe8fb19SBen Gras * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26*2fe8fb19SBen Gras * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27*2fe8fb19SBen Gras * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28*2fe8fb19SBen Gras * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29*2fe8fb19SBen Gras * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30*2fe8fb19SBen Gras * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31*2fe8fb19SBen Gras * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32*2fe8fb19SBen Gras * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33*2fe8fb19SBen Gras * SUCH DAMAGE.
34*2fe8fb19SBen Gras */
35*2fe8fb19SBen Gras
36*2fe8fb19SBen Gras#include <machine/asm.h>
37*2fe8fb19SBen Gras
38*2fe8fb19SBen Gras#if defined(LIBC_SCCS) && !defined(lint)
39*2fe8fb19SBen Gras#if 0
40*2fe8fb19SBen Gras	RCSID("from: @(#)abs.s	5.1 (Berkeley) 5/12/90")
41*2fe8fb19SBen Gras#else
42*2fe8fb19SBen Gras	RCSID("$NetBSD: llabs.S,v 1.4 2008/08/04 21:29:28 matt Exp $")
43*2fe8fb19SBen Gras#endif
44*2fe8fb19SBen Gras#endif /* LIBC_SCCS and not lint */
45*2fe8fb19SBen Gras
46*2fe8fb19SBen Gras#ifdef WEAK_ALIAS
47*2fe8fb19SBen GrasWEAK_ALIAS(llabs, _llabs)
48*2fe8fb19SBen GrasWEAK_ALIAS(imaxabs, _llabs)
49*2fe8fb19SBen Gras#endif
50*2fe8fb19SBen Gras/* llabs - long long int absolute value */
51*2fe8fb19SBen Gras
52*2fe8fb19SBen Gras#ifdef WEAK_ALIAS
53*2fe8fb19SBen GrasENTRY(_llabs)
54*2fe8fb19SBen Gras#else
55*2fe8fb19SBen GrasENTRY(llabs)
56*2fe8fb19SBen Gras#endif
57*2fe8fb19SBen Gras	movl	%sp@(8),%d1
58*2fe8fb19SBen Gras	movl	%sp@(4),%d0
59*2fe8fb19SBen Gras	jge	L1
60*2fe8fb19SBen Gras	negl	%d1
61*2fe8fb19SBen Gras	negxl	%d0
62*2fe8fb19SBen GrasL1:
63*2fe8fb19SBen Gras	rts
64