Merge branch 'vendor/NCURSES'
[dragonfly.git] / lib / libm / arch / i386 / s_significand.S
1 /*
2  * Written by J.T. Conklin <jtc@NetBSD.org>.
3  * Public domain.
4  *
5  * $NetBSD: s_significand.S,v 1.6 2003/07/26 19:25:03 salo Exp $
6  * $DragonFly: src/lib/libm/arch/i386/s_significand.S,v 1.1 2005/07/26 21:15:19 joerg Exp $
7  */
8
9 #include <machine/asm.h>
10
11 #include "abi.h"
12
13 ENTRY(significand)
14         XMM_ONE_ARG_DOUBLE_PROLOGUE
15         fldl    ARG_DOUBLE_ONE
16         fxtract
17         fstp    %st(1)
18         XMM_DOUBLE_EPILOGUE
19         ret