home *** CD-ROM | disk | FTP | other *** search
/ PC Extra Super CD 1998 January / PCPLUS131.iso / DJGPP / V2 / DJLSR201.ZIP / src / libc / ansi / math / atan2.s < prev    next >
Encoding:
Text File  |  1995-06-04  |  425 b   |  36 lines
  1. /* Copyright (C) 1995 DJ Delorie, see COPYING.DJ for details */
  2. .data
  3.     .align    2
  4. nan:
  5.     .long    0xffffffff
  6.     .byte    0xff
  7.     .byte    0xff
  8.     .byte    0xff
  9.     .byte    0x7f
  10.  
  11. .text
  12.     .globl    _atan2
  13. _atan2:
  14.     fldl    4(%esp)
  15.     fldl    12(%esp)
  16.     ftst
  17.     fnstsw    %ax
  18.     sahf
  19.     jne    doit
  20.     fxch    %st(1)
  21.     ftst
  22.     fnstsw    %ax
  23.     sahf
  24.     je    isanan
  25.     fxch    %st(1)
  26. doit:
  27.     fpatan
  28.     ret
  29. isanan:
  30.     movl    $1,_errno
  31.     fstp    %st(0)
  32.     fstp    %st(0)
  33.     fldl    nan
  34.     ret
  35.  
  36.