[commit: ghc] master: Comments only (c24ce5a)
git at git.haskell.org
git at git.haskell.org
Mon Aug 12 10:42:37 CEST 2013
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/c24ce5a18350265f94834299578bf5fe68dbf01a/ghc
>---------------------------------------------------------------
commit c24ce5a18350265f94834299578bf5fe68dbf01a
Author: Jan Stolarek <jan.stolarek at p.lodz.pl>
Date: Mon Aug 12 09:41:58 2013 +0100
Comments only
>---------------------------------------------------------------
c24ce5a18350265f94834299578bf5fe68dbf01a
compiler/prelude/PrelRules.lhs | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/compiler/prelude/PrelRules.lhs b/compiler/prelude/PrelRules.lhs
index 6faecaa..96e39fe 100644
--- a/compiler/prelude/PrelRules.lhs
+++ b/compiler/prelude/PrelRules.lhs
@@ -672,12 +672,12 @@ strengthReduction two_lit add_op = do -- Note [Strength reduction]
return arg ]
return $ Var (mkPrimOpId add_op) `App` arg `App` arg
-{- Note [Strength reduction]
-
-This rule turns multiplications of the form 2 * x and x * 2 into x + x addition
-because addition costs less than multiplication. See #7116
-
--}
+-- Note [Strength reduction]
+-- ~~~~~~~~~~~~~~~~~~~~~~~~~
+--
+-- This rule turns floating point multiplications of the form 2.0 * x and
+-- x * 2.0 into x + x addition, because addition costs less than multiplication.
+-- See #7116
trueVal, falseVal :: Expr CoreBndr
trueVal = Var trueDataConId
More information about the ghc-commits
mailing list