]> git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/unix/sysv/linux/alpha/ieee_get_fp_control.S
74cc87ee366082390184b323f7c5c843f48e6df4
[thirdparty/glibc.git] / sysdeps / unix / sysv / linux / alpha / ieee_get_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 .text
24
25 ENTRY(__ieee_get_fp_control)
26 cfi_startproc
27 PSEUDO_PROLOGUE
28
29 lda sp, -16(sp)
30 cfi_adjust_cfa_offset(16)
31
32 mov sp, a1
33 ldi a0, GSI_IEEE_FP_CONTROL
34 ldi v0, __NR_osf_getsysinfo
35 call_pal PAL_callsys
36
37 ldq t0, 0(sp)
38 lda sp, 16(sp)
39 cfi_adjust_cfa_offset(-16)
40
41 bne a3, SYSCALL_ERROR_LABEL
42
43 mov t0, v0
44 ret
45
46 PSEUDO_END(__ieee_get_fp_control)
47 cfi_endproc
48
49 libc_hidden_def(__ieee_get_fp_control)
50 weak_alias (__ieee_get_fp_control, ieee_get_fp_control)