[make substMap'' take a map of 'Maybe E' rather than just E
John Meacham <john@repetae.net>**20060411032337] hunk ./E/Inline.hs 113
-            let smap = substMap'' $ fromList [ (tvrIdent x,EVar x) | (x,y) <- nds]
+            let smap = substMap'' $ fromList [ (tvrIdent x,Just $ EVar x) | (x,y) <- nds]
hunk ./E/Subst.hs 70
-substMap'' :: IdMap E -> E -> E
-substMap'' im = doSubst False False (fmap Just im)
+substMap'' :: IdMap (Maybe E) -> E -> E
+substMap'' im = doSubst False False im -- (fmap Just im)
hunk ./E/TypeAnalysis.hs 275
-    sub = substMap''  $ fromList [ (tvrIdent t,v) | (t,Just v) <- sts ]
+    sub = substMap''  $ fromList [ (tvrIdent t,Just v) | (t,Just v) <- sts ]
hunk ./Ho/Build.hs 405
-    sm = substMap'' mie
+    sm = substMap'' (fmap Just mie)