s_finite.S revision 1.4 
1/*
2 * Written by J.T. Conklin <jtc@netbsd.org>.
3 * Public domain.
4 */
5
6#include <machine/asm.h>
7
8RCSID("$NetBSD: s_finite.S,v 1.4 1995/05/08 23:57:41 jtc Exp $")
9
10ENTRY(finite)
11	movl	8(%esp),%eax
12	andl	$0x7ff00000, %eax
13	cmpl	$0x7ff00000, %eax
14	setnel	%al
15	andl	$0x000000ff, %eax
16	ret
17