Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
  2.  
  3. tan.L0:
  4.         .quad   0xffffffffffffffff
  5.  
  6. tan:
  7.         fldl    4(%esp)
  8.         fptan
  9.         fstsw
  10.         fstp    %st(0)
  11.         sahf
  12.         jnp     tan.L1
  13. /*      fstp    %st(0) - if exception, there is nothing on the stack */
  14.         fldl    tan.L0
  15. tan.L1:
  16.         ret
  17.