You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

230 lines
6.1 KiB

commit e5e0d9a4f632735cf3bb440eecb5caee5eea44c1
Author: Ian Bolton <ian.bolton@arm.com>
Date: Thu Apr 24 07:15:33 2014 +0100
[AArch64] Suppress unnecessary FPSR and FPCR writes.
diff --git a/ports/sysdeps/aarch64/fpu/fclrexcpt.c b/ports/sysdeps/aarch64/fpu/fclrexcpt.c
index 531269f..b24f0ff 100644
--- a/ports/sysdeps/aarch64/fpu/fclrexcpt.c
+++ b/ports/sysdeps/aarch64/fpu/fclrexcpt.c
@@ -23,13 +23,15 @@ int
feclearexcept (int excepts)
{
fpu_fpsr_t fpsr;
+ fpu_fpsr_t fpsr_new;
excepts &= FE_ALL_EXCEPT;
_FPU_GETFPSR (fpsr);
- fpsr = (fpsr & ~FE_ALL_EXCEPT) | (fpsr & FE_ALL_EXCEPT & ~excepts);
+ fpsr_new = (fpsr & ~FE_ALL_EXCEPT) | (fpsr & FE_ALL_EXCEPT & ~excepts);
- _FPU_SETFPSR (fpsr);
+ if (fpsr != fpsr_new)
+ _FPU_SETFPSR (fpsr_new);
return 0;
}
diff --git a/ports/sysdeps/aarch64/fpu/fedisblxcpt.c b/ports/sysdeps/aarch64/fpu/fedisblxcpt.c
index 719d52f..c43335c 100644
--- a/ports/sysdeps/aarch64/fpu/fedisblxcpt.c
+++ b/ports/sysdeps/aarch64/fpu/fedisblxcpt.c
@@ -23,6 +23,7 @@ int
fedisableexcept (int excepts)
{
fpu_control_t fpcr;
+ fpu_control_t fpcr_new;
int original_excepts;
_FPU_GETCW (fpcr);
@@ -31,9 +32,10 @@ fedisableexcept (int excepts)
excepts &= FE_ALL_EXCEPT;
- fpcr &= ~(excepts << FE_EXCEPT_SHIFT);
+ fpcr_new = fpcr & ~(excepts << FE_EXCEPT_SHIFT);
- _FPU_SETCW (fpcr);
+ if (fpcr != fpcr_new)
+ _FPU_SETCW (fpcr_new);
return original_excepts;
}
diff --git a/ports/sysdeps/aarch64/fpu/feenablxcpt.c b/ports/sysdeps/aarch64/fpu/feenablxcpt.c
index 07a4bbb..70e413c 100644
--- a/ports/sysdeps/aarch64/fpu/feenablxcpt.c
+++ b/ports/sysdeps/aarch64/fpu/feenablxcpt.c
@@ -23,6 +23,7 @@ int
feenableexcept (int excepts)
{
fpu_control_t fpcr;
+ fpu_control_t fpcr_new;
int original_excepts;
_FPU_GETCW (fpcr);
@@ -31,9 +32,10 @@ feenableexcept (int excepts)
excepts &= FE_ALL_EXCEPT;
- fpcr |= (excepts << FE_EXCEPT_SHIFT);
+ fpcr_new = fpcr | (excepts << FE_EXCEPT_SHIFT);
- _FPU_SETCW (fpcr);
+ if (fpcr != fpcr_new)
+ _FPU_SETCW (fpcr_new);
/* Trapping exceptions are optional in AArch64 the relevant enable
bits in FPCR are RES0 hence the absence of support can be
diff --git a/ports/sysdeps/aarch64/fpu/feholdexcpt.c b/ports/sysdeps/aarch64/fpu/feholdexcpt.c
index 0514ac1..973ba4a 100644
--- a/ports/sysdeps/aarch64/fpu/feholdexcpt.c
+++ b/ports/sysdeps/aarch64/fpu/feholdexcpt.c
@@ -22,8 +22,10 @@
int
feholdexcept (fenv_t *envp)
{
- fpu_fpsr_t fpsr;
fpu_control_t fpcr;
+ fpu_control_t fpcr_new;
+ fpu_fpsr_t fpsr;
+ fpu_fpsr_t fpsr_new;
_FPU_GETCW (fpcr);
envp->__fpcr = fpcr;
@@ -32,14 +34,16 @@ feholdexcept (fenv_t *envp)
envp->__fpsr = fpsr;
/* Now set all exceptions to non-stop. */
- fpcr &= ~(FE_ALL_EXCEPT << FE_EXCEPT_SHIFT);
+ fpcr_new = fpcr & ~(FE_ALL_EXCEPT << FE_EXCEPT_SHIFT);
/* And clear all exception flags. */
- fpsr &= ~FE_ALL_EXCEPT;
+ fpsr_new = fpsr & ~FE_ALL_EXCEPT;
- _FPU_SETFPSR (fpsr);
+ if (fpsr != fpsr_new)
+ _FPU_SETFPSR (fpsr_new);
- _FPU_SETCW (fpcr);
+ if (fpcr != fpcr_new)
+ _FPU_SETCW (fpcr_new);
return 0;
}
diff --git a/ports/sysdeps/aarch64/fpu/fesetenv.c b/ports/sysdeps/aarch64/fpu/fesetenv.c
index a2434e3..30193e9 100644
--- a/ports/sysdeps/aarch64/fpu/fesetenv.c
+++ b/ports/sysdeps/aarch64/fpu/fesetenv.c
@@ -23,34 +23,38 @@ int
fesetenv (const fenv_t *envp)
{
fpu_control_t fpcr;
- fpu_fpsr_t fpsr;
+ fpu_control_t fpcr_new;
fpu_control_t updated_fpcr;
+ fpu_fpsr_t fpsr;
+ fpu_fpsr_t fpsr_new;
_FPU_GETCW (fpcr);
_FPU_GETFPSR (fpsr);
- fpcr &= _FPU_RESERVED;
- fpsr &= _FPU_FPSR_RESERVED;
+ fpcr_new = fpcr & _FPU_RESERVED;
+ fpsr_new = fpsr & _FPU_FPSR_RESERVED;
if (envp == FE_DFL_ENV)
{
- fpcr |= _FPU_DEFAULT;
- fpsr |= _FPU_FPSR_DEFAULT;
+ fpcr_new |= _FPU_DEFAULT;
+ fpsr_new |= _FPU_FPSR_DEFAULT;
}
else if (envp == FE_NOMASK_ENV)
{
- fpcr |= _FPU_FPCR_IEEE;
- fpsr |= _FPU_FPSR_IEEE;
+ fpcr_new |= _FPU_FPCR_IEEE;
+ fpsr_new |= _FPU_FPSR_IEEE;
}
else
{
- fpcr |= envp->__fpcr & ~_FPU_RESERVED;
- fpsr |= envp->__fpsr & ~_FPU_FPSR_RESERVED;
+ fpcr_new |= envp->__fpcr & ~_FPU_RESERVED;
+ fpsr_new |= envp->__fpsr & ~_FPU_FPSR_RESERVED;
}
- _FPU_SETFPSR (fpsr);
+ if (fpsr != fpsr_new)
+ _FPU_SETFPSR (fpsr_new);
- _FPU_SETCW (fpcr);
+ if (fpcr != fpcr_new)
+ _FPU_SETCW (fpcr_new);
/* Trapping exceptions are optional in AArch64 the relevant enable
bits in FPCR are RES0 hence the absence of support can be
@@ -58,7 +62,7 @@ fesetenv (const fenv_t *envp)
value. */
_FPU_GETCW (updated_fpcr);
- if ((updated_fpcr & fpcr) != fpcr)
+ if ((updated_fpcr & fpcr_new) != fpcr_new)
return 1;
return 0;
diff --git a/ports/sysdeps/aarch64/fpu/fesetround.c b/ports/sysdeps/aarch64/fpu/fesetround.c
index 40a05f6..225096a 100644
--- a/ports/sysdeps/aarch64/fpu/fesetround.c
+++ b/ports/sysdeps/aarch64/fpu/fesetround.c
@@ -23,6 +23,7 @@ int
fesetround (int round)
{
fpu_control_t fpcr;
+ fpu_control_t fpcr_new;
switch (round)
{
@@ -31,9 +32,10 @@ fesetround (int round)
case FE_DOWNWARD:
case FE_TOWARDZERO:
_FPU_GETCW (fpcr);
- fpcr = (fpcr & ~FE_TOWARDZERO) | round;
+ fpcr_new = (fpcr & ~FE_TOWARDZERO) | round;
- _FPU_SETCW (fpcr);
+ if (fpcr != fpcr_new)
+ _FPU_SETCW (fpcr_new);
return 0;
default:
diff --git a/ports/sysdeps/aarch64/fpu/fsetexcptflg.c b/ports/sysdeps/aarch64/fpu/fsetexcptflg.c
index 49cd1e4..60bb1c9 100644
--- a/ports/sysdeps/aarch64/fpu/fsetexcptflg.c
+++ b/ports/sysdeps/aarch64/fpu/fsetexcptflg.c
@@ -24,16 +24,18 @@ int
fesetexceptflag (const fexcept_t *flagp, int excepts)
{
fpu_fpsr_t fpsr;
+ fpu_fpsr_t fpsr_new;
/* Get the current environment. */
_FPU_GETFPSR (fpsr);
/* Set the desired exception mask. */
- fpsr &= ~(excepts & FE_ALL_EXCEPT);
- fpsr |= (*flagp & excepts & FE_ALL_EXCEPT);
+ fpsr_new = fpsr & ~(excepts & FE_ALL_EXCEPT);
+ fpsr_new |= (*flagp & excepts & FE_ALL_EXCEPT);
/* Save state back to the FPU. */
- _FPU_SETFPSR (fpsr);
+ if (fpsr != fpsr_new)
+ _FPU_SETFPSR (fpsr_new);
return 0;
}