Martin Storsjö : msvcrt: Implement _clearfp for arm.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 1b6f59b5d0aa6d4da1483a129d6e53c89fe725a4
URL:    https://source.winehq.org/git/wine.git/?a=commit;h=1b6f59b5d0aa6d4da1483a129d6e53c89fe725a4

Author: Martin Storsjö <martin at martin.st>
Date:   Tue Aug  3 15:56:11 2021 +0300

msvcrt: Implement _clearfp for arm.

Signed-off-by: Martin Storsjö <martin at martin.st>
Signed-off-by: Piotr Caban <piotr at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 dlls/msvcrt/math.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/dlls/msvcrt/math.c b/dlls/msvcrt/math.c
index 01b3e7002a6..03394900e87 100644
--- a/dlls/msvcrt/math.c
+++ b/dlls/msvcrt/math.c
@@ -5260,6 +5260,18 @@ unsigned int CDECL _clearfp(void)
     if (fpsr & 0x80) flags |= _SW_DENORMAL;
     fpsr &= ~0x9f;
     __asm__ __volatile__( "msr fpsr, %0" :: "r" (fpsr) );
+#elif defined(__arm__) && !defined(__SOFTFP__)
+    DWORD fpscr;
+
+    __asm__ __volatile__( "vmrs %0, fpscr" : "=r" (fpscr) );
+    if (fpscr & 0x1)  flags |= _SW_INVALID;
+    if (fpscr & 0x2)  flags |= _SW_ZERODIVIDE;
+    if (fpscr & 0x4)  flags |= _SW_OVERFLOW;
+    if (fpscr & 0x8)  flags |= _SW_UNDERFLOW;
+    if (fpscr & 0x10) flags |= _SW_INEXACT;
+    if (fpscr & 0x80) flags |= _SW_DENORMAL;
+    fpscr &= ~0x9f;
+    __asm__ __volatile__( "vmsr fpscr, %0" :: "r" (fpscr) );
 #else
     FIXME( "not implemented\n" );
 #endif