Provide cbrtl() and cbrtf() for vax

This commit is contained in:
martin 2013-11-24 15:12:10 +00:00
parent 707fcaf05d
commit d506da106c
1 changed files with 11 additions and 1 deletions

View File

@ -1,4 +1,4 @@
/* $NetBSD: n_cbrt.S,v 1.6 2003/08/07 16:44:45 agc Exp $ */
/* $NetBSD: n_cbrt.S,v 1.7 2013/11/24 15:12:10 martin Exp $ */
/*
* Copyright (c) 1985, 1993
* The Regents of the University of California. All rights reserved.
@ -40,6 +40,16 @@
* Max error less than 0.667 ulps (unit in the last places)
*/
ENTRY(cbrtf, 0)
cvtfd 4(%ap),-(%sp)
calls $2,_C_LABEL(cbrt)
cvtdf %r0,%r0
ret
#ifdef WEAK_ALIAS
WEAK_ALIAS(cbrtl, cbrt)
#endif
ALTENTRY(cbrt)
ENTRY(d_cbrt, 0x00c0) # save %r6 & %r7
movq 4(%ap),%r0 # %r0 = argument x