[commit: ghc] master: Comments only (c111209)

[Simon Peyton Jones]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/c111209c9c402b712bca1ee69a43786b65f722ce

>---------------------------------------------------------------

commit c111209c9c402b712bca1ee69a43786b65f722ce
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Sat Jul 14 13:13:24 2012 +0100

    Comments only

>---------------------------------------------------------------

 compiler/prelude/PrelRules.lhs |    5 +++++
 1 files changed, 5 insertions(+), 0 deletions(-)

diff --git a/compiler/prelude/PrelRules.lhs b/compiler/prelude/PrelRules.lhs
index dab34fc..7aeb920 100644
--- a/compiler/prelude/PrelRules.lhs
+++ b/compiler/prelude/PrelRules.lhs
@@ -779,7 +779,11 @@ match_inline _ (Type _ : e : _)
 
 match_inline _ _ = Nothing
 
+-------------------------------------------------
 -- Integer rules
+--   smallInteger  (79::Int#)  = 79::Integer   
+--   wordToInteger (79::Word#) = 79::Integer   
+-- Similarly Int64, Word64
 
 match_IntToInteger :: Id
                    -> IdUnfoldingFun
@@ -833,6 +837,7 @@ match_Word64ToInteger id id_unf [xl]
         panic "match_Word64ToInteger: Id has the wrong type"
 match_Word64ToInteger _ _ _ = Nothing
 
+-------------------------------------------------
 match_Integer_convert :: Num a
                       => (a -> Expr CoreBndr)
                       -> Id