1 1.1 jtc /* 2 1.2 jtc * Written by J.T. Conklin <jtc (at) netbsd.org>. 3 1.2 jtc * Public domain. 4 1.1 jtc */ 5 1.1 jtc 6 1.1 jtc #include <machine/asm.h> 7 1.1 jtc 8 1.2 jtc RCSID("$Id: s_finitef.S,v 1.2 1995/04/28 22:44:01 jtc Exp $") 9 1.1 jtc 10 1.1 jtc ENTRY(finitef) 11 1.1 jtc movl 4(%esp),%eax 12 1.1 jtc andl $0x7ff00000, %eax 13 1.1 jtc cmpl $0x7ff00000, %eax 14 1.1 jtc setnel %al 15 1.1 jtc andl $0x000000ff, %eax 16 1.1 jtc ret 17