blob: 31813121bb47f8f230666ea55570a8bb1fba43bf (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
/*
* Written by J.T. Conklin, Apr 6, 1995
* Public domain.
*/
#if defined(LIBC_SCCS)
.text
.asciz "$OpenBSD: flt_rounds.S,v 1.2 1996/08/19 08:14:15 tholo Exp $"
#endif /* LIBC_SCCS */
#include <machine/asm.h>
.text
.even
_map:
.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
moveb a0@(d0:l:1),d0
rts
|
