NetBSD/lib/libc/arch/m68k/gen/fpsetmask.S

19 lines
309 B
ArmAsm

/* $NetBSD: fpsetmask.S,v 1.5 1995/12/13 19:36:18 thorpej Exp $ */
/*
* Written by Charles M. Hannum, Apr 9, 1995
* Public Domain.
*/
#include <machine/asm.h>
ENTRY(fpsetmask)
movel d2,sp@-
fmovel fpcr,d1
movel sp@(8),d2
bfextu d1{#18:#5},d0
bfins d2,d1{#18:#5}
movel sp@+,d2
fmovel d1,fpcr
rts