fabs.S revision 1.1
11.1Scgd/* 21.1Scgd * Copyright (c) 1992, 1993 31.1Scgd * The Regents of the University of California. All rights reserved. 41.1Scgd * 51.1Scgd * This software was developed by the Computer Systems Engineering group 61.1Scgd * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and 71.1Scgd * contributed to Berkeley. 81.1Scgd * 91.1Scgd * Redistribution and use in source and binary forms, with or without 101.1Scgd * modification, are permitted provided that the following conditions 111.1Scgd * are met: 121.1Scgd * 1. Redistributions of source code must retain the above copyright 131.1Scgd * notice, this list of conditions and the following disclaimer. 141.1Scgd * 2. Redistributions in binary form must reproduce the above copyright 151.1Scgd * notice, this list of conditions and the following disclaimer in the 161.1Scgd * documentation and/or other materials provided with the distribution. 171.1Scgd * 3. All advertising materials mentioning features or use of this software 181.1Scgd * must display the following acknowledgement: 191.1Scgd * This product includes software developed by the University of 201.1Scgd * California, Berkeley and its contributors. 211.1Scgd * 4. Neither the name of the University nor the names of its contributors 221.1Scgd * may be used to endorse or promote products derived from this software 231.1Scgd * without specific prior written permission. 241.1Scgd * 251.1Scgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 261.1Scgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 271.1Scgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 281.1Scgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 291.1Scgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 301.1Scgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 311.1Scgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 321.1Scgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 331.1Scgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 341.1Scgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 351.1Scgd * SUCH DAMAGE. 361.1Scgd * 371.1Scgd * from: Header: fabs.s,v 1.4 91/10/07 23:59:05 torek Exp 381.1Scgd * $Id: fabs.S,v 1.1 1993/10/07 00:21:30 cgd Exp $ 391.1Scgd */ 401.1Scgd 411.1Scgd#if defined(LIBC_SCCS) && !defined(lint) 421.1Scgd .asciz "@(#)fabs.s 8.1 (Berkeley) 6/4/93" 431.1Scgd#endif /* LIBC_SCCS and not lint */ 441.1Scgd 451.1Scgd/* fabs - floating absolute value */ 461.1Scgd 471.1Scgd#include "DEFS.h" 481.1Scgd 491.1ScgdENTRY(fabs) 501.1Scgd std %o0, [%sp + 32] ! return value => %f0:f1 511.1Scgd ldd [%sp + 32], %f0 ! (via kernel %o0/%o1 slot) 521.1Scgd retl 531.1Scgd fabss %f0, %f0 ! return absolute value 54