newlib-cygwin/newlib/libc/machine/i386/f_frexpf.S

49 lines
847 B
ArmAsm
Raw Normal View History

2000-02-18 03:39:52 +08:00
/*
* ====================================================
2002-12-20 Jeff Johnston <jjohnstn@redhat.com> * libc/machine/i386/f_atan2.S: Change copyright from Cygnus Solutions to Red Hat Inc. * libc/machine/i386/f_atan2f.S: Ditto. * libc/machine/i386/f_exp.c: Ditto. * libc/machine/i386/f_expf.c: Ditto. * libc/machine/i386/f_frexp.S: Ditto. * libc/machine/i386/f_frexpf.S: Ditto. * libc/machine/i386/f_ldexp.S: Ditto. * libc/machine/i386/f_ldexpf.S: Ditto. * libc/machine/i386/f_log.S: Ditto. * libc/machine/i386/f_log10.S: Ditto. * libc/machine/i386/f_log10f.S: Ditto. * libc/machine/i386/f_logf.S: Ditto. * libc/machine/i386/f_pow.c: Ditto. * libc/machine/i386/f_powf.c: Ditto. * libc/machine/i386/f_tan.S: Ditto. * libc/machine/i386/f_tanf.S: Ditto. * libc/machine/i386/memchr.S: Ditto. * libc/machine/i386/memcmp.S: Ditto. * libc/machine/i386/memcpy.S: Ditto. * libc/machine/i386/memmove.S: Ditto. * libc/machine/i386/memset.S: Ditto. * libc/machine/i386/strchr.S: Ditto. * libc/machine/i386/strlen.S: Ditto. * libm/machine/i386/f_atan2.S: Ditto. * libm/machine/i386/f_atan2f.S: Ditto. * libm/machine/i386/f_exp.c: Ditto. * libm/machine/i386/f_expf.c: Ditto. * libm/machine/i386/f_frexp.S: Ditto. * libm/machine/i386/f_frexpf.S: Ditto. * libm/machine/i386/f_ldexp.S: Ditto. * libm/machine/i386/f_ldexpf.S: Ditto. * libm/machine/i386/f_log.S: Ditto. * libm/machine/i386/f_log10.S: Ditto. * libm/machine/i386/f_log10f.S: Ditto. * libm/machine/i386/f_logf.S: Ditto. * libm/machine/i386/f_pow.c: Ditto. * libm/machine/i386/f_powf.c: Ditto. * libm/machine/i386/f_tan.S: Ditto. * libm/machine/i386/f_tanf.S: Ditto.
2002-12-21 05:31:20 +08:00
* Copyright (C) 1998, 2002 by Red Hat Inc. All rights reserved.
2000-02-18 03:39:52 +08:00
*
* Permission to use, copy, modify, and distribute this
* software is freely granted, provided that this notice
* is preserved.
* ====================================================
*/
#if !defined(_SOFT_FLOAT)
2000-02-18 03:39:52 +08:00
/*
Fast version of frexpf using Intel float instructions.
float _f_frexpf (float x, int *exp);
Function splits x into y * 2 ** z. It then
returns the value of y and updates *exp with z.
There is no error checking or setting of errno.
*/
#include "i386mach.h"
.global SYM (_f_frexpf)
SOTYPE_FUNCTION(_f_frexpf)
2000-02-18 03:39:52 +08:00
SYM (_f_frexpf):
pushl ebp
movl esp,ebp
flds 8(ebp)
movl 12(ebp),eax
fxtract
fld1
fchs
fxch
fscale
fstp st1
fxch
fld1
faddp
fistpl 0(eax)
leave
ret
#endif