1*0d34bfa2Suebayasi/* $NetBSD: fpgetsticky.S,v 1.7 2014/05/23 02:34:19 uebayasi Exp $ */ 2a3a46419Sperry 380bba6a1Sjtc/* 480bba6a1Sjtc * Written by J.T. Conklin, Apr 4, 1995 580bba6a1Sjtc * Public domain. 680bba6a1Sjtc */ 780bba6a1Sjtc 880bba6a1Sjtc#include <machine/asm.h> 980bba6a1Sjtc 105d3e8294Sthorpej#ifdef WEAK_ALIAS 115d3e8294SthorpejWEAK_ALIAS(fpgetsticky, _fpgetsticky) 125d3e8294SthorpejENTRY(_fpgetsticky) 135d3e8294Sthorpej#else 14907e54c9SjtcENTRY(fpgetsticky) 155d3e8294Sthorpej#endif 1680bba6a1Sjtc subl $4,%esp 1780bba6a1Sjtc fnstsw (%esp) 18ddbc579aSmycroft movl (%esp),%eax 1980bba6a1Sjtc andl $63,%eax 2080bba6a1Sjtc addl $4,%esp 2180bba6a1Sjtc ret 22*0d34bfa2Suebayasi#ifdef WEAK_ALIAS 23*0d34bfa2SuebayasiEND(_fpgetsticky) 24*0d34bfa2Suebayasi#else 25*0d34bfa2SuebayasiEND(fpgetsticky) 26*0d34bfa2Suebayasi#endif 27