s_finite.S revision 1.5 
11.1Sjtc/*
21.3Sjtc * Written by J.T. Conklin <jtc@netbsd.org>.
31.3Sjtc * Public domain.
41.1Sjtc */
51.1Sjtc
61.1Sjtc#include <machine/asm.h>
71.1Sjtc
81.5SjtcRCSID("$NetBSD: s_finite.S,v 1.5 1996/06/04 18:00:34 jtc Exp $")
91.2Sjtc
101.1SjtcENTRY(finite)
111.1Sjtc	movl	8(%esp),%eax
121.1Sjtc	andl	$0x7ff00000, %eax
131.1Sjtc	cmpl	$0x7ff00000, %eax
141.5Sjtc	setne	%al
151.1Sjtc	andl	$0x000000ff, %eax
161.1Sjtc	ret
17