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