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

/*
 * Written by J.T. Conklin, Apr 6, 1995
 * Public domain.
 */

#include <machine/asm.h>

ENTRY(fpgetround)
	fmovel fpcr,d0
	bfextu d0{#26:#2},d0
	rts
Added __flt_rounds(), fp{get,set}{round,mask,sticky}(). 1995-04-07 04:41:43 +04:00			`/*`
Put jtc's notice back, since these are now roughly identical. 1995-04-10 03:32:53 +04:00			`* Written by J.T. Conklin, Apr 6, 1995`
Added __flt_rounds(), fp{get,set}{round,mask,sticky}(). 1995-04-07 04:41:43 +04:00			`* Public domain.`
			`*/`

removed commented-out #include <machine/asm.h> 1995-04-09 23:13:26 +04:00			`#include <machine/asm.h>`
Added __flt_rounds(), fp{get,set}{round,mask,sticky}(). 1995-04-07 04:41:43 +04:00
			`ENTRY(fpgetround)`
			`fmovel fpcr,d0`
Actually, bitfields are faster on the '040; optimize for it, but adjust the fields so that the mask and sticky bits are the same. 1995-04-10 03:28:38 +04:00			`bfextu d0{#26:#2},d0`
Added __flt_rounds(), fp{get,set}{round,mask,sticky}(). 1995-04-07 04:41:43 +04:00			`rts`