sysdeps/i386/fpu/s_scalbnf.S

   1 /*
   2  * Written by J.T. Conklin <jtc@netbsd.org>.
   3  * Public domain.
   4  */
   5
   6 #include <machine/asm.h>
   7 #include <i386-math-asm.h>
   8
   9 RCSID("$NetBSD: s_scalbnf.S,v 1.3 1995/05/09 00:19:59 jtc Exp $")
  10
  11 ENTRY(__scalbnf)
  12         fildl   8(%esp)
  13         flds    4(%esp)
  14         fscale
  15         fstp    %st(1)
  16         FLT_NARROW_EVAL
  17         ret
  18 END (__scalbnf)
  19 strong_alias (__scalbnf, __scalblnf)
  20
  21 #include <shlib-compat.h>
  22 #if SHLIB_COMPAT (libc, GLIBC_2_1, GLIBC_2_20)
  23 compat_symbol (libc, __scalbnf, scalblnf, GLIBC_2_1);
  24 #endif