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

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
* The Regents of the University of California. All rights reserved.
@ -87,3 +87,11 @@ ENTRY(tan, 0x0fc0) # save %r6-%r11
divd3 %r0,%r10,%r0
bispsw (%sp)+
1: ret
ENTRY(tanf, 0)
cvtfd 4(%ap),-(%sp)
calls $2,_C_LABEL(tan)
cvtdf %r0,%r0
ret