]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/unix/sysv/linux/alpha/ieee_set_fp_control.S
b1b252b6d8bb5b5a5caa3253756c902e1c9f65a5
[thirdparty/glibc.git] / sysdeps / unix / sysv / linux / alpha / ieee_set_fp_control.S
1 /* Copyright (C) 1993-2019 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by David Mosberger <davidm@azstarnet.com>, 1995.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library. If not, see
17 <http://www.gnu.org/licenses/>. */
18
19 #include <sysdep.h>
20 #include "kernel_sysinfo.h"
21
22
23 ENTRY(__ieee_set_fp_control)
24 cfi_startproc
25 PSEUDO_PROLOGUE
26
27 lda sp, -16(sp)
28 cfi_adjust_cfa_offset(16)
29
30 ldi v0, __NR_osf_setsysinfo
31 stq a0, 0(sp)
32 mov sp, a1
33 ldi a0, SSI_IEEE_FP_CONTROL
34 call_pal PAL_callsys
35
36 lda sp, 16(sp)
37 cfi_adjust_cfa_offset(-16)
38
39 bne a3, SYSCALL_ERROR_LABEL
40 ret
41
42 PSEUDO_END(__ieee_set_fp_control)
43 cfi_endproc
44
45 libc_hidden_def(__ieee_set_fp_control)
46 weak_alias (__ieee_set_fp_control, ieee_set_fp_control)