summaryrefslogtreecommitdiff
path: root/compiler/GHC/Driver/Config
diff options
context:
space:
mode:
authorARATA Mizuki <minorinoki@gmail.com>2022-02-03 21:44:57 +0900
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-05-11 08:22:57 -0400
commit8500206ea7084f3914efd3fe7f4336f2893eb4ac (patch)
treee03394e1b712e8d9edf131eda1f5872edd6ffb82 /compiler/GHC/Driver/Config
parent5b791ed3baf9875931c3bf3b67e8d83d0b3c94e2 (diff)
downloadhaskell-8500206ea7084f3914efd3fe7f4336f2893eb4ac.tar.gz
Make floating-point abs IEEE 754 compliant
The old code used by via-C backend didn't handle the sign bit of NaN. See #21043.
Diffstat (limited to 'compiler/GHC/Driver/Config')
-rw-r--r--compiler/GHC/Driver/Config/StgToCmm.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/compiler/GHC/Driver/Config/StgToCmm.hs b/compiler/GHC/Driver/Config/StgToCmm.hs
index 1b05884bb7..7ec80f24d3 100644
--- a/compiler/GHC/Driver/Config/StgToCmm.hs
+++ b/compiler/GHC/Driver/Config/StgToCmm.hs
@@ -51,7 +51,6 @@ initStgToCmmConfig dflags mod = StgToCmmConfig
, stgToCmmAllowQuotRem2 = (ncg && (x86ish || ppc)) || llvm
, stgToCmmAllowExtendedAddSubInstrs = (ncg && (x86ish || ppc)) || llvm
, stgToCmmAllowIntMul2Instr = (ncg && x86ish) || llvm
- , stgToCmmAllowFabsInstrs = (ncg && (x86ish || ppc || aarch64)) || llvm
-- SIMD flags
, stgToCmmVecInstrsErr = vec_err
, stgToCmmAvx = isAvxEnabled dflags
@@ -72,7 +71,6 @@ initStgToCmmConfig dflags mod = StgToCmmConfig
ArchPPC -> True
ArchPPC_64 _ -> True
_ -> False
- aarch64 = platformArch platform == ArchAArch64
vec_err = case backend dflags of
LLVM -> Nothing
_ -> Just (unlines ["SIMD vector instructions require the LLVM back-end.", "Please use -fllvm."])