Blame sysdeps/aarch64/fpu/feenablxcpt.c

Packit 6c4009
/* Copyright (C) 2001-2018 Free Software Foundation, Inc.
Packit 6c4009
Packit 6c4009
   This file is part of the GNU C Library.
Packit 6c4009
Packit 6c4009
   The GNU C Library is free software; you can redistribute it and/or
Packit 6c4009
   modify it under the terms of the GNU Lesser General Public License as
Packit 6c4009
   published by the Free Software Foundation; either version 2.1 of the
Packit 6c4009
   License, or (at your option) any later version.
Packit 6c4009
Packit 6c4009
   The GNU C Library is distributed in the hope that it will be useful,
Packit 6c4009
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 6c4009
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit 6c4009
   Lesser General Public License for more details.
Packit 6c4009
Packit 6c4009
   You should have received a copy of the GNU Lesser General Public
Packit 6c4009
   License along with the GNU C Library; if not, see
Packit 6c4009
   <http://www.gnu.org/licenses/>.  */
Packit 6c4009
Packit 6c4009
#include <fenv.h>
Packit 6c4009
#include <fpu_control.h>
Packit 6c4009
Packit 6c4009
int
Packit 6c4009
feenableexcept (int excepts)
Packit 6c4009
{
Packit 6c4009
  fpu_control_t fpcr;
Packit 6c4009
  fpu_control_t fpcr_new;
Packit 6c4009
  fpu_control_t updated_fpcr;
Packit 6c4009
Packit 6c4009
  _FPU_GETCW (fpcr);
Packit 6c4009
  excepts &= FE_ALL_EXCEPT;
Packit 6c4009
  fpcr_new = fpcr | (excepts << FE_EXCEPT_SHIFT);
Packit 6c4009
Packit 6c4009
  if (fpcr != fpcr_new)
Packit 6c4009
    {
Packit 6c4009
      _FPU_SETCW (fpcr_new);
Packit 6c4009
Packit 6c4009
      /* Trapping exceptions are optional in AArch64; the relevant enable
Packit 6c4009
	 bits in FPCR are RES0 hence the absence of support can be detected
Packit 6c4009
	 by reading back the FPCR and comparing with the required value.  */
Packit 6c4009
      _FPU_GETCW (updated_fpcr);
Packit 6c4009
Packit 6c4009
      if (fpcr_new & ~updated_fpcr)
Packit 6c4009
	return -1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  return (fpcr >> FE_EXCEPT_SHIFT) & FE_ALL_EXCEPT;
Packit 6c4009
}