fabsf.S revision 1.1
11.1Sriastrad/*
21.1Sriastrad * Copyright (c) 1983, 1993
31.1Sriastrad *	The Regents of the University of California.  All rights reserved.
41.1Sriastrad *
51.1Sriastrad * Redistribution and use in source and binary forms, with or without
61.1Sriastrad * modification, are permitted provided that the following conditions
71.1Sriastrad * are met:
81.1Sriastrad * 1. Redistributions of source code must retain the above copyright
91.1Sriastrad *    notice, this list of conditions and the following disclaimer.
101.1Sriastrad * 2. Redistributions in binary form must reproduce the above copyright
111.1Sriastrad *    notice, this list of conditions and the following disclaimer in the
121.1Sriastrad *    documentation and/or other materials provided with the distribution.
131.1Sriastrad * 3. Neither the name of the University nor the names of its contributors
141.1Sriastrad *    may be used to endorse or promote products derived from this software
151.1Sriastrad *    without specific prior written permission.
161.1Sriastrad *
171.1Sriastrad * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
181.1Sriastrad * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
191.1Sriastrad * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
201.1Sriastrad * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
211.1Sriastrad * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
221.1Sriastrad * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
231.1Sriastrad * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
241.1Sriastrad * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
251.1Sriastrad * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
261.1Sriastrad * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
271.1Sriastrad * SUCH DAMAGE.
281.1Sriastrad */
291.1Sriastrad
301.1Sriastrad#include "DEFS.h"
311.1Sriastrad
321.1Sriastrad#if defined(LIBC_SCCS) && !defined(lint)
331.1Sriastrad	/* .asciz "@(#)fabs.s	8.1 (Berkeley) 6/4/93" */
341.1SriastradRCSID("$NetBSD: fabsf.S,v 1.1 2018/11/08 18:19:37 riastradh Exp $")
351.1Sriastrad#endif /* LIBC_SCCS and not lint */
361.1Sriastrad
371.1Sriastrad/* fabsf - floating absolute value, float edition */
381.1Sriastrad
391.1SriastradENTRY(fabsf, 0)
401.1Sriastrad	movf	4(%ap),%r0
411.1Sriastrad	bgeq	1f
421.1Sriastrad	mnegf	%r0,%r0
431.1Sriastrad1:
441.1Sriastrad	ret
451.1SriastradEND(fabsf)
46