Blame sysdeps/arm/feenablxcpt.c

Packit Service 82fcde
/* Enable floating-point exceptions.
Packit Service 82fcde
   Copyright (C) 2001-2018 Free Software Foundation, Inc.
Packit Service 82fcde
   This file is part of the GNU C Library.
Packit Service 82fcde
   Contributed by Philip Blundell <philb@gnu.org>, 2001.
Packit Service 82fcde
Packit Service 82fcde
   The GNU C Library is free software; you can redistribute it and/or
Packit Service 82fcde
   modify it under the terms of the GNU Lesser General Public
Packit Service 82fcde
   License as published by the Free Software Foundation; either
Packit Service 82fcde
   version 2.1 of the License, or (at your option) any later version.
Packit Service 82fcde
Packit Service 82fcde
   The GNU C Library is distributed in the hope that it will be useful,
Packit Service 82fcde
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 82fcde
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit Service 82fcde
   Lesser General Public License for more details.
Packit Service 82fcde
Packit Service 82fcde
   You should have received a copy of the GNU Lesser General Public
Packit Service 82fcde
   License along with the GNU C Library.  If not, see
Packit Service 82fcde
   <http://www.gnu.org/licenses/>.  */
Packit Service 82fcde
Packit Service 82fcde
#include <fenv.h>
Packit Service 82fcde
#include <fpu_control.h>
Packit Service 82fcde
#include <arm-features.h>
Packit Service 82fcde
Packit Service 82fcde
Packit Service 82fcde
int
Packit Service 82fcde
feenableexcept (int excepts)
Packit Service 82fcde
{
Packit Service 82fcde
  fpu_control_t fpscr, new_fpscr, updated_fpscr;
Packit Service 82fcde
Packit Service 82fcde
  /* Fail if a VFP unit isn't present.  */
Packit Service 82fcde
  if (!ARM_HAVE_VFP)
Packit Service 82fcde
    return -1;
Packit Service 82fcde
Packit Service 82fcde
  _FPU_GETCW (fpscr);
Packit Service 82fcde
  excepts &= FE_ALL_EXCEPT;
Packit Service 82fcde
  new_fpscr = fpscr | (excepts << FE_EXCEPT_SHIFT);
Packit Service 82fcde
Packit Service 82fcde
  if (new_fpscr != fpscr)
Packit Service 82fcde
    {
Packit Service 82fcde
      _FPU_SETCW (new_fpscr);
Packit Service 82fcde
Packit Service 82fcde
      /* Not all VFP architectures support trapping exceptions, so
Packit Service 82fcde
	 test whether the relevant bits were set and fail if not.  */
Packit Service 82fcde
      _FPU_GETCW (updated_fpscr);
Packit Service 82fcde
Packit Service 82fcde
      if (new_fpscr & ~updated_fpscr)
Packit Service 82fcde
	return -1;
Packit Service 82fcde
    }
Packit Service 82fcde
Packit Service 82fcde
  return (fpscr >> FE_EXCEPT_SHIFT) & FE_ALL_EXCEPT;
Packit Service 82fcde
}