[remove some information from demand analysis results to help speed up jhc
John Meacham <john@repetae.net>**20090226084603
 Ignore-this: d3aba38c04755301094a144094a21d9b
] hunk ./E/Demand.hs 316
-        solveDs' (Just False) [(t,e)] id (\nn -> f rs (nn ++ fs))
+        solveDs' (Just False) [(t,e)] fixupDemandSignature (\nn -> f rs (nn ++ fs))
hunk ./E/Demand.hs 318
-        solveDs' (Just True) rg id (\nn -> f rs (nn ++ fs))
+        solveDs' (Just True) rg fixupDemandSignature (\nn -> f rs (nn ++ fs))