Rev 9843 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
9843 | turbocat | 1 | /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */ |
2 | |||
9846 | turbocat | 3 | .global tan; |
4 | |||
9843 | turbocat | 5 | tan.L0: |
6 | .quad 0xffffffffffffffff |
||
7 | |||
8 | tan: |
||
9 | fldl 4(%esp) |
||
10 | fptan |
||
11 | fstsw |
||
12 | fstp %st(0) |
||
13 | sahf |
||
14 | jnp tan.L1 |
||
9846 | turbocat | 15 | fstp %st(0) /*- if exception, there is nothing on the stack */ |
9843 | turbocat | 16 | fldl tan.L0 |
17 | tan.L1: |
||
18 | ret |