1995-04-07 04:41:43 +04:00
|
|
|
/*
|
|
|
|
* 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 */
|
1995-04-07 04:41:43 +04:00
|
|
|
|
|
|
|
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
|
1995-04-07 04:41:43 +04:00
|
|
|
rts
|