source: trunk/libs/newlib/src/newlib/libm/machine/i386/f_tanf.S @ 444

Last change on this file since 444 was 444, checked in by satin@…, 6 years ago

add newlib,libalmos-mkh, restructure shared_syscalls.h and mini-libc

File size: 772 bytes
Line 
1/*
2 * ====================================================
3 * Copyright (C) 1998, 2002 by Red Hat Inc. All rights reserved.
4 *                             
5 * Permission to use, copy, modify, and distribute this
6 * software is freely granted, provided that this notice
7 * is preserved.               
8 * ====================================================
9 */                     
10
11#if !defined(_SOFT_FLOAT)
12
13/*
14Fast version of tanf using Intel float instructions.
15
16   float _f_tanf (float x);
17
18Function calculates the tangent of x.
19There is no error checking or setting of errno.
20*/
21
22        #include "i386mach.h"
23
24        .global SYM (_f_tanf)
25       SOTYPE_FUNCTION(_f_tanf)
26
27SYM (_f_tanf):
28        pushl ebp
29        movl esp,ebp
30        flds 8(ebp)
31        fptan
32        ffree %st(0)
33        fincstp
34
35        leave
36        ret
37
38#endif
Note: See TracBrowser for help on using the repository browser.