[don't desugar do bindings until after renaming
John Meacham <john@repetae.net>**20090228042330
 Ignore-this: aee5455f770a0827f5be4c6fddf9f8a9
] hunk ./FrontEnd/Rename.hs 522
-    rename (HsDo hsStmts) = rename =<< doToExp newVar (nameName v_bind) (nameName v_bind_) (nameName v_fail) hsStmts
+    rename (HsDo hsStmts) = do
+        (ss,()) <- renameHsStmts hsStmts (return ())
+        doToExp newVar (nameName v_bind) (nameName v_bind_) (nameName v_fail) ss