sortix-mirror/libm/arch/i387/fpgetprec.S

23 lines
355 B
ArmAsm

/* $NetBSD: fpgetprec.S,v 1.1 2011/03/26 19:51:41 christos Exp $ */
/*
* Written by J.T. Conklin, Apr 4, 1995
* Public domain.
*/
#include <machine/asm.h>
#ifdef WEAK_ALIAS
WEAK_ALIAS(fpgetprec, _fpgetprec)
ENTRY(_fpgetprec)
#else
ENTRY(fpgetprec)
#endif
subl $4,%esp
fnstcw (%esp)
movl (%esp),%eax
rorl $8,%eax
andl $3,%eax
addl $4,%esp
ret