lib/libc/arch/m68k/gen/fpgetmask.S

   1 /*      $NetBSD: fpgetmask.S,v 1.7 2002/01/13 21:45:44 thorpej Exp $    */
   2
   3 /*
   4  * Written by Charles M. Hannum, Apr 9, 1995
   5  * Public domain.
   6  */
   7
   8 #include <machine/asm.h>
   9
  10 #ifdef WEAK_ALIAS
  11 WEAK_ALIAS(fpgetmask, _fpgetmask)
  12 ENTRY(_fpgetmask)
  13 #else
  14 ENTRY(fpgetmask)
  15 #endif
  16         fmovel %fpcr,%d0
  17         bfextu %d0{#18:#5},%d0
  18         rts