]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/unix/sysv/linux/alpha/ieee_get_fp_control.S
Prefer https to http for gnu.org and fsf.org URLs
[thirdparty/glibc.git] / sysdeps / unix / sysv / linux / alpha / ieee_get_fp_control.S
CommitLineData
04277e02 1/* Copyright (C) 1993-2019 Free Software Foundation, Inc.
3c7b2587
UD
2 This file is part of the GNU C Library.
3 Contributed by David Mosberger <davidm@azstarnet.com>, 1995.
6932e444 4
3c7b2587 5 The GNU C Library is free software; you can redistribute it and/or
3214b89b
AJ
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.
6932e444 9
3c7b2587
UD
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
3214b89b 13 Lesser General Public License for more details.
6932e444 14
3214b89b 15 You should have received a copy of the GNU Lesser General Public
ab84e3ff 16 License along with the GNU C Library. If not, see
5a82c748 17 <https://www.gnu.org/licenses/>. */
6932e444
RM
18
19#include <sysdep.h>
0af1bbc9 20#include "kernel_sysinfo.h"
6932e444 21
6932e444
RM
22
23 .text
24c177a0 24
6ee732b7
RH
25ENTRY(__ieee_get_fp_control)
26 cfi_startproc
27 PSEUDO_PROLOGUE
28
ebcd2cd1 29 lda sp, -16(sp)
6ee732b7 30 cfi_adjust_cfa_offset(16)
6932e444
RM
31
32 mov sp, a1
33 ldi a0, GSI_IEEE_FP_CONTROL
34 ldi v0, __NR_osf_getsysinfo
35 call_pal PAL_callsys
6932e444 36
6ee732b7 37 ldq t0, 0(sp)
dd4b8913 38 lda sp, 16(sp)
6ee732b7 39 cfi_adjust_cfa_offset(-16)
6932e444 40
6ee732b7
RH
41 bne a3, SYSCALL_ERROR_LABEL
42
43 mov t0, v0
44 ret
6932e444 45
6ee732b7
RH
46PSEUDO_END(__ieee_get_fp_control)
47 cfi_endproc
6932e444 48
1fbb61a9 49libc_hidden_def(__ieee_get_fp_control)
6932e444 50weak_alias (__ieee_get_fp_control, ieee_get_fp_control)