Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Simple tanf() for vax

This commit is contained in:
martin 2014-03-06 10:59:52 +00:00
parent ea3fa8f391
commit f03b314bc0
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lib/libm/arch/vax/n_tan.S
View File

@ -1,4 +1,4 @@
/* $NetBSD: n_tan.S,v 1.6 2003/08/07 16:44:45 agc Exp $ */ /* $NetBSD: n_tan.S,v 1.7 2014/03/06 10:59:52 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.
@ -87,3 +87,11 @@ ENTRY(tan, 0x0fc0) # save %r6-%r11
divd3 %r0,%r10,%r0 divd3 %r0,%r10,%r0
bispsw (%sp)+ bispsw (%sp)+
1: ret 1: ret
ENTRY(tanf, 0)
cvtfd 4(%ap),-(%sp)
calls $2,_C_LABEL(tan)
cvtdf %r0,%r0
ret