1*0a6a1f1dSLionel Sambuc/* $NetBSD: fpgetsticky.S,v 1.7 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(fpgetsticky, _fpgetsticky) 122fe8fb19SBen GrasENTRY(_fpgetsticky) 132fe8fb19SBen Gras#else 142fe8fb19SBen GrasENTRY(fpgetsticky) 152fe8fb19SBen Gras#endif 162fe8fb19SBen Gras subl $4,%esp 172fe8fb19SBen Gras fnstsw (%esp) 182fe8fb19SBen Gras movl (%esp),%eax 192fe8fb19SBen Gras andl $63,%eax 202fe8fb19SBen Gras addl $4,%esp 212fe8fb19SBen Gras ret 22*0a6a1f1dSLionel Sambuc#ifdef WEAK_ALIAS 23*0a6a1f1dSLionel SambucEND(_fpgetsticky) 24*0a6a1f1dSLionel Sambuc#else 25*0a6a1f1dSLionel SambucEND(fpgetsticky) 26*0a6a1f1dSLionel Sambuc#endif 27