projects / ghc-base.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: e20436c) | patch
Make sure zipWithFB has arity 2
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Wed, 25 Nov 2009 01:00:03 +0000 (01:00 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Wed, 25 Nov 2009 01:00:03 +0000 (01:00 +0000)
commit688a7522048e7da103ea835d224f9e34ee1a615e
tree0972065ec118d60b098cdfc01595e6ec9ce18671tree | snapshot
parente20436cbb0ab0fff9c03b2edc69499de31ae74c1commit | diff
Make sure zipWithFB has arity 2

It gets 2 arguments in the "zipWith" rule but its arity was higher and the new
inliner didn't inline it sometimes, for instance here:

mpp ::  [Double] -> [Double] -> [Double] -> [Double] -> [Double]
mpp as bs cs ds = zipWith (*) (zipWith (+) as bs) (zipWith (+) cs ds)

This was a regression vs. 6.10.
GHC/List.lhs diff | blob | history
GHC "base" library, with HetMet modifications