summaryrefslogtreecommitdiff
path: root/compiler/GHC/StgToCmm
diff options
context:
space:
mode:
authorJohn Ericson <git@JohnEricson.me>2020-01-20 17:25:06 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-07-07 13:56:00 -0400
commit37743f91a3f5018a8894ca6d35e8b423e4e08b50 (patch)
tree044ea1644eccc152bc74297484f5e6c5d5066ef7 /compiler/GHC/StgToCmm
parente61d539527a7398017f759c67621ba18a15878f7 (diff)
downloadhaskell-37743f91a3f5018a8894ca6d35e8b423e4e08b50.tar.gz
Support `timesInt2#` in LLVM backend
Diffstat (limited to 'compiler/GHC/StgToCmm')
-rw-r--r--compiler/GHC/StgToCmm/Prim.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/StgToCmm/Prim.hs b/compiler/GHC/StgToCmm/Prim.hs
index 6c785d24ff..3c6ba38011 100644
--- a/compiler/GHC/StgToCmm/Prim.hs
+++ b/compiler/GHC/StgToCmm/Prim.hs
@@ -1408,7 +1408,7 @@ emitPrimOp dflags = \case
else Right genericWordMul2Op
IntMul2Op -> \args -> opCallishHandledLater args $
- if ncg && x86ish
+ if ncg && x86ish || llvm
then Left (MO_S_Mul2 (wordWidth platform))
else Right genericIntMul2Op