s_significand.S revision 1.5 
11.1Sjtc/*
21.3Sjtc * Written by J.T. Conklin <jtc@netbsd.org>.
31.3Sjtc * Public domain.
41.1Sjtc */
51.1Sjtc
61.1Sjtc#include <machine/asm.h>
71.1Sjtc
81.5Sfvdl#include "abi.h"
91.5Sfvdl
101.5SfvdlRCSID("$NetBSD: s_significand.S,v 1.5 2001/06/19 00:26:30 fvdl Exp $")
111.2Sjtc
121.1SjtcENTRY(significand)
131.5Sfvdl	XMM_ONE_ARG_DOUBLE_PROLOGUE
141.5Sfvdl	fldl	ARG_DOUBLE_ONE
151.1Sjtc	fxtract
161.5Sfvdl	fstp	%st(1)
171.5Sfvdl	XMM_DOUBLE_EPILOGUE
181.1Sjtc	ret
19