Provide scalbnl, scalbnf, logbl, logbf, fmaxl for vax.

This commit is contained in:
martin 2014-02-03 21:22:21 +00:00
parent 97cd0ff474
commit 39ae3c2126
3 changed files with 20 additions and 3 deletions
lib/libm

@ -30,9 +30,11 @@
#include <machine/asm.h> #include <machine/asm.h>
#include <sys/errno.h> #include <sys/errno.h>
RCSID("$NetBSD: n_scalbn.S,v 1.4 2013/05/24 12:45:40 martin Exp $") RCSID("$NetBSD: n_scalbn.S,v 1.5 2014/02/03 21:22:21 martin Exp $")
WEAK_ALIAS(scalbn,_scalbn) WEAK_ALIAS(scalbn,_scalbn)
WEAK_ALIAS(scalbnl,_scalbnl)
WEAK_ALIAS(scalbnf,_scalbnf)
WEAK_ALIAS(ldexp,_scalbn) WEAK_ALIAS(ldexp,_scalbn)
WEAK_ALIAS(ldexpf,_scalbnf) WEAK_ALIAS(ldexpf,_scalbnf)
WEAK_ALIAS(ldexpl,_scalbnl) WEAK_ALIAS(ldexpl,_scalbnl)

@ -1,4 +1,4 @@
/* $NetBSD: n_support.S,v 1.6 2003/08/07 16:44:45 agc Exp $ */ /* $NetBSD: n_support.S,v 1.7 2014/02/03 21:22:21 martin Exp $ */
/* /*
* Copyright (c) 1985, 1993 * Copyright (c) 1985, 1993
* The Regents of the University of California. All rights reserved. * The Regents of the University of California. All rights reserved.
@ -31,6 +31,8 @@
*/ */
#include <machine/asm.h> #include <machine/asm.h>
WEAK_ALIAS(logbl,logb)
.text .text
_sccsid: _sccsid:
.asciz "@(#)support.s\t1.3 (Berkeley) 8/21/85; 8.1 (ucb.elefunt) 6/4/93" .asciz "@(#)support.s\t1.3 (Berkeley) 8/21/85; 8.1 (ucb.elefunt) 6/4/93"
@ -58,6 +60,15 @@ ENTRY(copysign, 0)
bisw2 %r2,%r0 # copy the sign bit of y to x bisw2 %r2,%r0 # copy the sign bit of y to x
Lz: ret Lz: ret
/*
* float logbf(float x);
*/
ENTRY(logbf, 0)
cvtfd 4(%ap),-(%sp)
calls $2,_C_LABEL(logb)
cvtdf %r0,%r0
ret
/* /*
* double logb(double x); * double logb(double x);
*/ */

@ -26,11 +26,15 @@
#include <sys/cdefs.h> #include <sys/cdefs.h>
#if defined(LIBM_SCCS) && !defined(lint) #if defined(LIBM_SCCS) && !defined(lint)
__RCSID("$NetBSD: n_fmax.c,v 1.1 2011/01/09 02:32:13 jakllsch Exp $"); __RCSID("$NetBSD: n_fmax.c,v 1.2 2014/02/03 21:22:21 martin Exp $");
#endif #endif
#include <math.h> #include <math.h>
#ifdef __weak_alias
__weak_alias(fmaxl, fmax);
#endif
double double
fmax(double x, double y) fmax(double x, double y)
{ {