[GHC] #7507: loop fusion not working for Int32, Int64 as it does for Int ?

[GHC]

#7507: loop fusion not working for Int32, Int64 as it does for Int ?
-------------------------+--------------------------------------------------
Reporter:  j.waldmann    |          Owner:                
    Type:  bug           |         Status:  new           
Priority:  normal        |      Component:  Compiler      
 Version:  7.6.1         |       Keywords:                
      Os:  Linux         |   Architecture:  x86_64 (amd64)
 Failure:  None/Unknown  |      Blockedby:                
Blocking:                |        Related:                
-------------------------+--------------------------------------------------

Comment(by j.waldmann):

 perhaps this is helpful: I was running ghc with -ddump-rule-firings, and
 the differences are:

 {{{
 diff rules.Int rules.Int64

 4d3
 < Rule fired: SPEC Data.List.sum
 13a13,15
 > Rule fired: Class op fromInteger
 > Rule fired: Class op fromInteger
 > Rule fired: Class op fromInteger
 67a70,72
 > Rule fired: integerToInt
 > Rule fired: integerToInt
 > Rule fired: integerToInt
 69,70c74
 <     SPEC GHC.Real.^ [GHC.Types.Int, GHC.Integer.Type.Integer]
 < Rule fired: fold/build
 ---
 >     SPEC GHC.Real.^ [GHC.Int.Int64, GHC.Integer.Type.Integer]
 73,75c77
 < Rule fired: >#
 < Rule fired: <#
 < Rule fired: >#
 ---
 > Rule fired: mapList
 }}}

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/7507#comment:1>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler