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

22 lines
360 B
ArmAsm
Raw Normal View History

/*
* Written by J.T. Conklin, Apr 6, 1995
* Public domain.
*/
#include <machine/asm.h>
.text
.even
_map:
1995-04-09 23:18:49 +04:00
.byte 1 /* round to nearest */
.byte 0 /* round to zero */
.byte 3 /* round to negative infinity */
.byte 2 /* round to positive infinity */
ENTRY(__flt_rounds)
fmovel fpcr,d0
bfextu d0{#26:#2},d0
lea _map,a0
1995-04-10 00:44:02 +04:00
moveb a0@(d0:l:1),d0
rts