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