Home | History | Annotate | Line # | Download | only in i387
s_finitef.S revision 1.7 
      1  1.1       jtc /*
      2  1.6      salo  * 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.7  riastrad RCSID("$NetBSD: s_finitef.S,v 1.7 2024/05/08 01:04:03 riastradh Exp $")
      9  1.1       jtc 
     10  1.7  riastrad WEAK_ALIAS(finitef, _finitef)
     11  1.7  riastrad 
     12  1.7  riastrad ENTRY(_finitef)
     13  1.5      fvdl #ifdef __i386__
     14  1.1       jtc 	movl	4(%esp),%eax
     15  1.4       jtc 	andl	$0x7f800000, %eax
     16  1.4       jtc 	cmpl	$0x7f800000, %eax
     17  1.4       jtc 	setne	%al
     18  1.1       jtc 	andl	$0x000000ff, %eax
     19  1.5      fvdl #else
     20  1.5      fvdl 	xorl	%eax,%eax
     21  1.5      fvdl 	movl	$0x7ff00000,%esi
     22  1.5      fvdl 	movss	%xmm0,-4(%rsp)
     23  1.5      fvdl 	andl	-4(%rsp),%esi
     24  1.5      fvdl 	cmpl	$0x7ff00000,%esi
     25  1.5      fvdl 	setne	%al
     26  1.5      fvdl #endif
     27  1.1       jtc 	ret
     28  1.7  riastrad END(_finitef)
     29