[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