1*0a6a1f1dSLionel Sambuc/* $NetBSD: fpgetmask.S,v 1.5 2014/05/23 02:34:19 uebayasi Exp $ */ 22fe8fb19SBen Gras 32fe8fb19SBen Gras/* 42fe8fb19SBen Gras * Written by J.T. Conklin, Apr 4, 1995 52fe8fb19SBen Gras * Public domain. 62fe8fb19SBen Gras */ 72fe8fb19SBen Gras 82fe8fb19SBen Gras#include <machine/asm.h> 92fe8fb19SBen Gras 102fe8fb19SBen Gras#ifdef WEAK_ALIAS 112fe8fb19SBen GrasWEAK_ALIAS(fpgetmask, _fpgetmask) 122fe8fb19SBen GrasENTRY(_fpgetmask) 132fe8fb19SBen Gras#else 142fe8fb19SBen GrasENTRY(fpgetmask) 152fe8fb19SBen Gras#endif 162fe8fb19SBen Gras subl $4,%esp 172fe8fb19SBen Gras fnstcw (%esp) 182fe8fb19SBen Gras movl (%esp),%eax 192fe8fb19SBen Gras notl %eax 202fe8fb19SBen Gras andl $63,%eax 212fe8fb19SBen Gras addl $4,%esp 222fe8fb19SBen Gras ret 23*0a6a1f1dSLionel Sambuc#ifdef WEAK_ALIAS 24*0a6a1f1dSLionel SambucEND(_fpgetmask) 25*0a6a1f1dSLionel Sambuc#else 26*0a6a1f1dSLionel SambucEND(fpgetmask) 27*0a6a1f1dSLionel Sambuc#endif 28