fpgetmask.S revision 1.4
11.4Sthorpej/*	$NetBSD: fpgetmask.S,v 1.4 2002/01/13 21:45:42 thorpej Exp $	*/
21.3Sperry
31.1Sjtc/*
41.1Sjtc * Written by J.T. Conklin, Apr 4, 1995
51.1Sjtc * Public domain.
61.1Sjtc */
71.1Sjtc
81.1Sjtc#include <machine/asm.h>
91.1Sjtc
101.4Sthorpej#ifdef WEAK_ALIAS
111.4SthorpejWEAK_ALIAS(fpgetmask, _fpgetmask)
121.4SthorpejENTRY(_fpgetmask)
131.4Sthorpej#else
141.1SjtcENTRY(fpgetmask)
151.4Sthorpej#endif
161.1Sjtc	subl $4,%esp
171.1Sjtc	fnstcw (%esp)
181.2Smycroft	movl (%esp),%eax
191.1Sjtc	notl %eax
201.1Sjtc	andl $63,%eax
211.1Sjtc	addl $4,%esp
221.1Sjtc	ret
23