blob: 44a601d8f8e50632cd4dcb79bd4458eb8c93f80a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
/*
* Written by Charles M. Hannum, Apr 9, 1995
* Public domain.
*/
#if defined(LIBC_SCCS)
.text
.asciz "$OpenBSD: fpsetsticky.S,v 1.2 1996/08/19 08:14:22 tholo Exp $"
#endif /* LIBC_SCCS */
#include <machine/asm.h>
ENTRY(fpsetsticky)
movel d2,sp@-
fmovel fpsr,d1
movel sp@(8),d2
bfextu d1{#24:#5},d0
bfins d2,d1{#24:#5}
movel sp@+,d2
fmovel d1,fpsr
rts
|
