home *** CD-ROM | disk | FTP | other *** search
/ PC Extra Super CD 1998 January / PCPLUS131.iso / DJGPP / V2 / DJLSR201.ZIP / src / libc / ansi / math / pow2.s < prev    next >
Encoding:
Text File  |  1995-10-01  |  395 b   |  31 lines
  1. /* Copyright (C) 1995 DJ Delorie, see COPYING.DJ for details */
  2.     .data
  3. LCW1:
  4.     .word    0
  5. LCW2:
  6.     .word    0
  7. LC0:
  8.     .double    0d1.0e+00
  9.  
  10.     .text
  11.  
  12.     .globl    ___pow2
  13. ___pow2:
  14.     fldl    4(%esp)
  15.     fstcww    LCW1
  16.     fstcww    LCW2
  17.     fwait
  18.     andw    $0xf3ff,LCW2
  19.     orw    $0x0400,LCW2
  20.     fldcww    LCW2
  21.     fldl    %st(0)
  22.     frndint
  23.     fldcww    LCW1
  24.     fxch    %st(1)
  25.     fsub    %st(1),%st
  26.     f2xm1
  27.     faddl    LC0
  28.     fscale
  29.     fstp    %st(1)
  30.     ret
  31.