summaryrefslogtreecommitdiff
path: root/compiler/nativeGen
diff options
context:
space:
mode:
authorSergei Trofimovich <slyfox@gentoo.org>2017-03-10 09:30:10 +0000
committerSergei Trofimovich <slyfox@gentoo.org>2017-03-10 09:30:10 +0000
commit46246a6d57c35ebf12032d13a4cd7ff18f713770 (patch)
tree96512412c2d3e52853e43fd97d9ffa61cf28441f /compiler/nativeGen
parenta6e06c7b6ac9d0eb54f09721dbac9b1bed4c8c32 (diff)
downloadhaskell-46246a6d57c35ebf12032d13a4cd7ff18f713770.tar.gz
implement missing Fabs{32,64} on i386 NCG and UNREG
Noticed breakage as build failure on i386 freebsd build bot: http://haskell.inf.elte.hu/builders/freebsd-i386-head/1267/10.html ghc-stage1: panic! (the 'impossible' happened) (GHC version 8.1.20170310 for i386-portbld-freebsd): outOfLineCmmOp: MO_F64_Fabs not supported here Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
Diffstat (limited to 'compiler/nativeGen')
-rw-r--r--compiler/nativeGen/X86/CodeGen.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/nativeGen/X86/CodeGen.hs b/compiler/nativeGen/X86/CodeGen.hs
index 704514e324..562303cad8 100644
--- a/compiler/nativeGen/X86/CodeGen.hs
+++ b/compiler/nativeGen/X86/CodeGen.hs
@@ -2623,7 +2623,7 @@ outOfLineCmmOp mop res args
fn = case mop of
MO_F32_Sqrt -> fsLit "sqrtf"
- MO_F32_Fabs -> unsupported
+ MO_F32_Fabs -> fsLit "fabsf"
MO_F32_Sin -> fsLit "sinf"
MO_F32_Cos -> fsLit "cosf"
MO_F32_Tan -> fsLit "tanf"
@@ -2640,7 +2640,7 @@ outOfLineCmmOp mop res args
MO_F32_Pwr -> fsLit "powf"
MO_F64_Sqrt -> fsLit "sqrt"
- MO_F64_Fabs -> unsupported
+ MO_F64_Fabs -> fsLit "fabs"
MO_F64_Sin -> fsLit "sin"
MO_F64_Cos -> fsLit "cos"
MO_F64_Tan -> fsLit "tan"